34 lines
644 B
Text
34 lines
644 B
Text
|
|
LDA #<foo
|
||
|
|
sta $00
|
||
|
|
LDA #>foo
|
||
|
|
sta $01
|
||
|
|
jsr PrintBytecode
|
||
|
|
|
||
|
|
foo:
|
||
|
|
;do stuff
|
||
|
|
rts
|
||
|
|
|
||
|
|
PrintBytecode:
|
||
|
|
ldy #0
|
||
|
|
|
||
|
|
lda $01 ;high byte of starting address of the source
|
||
|
|
jsr PrintHex
|
||
|
|
;unimplemented routine that separates the "nibbles" of the accumulator,
|
||
|
|
; adds $30 or $37 to each depending on if it's 0-9 or A-F respectively, which converts hex to ASCII,
|
||
|
|
; then prints the high nibble then the low.
|
||
|
|
|
||
|
|
lda $00 ;low byte of the starting address of the source
|
||
|
|
jsr PrintHex
|
||
|
|
jsr NewLine ;unimplemented new line routine
|
||
|
|
|
||
|
|
loop:
|
||
|
|
lda ($00),y
|
||
|
|
cmp #$60
|
||
|
|
beq Terminated
|
||
|
|
jsr PrintHex
|
||
|
|
|
||
|
|
jmp loop
|
||
|
|
Terminated:
|
||
|
|
jsr PrintHex ;print the last instruction of the routine.
|
||
|
|
rts
|