Look, I am your father.

This commit is contained in:
Pecusx
2023-08-19 19:50:24 +02:00
parent 92aed05f83
commit 4479c2ef29
5 changed files with 20 additions and 8 deletions
+5
View File
@@ -124,6 +124,8 @@ InventoryTitle
dta d"activate weapons"*
GameOverTitle2
dta d" Player Points Hits Earned Money "
OptionsSubTitle
dta d" Unknown Father of All Games "
;-----------------------------------------------------
;-------------display-lists---------------------------
;-----------------------------------------------------
@@ -193,6 +195,9 @@ OptionsDL
.byte $4f
.word (display+140*40)
:21 .by $0f ;76
.byte $70+$80
.byte $42
.word OptionsSubTitle
.byte $41
.word OptionsDL
;------------------------
+14 -7
View File
@@ -23,25 +23,32 @@ GoGradient
iny
lda (GradientColors),y ; mountains colors array
sta COLPF2
inc dliCounter
ply
pla
rti
jmp DLIinterruptGameOver.EndOfDLI_GO
; inc dliCounter
; ply
; pla
; rti
.endp
;--------------------------------------------------
.proc DLIinterruptOptions
pha
phy
lda dliCounter
bne Subtitle
lda #0 ; background color
sta COLPF1
ldy GradientNr
beq @+
ldy #1
@ lda (GradientColors),y ; mountains colors array
sta COLPF2 ; allways <> 0 !!!
bne DLIinterruptGameOver.EndOfDLI_GO
Subtitle
lda #0
sta COLPF2
ply
pla
rti
lda #4
sta COLPF1
bne DLIinterruptGameOver.EndOfDLI_GO
.endp
;--------------------------------------------------
.proc DLIinterruptGameOver