diff --git a/display_purchasedl.asm b/display_purchasedl.asm index 716dd52..8435275 100644 --- a/display_purchasedl.asm +++ b/display_purchasedl.asm @@ -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 diff --git a/scorch.asm b/scorch.asm index d3f93e1..87fc999 100644 --- a/scorch.asm +++ b/scorch.asm @@ -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 diff --git a/scorch.bin b/scorch.bin index 3472d70..5081e8c 100644 Binary files a/scorch.bin and b/scorch.bin differ diff --git a/scorch.xex b/scorch.xex index d304060..cfccf05 100644 Binary files a/scorch.xex and b/scorch.xex differ diff --git a/textproc.asm b/textproc.asm index a5e3e19..20f0170 100644 --- a/textproc.asm +++ b/textproc.asm @@ -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