print "Hello." set fg 32767 # draw bg, lines rect 50 50 380 220 6375 line 50 160 430 160 fg line 240 50 240 270 fg set x 50 do line x 170 x 150 fg set x (x + 20) while (x < 430) set y 50 do line 230 y 250 y fg set y (y + 20) while (y < 270) line 80 250 380 90 511