From e9f34f62c1ff24408b762e6df56fedcdbc09e9cd Mon Sep 17 00:00:00 2001
From: antoniovillena <info@antoniovillena.es>
Date: Thu, 29 Dec 2022 22:42:39 +0100
Subject: [PATCH] =?UTF-8?q?optimizo=20tambi=C3=A9n=20date?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 SD/BIN/DATE    | Bin 376 -> 374 bytes
 utils/date.asm |  13 +++++--------
 2 files changed, 5 insertions(+), 8 deletions(-)

diff --git a/SD/BIN/DATE b/SD/BIN/DATE
index dae76ab98a65425ffcf5eeb55b5fbc6a0bd61972..b8ae217ec453d9a32bbc8eba9717d2448e009fd6 100644
GIT binary patch
delta 138
zcmeyt^o?nPoMD7w&DjXWif4=~pUJO08?0FQO#W<`Vii9>KZNm&ef2Z>)j)}AAU{;`
zZ0<z=IL6$G>kMR^6#pqGFtIfVpLJ3Mq7^_a4Pl;jn)pja$Wl?{ZQ%Bk=KXgJ6t7q+
gwkv#}Y{Y0Hl&<*kZaKqU<&zKXuGcAVSNQc30Gz%$iU0rr

delta 140
zcmeyy^n+=FoMDt=&Dki$if4=~pUJO08>(3OO#W<yVii9>KZNm&ef2Z>)j)}AAU|C3
zZ2m<5IL7>m>kMRE6#pqGFtIfVpLJ0Lq7^_a4Pl;jnfOaZ#9C40ZQ%Bk=KUI+cZ?LT
iSSv1<_%hjm(L^Xy@#EcchP%oqAKG27Q{Jxd>m>jPW;*x)

diff --git a/utils/date.asm b/utils/date.asm
index 2245353..d056838 100644
--- a/utils/date.asm
+++ b/utils/date.asm
@@ -137,15 +137,12 @@ LoopSendMess    ld      a, (hl)         ;y en un bucle, me pongo a enviar uno tr
                 or      a
                 ret
 
-SendByte        ;Enviar un byte por I2C. Byte en A. BC=puerto de datos del ZXUNO ya apuntando a I2CREG. Usa y modifica: A, D, flags
-                scf
-TransBit        adc     a, a   ;A otro bit
-                jr      z, Endbyte
-                call    c, Send1
+SendByte        scf                     ;Enviar un byte por I2C. Byte en A. BC=puerto de datos del ZXUNO ya
+                adc     a, a            ;apuntando a I2CREG. Usa y modifica: A, D, flags
+Trans           call    c, Send1
                 call    nc, Send0
-                and     a
-                jr      TransBit
-Endbyte         ; Wait for ACK
+                add     a, a
+                jr      nz, Trans
 Send1           ld      d, SCL0SDA1
                 out     (c), d
                 ld      d, SCL1SDA1