Pecus/scorch_src
1
0
Fork 0
mirror of https://github.com/Pecusx/scorch_src.git synced 2026-05-21 06:39:40 +02:00
Code Issues Packages Projects Releases Wiki Activity

Better laser timing

Browse Source
This commit is contained in:
Pecusx
2022-07-16 21:10:45 +02:00
parent 6b0d8aa287
commit 738faec7e2
2 changed files with 18 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files
scorch.xex
BIN
View File
Binary file not shown.
weapons.asm
+18 -7
View File
@@ -675,28 +675,39 @@ DiggerCharacter
sbc #$00 sbc #$00
sta ybyte+1 sta ybyte+1
mva #0 drawFunction
mwa xdraw LaserCoordinate mwa xdraw LaserCoordinate
mwa ydraw LaserCoordinate+2 mwa ydraw LaserCoordinate+2
mwa xbyte LaserCoordinate+4 mwa xbyte LaserCoordinate+4
mwa ybyte LaserCoordinate+6 mwa ybyte LaserCoordinate+6
mva #sfx_lightning sfx_effect mva #sfx_lightning sfx_effect
mva #51 yc ; laser blink counter
mva #%10000000 drawFunction
;the above switches Draw to measuring length
jsr draw
mva #0 drawFunction
lsr LineLength+1 ; LineLength / 8
ror LineLength
lsr LineLength ; max line lenght is about 380 (9 bits)
lsr LineLength
sec
lda #60
sbc LineLength
sta yc ; laser blink counter 60-(LineLength/8)
@ @
lda yc lda yc
and #$01 and #$01
eor #$01
sta color sta color
mwa LaserCoordinate xdraw mwa LaserCoordinate xdraw
mwa LaserCoordinate+2 ydraw mwa LaserCoordinate+2 ydraw
mwa LaserCoordinate+4 xbyte mwa LaserCoordinate+4 xbyte
mwa LaserCoordinate+6 ybyte mwa LaserCoordinate+6 ybyte
mva #sfx_lightning sfx_effect mva #sfx_lightning sfx_effect
jsr draw jsr draw
dec:lda yc dec yc
bpl @- bne @-
mva #1 color mva #1 color
mwa LaserCoordinate xdraw mwa LaserCoordinate xdraw