Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-05-29 08:41:36 +00:00
Code Issues Projects Releases Wiki Activity

ootw: add back intro, skip ifescape pressed

Browse Source
This commit is contained in:
Vince Weaver 2019-07-20 12:17:25 -04:00
parent 78c01275c9
commit 2dbd9b7537
3 changed files with 29 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
ootw/gr_run_sequence.s
View File

@ -1,18 +1,10 @@
;=====================
; long(er) wait
; waits approximately ?? ms
long_wait:
lda #64
jsr WAIT ; delay
dex
bne long_wait
rts
;=================================
; Display a sequence of images
;=================================
; quit if escape pressed?
; pattern is TIME, PTR
; if time==0, then done
@ -77,6 +69,13 @@ seq_no_wait:
seq_stuff:
ldy INTRO_LOOPER
; exit early if escape pressed
lda KEYPRESS
cmp #27+$80
beq run_sequence_done
bit KEYRESET
jmp run_sequence_loop
run_sequence_done:
rts
@ -115,3 +114,16 @@ run_sequence_40x40_loop:
run_sequence_40x40_done:
rts
;=====================
; long(er) wait
; waits approximately ?? ms
long_wait:
lda #64
jsr WAIT ; delay
dex
bne long_wait
rts

14
ootw/ootw_c2.s
View File

@ -11,21 +11,16 @@ ootw_c2:
; Initialize some variables
lda #0
sta GAME_OVER
;=======================
; Run the intro
;=======================
; jsr ootw_c2_intro
lda #0
sta CITY_MOVIE_SEEN
jsr ootw_c2_intro
;=======================
; Enter the game
;=======================
ootw_c2_restart:
jsr ootw_cage
lda GAME_OVER
@ -96,7 +91,10 @@ wait_loop:
lda KEYRESET ; clear strobe
jmp ootw_c2
lda #0
sta GAME_OVER
jmp ootw_c2_restart
end_message:

1
ootw/ootw_c2_intro.s
View File

@ -8,6 +8,7 @@ ootw_c2_intro:
bit SET_GR
bit FULLGR
bit KEYRESET
;===========================
; Setup pages (is this necessary?)