2024-10-27 21:50:48 +01:00
|
|
|
%import textio
|
2024-11-05 23:56:58 +01:00
|
|
|
%option no_sysinit
|
2024-10-22 01:08:21 +02:00
|
|
|
%zeropage dontuse
|
2024-10-18 22:22:34 +02:00
|
|
|
|
2024-11-04 04:28:27 +01:00
|
|
|
main {
|
2024-11-05 00:15:40 +01:00
|
|
|
sub start() {
|
2024-10-22 01:08:21 +02:00
|
|
|
uword w0
|
|
|
|
|
uword @initonce w1
|
|
|
|
|
uword @initonce w2
|
|
|
|
|
uword @initonce w3
|
|
|
|
|
uword @initonce w4 = 12345
|
|
|
|
|
uword[4] wa
|
|
|
|
|
uword[] @shared wb = [1111,2222,3333,4444]
|
|
|
|
|
|
|
|
|
|
dump()
|
2024-11-07 22:17:23 +01:00
|
|
|
txt.nl()
|
2024-10-22 01:08:21 +02:00
|
|
|
w0++
|
|
|
|
|
w1++
|
|
|
|
|
w2++
|
|
|
|
|
w3++
|
|
|
|
|
w4++
|
|
|
|
|
wa[1]++
|
|
|
|
|
wa[2]++
|
|
|
|
|
wa[3]++
|
|
|
|
|
wb[0]++
|
|
|
|
|
dump()
|
2024-11-05 00:15:40 +01:00
|
|
|
txt.nl()
|
2024-10-22 01:08:21 +02:00
|
|
|
|
|
|
|
|
sub dump() {
|
|
|
|
|
txt.print_uw(w0)
|
|
|
|
|
txt.spc()
|
|
|
|
|
txt.print_uw(w1)
|
|
|
|
|
txt.spc()
|
|
|
|
|
txt.print_uw(w2)
|
|
|
|
|
txt.spc()
|
|
|
|
|
txt.print_uw(w3)
|
|
|
|
|
txt.spc()
|
|
|
|
|
txt.print_uw(w4)
|
|
|
|
|
txt.spc()
|
|
|
|
|
txt.print_uw(wa[1])
|
|
|
|
|
txt.spc()
|
|
|
|
|
txt.print_uw(wa[2])
|
|
|
|
|
txt.spc()
|
|
|
|
|
txt.print_uw(wa[3])
|
|
|
|
|
txt.spc()
|
|
|
|
|
txt.print_uw(wb[0])
|
|
|
|
|
txt.nl()
|
|
|
|
|
}
|
2024-11-04 23:26:21 +01:00
|
|
|
}
|
2024-11-05 23:56:58 +01:00
|
|
|
}
|
