BTII - Game Credits
Posted: Fri Jan 15, 2021 10:27 pm
BT2 Character Disk
"FILE????????????" PRG Game Credits
#$EA | 234 | EOR all bytes against 11101010
blocks; bytes 48EA to (A200) T:4 S:16
Does not appear to have been decloaked.
God this was a b#$%& to find on the disk.
Pressing "!" when in a city (not the Wilderness) executes this code.
Interesting that if $D4 doesn't equal zero it is supposed to load a different picture (#$2f), but if $D4 isn't zero this code just doesn't run.
"FILE????????????" PRG Game Credits
#$EA | 234 | EOR all bytes against 11101010
blocks; bytes 48EA to (A200) T:4 S:16
Does not appear to have been decloaked.
God this was a b#$%& to find on the disk.
Pressing "!" when in a city (not the Wilderness) executes this code.
Interesting that if $D4 doesn't equal zero it is supposed to load a different picture (#$2f), but if $D4 isn't zero this code just doesn't run.
Code: Select all
.C:a200 E6 C1 INC $C1 Pause time
.C:a202 A5 D4 LDA $D4
.C:a204 F0 08 BEQ $A20E $D4 = 0? Go $a20e
.C:a206 A2 2F LDX #$2F
.C:a208 20 1B 08 JSR $081B Display picture #$2f
.C:a20b 4C 13 A2 JMP $A213
.C:a20e A2 3C LDX #$3C
.C:a210 20 1B 08 JSR $081B Display picture #$3c
.C:a213 A9 A2 LDA #$A2
.C:a215 85 59 STA $59
.C:a217 A9 7C LDA #$7C
.C:a219 85 58 STA $58
.C:a21b 20 0F 08 JSR $080F Display "About->Author" caption
.C:a21e 20 E1 08 JSR $08E1 Clear text window.
.C:a221 A0 A2 LDY #$A2
.C:a223 A2 8A LDX #$8A
.C:a225 20 06 08 JSR $0806 "The DESTINY KNIGHT was designed..."
.C:a228 20 78 08 JSR $0878 Get keypress
.C:a22b A0 A3 LDY #$A3
.C:a22d A2 5F LDX #$5F
.C:a22f 20 06 08 JSR $0806 "[CR][CR]"
.C:a232 A0 A3 LDY #$A3
.C:a234 A2 62 LDX #$62
.C:a236 20 06 08 JSR $0806 "Todd Camasta for..."
.C:a239 20 9F 08 JSR $089F
.C:a23c A0 A3 LDY #$A3
.C:a23e A2 5F LDX #$5F
.C:a240 20 06 08 JSR $0806 "[CR][CR]"
.C:a243 A0 A3 LDY #$A3
.C:a245 A2 9C LDX #$9C
.C:a247 20 06 08 JSR $0806 "Dave Warhol for..."
.C:a24a 20 9F 08 JSR $089F
.C:a24d A0 A3 LDY #$A3
.C:a24f A2 5F LDX #$5F
.C:a251 20 06 08 JSR $0806 "[CR][CR]"
.C:a254 A0 A3 LDY #$A3
.C:a256 A2 C7 LDX #$C7
.C:a258 20 06 08 JSR $0806 "Brian Fargo for..."
.C:a25b 20 9F 08 JSR $089F
.C:a25e A0 A3 LDY #$A3
.C:a260 A2 5F LDX #$5F "[CR][CR]"
.C:a262 20 06 08 JSR $0806
.C:a265 A0 A3 LDY #$A3
.C:a267 A2 FC LDX #$FC
.C:a269 20 06 08 JSR $0806 "And last (but not least)..."
.C:a26c 20 9F 08 JSR $089F
.C:a26f A0 A3 LDY #$A3
.C:a271 A2 4D LDX #$4D
.C:a273 20 06 08 JSR $0806 "[CR][CR](Press any key)"
.C:a276 20 78 08 JSR $0878 Get keypress
.C:a279 4C E1 08 JMP $08E1 Clear text window (exit subroutine).
.C:a27c C1 E2 CMP ($E2,X) [A][b]
.C:a27e EF F5 F4 ISB $F4F5 [o][u][t]
.C:a281 AD BE C1 LDA $C1BE [-][>][A]
.C:a284 F5 F4 SBC $F4,X [u][t]
.C:a286 E8 INX [h]
.C:a287 EF F2 DC ISB $DCF2 [o][r][EOT]
.C:a28a D4 E8 NOOP $E8,X [T][h]
.C:a28c E5 A0 SBC $A0 [e][_]
.C:a28e C4 C5 CPY $C5 [D][E]
.C:a290 D3 D4 DCP ($D4),Y [S][T]
.C:a292 C9 CE CMP #$CE [I][N]
.C:a294 D9 A0 CB CMP $CBA0,Y [Y][_][K]
.C:a297 CE C9 C7 DEC $C7C9 [N][I][G]
.C:a29a C8 INY [H]
.C:a29b D4 A0 NOOP $A0,X [T][_]
.C:a29d F7 E1 ISB $E1,X [w][a]
.C:a29f F3 A0 ISB ($A0),Y [s][_]
.C:a2a1 E4 E5 CPX $E5 [d][e]
.C:a2a3 F3 E9 ISB ($E9),Y [s][i]
.C:a2a5 E7 EE ISB $EE [g][n]
.C:a2a7 E5 E4 SBC $E4 [e][d]
.C:a2a9 A0 E1 LDY #$E1 [_][a]
.C:a2ab EE E4 A0 INC $A0E4 [n][d][_]
.C:a2ae F0 F2 BEQ $A2A2 [p][r]
.C:a2b0 EF E7 F2 ISB $F2E7 [o][g][r]
.C:a2b3 E1 ED SBC ($ED,X) [a][m]
.C:a2b5 ED E5 E4 SBC $E4E5 [m][e][d]
.C:a2b8 A0 E2 LDY #$E2 [_][b]
.C:a2ba F9 A0 CD SBC $CDA0,Y [y][_][M]
.C:a2bd E9 E3 SBC #$E3 [i][c]
.C:a2bf E8 INX [h]
.C:a2c0 E1 E5 SBC ($E5,X) [a][e]
.C:a2c2 EC A0 C3 CPX $C3A0 [l][_][C]
.C:a2c5 F2 JAM [r]
.C:a2c6 E1 EE SBC ($EE,X) [a][n]
.C:a2c8 E6 EF INC $EF [f][o]
.C:a2ca F2 JAM [r]
.C:a2cb E4 AE CPX $AE [d][.]
.C:a2cd A0 C9 LDY #$C9 [_][I]
.C:a2cf F4 A0 NOOP $A0,X [t][_]
.C:a2d1 F7 E1 ISB $E1,X [w][a]
.C:a2d3 F3 A0 ISB ($A0),Y [s][_]
.C:a2d5 E1 A0 SBC ($A0,X) [a][_]
.C:a2d7 EC EF F4 CPX $F4EF [l][o][t]
.C:a2da A0 EF LDY #$EF [_][o]
.C:a2dc E6 A0 INC $A0 [f][_]
.C:a2de E6 F5 INC $F5 [f][u]
.C:a2e0 EE A0 E4 INC $E4A0 [n][_][d]
.C:a2e3 E5 F3 SBC $F3 [e][s]
.C:a2e5 E9 E7 SBC #$E7 [i][g]
.C:a2e7 EE E9 EE INC $EEE9 [n][i][n]
.C:a2ea E7 AC ISB $AC [g][,]
.C:a2ec A0 E2 LDY #$E2 [_][b]
.C:a2ee F5 F4 SBC $F4,X [u][t]
.C:a2f0 A0 C9 LDY #$C9 [_][I]
.C:a2f2 A7 ED LAX $ED ['][m]
.C:a2f4 A0 F6 LDY #$F6 [_][v]
.C:a2f6 E5 F2 SBC $F2 [e][r]
.C:a2f8 F9 A0 E7 SBC $E7A0,Y [y][_][g]
.C:a2fb EC E1 E4 CPX $E4E1 [l][a][d]
.C:a2fe A0 F4 LDY #$F4 [_][t]
.C:a300 EF A0 E2 ISB $E2A0 [o][_][b]
.C:a303 E5 A0 SBC $A0 [e][_]
.C:a305 E6 E9 INC $E9 [f][i]
.C:a307 EE E9 F3 INC $F3E9 [n]]i][s]
.C:a30a E8 INX [h]
.C:a30b E5 E4 SBC $E4 [e][d]
.C:a30d A1 A0 LDA ($A0,X) [!][_]
.C:a30f C9 EE CMP #$EE [I][n]
.C:a311 A0 E1 LDY #$E1 [_][a]
.C:a313 EE F9 A0 INC $A0F9 [n][y][_]
.C:a316 E3 E1 ISB ($E1,X) [c][a]
.C:a318 F3 E5 ISB ($E5),Y [s][e]
.C:a31a AC A0 C9 LDY $C9A0 [,][_][I]
.C:a31d A7 E4 LAX $E4 ['][d]
.C:a31f A0 EC LDY #$EC [_][l]
.C:a321 E9 EB SBC #$EB [i][k]
.C:a323 E5 A0 SBC $A0 [e][_]
.C:a325 F4 EF NOOP $EF,X [t][o]
.C:a327 A0 F4 LDY #$F4 [_][t]
.C:a329 E8 INX [h]
.C:a32a E1 EE SBC ($EE,X) [a][n]
.C:a32c EB A0 USBC #$A0 [k][_]
.C:a32e E1 A0 SBC ($A0,X) [a][_]
.C:a330 E6 E5 INC $E5 [f][e]
.C:a332 F7 A0 ISB $A0,X [w][_]
.C:a334 F0 E5 BEQ $A31B [p][e]
.C:a336 EF F0 EC ISB $ECF0 [o][p][l]
.C:a339 E5 A0 SBC $A0 [e][_]
.C:a33b F7 E8 ISB $E8,X [w][h]
.C:a33d EF A0 E8 ISB $E8A0 [o][_][h]
.C:a340 E5 EC SBC $EC [e][l]
.C:a342 F0 E5 BEQ $A329 [p][e]
.C:a344 E4 A0 CPX $A0 [d][_]
.C:a346 ED E5 A0 SBC $A0E5 [m][e][_]
.C:a349 EF F5 F4 ISB $F4F5 [o][u][t]
.C:a34c BA TSX [:]
.C:a34d 00 BRK [CR]
.C:a34e 00 BRK [CR]
.C:a34f A8 TAY [(]
.C:a350 D0 F2 BNE $A344 [P][r]
.C:a352 E5 F3 SBC $F3 [e][s]
.C:a354 F3 A0 ISB ($A0),Y [s][_]
.C:a356 E1 EE SBC ($EE,X) [a][n]
.C:a358 F9 A0 EB SBC $EBA0,Y [y][_][k]
.C:a35b E5 F9 SBC $F9 [e][y]
.C:a35d A9 DC LDA #$DC [)][EOT]
.C:a35f 00 BRK [CR]
.C:a360 00 BRK [CR]
.C:a361 FF D4 EF ISB $EFD4,X [Input][T][o]
.C:a364 E4 E4 CPX $E4 [d][d]
.C:a366 A0 C3 LDY #$C3 [_][C]
.C:a368 E1 ED SBC ($ED,X) [a][m]
.C:a36a E1 F3 SBC ($F3,X) [a][s]
.C:a36c F4 E1 NOOP $E1,X [t][a]
.C:a36e A0 E6 LDY #$E6 [_][f]
.C:a370 EF F2 A0 ISB $A0F2 [o][r][_]
.C:a373 E1 EC SBC ($EC,X) [a][l]
.C:a375 EC A0 F4 CPX $F4A0 [l][_][t]
.C:a378 E8 INX [h]
.C:a379 E5 A0 SBC $A0 [e][_]
.C:a37b EE E5 F7 INC $F7E5 [n][e][w]
.C:a37e A0 E1 LDY #$E1 [_][a]
.C:a380 EE E9 ED INC $EDE9 [n][i][m]
.C:a383 E1 F4 SBC ($F4,X) [a][t]
.C:a385 E5 E4 SBC $E4 [e][d]
.C:a387 A0 ED LDY #$ED [_][m]
.C:a389 EF EE F3 ISB $F3EE [o][n][s]
.C:a38c F4 E5 NOOP $E5,X [t][e]
.C:a38e F2 JAM [r]
.C:a38f A0 F0 LDY #$F0 [_][p]
.C:a391 E9 E3 SBC #$E3 [i][c]
.C:a393 F4 F5 NOOP $F5,X [t][u]
.C:a395 F2 JAM [r]
.C:a396 E5 F3 SBC $F3 [e][s]
.C:a398 AE AE AE LDX $AEAE [.][.][.]
.C:a39b DC C4 E1 NOOP $E1C4,X [EOT][D][a]
.C:a39e F6 E5 INC $E5,X [v][e]
.C:a3a0 A0 D7 LDY #$D7 [_][W]
.C:a3a2 E1 F2 SBC ($F2,X) [a][r]
.C:a3a4 E8 INX [h]
.C:a3a5 EF EC A0 ISB $A0EC [o][l][_]
.C:a3a8 E6 EF INC $EF [f][o]
.C:a3aa F2 JAM [r]
.C:a3ab A0 F4 LDY #$F4 [_][t]
.C:a3ad E8 INX [h]
.C:a3ae E5 A0 SBC $A0 [e][_]
.C:a3b0 EF F2 E9 ISB $E9F2 [o][r][i]
.C:a3b3 E7 E9 ISB $E9 [g][i]
.C:a3b5 EE E1 EC INC $ECE1 [n][a][l]
.C:a3b8 A0 E2 LDY #$E2 [_][b]
.C:a3ba E1 F2 SBC ($F2,X) [a][r]
.C:a3bc E4 A0 CPX $A0 [d][_]
.C:a3be F4 F5 NOOP $F5,X [t][u]
.C:a3c0 EE E5 F3 INC $F3E5 [n][e][s]
.C:a3c3 AE AE AE LDX $AEAE [.][.][.]
.C:a3c6 DC C2 F2 NOOP $F2C2,X [EOT][B][r]
.C:a3c9 E9 E1 SBC #$E1 [i][a]
.C:a3cb EE A0 C6 INC $C6A0 [n][_][F]
.C:a3ce E1 F2 SBC ($F2,X) [a][r]
.C:a3d0 E7 EF ISB $EF [g][o]
.C:a3d2 A0 E6 LDY #$E6 [_][f]
.C:a3d4 EF F2 A0 ISB $A0F2 [o][r][_]
.C:a3d7 F4 E8 NOOP $E8,X [t][h]
.C:a3d9 E5 A0 SBC $A0 [e][_]
.C:a3db E4 E5 CPX $E5 [d][e]
.C:a3dd F3 E9 ISB ($E9),Y [s][i]
.C:a3df E7 EE ISB $EE [g][n]
.C:a3e1 A0 EF LDY #$EF [_][o]
.C:a3e3 E6 A0 INC $A0 [f][_]
.C:a3e5 F4 E8 NOOP $E8,X [t][h]
.C:a3e7 E5 A0 SBC $A0 [e][_]
.C:a3e9 F3 F4 ISB ($F4),Y [s][t]
.C:a3eb E1 F2 SBC ($F2,X) [a][r]
.C:a3ed F4 E5 NOOP $E5,X [t][e]
.C:a3ef F2 JAM [r]
.C:a3f0 A0 E4 LDY #$E4 [_][d]
.C:a3f2 F5 EE SBC $EE,X [u][n]
.C:a3f4 E7 E5 ISB $E5 [g][e]
.C:a3f6 EF EE AE ISB $AEEE [o][n][.]
.C:a3f9 AE AE DC LDX $DCAE [.][.][EOT]
.C:a3fc C1 EE CMP ($EE,X) [A][n]
.C:a3fe E4 A0 CPX $A0 [d][_]
.C:a400 EC E1 F3 CPX $F3E1 [l][a][s]
.C:a403 F4 A0 NOOP $A0,X [t][_]
.C:a405 A8 TAY [(]
.C:a406 E2 F5 NOOP #$F5 [b][u]
.C:a408 F4 A0 NOOP $A0,X [t][_]
.C:a40a EE EF F4 INC $F4EF [n][o][t]
.C:a40d A0 EC LDY #$EC [_][l]
.C:a40f E5 E1 SBC $E1 [e][a]
.C:a411 F3 F4 ISB ($F4),Y [s][t]
.C:a413 A9 A0 LDA #$A0 [)][_]
.C:a415 F4 E8 NOOP $E8,X [t][h]
.C:a417 E1 EE SBC ($EE,X) [a][n]
.C:a419 EB F3 USBC #$F3 [k][s]
.C:a41b A0 F4 LDY #$F4 [_][t]
.C:a41d EF A0 ED ISB $EDA0 [o][_][m]
.C:a420 F9 A0 E6 SBC $E6A0,Y [y][_][f][
.C:a423 F2 JAM [r]
.C:a424 E9 E5 SBC #$E5 [i][e]
.C:a426 EE E4 F3 INC $F3E4 [n][d][s]
.C:a429 A0 D4 LDY #$D4 [_][T]
.C:a42b EF ED AC ISB $ACED [o][m][,]
.C:a42e A0 C3 LDY #$C3 [_][C]
.C:a430 E8 INX [h]
.C:a431 F2 JAM [r]
.C:a432 E9 F3 SBC #$F3 [i][s]
.C:a434 AC A0 CA LDY $CAA0 [,][_][J]
.C:a437 EF E5 AC ISB $ACE5 [o][e][,]
.C:a43a A0 C2 LDY #$C2 [_][B]
.C:a43c F2 JAM [r]
.C:a43d E5 F4 SBC $F4 [e][t]
.C:a43f AC A0 D4 LDY $D4A0 [,][_][T]
.C:a442 EF E4 E4 ISB $E4E4 [o][d][d]
.C:a445 AC A0 E1 LDY $E1A0 [,][_][a]
.C:a448 EE E4 A0 INC $A0E4 [n][d][_]
.C:a44b C3 E1 DCP ($E1,X) [C][a]
.C:a44d F2 JAM [r]
.C:a44e EF EC E9 ISB $E9EC [o][l][i]
.C:a451 EE E1 BA INC $BAE1 [n][a][:]
.C:a454 A0 F4 LDY #$F4 [_][t]
.C:a456 E8 INX [h]
.C:a457 E5 A0 SBC $A0 [e][_]
.C:a459 D4 E5 NOOP $E5,X [T][e]
.C:a45b E1 ED SBC ($ED,X) [a][m]
.C:a45d A0 C3 LDY #$C3 [_][C]
.C:a45f E9 EE SBC #$EE [i][n]
.C:a461 FA NOOP [z]
.C:a462 E1 EE SBC ($EE,X) [a][n]
.C:a464 EF AE AE ISB $AEAE [o][.][.]
.C:a467 AE EC E9 LDX $E9EC [.][l][i]
.C:a46a EB E5 USBC #$E5 [k][e]
.C:a46c A0 F4 LDY #$F4 [_][t]
.C:a46e E8 INX [h]
.C:a46f E5 A0 SBC $A0 [e][_]
.C:a471 E5 E1 SBC $E1 [e][a]
.C:a473 E7 EC ISB $EC [g][l]
.C:a475 E5 F3 SBC $F3 [e][s]
.C:a477 A0 F4 LDY #$F4 [_][t]
.C:a479 E8 INX [h]
.C:a47a E5 F9 SBC $F9 [e][y]
.C:a47c A0 E6 LDY #$E6 [_][f]
.C:a47e EC F9 AE CPX $AEF9 [l][y][.]
.C:a481 DC [EOT]