Pecus/scorch_src
1
0
Fork 0
mirror of https://github.com/Pecusx/scorch_src.git synced 2026-05-21 21:34:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

Texts and more colours on Game Over screen

Browse Source
This commit is contained in:
Pecusx
2022-07-19 10:37:09 +02:00
parent f20ce14dc3
commit 616452a01e
4 changed files with 37 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files
display.asm
+15 -2
View File
@@ -128,6 +128,7 @@ MoreDown
ListOfWeapons ListOfWeapons
:36 dta d" " :36 dta d" "
ListOfWeapons1End ListOfWeapons1End
GameOverResults ; reuse after game (remember to clear on start new)
ListOfDefensiveWeapons ListOfDefensiveWeapons
:16 dta d" " :16 dta d" "
ListOfDefensiveWeaponsEnd ;constant useful when clearing ListOfDefensiveWeaponsEnd ;constant useful when clearing
@@ -148,7 +149,9 @@ EmptyLine
.ALIGN $1000 ; WARNING!!!! 4KiB barrier crossing here, might need reassignment!!! .ALIGN $1000 ; WARNING!!!! 4KiB barrier crossing here, might need reassignment!!!
;----------------------------------------------- ;-----------------------------------------------
GameOverDL GameOverDL
.byte $70,$70,$70,$40 .byte $70,$40
.byte $47 ; 16 gr8 lines
.word GameOverTitle
.byte $4f ; 1 line .byte $4f ; 1 line
.word display+(40*72) .word display+(40*72)
:28 .byte $0f ; 28 lines :28 .byte $0f ; 28 lines
@@ -160,6 +163,13 @@ GameOverDL
.byte $4f ; 1 line .byte $4f ; 1 line
.word display+(40*72) .word display+(40*72)
:7 .byte $0f ; 7 lines :7 .byte $0f ; 7 lines
.byte $00+$80 ; 1 line
.byte $42 ; 7 tekst lines
.word GameOverTitle2
.byte $00+$80
.byte $42
.word GameOverResults
:5 .byte $00+$80,$02
.byte $70 .byte $70
.byte $41 .byte $41
.word GameOverDL .word GameOverDL
@@ -197,5 +207,8 @@ activateTextEnd
purchaseText purchaseText
dta d"Purchase" dta d"Purchase"
purchaseTextEnd purchaseTextEnd
GameOverTitle
dta d" game over "*
GameOverTitle2
dta d" Player Points Hits Money "
.endif .endif
scorch.asm
+18 -7
View File
@@ -998,19 +998,30 @@ ClearResults
;sta dliA ;sta dliA
;sty dliY ;sty dliY
pha pha
phy
lda dliCounter lda dliCounter
bne @+ bne EndofPMG
lda #%00100000 ; playfield after P/M lda #%00100000 ; playfield after P/M
STA WSYNC STA WSYNC
sta gtictl sta gtictl
inc dliCounter bne EndOfDLI_GO
pla EndofPMG
rti cmp #1
@ bne ColoredLines
lda #%00100100 ; playfield before P/M lda #%00100100 ; playfield before P/M
STA WSYNC STA WSYNC
sta gtictl sta gtictl
bne EndOfDLI_GO
ColoredLines
tay
lda GameOverColoursTable-3,y ; -2 becouse this is DLI nr 2 and -1 (labels line)
ldy #$0a ; text colour (brightnes)
STA WSYNC
sta COLPF2
sty COLPF1
EndOfDLI_GO
inc dliCounter inc dliCounter
ply
pla pla
rti rti
.endp .endp
@@ -1019,8 +1030,8 @@ ClearResults
;sta dliA ;sta dliA
pha pha
sta WSYNC sta WSYNC
mva #TextBackgroundColor colpf2 mva #TextBackgroundColor COLPF2
mva #TextForegroundColor colpf3 mva #TextForegroundColor COLPF3
;lda dliA ;lda dliA
pla pla
DLIinterruptNone DLIinterruptNone
scorch.xex
BIN
View File
Binary file not shown.
variables.asm
+4
View File
@@ -18,6 +18,10 @@ seppukuVal .by 75
mountainDeltaH .by 3 mountainDeltaH .by 3
mountainDeltaL .by $ff mountainDeltaL .by $ff
;---------------------------------------------------- ;----------------------------------------------------
; Color table for Game Over Screen
.by $00 ; labels line color
GameOverColoursTable .BYTE $80,$40,$c4,$20,$c0,$e4
;----------------------------------------------------
skilltable ; computer controlled players' skills (1-8), 0 - human (no cleaning, ticket #30) skilltable ; computer controlled players' skills (1-8), 0 - human (no cleaning, ticket #30)
.DS [MaxPlayers] .DS [MaxPlayers]
;---------------------------------------------------- ;----------------------------------------------------