2023-05-16 22:40:47 +00:00
|
|
|
%import floats
|
2023-05-16 21:10:33 +00:00
|
|
|
%import textio
|
2023-04-29 15:14:50 +00:00
|
|
|
%zeropage basicsafe
|
2023-04-10 14:59:08 +00:00
|
|
|
|
2022-10-22 11:33:35 +00:00
|
|
|
main {
|
2023-05-07 21:49:02 +00:00
|
|
|
|
2023-05-07 23:03:54 +00:00
|
|
|
sub start() {
|
2023-05-22 18:31:28 +00:00
|
|
|
uword[] @split split_uwords = [12345, 60000, 4096]
|
|
|
|
word[] @split split_words = [-12345, -2222, 22222]
|
|
|
|
uword[256] @split @shared split2
|
|
|
|
word[256] @split @shared split3
|
2023-05-14 14:48:48 +00:00
|
|
|
|
2023-05-22 18:31:28 +00:00
|
|
|
|
|
|
|
print_arrays()
|
|
|
|
|
|
|
|
sub print_arrays() {
|
|
|
|
for cx16.r0 in split_uwords {
|
|
|
|
txt.print_uw(cx16.r0)
|
|
|
|
txt.spc()
|
|
|
|
}
|
|
|
|
txt.nl()
|
|
|
|
|
|
|
|
for cx16.r0s in split_words {
|
|
|
|
txt.print_w(cx16.r0s)
|
|
|
|
txt.spc()
|
|
|
|
}
|
|
|
|
txt.nl()
|
|
|
|
}
|
|
|
|
|
|
|
|
ubyte idx
|
|
|
|
for idx in 0 to 2 {
|
|
|
|
cx16.r0 = split_uwords[idx]
|
|
|
|
cx16.r1s = split_words[idx]
|
|
|
|
txt.print_uw(cx16.r0)
|
|
|
|
txt.spc()
|
|
|
|
txt.print_w(cx16.r1s)
|
|
|
|
txt.nl()
|
|
|
|
}
|
|
|
|
|
|
|
|
split_uwords[1] = 9999
|
|
|
|
split_words[1] = -9999
|
|
|
|
|
|
|
|
print_arrays()
|
|
|
|
|
|
|
|
split_uwords[1]++
|
|
|
|
split_words[1]--
|
|
|
|
|
|
|
|
print_arrays()
|
2023-03-18 23:24:05 +00:00
|
|
|
}
|
2022-12-04 15:02:58 +00:00
|
|
|
}
|
2023-04-29 15:14:50 +00:00
|
|
|
|