"Underground" shot fixed.

2026-05-20 22:34:21 +02:00 · 2022-06-06 17:59:43 +02:00
parent 1394524a26
commit 031416b8e6
2 changed files with 11 additions and 0 deletions
@@ -1271,9 +1271,20 @@ AfterStrongShoot
 	sbc #$00
    sta ytraj+2

+	; checking if the shot is underground (no Flight but Hit :) )
+	ldy #0
+	adw xtraj+1 #mountaintable temp
+    lda ytraj+1
+    cmp (temp),y	; check collision witch mountains
+    bcs ShotUnderGround
    jsr Flight
    mva #1 color
    rts
+ShotUnderGround
+	mwa xtraj+1 xdraw	; but why not XHit and YHit !!!???
+	mwa ytraj+1 ydraw
+	mva #1 HitFlag
+	rts
 .endp