mirror of
https://github.com/irmen/prog8.git
synced 2024-06-10 05:29:29 +00:00
24 lines
354 B
Lua
24 lines
354 B
Lua
%import c64flt
|
|
%zeropage basicsafe
|
|
%option enable_floats
|
|
|
|
~ main {
|
|
|
|
sub start() {
|
|
|
|
float f1 = 1.1
|
|
float f2 = 2.2
|
|
|
|
@(1024) = f1==f2
|
|
|
|
c64.CHROUT('\n')
|
|
c64scr.print_ub(f1==f2)
|
|
c64.CHROUT('\n')
|
|
|
|
if f1 ==0.0
|
|
c64scr.print("error\n")
|
|
else
|
|
c64scr.print("ok\n")
|
|
}
|
|
}
|