fujirun/debug.s

debugtext nop
    sta SETTEXT
    sta KBDSTROBE
?1  lda KEYBOARD
    sta debug_last_key
    cmp #$A0  ; space?
    bne ?1
    rts


printhex ; A = hex byte, X = column, Y = row; A is clobbered, X&Y are not
    pha
    stx param_x
    lsr
    lsr
    lsr
    lsr
    tax
    lda hexdigit,x
    ldx param_x
    jsr fastfont
    pla
    and #$0f
    tax
    lda hexdigit,x
    ldx param_x
    inx
    jsr fastfont
    rts

hexdigit .byte "0123456789ABCDEF"
Maze generation working * copy symbols to applewin directory so they'll show up in the debugger! 2017-07-19 22:29:05 +00:00			`debugtext nop`
			`sta SETTEXT`
			`sta KBDSTROBE`
			`?1 lda KEYBOARD`
			`sta debug_last_key`
			`cmp #$A0 ; space?`
			`bne ?1`
			`rts`
WIP player movement 2017-07-20 16:48:26 +00:00

			`printhex ; A = hex byte, X = column, Y = row; A is clobbered, X&Y are not`
			`pha`
			`stx param_x`
			`lsr`
			`lsr`
			`lsr`
			`lsr`
			`tax`
			`lda hexdigit,x`
			`ldx param_x`
			`jsr fastfont`
			`pla`
			`and #$0f`
			`tax`
			`lda hexdigit,x`
			`ldx param_x`
			`inx`
			`jsr fastfont`
			`rts`

			`hexdigit .byte "0123456789ABCDEF"`