mirror of
https://github.com/robmcmullen/fujirun.git
synced 2024-10-01 16:58:35 +00:00
58 lines
698 B
ArmAsm
58 lines
698 B
ArmAsm
*= $6000
|
|
|
|
; os memory map
|
|
KEYBOARD = $c000
|
|
KBDSTROBE = $c010
|
|
CLRTEXT = $c050
|
|
SETTEXT = $c051
|
|
CLRMIXED = $c052
|
|
SETMIXED = $c053
|
|
TXTPAGE1 = $c054
|
|
TXTPAGE2 = $c055
|
|
CLRHIRES = $c056
|
|
SETHIRES = $c057
|
|
|
|
; defines
|
|
|
|
start nop
|
|
bit CLRTEXT ; start with HGR page 1, full screen
|
|
bit CLRMIXED
|
|
bit TXTPAGE1
|
|
bit SETHIRES
|
|
|
|
jsr clrscr
|
|
|
|
jsr init_game
|
|
jsr game_loop
|
|
|
|
forever
|
|
jmp forever
|
|
|
|
clrscr
|
|
lda #0
|
|
sta clr1+1
|
|
lda #$20
|
|
sta clr1+2
|
|
clr0
|
|
lda #$81
|
|
ldy #0
|
|
clr1
|
|
sta $ffff,y
|
|
iny
|
|
bne clr1
|
|
inc clr1+2
|
|
ldx clr1+2
|
|
cpx #$40
|
|
bcc clr1
|
|
rts
|
|
|
|
init_game nop
|
|
jsr rand_test
|
|
rts
|
|
|
|
game_loop nop
|
|
jmp game_loop
|
|
|
|
|
|
.include "rand.s"
|