mirror of
https://gitlab.com/camelot/kickc.git
synced 2024-11-26 12:49:21 +00:00
Added missing fragments from @Flight_Control.
This commit is contained in:
parent
799f681991
commit
0174743e94
@ -0,0 +1,7 @@
|
|||||||
|
sec
|
||||||
|
lda {c1}
|
||||||
|
sbc {m1}
|
||||||
|
sta {c1}
|
||||||
|
lda {c1}+1
|
||||||
|
sbc {m1}+1
|
||||||
|
sta {c1}+1
|
@ -0,0 +1,6 @@
|
|||||||
|
lda {c1}+1
|
||||||
|
cmp #>{c2}
|
||||||
|
bne {la1}
|
||||||
|
lda {c1}
|
||||||
|
cmp #<{c2}
|
||||||
|
bne {la1}
|
@ -0,0 +1,6 @@
|
|||||||
|
ldy #0
|
||||||
|
lda {c1}
|
||||||
|
sta ({z1}),y
|
||||||
|
iny
|
||||||
|
lda {c1}+1
|
||||||
|
sta ({z1}),y
|
@ -0,0 +1,9 @@
|
|||||||
|
sec
|
||||||
|
ldy #0
|
||||||
|
lda ({z1}),y
|
||||||
|
sbc {z2}
|
||||||
|
sta ({z1}),y
|
||||||
|
iny
|
||||||
|
lda ({z1}),y
|
||||||
|
sbc {z2}+1
|
||||||
|
sta ({z1}),y
|
@ -0,0 +1,9 @@
|
|||||||
|
lda ({z2}),y
|
||||||
|
pha
|
||||||
|
iny
|
||||||
|
lda ({z2}),y
|
||||||
|
ldy #1
|
||||||
|
sta ({z1}),y
|
||||||
|
dey
|
||||||
|
pla
|
||||||
|
sta ({z1}),y
|
@ -0,0 +1,11 @@
|
|||||||
|
sty $ff
|
||||||
|
lda ({z2}),y
|
||||||
|
ldy #0
|
||||||
|
cmp ({z1}),y
|
||||||
|
bne {la1}
|
||||||
|
iny
|
||||||
|
lda ({z1}),y
|
||||||
|
ldy $ff
|
||||||
|
iny
|
||||||
|
cmp ({z2}),y
|
||||||
|
bne {la1}
|
@ -0,0 +1,8 @@
|
|||||||
|
ldy #0
|
||||||
|
lda ({z1}),y
|
||||||
|
cmp #<{c1}
|
||||||
|
bne {la1}
|
||||||
|
iny
|
||||||
|
lda ({z1}),y
|
||||||
|
cmp #>{c1}
|
||||||
|
bne {la1}
|
@ -0,0 +1,11 @@
|
|||||||
|
sty $ff
|
||||||
|
ldy #1
|
||||||
|
lda ({z2}),y
|
||||||
|
pha
|
||||||
|
dey
|
||||||
|
lda ({z2}),y
|
||||||
|
ldy $ff
|
||||||
|
sta ({z1}),y
|
||||||
|
iny
|
||||||
|
pla
|
||||||
|
sta ({z1}),y
|
@ -0,0 +1,11 @@
|
|||||||
|
sty $ff
|
||||||
|
ldy #1
|
||||||
|
lda ({z2}),y
|
||||||
|
pha
|
||||||
|
dey
|
||||||
|
lda ({z2}),y
|
||||||
|
ldy $ff
|
||||||
|
sta ({z1}),y
|
||||||
|
iny
|
||||||
|
pla
|
||||||
|
sta ({z1}),y
|
@ -0,0 +1,5 @@
|
|||||||
|
lda ({z2}),y
|
||||||
|
sta ({z1}),y
|
||||||
|
iny
|
||||||
|
lda ({z2}),y
|
||||||
|
sta ({z1}),y
|
@ -0,0 +1,11 @@
|
|||||||
|
clc
|
||||||
|
ldy #0
|
||||||
|
lda ({z1}),y
|
||||||
|
adc #<{c1}
|
||||||
|
pha
|
||||||
|
iny
|
||||||
|
lda ({z1}),y
|
||||||
|
adc #>{c1}
|
||||||
|
sta {z1}+1
|
||||||
|
pla
|
||||||
|
sta {z1}
|
@ -0,0 +1,9 @@
|
|||||||
|
clc
|
||||||
|
ldy #0
|
||||||
|
lda ({z2}),y
|
||||||
|
adc #<{c1}
|
||||||
|
sta {z1}
|
||||||
|
iny
|
||||||
|
lda ({z2}),y
|
||||||
|
adc #>{c1}
|
||||||
|
sta {z1}+1
|
@ -0,0 +1,10 @@
|
|||||||
|
sec
|
||||||
|
lda ({z1}),y
|
||||||
|
sbc #<{c2}
|
||||||
|
pha
|
||||||
|
iny
|
||||||
|
lda ({z1}),y
|
||||||
|
sbc #>{c2}
|
||||||
|
sta {z1}+1
|
||||||
|
pla
|
||||||
|
sta {z1}
|
@ -0,0 +1,8 @@
|
|||||||
|
sec
|
||||||
|
lda ({z2}),y
|
||||||
|
sbc {z1}
|
||||||
|
sta {z1}
|
||||||
|
iny
|
||||||
|
lda ({z2}),y
|
||||||
|
sbc {z1}+1
|
||||||
|
sta {z1}+1
|
Loading…
Reference in New Issue
Block a user