%import textio ; %import floats %zeropage basicsafe main { sub start() { word xx=0 if not xx { txt.print("xx is zero\n") } while not xx { xx ++ } do { xx-- } until not xx if not xx { txt.print("xx is zero\n") } ; ubyte yy=$30 ; ubyte zz=9 ; sys.memset(xx+200, yy*2, ~yy) ; ; if yy & %10000 { ; yy++ ; } ; ; @($c030) = 10 ; @(~xx) *= 2 ; txt.print_ub(@($c030)) ; ; float f1 = 1111.11 ; float f2 = 2222.22 ; float[] fa = [2222.22, 3333.33] ; ; swap(f1, fa[1]) ; floats.print_f(f1) ; txt.nl() ; floats.print_f(fa[1]) } }