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"* dta d"activate weapons"*
GameOverTitle2 GameOverTitle2
dta d" Player Points Hits Earned Money " dta d" Player Points Hits Earned Money "
OptionsSubTitle
dta d" Unknown Father of All Games "
;----------------------------------------------------- ;-----------------------------------------------------
;-------------display-lists--------------------------- ;-------------display-lists---------------------------
;----------------------------------------------------- ;-----------------------------------------------------
@@ -193,6 +195,9 @@ OptionsDL
.byte $4f .byte $4f
.word (display+140*40) .word (display+140*40)
:21 .by $0f ;76 :21 .by $0f ;76
.byte $70+$80
.byte $42
.word OptionsSubTitle
.byte $41 .byte $41
.word OptionsDL .word OptionsDL
;------------------------ ;------------------------
+14 -7
View File
@@ -23,25 +23,32 @@ GoGradient
iny iny
lda (GradientColors),y ; mountains colors array lda (GradientColors),y ; mountains colors array
sta COLPF2 sta COLPF2
inc dliCounter jmp DLIinterruptGameOver.EndOfDLI_GO
ply ; inc dliCounter
pla ; ply
rti ; pla
; rti
.endp .endp
;-------------------------------------------------- ;--------------------------------------------------
.proc DLIinterruptOptions .proc DLIinterruptOptions
pha pha
phy phy
lda dliCounter
bne Subtitle
lda #0 ; background color lda #0 ; background color
sta COLPF1 sta COLPF1
ldy GradientNr ldy GradientNr
beq @+ beq @+
ldy #1 ldy #1
@ lda (GradientColors),y ; mountains colors array @ lda (GradientColors),y ; mountains colors array
sta COLPF2 ; allways <> 0 !!!
bne DLIinterruptGameOver.EndOfDLI_GO
Subtitle
lda #0
sta COLPF2 sta COLPF2
ply lda #4
pla sta COLPF1
rti bne DLIinterruptGameOver.EndOfDLI_GO
.endp .endp
;-------------------------------------------------- ;--------------------------------------------------
.proc DLIinterruptGameOver .proc DLIinterruptGameOver
+1 -1
View File
@@ -26,7 +26,7 @@
;--------------------------------------------------- ;---------------------------------------------------
.macro build .macro build
dta d"1.35" ; number of this build (4 bytes) dta d"1.36" ; number of this build (4 bytes)
.endm .endm
.macro RMTSong .macro RMTSong
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.