HELP screen colors and DLI

This commit is contained in:
Pecusx
2025-06-03 15:05:35 +02:00
parent db43abc259
commit ab55e2bfe2
2 changed files with 28 additions and 7 deletions
+28 -7
View File
@@ -120,9 +120,17 @@ dl_over
.wo dl_over .wo dl_over
;--------------------------------------------------- ;---------------------------------------------------
dl_help dl_help
.by $45 .by $30+$80
.by $45+$80
.wo help_screen ; .wo help_screen ;
:12 .by $05 :3 .by $05+$80
.by $05
.by $30+$80
:3 .by $05+$80
.by $05
.by $30+$80
:3 .by $05+$80
.by $05
.by $41 .by $41
.wo dl_help .wo dl_help
;--------------------------------------------------- ;---------------------------------------------------
@@ -338,7 +346,7 @@ no_go
cmp #5 cmp #5
bne no_help bne no_help
; help screen dli ; help screen dli
vdli noDLI vdli HelpDLI1
jmp DLI_OK jmp DLI_OK
no_help no_help
cmp #4 cmp #4
@@ -991,7 +999,7 @@ DLI_L2
.endp .endp
;-------------------------------------------------- ;--------------------------------------------------
.proc GameOverDLI1 .proc GameOverDLI1
; Clouds, color changes ; color changes
;-------------------------------------------------- ;--------------------------------------------------
pha pha
; end of chain ; end of chain
@@ -1118,6 +1126,19 @@ DLI7
rti rti
.endp .endp
;-------------------------------------------------- ;--------------------------------------------------
.proc HelpDLI1
; color changes
;--------------------------------------------------
pha
sta WSYNC
mva GameColors+c_font1 COLPF1
mva GameColors+c_font2 COLPF2
:12 sta WSYNC
mva GameColors+c_font5 COLPF2
pla
rti
.endp
;--------------------------------------------------
.proc GoDLI1 .proc GoDLI1
; Clouds, birds, color changes ; Clouds, birds, color changes
;-------------------------------------------------- ;--------------------------------------------------
@@ -1539,10 +1560,10 @@ EndOfOverScreen
mva #5 StateFlag mva #5 StateFlag
mva #>font_titles CHBAS mva #>font_titles CHBAS
mwa #dl_help dlptrs mwa #dl_help dlptrs
mva GameColors+c_sky COLBAKS mva GameColors+c_grass COLBAKS
mva GameColors+c_over1 COLOR0 mva GameColors+c_over1 COLOR0
mva GameColors+c_white2 COLOR1 mva GameColors+c_font1 COLOR1
mva GameColors+c_white2 COLOR2 mva GameColors+c_font2 COLOR2
mva GameColors+c_font3 COLOR3 mva GameColors+c_font3 COLOR3
lda #@dmactl(narrow|dma) ; narrow screen width, P/M off lda #@dmactl(narrow|dma) ; narrow screen width, P/M off
sta dmactls sta dmactls
BIN
View File
Binary file not shown.