History
- Group
- The Ancient Temple — Austria, founded 1988
A crack intro from The Ancient Temple, an Austrian group abbreviated TAT. CSDb (group ID 156) documents TAT as a cracker, demo, and import group founded in 1988 and active until 1993. The group was co-founded by Ice-T and Mr Watson, and its roster grew to include Gazza (cracker and modem trader), Bobo (coder and cracker), Case and Extract (both versatile members handling coding, cracking, graphics, and swapping), and Ayatollah (coder, cracker, diskmag editor, and organizer). With approximately 510 documented releases on CSDb — spanning demos, cracks, tools, and music collections — TAT was one of Austria’s more prolific C64 scene outfits during its five-year run. Individual credits for code, music, or graphics on this particular intro could not be confirmed through available sources. Comments on intros.c64.org from Rough and Valsary confirm the intro was catalogued and discussed within the preservation community.
Sources: CSDb · intros.c64.org
// ============================================ // output - Part 1 of 2 // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:48 // https://restore64.dev by datucker / Rabenauge // // Load address: $0700 End: $3926 (12839 bytes) // Crunched with Exomizer v2/v3 — depacked by emulation // Packer entry: $080b (via BASIC SYS 2059) // Entry point: $2b00 (11008) // IRQ handler: $1f50 (nmi_1f50) // IRQ handler: $ea31 (irq_ea31) // IRQ handler: $2024 (irq_2024) // // Code: 2750 bytes, Data: 10089 bytes // Labels: 320, Subroutines: 13 // // Verification: 4 line(s) auto-corrected to .byte for exact byte matching // // Cross-references: all OK // ============================================ // --- Region $1005-$10f8 --- .pc = $1005 "loc_1005" loc_1005: lda #$c5 sta $d016 jsr $fda3 ldx #$49 ldy #$10 lda #$ca jsr sub_1030 ldx #$08 jsr sub_1020 jmp loc_1050 scr_101e: // === Screen RAM (2 bytes, $101e-$101f) === .encoding "screencode_mixed" .text "@@" .encoding "petscii_upper" // Referenced by: jsr from $1018, $1078, $11a1, $1279, $2613, $2999, $29bd; branch from $102d sub_1020: { txa ldx #$00 loop1: ldy #$00 loop2: dey bne loop2 dex bne loop1 tax dex bne sub_1020 rts } // Referenced by: jsr from $1013, $10a5, $1255, $260e, $261c, $2994, $29a2, $2b36 sub_1030: sei stx $0314 sty $0315 sta $d012 // Referenced by: jsr from $1053 sub_103a: lda #$01 sta $d01a sta $dc0d lda #$1b sta $d011 cli rts scr_1049: // === Screen RAM (7 bytes, $1049-$104f) === .encoding "screencode_mixed" .byte $ee // scrcode: . .text "y" .byte $d0,$4c // scrcode: .. .text "1" .byte $ea // scrcode: . .text "@" .encoding "petscii_upper" loc_1050: jsr $e518 jsr sub_103a lda #$73 ldy #$e4 jsr $ab1e lda #$97 ldx #$ff jsr $bdcd lda #$60 ldy #$e4 jsr $ab1e lda #$76 ldy #$a3 jsr $ab1e lda #$00 sta $cc ldx #$08 jsr sub_1020 lda #$0e jsr sub_10f0 lda #$0e sta $1110 lda #$00 sta $10fe sta $10ff lda #$1d sta $d018 ldx #$4f lda #$1b loc_1096: sta $06f8,x dex bpl loc_1096 jsr sub_10c0 ldx #$29 ldy #$11 lda #$ca jsr sub_1030 ldx #$27 loc_10aa: lda #$1c sta $06f8,x lda #$1d sta $0720,x dex bpl loc_10aa jmp loc_1170 scr_10ba: // === Screen RAM (1 bytes, $10ba-$10ba) === .encoding "screencode_mixed" .text "@" .encoding "petscii_upper" // Referenced by: jsr from $11f0 sub_10bb: lda #$0e