KOSI ISPIS TEKSTA
Program ispisuje tekst koso po ekranu.

 
CLS
stupac = 38
FOR red = 1 TO 23
IF red > 12 THEN
stupac = stupac - 2
ELSE
stupac = stupac + 2
END IF

LOCATE red, stupac
PRINT "Redak broj -->"; red                      'bez   (;)  ne radi dobro
NEXT red