# HG changeset patch
# User William Astle <lost@l-w.ca>
# Date 1719294430 21600
# Node ID c7f2f63cbcfe9661e53b9a740253416204ceb0ac
# Parent  917b4893bb3d35289a75d7015e5173225d3af7e5
Clear spurious interrupts on warm or cold start

diff -r 917b4893bb3d -r c7f2f63cbcfe src/init.s
--- a/src/init.s	Mon Jun 24 23:44:39 2024 -0600
+++ b/src/init.s	Mon Jun 24 23:47:10 2024 -0600
@@ -256,6 +256,14 @@
 warmstartb      jsr keyb_reset                  ; reset the keyboard
                 lda #0x35                       ; enable VSYNC interrupt in PIA
                 sta PIA0.CB
+                lda PIA0.DA                     ;* clear any spurious interrupts which should work around weird bugs
+                lda PIA0.DB                     ;* in emulators
+                lda PIA1.DA
+                lda PIA1.DB
+                ifdef COCO3
+                lda GIME.IRQ
+                lda GIME.FIRQ
+                endc
                 andcc #0xaf                     ; enable interrupts at the cpu
                 jmp immediate                   ; go start immediate mode
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;