2019-07-01 21:41:30 +00:00
|
|
|
%import c64utils
|
2019-07-15 01:57:51 +00:00
|
|
|
%import c64flt
|
2019-07-01 21:41:30 +00:00
|
|
|
%zeropage basicsafe
|
2019-07-15 01:57:51 +00:00
|
|
|
%option enable_floats
|
2019-03-29 01:13:28 +00:00
|
|
|
|
2019-03-19 00:22:26 +00:00
|
|
|
~ main {
|
2019-04-21 01:04:13 +00:00
|
|
|
|
2019-07-16 18:32:23 +00:00
|
|
|
float[5] flarray
|
|
|
|
byte[5] barray
|
|
|
|
uword[5] uwarray
|
2019-07-15 01:57:51 +00:00
|
|
|
|
2019-07-15 21:05:04 +00:00
|
|
|
sub start() {
|
2019-07-16 18:32:23 +00:00
|
|
|
c64scr.print_uw(flarray)
|
|
|
|
c64.CHROUT('=')
|
|
|
|
c64flt.print_f(flarray[0])
|
2019-07-15 22:08:28 +00:00
|
|
|
c64.CHROUT('\n')
|
2019-07-16 18:32:23 +00:00
|
|
|
c64scr.print_uw(barray)
|
|
|
|
c64.CHROUT('=')
|
|
|
|
c64scr.print_b(barray[0])
|
2019-07-15 22:08:28 +00:00
|
|
|
c64.CHROUT('\n')
|
2019-07-16 18:32:23 +00:00
|
|
|
c64scr.print_uw(uwarray)
|
|
|
|
c64.CHROUT('=')
|
|
|
|
c64scr.print_uw(uwarray[0])
|
2019-07-15 22:08:28 +00:00
|
|
|
c64.CHROUT('\n')
|
2019-07-10 17:14:41 +00:00
|
|
|
}
|
|
|
|
|
2019-04-11 22:04:15 +00:00
|
|
|
}
|