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

Better and faster Laser

Browse Source
This commit is contained in:
Pecusx
2022-11-15 11:02:11 +01:00
parent fbcbab2eec
commit a33d7d541d
4 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
weapons.asm
+5 -3
View File
@@ -1506,7 +1506,7 @@ AfterStrongShoot
tay ; A=0 !
adw xtraj+1 #mountaintable temp
lda ytraj+1
cmp (temp),y ; check collision witch mountains
cmp (temp),y ; check collision with mountains
bcs ShotUnderGround
jsr Flight
mva #1 color
@@ -1761,6 +1761,8 @@ LaserNoWalls
bit TestFlightFlag
bmi nowait
bit LaserFlag ; faster laser prepare
bmi nowait
lda color
beq nonowait ; smoke tracer erases slowly
lda tracerflag
@@ -1777,7 +1779,7 @@ nowait
; If laser fires, edges of the screen finish "flying" and laser hits.
lda ytraj+2
bmi LaserHitEdge
cpw xtraj+1 #screenwidth+1
cpw xtraj+1 #screenwidth ;+1
bcc LaserNoHitEdge
LaserHitEdge
mwa xdraw XHit
@@ -2216,7 +2218,7 @@ MIRVcheckCollision
ldy #0
lda ytraj+1
cmp (temp),y ; check collision witch mountains
cmp (temp),y ; check collision with mountains
bcs mrHit
mrSkipCollisionCheck