PlasmaBlast!

game.asm

@@ -639,6 +639,7 @@ MetodOfDeath
     bcs MetodOfDeath
     tay
     lda weaponsOfDeath,y
+    ;lda #32    ; plama blast only
     jsr ExplosionDirect
     mva #sfx_silencer sfx_effect
 

scorch.asm

@@ -41,7 +41,7 @@
 
 ;---------------------------------------------------
 .macro build
-    dta d"1.50" ; number of this build (4 bytes)
+    dta d"1.51" ; number of this build (4 bytes)
 .endm
 
 .macro RMTSong

weapons.asm

@@ -783,19 +783,36 @@ LaserMisses
 ; idea only ....
     mva #sfx_plasma_1_2 sfx_effect
     mva #0 drawFunction
-    lda #60
+    mva #$04 ExplosionRadius
+    jmp CalculateExplosionRange
+    adw ydraw #4
+    sbw xdraw #4
+    
+    lda ydraw
+    lsr
+    lsr
+    lsr
+    sta yc
+    lda #30
+    sbc yc
     sta yc  ;  blink counter 60
-@
+columnloop
+      mva #8 fs  ;lines counter
+linesloop
       lda yc
-      and #$01
-      eor #$01
+      beq @+
+      lda random
+@     and #$01
       sta color
         mwa xdraw xbyte
         mwa #0 ybyte
       jsr draw
-
+      inw xdraw
+      dec fs
+      bne linesloop
+      sbw xdraw #8
     dec yc
-    bne @-
+    bpl columnloop
 
     ; at this point color allways = 0
     inc color ;   set color to 1