2020-03-14 23:47:21 +00:00
|
|
|
%import c64utils
|
2020-03-21 22:09:18 +00:00
|
|
|
;%import c64flt
|
|
|
|
|
;%option enable_floats
|
2019-08-17 23:39:48 +00:00
|
|
|
%zeropage basicsafe
|
2019-08-09 00:15:31 +00:00
|
|
|
|
2020-03-14 23:23:54 +00:00
|
|
|
main {
|
2019-08-05 21:36:24 +00:00
|
|
|
|
2020-03-21 12:22:04 +00:00
|
|
|
sub start() {
|
2020-03-22 01:45:42 +00:00
|
|
|
ubyte ub1
|
|
|
|
|
ubyte ub2 = 99
|
|
|
|
|
uword uw1
|
|
|
|
|
uword uw2 = 9999
|
|
|
|
|
ubyte[5] array1
|
|
|
|
|
ubyte[5] array2 = [22,33,44,55,66]
|
2020-03-21 12:22:04 +00:00
|
|
|
|
2020-03-22 01:45:42 +00:00
|
|
|
c64scr.print_ub(ub1)
|
|
|
|
|
c64.CHROUT(',')
|
|
|
|
|
c64scr.print_ub(ub2)
|
|
|
|
|
c64.CHROUT(',')
|
|
|
|
|
c64scr.print_uw(uw1)
|
|
|
|
|
c64.CHROUT(',')
|
|
|
|
|
c64scr.print_uw(uw2)
|
|
|
|
|
c64.CHROUT(',')
|
|
|
|
|
c64scr.print_ub(array1[0])
|
|
|
|
|
c64.CHROUT(',')
|
|
|
|
|
c64scr.print_ub(array2[0])
|
|
|
|
|
c64.CHROUT('\n')
|
|
|
|
|
|
|
|
|
|
ub1++
|
|
|
|
|
ub2++
|
|
|
|
|
uw1++
|
|
|
|
|
uw2++
|
|
|
|
|
array1[0]++
|
|
|
|
|
array2[0]++
|
|
|
|
|
|
|
|
|
|
c64scr.print_ub(ub1)
|
|
|
|
|
c64.CHROUT(',')
|
|
|
|
|
c64scr.print_ub(ub2)
|
|
|
|
|
c64.CHROUT(',')
|
|
|
|
|
c64scr.print_uw(uw1)
|
|
|
|
|
c64.CHROUT(',')
|
|
|
|
|
c64scr.print_uw(uw2)
|
|
|
|
|
c64.CHROUT(',')
|
|
|
|
|
c64scr.print_ub(array1[0])
|
|
|
|
|
c64.CHROUT(',')
|
|
|
|
|
c64scr.print_ub(array2[0])
|
|
|
|
|
c64.CHROUT('\n')
|
2020-03-13 01:05:15 +00:00
|
|
|
}
|
2020-03-21 17:39:36 +00:00
|
|
|
}
|
