mirror of
https://gitlab.com/camelot/kickc.git
synced 2025-04-22 03:38:31 +00:00
Added fragments from Eric Majikeyric
This commit is contained in:
parent
45987ac075
commit
47e2bfbd19
src/main/fragment
mega45gs02-common
vdsz1=vdsz1_ror_1.asmvdsz1=vdsz1_ror_2.asmvdsz1=vdsz2_ror_1.asmvdsz1=vdsz2_ror_2.asmvduz1=vduz1_ror_1.asmvduz1=vduz1_ror_2.asm
mos6502-common
pboc1_derefidx_vbuxx_then_la1.asmpboc1_derefidx_vbuyy_then_la1.asmpdsz1_derefidx_vbuyy=vdsc1.asmpdsz1_derefidx_vbuyy=vdsm2.asmpduz1_derefidx_vbuc1=vbuc1.asmpduz1_derefidx_vbuyy=vbuc1.asmpduz1_derefidx_vbuyy=vduc1.asmqprc1_derefidx_vbuyy_eq_0_then_la1.asmvdsm1=vdsm1_ror_2.asmvdsm1=vdsm2_ror_2.asmvdum1=vdum1_ror_2.asmvduz1=vduz1_ror_1.asm
@ -0,0 +1 @@
|
||||
asrq {z1}
|
@ -0,0 +1,2 @@
|
||||
asrq {z1}
|
||||
asrq {z1}
|
@ -0,0 +1,3 @@
|
||||
ldq {z2}
|
||||
asrq
|
||||
stq {z1}
|
@ -0,0 +1,4 @@
|
||||
ldq {z2}
|
||||
asrq
|
||||
asrq
|
||||
stq {z1}
|
@ -0,0 +1 @@
|
||||
lsrq {z1}
|
@ -0,0 +1,2 @@
|
||||
lsrq {z1}
|
||||
lsrq {z1}
|
@ -0,0 +1,2 @@
|
||||
lda {c1},x
|
||||
bne {la1}
|
@ -0,0 +1,2 @@
|
||||
lda {c1},y
|
||||
bne {la1}
|
@ -0,0 +1,11 @@
|
||||
lda #<{c1}
|
||||
sta ({z1}),y
|
||||
iny
|
||||
lda #>{c1}
|
||||
sta ({z1}),y
|
||||
iny
|
||||
lda #<{c1}>>$10
|
||||
sta ({z1}),y
|
||||
iny
|
||||
lda #>{c1}>>$10
|
||||
sta ({z1}),y
|
@ -0,0 +1,11 @@
|
||||
lda {m2}
|
||||
sta ({z1}),y
|
||||
iny
|
||||
lda {m2}+1
|
||||
sta ({z1}),y
|
||||
iny
|
||||
lda {m2}+2
|
||||
sta ({z1}),y
|
||||
iny
|
||||
lda {m2}+3
|
||||
sta ({z1}),y
|
@ -0,0 +1,10 @@
|
||||
lda #{c1}
|
||||
tay
|
||||
sta ({z1}),y
|
||||
iny
|
||||
lda #0
|
||||
sta ({z1}),y
|
||||
iny
|
||||
sta ({z1}),y
|
||||
iny
|
||||
sta ({z1}),y
|
@ -0,0 +1,9 @@
|
||||
lda #{c1}
|
||||
sta ({z1}),y
|
||||
iny
|
||||
lda #0
|
||||
sta ({z1}),y
|
||||
iny
|
||||
sta ({z1}),y
|
||||
iny
|
||||
sta ({z1}),y
|
@ -0,0 +1,11 @@
|
||||
lda #<{c1}
|
||||
sta ({z1}),y
|
||||
iny
|
||||
lda #>{c1}
|
||||
sta ({z1}),y
|
||||
iny
|
||||
lda #<{c1}>>$10
|
||||
sta ({z1}),y
|
||||
iny
|
||||
lda #>{c1}>>$10
|
||||
sta ({z1}),y
|
@ -0,0 +1,11 @@
|
||||
lda {c1},y
|
||||
sta $fe
|
||||
lda {c1}+1,y
|
||||
sta $ff
|
||||
ldy #0
|
||||
lda ($fe),y
|
||||
bne !+
|
||||
iny
|
||||
lda ($fe),y
|
||||
beq {la1}
|
||||
!:
|
12
src/main/fragment/mos6502-common/vdsm1=vdsm1_ror_2.asm
Normal file
12
src/main/fragment/mos6502-common/vdsm1=vdsm1_ror_2.asm
Normal file
@ -0,0 +1,12 @@
|
||||
lda {m1}+3
|
||||
cmp #$80
|
||||
ror {m1}+3
|
||||
ror {m1}+2
|
||||
ror {m1}+1
|
||||
ror {m1}
|
||||
lda {m1}+3
|
||||
cmp #$80
|
||||
ror {m1}+3
|
||||
ror {m1}+2
|
||||
ror {m1}+1
|
||||
ror {m1}
|
19
src/main/fragment/mos6502-common/vdsm1=vdsm2_ror_2.asm
Normal file
19
src/main/fragment/mos6502-common/vdsm1=vdsm2_ror_2.asm
Normal file
@ -0,0 +1,19 @@
|
||||
lda {m2}+3
|
||||
cmp #$80
|
||||
ror
|
||||
sta {m1}+3
|
||||
lda {m2}+2
|
||||
ror
|
||||
sta {m1}+2
|
||||
lda {m2}+1
|
||||
ror
|
||||
sta {m1}+1
|
||||
lda {m2}
|
||||
ror
|
||||
sta {m1}
|
||||
lda {m1}+3
|
||||
cmp #$80
|
||||
ror {m1}+3
|
||||
ror {m1}+2
|
||||
ror {m1}+1
|
||||
ror {m1}
|
8
src/main/fragment/mos6502-common/vdum1=vdum1_ror_2.asm
Normal file
8
src/main/fragment/mos6502-common/vdum1=vdum1_ror_2.asm
Normal file
@ -0,0 +1,8 @@
|
||||
lsr {m1}+3
|
||||
ror {m1}+2
|
||||
ror {m1}+1
|
||||
ror {m1}
|
||||
lsr {m1}+3
|
||||
ror {m1}+2
|
||||
ror {m1}+1
|
||||
ror {m1}
|
4
src/main/fragment/mos6502-common/vduz1=vduz1_ror_1.asm
Normal file
4
src/main/fragment/mos6502-common/vduz1=vduz1_ror_1.asm
Normal file
@ -0,0 +1,4 @@
|
||||
lsr {z1}+3
|
||||
ror {z1}+2
|
||||
ror {z1}+1
|
||||
ror {z1}
|
Loading…
x
Reference in New Issue
Block a user