2021-04-18 11:53:02 +00:00
|
|
|
%import textio
|
2021-04-21 18:21:58 +00:00
|
|
|
%import string
|
2021-04-18 11:53:02 +00:00
|
|
|
%zeropage basicsafe
|
|
|
|
|
%import test_stack
|
2021-04-21 18:21:58 +00:00
|
|
|
%option no_sysinit
|
2021-04-18 11:53:02 +00:00
|
|
|
|
2021-04-08 00:13:02 +00:00
|
|
|
main {
|
2021-04-18 21:03:18 +00:00
|
|
|
|
2021-04-17 23:56:26 +00:00
|
|
|
sub start() {
|
2021-04-21 20:45:03 +00:00
|
|
|
ubyte fromub = 120
|
|
|
|
|
uword fromuw = 400
|
|
|
|
|
byte fromb = 120
|
|
|
|
|
word fromw = 400
|
2021-04-21 18:21:58 +00:00
|
|
|
|
2021-04-21 20:45:03 +00:00
|
|
|
uword counter
|
|
|
|
|
byte bc
|
|
|
|
|
ubyte ubc
|
|
|
|
|
word wc
|
|
|
|
|
uword uwc
|
|
|
|
|
|
|
|
|
|
counter = 0
|
|
|
|
|
for bc in fromb to 0 step -1 {
|
|
|
|
|
counter++
|
|
|
|
|
txt.print_b(bc)
|
2021-04-21 18:22:16 +00:00
|
|
|
txt.spc()
|
|
|
|
|
}
|
2021-04-21 20:45:03 +00:00
|
|
|
txt.nl()
|
|
|
|
|
txt.print_uw(counter)
|
|
|
|
|
txt.nl()
|
|
|
|
|
txt.nl()
|
|
|
|
|
|
|
|
|
|
counter = 0
|
|
|
|
|
for ubc in fromub to 0 step -1 {
|
|
|
|
|
counter++
|
|
|
|
|
txt.print_ub(ubc)
|
|
|
|
|
txt.spc()
|
|
|
|
|
}
|
|
|
|
|
txt.nl()
|
|
|
|
|
txt.print_uw(counter)
|
|
|
|
|
txt.nl()
|
|
|
|
|
txt.nl()
|
2021-04-21 18:21:58 +00:00
|
|
|
|
2021-04-21 20:45:03 +00:00
|
|
|
counter = 0
|
|
|
|
|
for wc in fromw to 0 step -1 {
|
|
|
|
|
counter++
|
|
|
|
|
txt.print_w(wc)
|
|
|
|
|
txt.spc()
|
|
|
|
|
}
|
|
|
|
|
txt.nl()
|
|
|
|
|
txt.print_uw(counter)
|
|
|
|
|
txt.nl()
|
2021-04-21 18:22:16 +00:00
|
|
|
txt.nl()
|
2021-04-21 20:45:03 +00:00
|
|
|
|
|
|
|
|
; TODO FIX THIS LOOP??
|
|
|
|
|
counter = 0
|
|
|
|
|
for uwc in fromuw to 0 step -1 {
|
|
|
|
|
counter++
|
|
|
|
|
txt.print_uw(uwc)
|
2021-04-21 18:22:16 +00:00
|
|
|
txt.spc()
|
|
|
|
|
}
|
2021-04-21 20:45:03 +00:00
|
|
|
txt.nl()
|
|
|
|
|
txt.print_uw(counter)
|
|
|
|
|
txt.nl()
|
|
|
|
|
txt.nl()
|
2021-04-01 20:10:04 +00:00
|
|
|
}
|
2021-04-21 18:22:16 +00:00
|
|
|
|
2021-04-01 20:10:04 +00:00
|
|
|
}
|
2021-04-17 23:56:26 +00:00
|
|
|
|
