vulcan-cryptanalysis
vulcan-cryptanalysis
vulcan-cryptanalysis
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
FEAD : 27 04 "’ " beq $FEB3<br />
FEAF : 86 80 " " ldaa #$80<br />
FEB1 : A7 00 " " staa $00,x<br />
. . . . . . . . . . . . . . . .<br />
FEB3 : BD F1 70 " p" jsr $F170 write buffer to display<br />
FEB6 : BD FE 60 " ‘" jsr $FE60<br />
FEB9 : 96 4A " J" ldaa $004A<br />
FEBB : A7 00 " " staa $00,x<br />
. . . . . . . . . . . . . . . .<br />
FEBD : 96 50 " P" ldaa $0050<br />
FEBF : 81 E0 " " cmpa #$E0<br />
FEC1 : 26 03 "& " bne $FEC6<br />
FEC3 : BD F1 53 " S" jsr $F153<br />
. . . . . . . . . . . . . . . .<br />
FEC6 : 96 50 " P" ldaa $0050<br />
FEC8 : 81 E9 " " cmpa #$E9<br />
FECA : 22 D2 "" " bhi $FE9E<br />
FECC : 39 "9" rts<br />
----------------------------------------------<br />
FECD : CE FF AD " " ldx #$FFAD (6 spaces)<br />
FED0 : BD F1 C0 " " jsr $F1C0 put table chars in buffer<br />
FED3 : B6 01 FE " " ldaa $01FE<br />
FED6 : 84 07 " " anda #$07<br />
FED8 : CE 00 51 " Q" ldx #$0051<br />
FEDB : DF 63 " c" stx $0063<br />
FEDD : BD F1 AF " " jsr $F1AF convert oct to char<br />
FEE0 : 96 51 " Q" ldaa $0051<br />
FEE2 : 84 7F " " anda #$7F<br />
FEE4 : 97 51 " Q" staa $0051<br />
FEE6 : 39 "9" rts<br />
----------------------------------------------<br />
FEE7 : CE 01 00 " " ldx #$0100<br />
FEEA : DF 63 " c" stx $0063 63.64