giomba/vic20-xmas-demo
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Add "Press space to start"

Browse Source
This commit is contained in:
giomba 2022-12-04 21:41:57 +01:00
parent 1c581b8c2d
commit 3126b6d728
1 changed files with 23 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
src/main.asm
View File

@ -155,10 +155,33 @@ loading_feedback SUBROUTINE
ldx loading_bar ldx loading_bar
lda #$79 lda #$79
sta 7988,x sta 7988,x
cpx #21
beq .start_button
rts
.start_button:
; print
lda #<start_button_message
ldy #>start_button_message
jsr $cb1e
; use system CHRIN
lda #$e0
sta $324
lda #$f2
sta $325
.chrin:
jsr $ffe4
cmp #$20
bne .chrin
rts rts
message: message:
BYTE #$0d,#$0d,"PLEASE WAIT 20 SEC",#$0d,"I'M JUST",#$0d,"AN OLD COMPUTER",#$0d,#0 BYTE #$0d,#$0d,"PLEASE WAIT 20 SEC",#$0d,"I'M JUST",#$0d,"AN OLD COMPUTER",#$0d,#0
start_button_message:
BYTE "PRESS SPACE TO START",#$0
; https://www.commodore.ca/manuals/funet/cbm/vic20/demos.basic/unexpanded/Stillenacht.prg ; https://www.commodore.ca/manuals/funet/cbm/vic20/demos.basic/unexpanded/Stillenacht.prg
demo_start: demo_start: