mirror of
https://github.com/catseye/SixtyPical.git
synced 2025-02-14 18:31:30 +00:00
More conversion. I think that's the last of it.
This commit is contained in:
parent
7d32277e2c
commit
7680f09850
@ -1,9 +1,9 @@
|
||||
routine chrout
|
||||
define chrout routine
|
||||
inputs a
|
||||
trashes a
|
||||
@ 65490
|
||||
|
||||
routine main
|
||||
define main routine
|
||||
trashes a, x, y, z, n, c, v
|
||||
{
|
||||
ld a, 0
|
||||
|
@ -3,7 +3,7 @@ byte lives
|
||||
define main routine
|
||||
inputs lives
|
||||
outputs lives
|
||||
trashes a, x
|
||||
trashes a, x, z, n, c, v
|
||||
{
|
||||
ld a, 0
|
||||
st a, lives
|
||||
|
@ -1,6 +1,7 @@
|
||||
define main routine
|
||||
inputs a
|
||||
outputs a
|
||||
trashes z, n, c
|
||||
{
|
||||
cmp a, 42
|
||||
if z {
|
||||
|
@ -1,6 +1,6 @@
|
||||
byte table[8] message : "WHAT?"
|
||||
|
||||
routine main
|
||||
define main routine
|
||||
inputs message
|
||||
outputs x, a, z, n
|
||||
{
|
||||
|
@ -1,7 +1,7 @@
|
||||
// This will not compile on its own, because there is no `main`.
|
||||
// But this and `vector-main.60p` together will compile.
|
||||
|
||||
routine chrout
|
||||
define chrout routine
|
||||
inputs a
|
||||
trashes a
|
||||
@ 65490
|
||||
|
@ -11,26 +11,26 @@ vector (routine
|
||||
trashes a, z, n)
|
||||
table[32] vectors
|
||||
|
||||
routine chrout
|
||||
define chrout routine
|
||||
inputs a
|
||||
trashes a
|
||||
@ 65490
|
||||
|
||||
routine printa
|
||||
define printa routine
|
||||
trashes a, z, n
|
||||
{
|
||||
ld a, 65
|
||||
call chrout
|
||||
}
|
||||
|
||||
routine printb
|
||||
define printb routine
|
||||
trashes a, z, n
|
||||
{
|
||||
ld a, 66
|
||||
call chrout
|
||||
}
|
||||
|
||||
routine main
|
||||
define main routine
|
||||
inputs vectors
|
||||
outputs vectors
|
||||
trashes print, a, x, z, n, c
|
||||
|
@ -2,26 +2,26 @@ vector routine
|
||||
trashes a, z, n
|
||||
print
|
||||
|
||||
routine chrout
|
||||
define chrout routine
|
||||
inputs a
|
||||
trashes a
|
||||
@ 65490
|
||||
|
||||
routine printa
|
||||
define printa routine
|
||||
trashes a, z, n
|
||||
{
|
||||
ld a, 65
|
||||
call chrout
|
||||
}
|
||||
|
||||
routine printb
|
||||
define printb routine
|
||||
trashes a, z, n
|
||||
{
|
||||
ld a, 66
|
||||
call chrout
|
||||
}
|
||||
|
||||
routine main
|
||||
define main routine
|
||||
trashes print, a, z, n
|
||||
{
|
||||
copy printa, print
|
||||
|
Loading…
x
Reference in New Issue
Block a user