dos33fsprogs/space_bars/instructions.s

51 lines
870 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
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
.byte 8, 3, "BY VINCE 'DEATER' WEAVER",0
.asciiz "WWW.DEATER.NET/WEAVE/VMWPROD"
.asciiz "======================================="
.asciiz "ARROWS, WASD: STEER"
.asciiz "Z: ACCELERATE"
.asciiz "SPACE: FIRE"
.asciiz "ESC: QUITS"
.asciiz "M: TOGGLE SOUND, CURRENTLY ON"