Gift now blinking.

2026-05-20 22:33:43 +02:00 · 2022-11-16 18:33:53 +01:00
parent cc41bcd323
commit 6f62d49407
4 changed files with 29 additions and 1 deletions
@@ -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'