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
.word purchaseTextBuffer
.byte $00+$80
.byte $50,$42
.byte $20+$80,$10+$80,$42
MoreUpdl
.word EmptyLine
.byte 0,$42
.byte $10+$80,$42
WeaponsListDL
.word ListOfWeapons
:15 .byte 0,2
.byte 0, $42
.byte $10+$80, $42
MoreDownDL
.word EmptyLine
.byte $40,$42
.byte $40+$80,$42
.word WeaponsDescription
.byte $0,$42
PurActDescAddr
+10 -1
View File
@@ -1232,14 +1232,23 @@ EndOfDLI_GO
.proc DLIinterruptText
;sta dliA
pha
lda dliCounter
bne MoreBarsColorChange
lda #TextBackgroundColor
;sta WSYNC
sta COLPF2
mva #TextForegroundColor COLPF3
;lda dliA
bne EndOfDLI_Text
MoreBarsColorChange
and #%00000001
rol
sta COLPF2
EndOfDLI_Text
inc dliCounter
pla
DLIinterruptNone
rti
.endp
;--------------------------------------------------
.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
; we are displaying name of the player
lda #$ca
sta COLOR1 ; set color of header text
ldy #0
sty COLBAKS ; set color of background
lda tanknr