initial cammit
[qbasicapps.git] / tutorial / group3 / 05.bas
1 SCREEN 13\r
2 \r
3 FOR x = 0 TO 255\r
4   LINE (x, 50)-(x, 100), x\r
5 NEXT x\r
6 \r