dos33fsprogs/disk/qboot2/my2.s

40 lines
551 B
ArmAsm
Raw Normal View History

SET_GR = $C050
FULLGR = $C052
PAGE0 = $C054
HIRES = $C057
KEYPRESS = $C000
KEYRESET = $C010
landscape:
bit SET_GR
bit FULLGR
bit PAGE0
bit HIRES
forever:
lda KEYPRESS
bpl forever
bit KEYRESET
;============================
; setup load code
;============================
WHICH_LOAD = $80
lda #4
sta WHICH_LOAD
jmp $119A
.align $100
.incbin "SELENETIC.BIN"