From 13a7063df0f52b5ecf3769b8a8e0ac7867afddf7 Mon Sep 17 00:00:00 2001
From: jespergravgaard <jesper@balmangravgaard.dk>
Date: Thu, 12 May 2022 18:27:55 +0200
Subject: [PATCH] Added some fragments.

---
 .../(qbuc1_derefidx_vbuxx)_derefidx_vbuc2=vbuaa.asm    |  6 ++++++
 ...buc2)_bor_pbuc3_derefidx_(pbuz1_derefidx_vbuc4).asm | 10 ++++++++++
 ...buc1_derefidx_(pbuz1_derefidx_vbuyy)_band_vbuc2.asm |  4 ++++
 src/main/fragment/mos6502-common/vbuaa=vbuaa_rol_6.asm | 10 ++++------
 4 files changed, 24 insertions(+), 6 deletions(-)
 create mode 100644 src/main/fragment/mos6502-common/(qbuc1_derefidx_vbuxx)_derefidx_vbuc2=vbuaa.asm
 create mode 100644 src/main/fragment/mos6502-common/vbuaa=pbuc1_derefidx_(pbuz1_derefidx_vbuc2)_bor_pbuc3_derefidx_(pbuz1_derefidx_vbuc4).asm
 create mode 100644 src/main/fragment/mos6502-common/vbuaa=pbuc1_derefidx_(pbuz1_derefidx_vbuyy)_band_vbuc2.asm

diff --git a/src/main/fragment/mos6502-common/(qbuc1_derefidx_vbuxx)_derefidx_vbuc2=vbuaa.asm b/src/main/fragment/mos6502-common/(qbuc1_derefidx_vbuxx)_derefidx_vbuc2=vbuaa.asm
new file mode 100644
index 000000000..654a7349a
--- /dev/null
+++ b/src/main/fragment/mos6502-common/(qbuc1_derefidx_vbuxx)_derefidx_vbuc2=vbuaa.asm
@@ -0,0 +1,6 @@
+ldy {c1},x
+sty $fe
+ldy {c1}+1,x
+sty $ff
+ldy #{c2}
+sta ($fe),y
\ No newline at end of file
diff --git a/src/main/fragment/mos6502-common/vbuaa=pbuc1_derefidx_(pbuz1_derefidx_vbuc2)_bor_pbuc3_derefidx_(pbuz1_derefidx_vbuc4).asm b/src/main/fragment/mos6502-common/vbuaa=pbuc1_derefidx_(pbuz1_derefidx_vbuc2)_bor_pbuc3_derefidx_(pbuz1_derefidx_vbuc4).asm
new file mode 100644
index 000000000..c5c9b7fc8
--- /dev/null
+++ b/src/main/fragment/mos6502-common/vbuaa=pbuc1_derefidx_(pbuz1_derefidx_vbuc2)_bor_pbuc3_derefidx_(pbuz1_derefidx_vbuc4).asm
@@ -0,0 +1,10 @@
+ldy #{c2}
+lda ({z1}),y
+tay
+lda {c1},y
+sta $ff
+ldy #{c4}
+lda ({z1}),y
+tay
+lda {c3},y
+ora $ff
\ No newline at end of file
diff --git a/src/main/fragment/mos6502-common/vbuaa=pbuc1_derefidx_(pbuz1_derefidx_vbuyy)_band_vbuc2.asm b/src/main/fragment/mos6502-common/vbuaa=pbuc1_derefidx_(pbuz1_derefidx_vbuyy)_band_vbuc2.asm
new file mode 100644
index 000000000..fc16fb100
--- /dev/null
+++ b/src/main/fragment/mos6502-common/vbuaa=pbuc1_derefidx_(pbuz1_derefidx_vbuyy)_band_vbuc2.asm
@@ -0,0 +1,4 @@
+lda ({z1}),y
+tay
+lda {c1},y
+and #{c2}
\ No newline at end of file
diff --git a/src/main/fragment/mos6502-common/vbuaa=vbuaa_rol_6.asm b/src/main/fragment/mos6502-common/vbuaa=vbuaa_rol_6.asm
index 01f1d4853..4ea89f344 100644
--- a/src/main/fragment/mos6502-common/vbuaa=vbuaa_rol_6.asm
+++ b/src/main/fragment/mos6502-common/vbuaa=vbuaa_rol_6.asm
@@ -1,6 +1,4 @@
-asl
-asl
-asl
-asl
-asl
-asl
\ No newline at end of file
+ror
+ror
+ror
+and #$c0
\ No newline at end of file