Примеры программ на языке QBASIC
SCREEN 12 VIEW (0,0)-(100,100),15 LINE (0,0)-(100,100),0 END