From 1b4a73c362d72569f6e18f041dde2eabb3e4bbe9 Mon Sep 17 00:00:00 2001
From: Pecusx <Pecus@poczta.fm>
Date: Wed, 10 Aug 2022 13:30:30 +0200
Subject: [PATCH] RMT Player bug fix !!!

---
 artwork/sfx/rmtplayr.a65 |   5 +++--
 grafproc.asm             |  10 +++++-----
 scorch.xex               | Bin 43506 -> 43506 bytes
 3 files changed, 8 insertions(+), 7 deletions(-)

diff --git a/artwork/sfx/rmtplayr.a65 b/artwork/sfx/rmtplayr.a65
index 0e8c70c..3992e17 100644
--- a/artwork/sfx/rmtplayr.a65
+++ b/artwork/sfx/rmtplayr.a65
@@ -766,8 +766,9 @@ ei4
 	IFT 1==[FEAT_COMMAND1+FEAT_COMMAND2+FEAT_COMMAND3+FEAT_COMMAND4+FEAT_COMMAND5+FEAT_COMMAND6+[FEAT_COMMAND7SETNOTE||FEAT_COMMAND7VOLUMEONLY]]
 	beq cmd0
 	ELS
-	lsr @
-	lsr @
+;	lsr @
+;	lsr @
+	lda #0	; my fix :)
 	sta jmx+1
 jmx	bcc *
 	jmp cmd0
diff --git a/grafproc.asm b/grafproc.asm
index 0f4d528..372981d 100644
--- a/grafproc.asm
+++ b/grafproc.asm
@@ -1799,7 +1799,7 @@ EndPutChar
 FontColor0
     ; char to the table
     lda CharCode4x4
-    and #1
+    and #%00000001
 	beq Upper4bits
 	lda #$ff 		; better option to check (nibbler4x4 = $00 or $ff)
 Upper4bits
@@ -1841,11 +1841,11 @@ GetUpper4bits
     and #$7
     sta ybit
 
-    lsrw xbyte ; div 8
-    rorw xbyte
-    rorw xbyte
+    :3 lsrw xbyte ; div 8
+;    rorw xbyte
+;    rorw xbyte
 ;---
-    ldy xbyte
+    ldy xbyte	; horizontal byte offet stored in Y
     lda dy ; y = y - 3 because left lower.
     sec
     sbc #3
diff --git a/scorch.xex b/scorch.xex
index f9a8b2ed24a652a88fd6454fc0932dd063f144ca..27b3f567e70d38f08fb07baa22e766353db9c86e 100644
GIT binary patch
delta 28
kcmex#nd#GIrVVGxSlwFFTHH2YEVEW&TFJ1PZ}t;D0L@tp(*OVf

delta 26
icmex#nd#GIrVVGxCeJP9-h92xRE5dQYct>MCwu_Behh8^