2023-09-14 21:04:23 +00:00
|
|
|
%import textio
|
2023-09-17 16:30:57 +00:00
|
|
|
%import floats
|
|
|
|
|
2023-09-05 20:38:52 +00:00
|
|
|
%zeropage basicsafe
|
2023-08-14 19:49:13 +00:00
|
|
|
|
2023-08-13 22:50:40 +00:00
|
|
|
main {
|
2023-09-05 20:38:52 +00:00
|
|
|
sub start() {
|
2023-09-17 16:30:57 +00:00
|
|
|
ubyte[] barray = [11,22,33]
|
|
|
|
uword[] warray = [$1234,$5678,$abcd]
|
|
|
|
uword[] @split split_warray = [$1234,$5678,$abcd]
|
|
|
|
float[] float_array = [11.11,22.22,33.33]
|
2023-09-14 23:23:47 +00:00
|
|
|
|
2023-09-17 16:30:57 +00:00
|
|
|
txt.print("incr of 1: ")
|
|
|
|
txt.print_uw(&barray)
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(&barray[0])
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(&barray[1])
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(&barray[2])
|
2023-09-14 23:23:47 +00:00
|
|
|
txt.nl()
|
|
|
|
|
2023-09-17 16:30:57 +00:00
|
|
|
txt.print("incr of 2: ")
|
|
|
|
txt.print_uw(&warray)
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(&warray[0])
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(&warray[1])
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(&warray[2])
|
2023-09-14 21:04:23 +00:00
|
|
|
txt.nl()
|
2023-09-17 16:30:57 +00:00
|
|
|
|
|
|
|
txt.print("incr of 1: ")
|
|
|
|
txt.print_uw(&split_warray)
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(&split_warray[0])
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(&split_warray[1])
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(&split_warray[2])
|
2023-09-14 21:04:23 +00:00
|
|
|
txt.nl()
|
2023-09-17 16:30:57 +00:00
|
|
|
|
|
|
|
txt.print("incr of 4 or 5: ")
|
|
|
|
txt.print_uw(&float_array)
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(&float_array[0])
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(&float_array[1])
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(&float_array[2])
|
2023-09-14 21:04:23 +00:00
|
|
|
txt.nl()
|
2023-08-12 11:42:24 +00:00
|
|
|
}
|
2023-07-10 20:03:48 +00:00
|
|
|
}
|