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

Optimizations - full colortable for PAL mode

Browse Source
This commit is contained in:
Pecusx
2023-01-31 20:22:47 +01:00
parent 98565d490f
commit f703316128
5 changed files with 16 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files
constants.asm
+5 -1
View File
@@ -67,10 +67,14 @@ GradientAddrL
.by <dliColorsFore, <dliColorsFore, <dliColorsFore2 .by <dliColorsFore, <dliColorsFore, <dliColorsFore2
GradientAddrH GradientAddrH
.by >dliColorsFore, >dliColorsFore, >dliColorsFore2 .by >dliColorsFore, >dliColorsFore, >dliColorsFore2
dliColorsFore2 dliColorsFore2 ; colors for NTSC
.by $0a ; one mountains color .by $0a ; one mountains color
.by $7e,$7a,$7c,$6a,$6c,$58,$5a,$48,$4a,$38 .by $7e,$7a,$7c,$6a,$6c,$58,$5a,$48,$4a,$38
.by $3a,$16,$18,$e6,$e8,$d4,$d6,$b4,$b6,$b6 .by $3a,$16,$18,$e6,$e8,$d4,$d6,$b4,$b6,$b6
dliColorsFore2PAL ; colors for PAL
.by $0a ; one mountains color
.by $7e,$7a,$7c,$6a,$6c,$58,$5a,$48,$4a,$38
.by $3a,$16,$18,$e6,$e8,$c4,$c6,$a4,$a6,$a6
;----------- ;-----------
pmtableL ; addressess of the P/M memory for 6 tanks pmtableL ; addressess of the P/M memory for 6 tanks
scorch.asm
+10 -8
View File
@@ -349,12 +349,15 @@ no5200splash
mva #$10 MODUL-6+$a69 ; $12 > $10 mva #$10 MODUL-6+$a69 ; $12 > $10
mva #$04 MODUL-6+$bf8 ; $05 > $04 mva #$04 MODUL-6+$bf8 ; $05 > $04
mva #$08 MODUL-6+$e3d ; $0a > $08 mva #$08 MODUL-6+$e3d ; $0a > $08
; and mountains colors
mva #$c4 dliColorsFore2+16 ; and mountains colors table address
mva #$c6 dliColorsFore2+17 mva #<dliColorsFore2PAL GradientAddrL+2
mva #$a4 dliColorsFore2+18 mva #>dliColorsFore2PAL GradientAddrH+2
mva #$a6 dliColorsFore2+19 ; mva #$c4 dliColorsFore2+16
sta dliColorsFore2+20 ; mva #$c6 dliColorsFore2+17
; mva #$a4 dliColorsFore2+18
; mva #$a6 dliColorsFore2+19
; sta dliColorsFore2+20
NoRMT_PALchange NoRMT_PALchange
.ELSE .ELSE
mva #$7f SkStatSimulator mva #$7f SkStatSimulator
@@ -410,7 +413,6 @@ MainGameLoop
jsr SetStandardBarrels jsr SetStandardBarrels
jsr CallPurchaseForEveryTank jsr CallPurchaseForEveryTank
mva #0 SpyHardFlag
jsr MakeDarkScreen jsr MakeDarkScreen
bit escFlag bit escFlag
bmi START bmi START
@@ -1667,7 +1669,7 @@ peopleAreHere
MakeDarkScreen MakeDarkScreen
jsr PMoutofScreen jsr PMoutofScreen
mva #0 dmactls ; dark screen mva #0 dmactls ; dark screen
sta dmactl ; sta dmactl ; probably not necessary (3 bytes!!! :) )
; and wait one frame :) ; and wait one frame :)
.proc WaitOneFrame .proc WaitOneFrame
lda CONSOL lda CONSOL
scorch.bin
BIN
View File
Binary file not shown.
scorch.xex
BIN
View File
Binary file not shown.
weapons.asm
+1 -1
View File
@@ -2464,6 +2464,7 @@ InverseScreenByte
mvx TankNr TargetTankNr ; save mvx TankNr TargetTankNr ; save
RepeatSpy RepeatSpy
mvx #0 TankNr mvx #0 TankNr
stx SpyHardFlag ; 0 - optimization
CheckNextTankSH CheckNextTankSH
cpx TargetTankNr cpx TargetTankNr
beq ThisTankItsMe beq ThisTankItsMe
@@ -2494,7 +2495,6 @@ SelectNextTank
SpyHardEnd SpyHardEnd
mvx TargetTankNr TankNr ; restore mvx TargetTankNr TankNr ; restore
jsr DisplaySpyInfo jsr DisplaySpyInfo
mva #0 SpyHardFlag
rts rts
.endp .endp
.proc DisplaySpyInfo .proc DisplaySpyInfo