From 9906fc2ad102a0c7a309151a04067bf6189b1ae1 Mon Sep 17 00:00:00 2001
From: antoniovillena <>
Date: Sat, 25 Mar 2023 20:53:59 +0100
Subject: [PATCH] bug ZX3

---
 SD/BIN/BPLUGINS/ZX3 | Bin 552 -> 545 bytes
 utils/zx3.asm       |  16 ++++++----------
 2 files changed, 6 insertions(+), 10 deletions(-)

diff --git a/SD/BIN/BPLUGINS/ZX3 b/SD/BIN/BPLUGINS/ZX3
index 98246460d82a0d8e4ab627ab4554aa824053e4c5..5c9e5735555ee6aea16acf01145c26720dbf01fe 100644
GIT binary patch
delta 337
zcmZ3%vXEthv3_A=kiV}&UVe!}QGR|&Y6`>2vtmum3_yZu{@V%&1c@+SlhhDDTR1Vv
zj<Im!LU~`)Mg!rqg^g~RIjLaXY5ApjK+TGZP3ISCX*5}BHED{!%@WsOwE4HhLI|d^
zBtKsvCqFNp;pD#<3syzdMzia8^UoGe7G%_8ES&7XC{kb5D17s-uEKdn>pxm5jdp+D
zR@$)Wyv=-@__mPsZ6(Xw%7=E>>y)=E{Cdd&cPJa!fpD&(9pl@|w}EdX-xfk7{x!no
z(3A?<z*O2P++?)=%QE>Iql_8IyBxL}+#E91&-fKqDpof>g&V*M3X*4x3ctWcp9Jc8
N_;xYdzqgBD0swR4hI9Y`

delta 297
zcmZ3;vVvuTv3^BkkiV}&UVe!}QGR|&Y6`>2v$9Rh3_yZu{@V%&1c@+SlhhDDTQM=o
zj<I6mLU|L*Mg!rq6^(A0IjLaXY5ApjK+TF8P3ISC={H#!Hfi>2_6ssFybaP|wE4Hh
zLI|k&gD8h)quKSl`DZI8^D^qG0xeHXOi^$xD#|ZnIBDmg$Z+81*~UiUn|E~;&fCRa
zXSDvKr7<~{QQiUOCN{8J;7(MuV|-irHt=oa+d_y0YZF`!Md{={jQVCEZ*bUZaC691
mKjT+eso2!`6t0>T<ke@43ctYSoMg2A`|#~zwtsIIzXSliA#r{H

diff --git a/utils/zx3.asm b/utils/zx3.asm
index 5c3af1c..23afc90 100644
--- a/utils/zx3.asm
+++ b/utils/zx3.asm
@@ -81,14 +81,12 @@ FileName        ld      hl, 0
                 ret
 FileFound       ld      hl, Stat
                 esxdos  F_FSTAT
-                ld      hl, (Stat+7)  ;4000
-                ld      a, (Stat+9)   ;0c
-                add     hl, hl        ;8000
-                adc     a, a          ;18
-                add     hl, hl        ;0000
-                adc     a, a          ;31
-                ld      de, 0
-                sbc     hl, de
+                ld      hl, (Stat+7)
+                ld      a, (Stat+9)
+                add     hl, hl
+                rla
+                adc     hl, hl
+                rla
                 jr      z, Inc1
                 inc     a
 Inc1            cp      $a4
@@ -128,8 +126,6 @@ ReadOK          ld      a, $40
                 exx
                 dec     ixl
                 jr      nz, Bucle
-                ld      a, ']'
-                rst     $10
                 ld      bc, zxuno_port
                 ld      hl, (Slot+1)
                 ld      a, core_addr