mirror of
https://github.com/irmen/prog8.git
synced 2024-10-18 01:24:51 +00:00
36 lines
528 B
Lua
36 lines
528 B
Lua
%zeropage basicsafe
|
|
%option enable_floats
|
|
|
|
%import c64flt
|
|
|
|
~ main {
|
|
|
|
sub start() {
|
|
ubyte ub='^'
|
|
ubyte ub2=7
|
|
uword uw=2
|
|
uword uw2=5
|
|
float fl=2.3
|
|
float fl2=20
|
|
|
|
|
|
fl = (ub as float) ** 4
|
|
fl = 2.3
|
|
fl = fl ** 20.0
|
|
c64flt.print_f(fl)
|
|
c64.CHROUT('\n')
|
|
|
|
fl = 2.3
|
|
fl = fl ** fl2
|
|
c64flt.print_f(fl)
|
|
c64.CHROUT('\n')
|
|
|
|
fl = 2.3
|
|
fl **=20.0
|
|
c64flt.print_f(fl)
|
|
c64.CHROUT('\n')
|
|
|
|
}
|
|
|
|
}
|