Minor graphic improvements.

Background color of "more" up/down lines (purchase screen). Color of purchase screen header.
This commit is contained in:
Pecusx
2022-11-05 21:01:20 +01:00
parent 2d1cecfb10
commit 9575dcee11
5 changed files with 16 additions and 5 deletions
+4 -4
View File
@@ -16,17 +16,17 @@ DLPurTitleAddr
.byte $42 .byte $42
.word purchaseTextBuffer .word purchaseTextBuffer
.byte $00+$80 .byte $00+$80
.byte $50,$42 .byte $20+$80,$10+$80,$42
MoreUpdl MoreUpdl
.word EmptyLine .word EmptyLine
.byte 0,$42 .byte $10+$80,$42
WeaponsListDL WeaponsListDL
.word ListOfWeapons .word ListOfWeapons
:15 .byte 0,2 :15 .byte 0,2
.byte 0, $42 .byte $10+$80, $42
MoreDownDL MoreDownDL
.word EmptyLine .word EmptyLine
.byte $40,$42 .byte $40+$80,$42
.word WeaponsDescription .word WeaponsDescription
.byte $0,$42 .byte $0,$42
PurActDescAddr PurActDescAddr
+10 -1
View File
@@ -1232,14 +1232,23 @@ EndOfDLI_GO
.proc DLIinterruptText .proc DLIinterruptText
;sta dliA ;sta dliA
pha pha
lda dliCounter
bne MoreBarsColorChange
lda #TextBackgroundColor lda #TextBackgroundColor
;sta WSYNC ;sta WSYNC
sta COLPF2 sta COLPF2
mva #TextForegroundColor COLPF3 mva #TextForegroundColor COLPF3
;lda dliA bne EndOfDLI_Text
MoreBarsColorChange
and #%00000001
rol
sta COLPF2
EndOfDLI_Text
inc dliCounter
pla pla
DLIinterruptNone DLIinterruptNone
rti rti
.endp .endp
;-------------------------------------------------- ;--------------------------------------------------
.proc VBLinterrupt .proc VBLinterrupt
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
+2
View File
@@ -323,6 +323,8 @@ GoToActivation
; there is a tank (player) number in tanknr ; there is a tank (player) number in tanknr
; we are displaying name of the player ; we are displaying name of the player
lda #$ca
sta COLOR1 ; set color of header text
ldy #0 ldy #0
sty COLBAKS ; set color of background sty COLBAKS ; set color of background
lda tanknr lda tanknr