1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
func div9 if ((arg0 % 9) == 0) ret 1 end ret 0 end set a 0 set b 0 do set a (a + 1) div9 a > b if (b) print a print ", " end delay 1 while (a < 100) if (a == 100) print " All good!" end