From 8ca57b2fac1226be89c1f30dabfd1909b84ffcb6 Mon Sep 17 00:00:00 2001
From: Joshua Bell <inexorabletash@gmail.com>
Date: Sun, 25 Jun 2023 11:37:59 -0700
Subject: [PATCH] NSClock: Incorporate @bobbimanners Ultrawarp bug workaround

For context, see:
https://github.com/bobbimanners/ProDOS-Utils/blob/master/No_Slot_Clock/README.md
---
 clocks/ns.clock/ns.clock.system.s | 1 +
 clocks/ns.clock/set.datetime.s    | 2 ++
 2 files changed, 3 insertions(+)

diff --git a/clocks/ns.clock/ns.clock.system.s b/clocks/ns.clock/ns.clock.system.s
index c3e2711..f616e3f 100644
--- a/clocks/ns.clock/ns.clock.system.s
+++ b/clocks/ns.clock/ns.clock.system.s
@@ -278,6 +278,7 @@ loop:   lda     driver,y
 driver:
         php
         sei
+        lda     $C00B           ; Ultrawarp bug workaround c/o @bobbimanners
 ld4:    lda     $CFFF           ; self-modified ($CFFF or RDCXROM)
         pha
 st1:    sta     $C300           ; self-modified ($Cn00 or INTCXROM)
diff --git a/clocks/ns.clock/set.datetime.s b/clocks/ns.clock/set.datetime.s
index 26e65ff..73e56e6 100644
--- a/clocks/ns.clock/set.datetime.s
+++ b/clocks/ns.clock/set.datetime.s
@@ -349,6 +349,7 @@ slot:   .byte   0
 driver:
         php
         sei
+        lda     $C00B           ; Ultrawarp bug workaround c/o @bobbimanners
 ld4:    lda     $CFFF           ; self-modified ($CFFF or RDCXROM)
         pha
 st1:    sta     $C300           ; self-modified ($Cn00 or INTCXROM)
@@ -456,6 +457,7 @@ unlock:
 
         php
         sei
+        lda     $C00B           ; Ultrawarp bug workaround c/o @bobbimanners
 ld4:    lda     $CFFF           ; self-modified ($CFFF or RDCXROM)
         pha
 st1:    sta     $C300           ; self-modified ($Cn00 or INTCXROM)