mirror of
https://github.com/irmen/prog8.git
synced 2024-09-08 10:55:08 +00:00
todos
This commit is contained in:
parent
befe4b8e9f
commit
39798a1a4f
@ -1,8 +1,6 @@
|
||||
%import c64utils
|
||||
%zeropage basicsafe
|
||||
|
||||
; TODO implement asm generation for all operation in here
|
||||
|
||||
main {
|
||||
|
||||
byte bb
|
||||
@ -16,13 +14,41 @@ main {
|
||||
byte[10] bbarray
|
||||
word[10] wwarray
|
||||
|
||||
sub unimplemented() {
|
||||
; TODO implement these asm routines
|
||||
lsr(ubarray[1])
|
||||
lsl(ubarray[1])
|
||||
ror(ubarray[1])
|
||||
rol(ubarray[1])
|
||||
ror2(ubarray[1])
|
||||
rol2(ubarray[1])
|
||||
lsr(bbarray[1])
|
||||
lsl(bbarray[1])
|
||||
|
||||
lsr(uwarray[1])
|
||||
lsl(uwarray[1])
|
||||
ror(uwarray[1])
|
||||
rol(uwarray[1])
|
||||
ror2(uwarray[1])
|
||||
rol2(uwarray[1])
|
||||
lsr(wwarray[1])
|
||||
lsl(wwarray[1])
|
||||
}
|
||||
|
||||
sub start() {
|
||||
; lsr(A)
|
||||
; lsl(A)
|
||||
; ror(A)
|
||||
; rol(A)
|
||||
; ror2(A)
|
||||
; rol2(A)
|
||||
unimplemented()
|
||||
lsr(A)
|
||||
lsl(A)
|
||||
ror(A)
|
||||
rol(A)
|
||||
ror2(A)
|
||||
rol2(A)
|
||||
lsr(Y)
|
||||
lsl(Y)
|
||||
ror(Y)
|
||||
rol(Y)
|
||||
ror2(Y)
|
||||
rol2(Y)
|
||||
|
||||
lsr(bb)
|
||||
lsl(bb)
|
||||
@ -54,25 +80,6 @@ main {
|
||||
ror2(@(9999+A))
|
||||
rol2(@(9999+A))
|
||||
|
||||
lsr(ubarray[1])
|
||||
lsl(ubarray[1])
|
||||
ror(ubarray[1])
|
||||
rol(ubarray[1])
|
||||
ror2(ubarray[1])
|
||||
rol2(ubarray[1])
|
||||
lsr(bbarray[1])
|
||||
lsl(bbarray[1])
|
||||
|
||||
lsr(uwarray[1])
|
||||
lsl(uwarray[1])
|
||||
ror(uwarray[1])
|
||||
rol(uwarray[1])
|
||||
ror2(uwarray[1])
|
||||
rol2(uwarray[1])
|
||||
lsr(wwarray[1])
|
||||
lsl(wwarray[1])
|
||||
|
||||
|
||||
bb /= 2
|
||||
bb >>= 1
|
||||
bb *= 4
|
||||
|
Loading…
Reference in New Issue
Block a user