dos33fsprogs/space_bars/instructions.s

55 lines
999 B
ArmAsm
Raw Normal View History

2018-08-02 03:35:23 +00:00
;================================
; Show some instructions
; return when a key is pressed
;================================
instructions:
;===================
; init screen
jsr TEXT
jsr HOME
bit KEYRESET
;===================
; init vars
lda #0
sta DRAW_PAGE
lda #<inst_text
sta OUTL
lda #>inst_text
sta OUTH
2019-06-14 01:21:20 +00:00
jsr move_and_print
jsr move_and_print
jsr move_and_print
jsr move_and_print
jsr move_and_print
2018-08-02 03:35:23 +00:00
jsr move_and_print
jsr move_and_print
jsr wait_until_keypressed ; tail call?
rts
; 0 1 2 3
; 0123456789012345678901234567890123456789
inst_text:
.byte 6, 0, "*** RASTERBARS IN SPACE ***",0
2019-06-14 01:21:20 +00:00
.byte 7, 3, "BY: VINCE 'DEATER' WEAVER",0
2018-08-02 03:35:23 +00:00
2019-06-14 01:21:20 +00:00
.byte 6, 5, "WWW.DEATER.NET/WEAVE/VMWPROD",0
2018-08-02 03:35:23 +00:00
2019-06-14 01:21:20 +00:00
.byte 0, 7,"=======================================",0
2018-08-02 03:35:23 +00:00
2019-06-14 01:21:20 +00:00
.byte 1,9, "ARROWS: LEFT/RIGHT -- A/Z: UP/DOWN",0
.byte 1,10, "SPACE: FIRE -- ,/.: ????",0
.byte 1,11, "ESC: QUITS",0
2018-08-02 03:35:23 +00:00
.asciiz "M: TOGGLE SOUND, CURRENTLY ON"