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

ExplosionRange variable is now really one byte long. :)

Browse Source
This commit is contained in:
Pecusx
2022-11-21 20:37:00 +01:00
parent 7d9e6d2045
commit ba780df597
4 changed files with 27 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files
weapons.asm
+25 -5
View File
@@ -3008,14 +3008,34 @@ CalculateExplosionRange0
;calculates total horizontal range of explosion by
;"summing up" ranges of all separate explosions
adw xdraw ExplosionRadius WeaponRangeRight
cpw WeaponRangeRight #screenwidth-1
bcc NotOutOfTheScreenRight
; WeaponRangeRight = xdraw + ExplosionRadius
clc
lda xdraw
adc ExplosionRadius
sta WeaponRangeRight
lda xdraw+1
adc #$00
sta WeaponRangeRight+1
; adw xdraw ExplosionRadius WeaponRangeRight ; Pozor! ExplosionRadius is one byte now
; cpw WeaponRangeRight #screenwidth-1
cmp #>(screenwidth-1)
bne @+
lda WeaponRangeRight
cmp #<(screenwidth-1)
@ bcc NotOutOfTheScreenRight
mwa #screenwidth-1 WeaponRangeRight
NotOutOfTheScreenRight
sbw xdraw ExplosionRadius WeaponRangeLeft
lda WeaponRangeLeft+1
; WeaponRangeLeft = xdraw - ExplosionRadius
sec
lda xdraw
sbc ExplosionRadius
sta WeaponRangeLeft
lda xdraw+1
sbc #$00
sta WeaponRangeLeft+1
; sbw xdraw ExplosionRadius WeaponRangeLeft ; Pozor! ExplosionRadius is one byte now
; lda WeaponRangeLeft+1
bpl NotOutOfTheScreenLeft
lda #0
sta WeaponRangeLeft