mirror of
https://github.com/irmen/prog8.git
synced 2024-10-25 00:24:16 +00:00
56 lines
1.1 KiB
Lua
56 lines
1.1 KiB
Lua
%import textio
|
|
%zeropage basicsafe
|
|
|
|
; TODO this should also compile without optimizations
|
|
|
|
main {
|
|
sub start() {
|
|
cx16.r0 = 0
|
|
if cx16.r0 < 0
|
|
txt.print(" <0 fail\n")
|
|
else
|
|
txt.print(" <0 ok\n")
|
|
|
|
if cx16.r0 <= 0
|
|
txt.print("<=0 ok\n")
|
|
else
|
|
txt.print("<=0 fail\n")
|
|
|
|
if cx16.r0 > 0
|
|
txt.print(" >0 fail\n")
|
|
else
|
|
txt.print(" >0 ok\n")
|
|
|
|
if cx16.r0 >= 0
|
|
txt.print(">=0 ok\n")
|
|
else
|
|
txt.print(">=0 fail\n")
|
|
|
|
bool bb
|
|
bb = cx16.r0<0
|
|
if bb
|
|
txt.print(" <0 fail\n")
|
|
else
|
|
txt.print(" <0 ok\n")
|
|
|
|
bb = cx16.r0<=0
|
|
if bb
|
|
txt.print("<=0 ok\n")
|
|
else
|
|
txt.print("<=0 fail\n")
|
|
|
|
bb = cx16.r0>0
|
|
if bb
|
|
txt.print(" >0 fail\n")
|
|
else
|
|
txt.print(" >0 ok\n")
|
|
|
|
bb = cx16.r0>=0
|
|
if bb
|
|
txt.print(">=0 ok\n")
|
|
else
|
|
txt.print(">=0 fail\n")
|
|
|
|
}
|
|
}
|