diff --git a/grafproc.asm b/grafproc.asm
index e5dc298..9e67029 100644
--- a/grafproc.asm
+++ b/grafproc.asm
@@ -272,7 +272,7 @@ EndOfDraw
 .endp
 
 ;--------------------------------------------------
-circle .proc ;fxxxing good circle drawing :) 
+.proc circle ;fxxxing good circle drawing :) 
 ;--------------------------------------------------
 ;Turbo Basic source
 ; R=30
diff --git a/scorch.asm b/scorch.asm
index 93258bd..606f8dd 100644
--- a/scorch.asm
+++ b/scorch.asm
@@ -560,6 +560,15 @@ NoPlayerNoDeath
     lda #0
     sta FallDown1
     sta FallDown2
+    sta ydraw+1
+    ; get position of the tank
+    ldx TankNr
+    lda xtankstableL,x
+    sta xdraw
+    lda xtankstableH,x
+    sta xdraw+1
+    lda yTanksTable,x
+    sta ydraw
     lda #1  ; Missile
     jsr ExplosionDirect
     jmp MainRoundLoop.continueMainRoundLoopAfterSeppuku
diff --git a/scorch.xex b/scorch.xex
index 4e71576..728c100 100644
Binary files a/scorch.xex and b/scorch.xex differ
diff --git a/variables.asm b/variables.asm
index a90b4ec..4247ef3 100644
--- a/variables.asm
+++ b/variables.asm
@@ -128,11 +128,11 @@ xtankstableH
     .DS [MaxPlayers]
 ytankstable ;Y positions of tanks (lower left point)
     .DS [MaxPlayers]
-LowResDistances ; coarse stank positions divided by 4 (to be in just one byte)
+LowResDistances ; coarse tank positions divided by 4 (to be in just one byte)
     .DS [MaxPlayers]
 ;-----------------------------------
 Erase    .DS 1 ; if 1 only mask of the character is printed
-                 ; on the graphics screen. if 0 character is printed normally
+               ; on the graphics screen. if 0 character is printed normally
 
 ;-----------------------------------
 RangeLeft  .DS 2 ;range of the soil to be fallen down
diff --git a/weapons.asm b/weapons.asm
index 278c945..abbee02 100644
--- a/weapons.asm
+++ b/weapons.asm
@@ -13,7 +13,7 @@
     ldx TankNr
     lda ActiveWeapon,x
 .endp
-ExplosionDirect .proc
+.proc ExplosionDirect
     asl
     tax
     lda ExplosionRoutines+1,x
@@ -657,9 +657,7 @@ DistanceCheckLoop
     ;multiply difference by 8
     clc
     adc #1
-    asl
-    asl
-    asl
+    :3 asl
     tay
     jsr DecreaseEnergyX