Clear variables optimisation and better text screen init

This commit is contained in:
Pecusx
2022-08-07 16:01:09 +02:00
parent 5b90bc571e
commit 2d274b05d0
3 changed files with 5 additions and 16 deletions
-15
View File
@@ -925,8 +925,6 @@ deletePtr = temp
jsr WeaponCleanup
mva #TextBackgroundColor colpf2s
mva #TextForegroundColor colpf3s
mva #>WeaponFont chbas
;parameter for old plot (unPlot) max 5 points
@@ -964,19 +962,6 @@ MakeTanksVisible
dex
bpl MakeTanksVisible
ldx #0
txa
ClearResults
sta ResultsTable,x
sta DirectHitsL,x
sta DirectHitsH,x
sta EarnedMoneyL,x
sta EarnedMoneyH,x
inx
cpx #MaxPlayers
bne ClearResults
mva #1 CurrentRoundNr ;we start from round 1
mva #6 NTSCcounter
BIN
View File
Binary file not shown.
+5 -1
View File
@@ -22,7 +22,11 @@
; ora #$02 ; normal screen width
lda #%00110010 ; normal screen width, DL on, P/M off
sta dmactls
jsr PMoutofScreen
mva #TextBackgroundColor colpf2s
mva #TextForegroundColor colpf3s
mva #$ca colpf1s
VDLI DLIinterruptText.DLIinterruptNone ; jsr SetDLI for text screen without DLIs
mva #0 OptionsY