From 8951593bd6fb44834237899b95e970f2dad09168 Mon Sep 17 00:00:00 2001
From: antoniovillena <info@antoniovillena.es>
Date: Thu, 29 Dec 2022 14:55:06 +0100
Subject: [PATCH] Arreglo bug

---
 SD/SYS/RTC.SYS | Bin 211 -> 212 bytes
 utils/rtc.asm  |   3 ++-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/SD/SYS/RTC.SYS b/SD/SYS/RTC.SYS
index 0f9f1d12f7f9ee2e3811d0d34bb0e018d43b38d7..529f3fc354e34c2c3d6e22b59b2f89a72bb30de8 100644
GIT binary patch
delta 96
zcmcc2c!hC-sP;y6JEpT6)z6+*7kL{f$8N{`w$k=(rQKqn*pbufXZNX>E6XZ;J-ZdC
xVxmKq)>ic^r`4BRnD;Au5o3HCD8~FY@T46hQ2K4aX`_CFZzshVfTB!5Q2_mID*6Bb

delta 95
zcmcb@c$sm6sP+bRJEpT6)X$z$7kL{f$8N{`w$k=(rQKqn*pXA}XZNa?E6XZ;J-Y>{
wVxmKq<`(rUr_`UB_bYrAV|*JZ#{4$$q#Ywr_HDpvqke;LC&d_mqD(+h0N{}-_5c6?

diff --git a/utils/rtc.asm b/utils/rtc.asm
index 2463b1f..37c1d04 100644
--- a/utils/rtc.asm
+++ b/utils/rtc.asm
@@ -134,7 +134,8 @@ Params          db      0, 0, 0, 0, 0, 0, 0  ;La hora a la que quieres poner el
 
 Trans           call    c, Send1
                 call    nc, Send0
-                db      $e6             ;and $37 / jr TransBit
+                and     a
+                db      $38             ;jr nc, +$37 / jr TransBit
 SendByte        scf                     ;Enviar un byte por I2C. Byte en A. BC=puerto de datos del ZXUNO ya
 TransBit        adc     a, a            ;apuntando a I2CREG. Usa y modifica: A, D, flags
                 jr      nz, Trans