Gift now blinking.

scorch.asm

@@ -1951,6 +1951,31 @@ NoCheat
 CheatName
 	dta d"   008.T"+$27
 ;----------------------------------------------
+.proc DLIinterruptBFG
+	pha
+	lda dliCounter
+	bne EndofBFGDLI
+	lda dliColorsFore
+	bit random
+	bmi @+
+	lda DliColorBack
+@	sta COLPF2
+	lda dliColorsFore
+	bit random
+	bmi @+
+	lda DliColorBack
+@	sta COLPF1
+EndofBFGDLI
+	inc dliCounter
+    pla
+    rti
+.endp
+; ------------------------
+.proc BFGblink
+	VDLI DLIinterruptBFG
+	rts
+.endp
+;--------------------------------------------------
     .IF * > MODUL-1
 	  .ECHO *
       .ERROR 'Code and data too long'

weapons.asm

@@ -56,8 +56,11 @@ VOID
 tracer
     rts
 .endp
-; ------------------------
 .proc BFG
+    mva #sfx_baby_missile sfx_effect 
+	jsr BFGblink
+	;wait 50
+	;VDLI DLIinterruptGraph	; blinking off (but no memory :) )
 	; Kill all :)
     ldx NumberOfPlayers
     dex