mirror of
https://gitlab.com/camelot/kickc.git
synced 2024-11-27 19:50:10 +00:00
a few more fragments
This commit is contained in:
parent
e167f8dce8
commit
6502c0dbc3
9
src/main/fragment/vbuaa=_deref_pbuz1_ror_vbuxx.asm
Normal file
9
src/main/fragment/vbuaa=_deref_pbuz1_ror_vbuxx.asm
Normal file
@ -0,0 +1,9 @@
|
||||
cpx #0
|
||||
beq !e+
|
||||
ldy #0
|
||||
lda ({z1}),y
|
||||
!:
|
||||
ror
|
||||
dex
|
||||
bne !-
|
||||
!e:
|
7
src/main/fragment/vbuaa=vbuaa_ror_vbuz1.asm
Normal file
7
src/main/fragment/vbuaa=vbuaa_ror_vbuz1.asm
Normal file
@ -0,0 +1,7 @@
|
||||
ldx {z1}
|
||||
beq !e+
|
||||
!:
|
||||
ror
|
||||
dex
|
||||
bne !-
|
||||
!e:
|
10
src/main/fragment/vbuxx=vbuyy_ror_vbuaa.asm
Normal file
10
src/main/fragment/vbuxx=vbuyy_ror_vbuaa.asm
Normal file
@ -0,0 +1,10 @@
|
||||
cpy #0
|
||||
beq !e+
|
||||
!l:
|
||||
cmp #$80
|
||||
ror
|
||||
dey
|
||||
bne !l-
|
||||
!e:
|
||||
sty $ff
|
||||
ldx $ff
|
11
src/main/fragment/vbuyy=_deref_pbuz1_ror_vbuxx.asm
Normal file
11
src/main/fragment/vbuyy=_deref_pbuz1_ror_vbuxx.asm
Normal file
@ -0,0 +1,11 @@
|
||||
cpx #0
|
||||
beq !e+
|
||||
ldy #0
|
||||
lda ({z1}),y
|
||||
!:
|
||||
ror
|
||||
dex
|
||||
bne !-
|
||||
tay
|
||||
!e:
|
||||
|
10
src/main/fragment/vbuz1=_deref_pbuz2_ror_vbuxx.asm
Normal file
10
src/main/fragment/vbuz1=_deref_pbuz2_ror_vbuxx.asm
Normal file
@ -0,0 +1,10 @@
|
||||
cpx #0
|
||||
beq !e+
|
||||
ldy #0
|
||||
lda ({z2}),y
|
||||
!:
|
||||
ror
|
||||
dex
|
||||
bne !-
|
||||
sta {z1}
|
||||
!e:
|
12
src/main/fragment/vduz1=vwuc1.asm
Normal file
12
src/main/fragment/vduz1=vwuc1.asm
Normal file
@ -0,0 +1,12 @@
|
||||
lda #<{c1}
|
||||
sta {z1}
|
||||
lda #>{c1}
|
||||
sta {z1}+1
|
||||
bmi !m+
|
||||
lda #0
|
||||
beq !p+
|
||||
!m:
|
||||
lda #$ff
|
||||
!p:
|
||||
sta {z1}+2
|
||||
sta {z1}+3
|
6
src/main/fragment/vwuz1=vbuaa_bor_vwuz2.asm
Normal file
6
src/main/fragment/vwuz1=vbuaa_bor_vwuz2.asm
Normal file
@ -0,0 +1,6 @@
|
||||
sta $ff
|
||||
lda {z2}
|
||||
ora $ff
|
||||
sta {z1}
|
||||
lda {z2}+1
|
||||
sta {z1}+1
|
6
src/main/fragment/vwuz1=vwuz1_bor_vwsz2.asm
Normal file
6
src/main/fragment/vwuz1=vwuz1_bor_vwsz2.asm
Normal file
@ -0,0 +1,6 @@
|
||||
lda {z2}
|
||||
eor {z1}
|
||||
sta {z1}
|
||||
lda {z2}+1
|
||||
eor {z1}+1
|
||||
sta {z1}+1
|
6
src/main/fragment/vwuz1=vwuz1_bxor_vwsc1.asm
Normal file
6
src/main/fragment/vwuz1=vwuz1_bxor_vwsc1.asm
Normal file
@ -0,0 +1,6 @@
|
||||
lda #<{c1}
|
||||
eor {z1}
|
||||
sta {z1}
|
||||
lda #>{c1}
|
||||
eor {z1}
|
||||
sta {z1}
|
6
src/main/fragment/vwuz1=vwuz1_bxor_vwuc1.asm
Normal file
6
src/main/fragment/vwuz1=vwuz1_bxor_vwuc1.asm
Normal file
@ -0,0 +1,6 @@
|
||||
lda #<{c1}
|
||||
eor {z1}
|
||||
sta {z1}
|
||||
lda #>{c1}
|
||||
eor {z1}+1
|
||||
sta {z1}+1
|
Loading…
Reference in New Issue
Block a user