"Debug" for Laser

This commit is contained in:
Pecusx
2023-01-22 19:46:37 +01:00
parent e842d455e6
commit 5d619c80f8
3 changed files with 7 additions and 2 deletions
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
+7 -2
View File
@@ -1458,8 +1458,10 @@ AfterOffensiveText
cmp #ind_Laser__________ ; laser cmp #ind_Laser__________ ; laser
bne NotStrongShoot bne NotStrongShoot
; Laser: (not)very strong - invisible - shot for laser beam end coordinates ; Laser: (not)very strong - invisible - shot for laser beam end coordinates
bit Vdebug
bmi @+
mva #0 color mva #0 color
lda #1 @ lda #1
sta Force sta Force
sta Force+1 sta Force+1
mva #$ff LaserFlag ; $ff - Laser mva #$ff LaserFlag ; $ff - Laser
@@ -1755,7 +1757,10 @@ LaserNoWalls
bit TestFlightFlag bit TestFlightFlag
bmi nowait bmi nowait
bit LaserFlag ; faster laser prepare bit LaserFlag ; faster laser prepare
bmi nowait bpl nolaserwait
bit Vdebug
bpl nowait
nolaserwait
lda color lda color
beq nonowait ; smoke tracer erases slowly beq nonowait ; smoke tracer erases slowly
lda tracerflag lda tracerflag