ShellDealay i proper file :)

This commit is contained in:
Pecusx
2023-05-09 15:50:19 +02:00
parent 6cf4a6d989
commit 862ae9f640
7 changed files with 11743 additions and 18 deletions
+19
View File
@@ -556,6 +556,25 @@ MakeDarkScreen
rts
.endp
;--------------------------------------------------
.proc ShellDelay
lda CONSOL
and #%00000101 ; Start + Option
bne @+
mva #$40 escFlag
@ and #%00000001
beq noShellDelay
ldx flyDelay
DelayLoop
lda VCOUNT
@ cmp VCOUNT
beq @-
dex
bne DelayLoop
noShellDelay
rts
.endp
;--------------------------------------------------
.proc RmtSongSelect
; starting song line 0-255 to A reg
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
+12
View File
@@ -317,6 +317,18 @@ MakeDarkScreen
rts
.endp
;--------------------------------------------------
.proc ShellDelay
ldx flyDelay
DelayLoop
lda $d012
@ cmp $d012
beq @-
dex
bne DelayLoop
noShellDelay
rts
.endp
;--------------------------------------------------
.proc RmtSongSelect
; starting song line 0-255 to A reg
+11712
View File
File diff suppressed because it is too large Load Diff
BIN
View File
Binary file not shown.
-18
View File
@@ -3203,24 +3203,6 @@ noBullets
rts
.endp
;--------------------------------------------------
.proc ShellDelay
lda CONSOL
and #%00000101 ; Start + Option
bne @+
mva #$40 escFlag
@ and #%00000001
beq noShellDelay
ldx flyDelay
DelayLoop
lda VCOUNT
@ cmp VCOUNT
beq @-
dex
bne DelayLoop
noShellDelay
rts
.endp
.ENDIF