BT2 Character Disk
"FILE6179415" PRG TEMPLE OF DARKNESS
#$EA | 234 | EOR all bytes against 11101010
2 blocks; 258 bytes; 70ea to 71e8 inclusive; $9a00 to $9b02 memory.
City (Ephesus) event file for accessing The Tombs.
Code: Select all
.C:9a00 E6 C1 INC $C1
.C:9a02 A2 17 LDX #$17
.C:9a04 20 1B 08 JSR $081B Display picture #$17
.C:9a07 A9 9A LDA #$9A
.C:9a09 85 59 STA $59
.C:9a0b A9 43 LDA #$43
.C:9a0d 85 58 STA $58
.C:9a0f 20 0F 08 JSR $080F "Tmp. of Dark" caption
.C:9a12 20 E1 08 JSR $08E1
.C:9a15 A0 9A LDY #$9A
.C:9a17 A2 50 LDX #$50
.C:9a19 20 06 08 JSR $0806 "You stand within..."
.C:9a1c 20 78 08 JSR $0878 Wait for keypress
.C:9a1f 20 87 08 JSR $0887
.C:9a22 C9 D4 CMP #$D4 Take passage?
.C:9a24 F0 14 BEQ $9A3A Yep, go to $9a3a
.C:9a26 C9 C5 CMP #$C5 Exit?
.C:9a28 D0 F2 BNE $9A1C No? Back to $9a1c
.C:9a2a A9 02 LDA #$02 Exit sequence...
.C:9a2c 85 24 STA $24 Face party south...
.C:9a2e C6 28 DEC $28 Move party 1 square south
.C:9a30 A9 00 LDA #$00
.C:9a32 85 2F STA $2F ????
.C:9a34 20 E1 08 JSR $08E1
.C:9a37 4C 00 90 JMP $9000 Return to main engine?
.C:9a3a A9 04 LDA #$04 Dungeon #4?
.C:9a3c 85 E0 STA $E0
.C:9a3e A9 01 LDA #$01 Floor #1?
.C:9a40 4C 99 08 JMP $0899 Load dungeon per $e0?
.C:9a43 D4 ED NOOP $ED,X [T][m]
.C:9a45 F0 AE BEQ $99F5 [p][.]
.C:9a47 A0 EF LDY #$EF [_][o]
.C:9a49 E6 A0 INC $A0 [f][_]
.C:9a4b C4 E1 CPY $E1 [D][a]
.C:9a4d F2 JAM [r]
.C:9a4e EB DC USBC #$DC [k][EOT]
.C:9a50 D9 EF F5 CMP $F5EF,Y [Y][o][u]
.C:9a53 A0 F3 LDY #$F3 [_][s]
.C:9a55 F4 E1 NOOP $E1,X [t][a]
.C:9a57 EE E4 A0 INC $A0E4 [n][d][_]
.C:9a5a F7 E9 ISB $E9,X [w][i]
.C:9a5c F4 E8 NOOP $E8,X [t][h]
.C:9a5e E9 EE SBC #$EE [i][n]
.C:9a60 A0 F4 LDY #$F4 [_][t]
.C:9a62 E8 INX [h]
.C:9a63 E5 A0 SBC $A0 [e][_]
.C:9a65 D4 E5 NOOP $E5,X [T][e]
.C:9a67 ED F0 EC SBC $ECF0 [m][p][l]
.C:9a6a E5 A0 SBC $A0 [e][_]
.C:9a6c EF E6 A0 ISB $A0E6 [o][f][_]
.C:9a6f C4 E1 CPY $E1 [D][a]
.C:9a71 F2 JAM [r]
.C:9a72 EB EE USBC #$EE [k][n]
.C:9a74 E5 F3 SBC $F3 [e][s]
.C:9a76 F3 AE ISB ($AE),Y [s][.]
.C:9a78 A0 C1 LDY #$C1 [_][A]
.C:9a7a A0 F0 LDY #$F0 [_][p]
.C:9a7c E1 F3 SBC ($F3,X) [a][s]
.C:9a7e F3 E1 ISB ($E1),Y [s][a]
.C:9a80 E7 E5 ISB $E5 [g][e]
.C:9a82 A0 EC LDY #$EC [_][l]
.C:9a84 E5 E1 SBC $E1 [e][a]
.C:9a86 E4 F3 CPX $F3 [d][s]
.C:9a88 A0 E4 LDY #$E4 [_][d]
.C:9a8a EF F7 EE ISB $EEF7 [o][w][n]
.C:9a8d A0 F4 LDY #$F4 [_][t]
.C:9a8f EF A0 F7 ISB $F7A0 [o][_][w]
.C:9a92 E8 INX [h]
.C:9a93 E1 F4 SBC ($F4,X) [a][t]
.C:9a95 A0 F0 LDY #$F0 [_][p]
.C:9a97 F2 JAM [r]
.C:9a98 EF E2 E1 ISB $E1E2 [o][b][a]
.C:9a9b E2 EC NOOP #$EC [b][l]
.C:9a9d F9 A0 E1 SBC $E1A0,Y [y][_][a]
.C:9aa0 F2 JAM [r]
.C:9aa1 E5 A0 SBC $A0 [e][_]
.C:9aa3 F3 EF ISB ($EF),Y [s][o]
.C:9aa5 ED E5 A0 SBC $A0E5 [m][e][_]
.C:9aa8 F6 E5 INC $E5,X [v][e]
.C:9aaa F2 JAM [r]
.C:9aab F9 A0 E1 SBC $E1A0,Y [y][_][a]
.C:9aae EE E3 E9 INC $E9E3 [n][c][i]
.C:9ab1 E5 EE SBC $EE [e][n]
.C:9ab3 F4 A0 NOOP $A0,X [t][_]
.C:9ab5 F4 EF NOOP $EF,X [t][o]
.C:9ab7 ED E2 F3 SBC $F3E2 [m][b][s]
.C:9aba AE A0 A0 LDX $A0A0 [.][_][_]
.C:9abd D9 EF F5 CMP $F5EF,Y [Y][o][u]
.C:9ac0 A0 E3 LDY #$E3 [_][c]
.C:9ac2 E1 EE SBC ($EE,X) [a][n]
.C:9ac4 00 BRK [CR]
.C:9ac5 00 BRK [CR]
.C:9ac6 A8 TAY [(]
.C:9ac7 D4 A9 NOOP $A9,X [T][)]
.C:9ac9 E1 EB SBC ($EB,X) [a][k]
.C:9acb E5 A0 SBC $A0 [e][_]
.C:9acd F4 E8 NOOP $E8,X [t][h]
.C:9acf E5 A0 SBC $A0 [e][_]
.C:9ad1 F0 E1 BEQ $9AB4 [p][a]
.C:9ad3 F3 F3 ISB ($F3),Y [s][s]
.C:9ad5 E1 E7 SBC ($E7,X) [a][g]
.C:9ad7 E5 00 SBC $00 [e][CR]
.C:9ad9 A8 TAY [(]
.C:9ada C5 A9 CMP $A9 [E][)]
.C:9adc F8 SED [x]
.C:9add E9 F4 SBC #$F4 [i][t]
.C:9adf A0 F4 LDY #$F4 [_][t]
.C:9ae1 E8 INX [h]
.C:9ae2 E5 A0 SBC $A0 [e][_]
.C:9ae4 F4 E5 NOOP $E5,X [t][e]
.C:9ae6 ED F0 EC SBC $ECF0 [m][p][l]
.C:9ae9 E5 DC SBC $DC [e][EOT]
.C:9aeb D0 F7 BNE $9AE4
.C:9aed AE 5F AA LDX $AA5F
.C:9af0 AD 65 AA LDA $AA65
.C:9af3 1D 0A A9 ORA $A90A,X
.C:9af6 5D 0A A9 EOR $A90A,X
.C:9af9 D0 93 BNE $9A8E
.C:9afb AE 16 A5 LDX $A516
.C:9afe 50 29 BVC $9B29
.C:9b00 B9 36 9B LDA $9B36,Y