' Determine avaiable video modes\r
' made by Svjatoslav Agejenko\r
' in 2001\r
-' H-Page: svjatoslav.eu\r
-' E-Mail: svjatoslavagejenko@gmail.com\r
+' homepage: svjatoslav.eu\r
+' email: svjatoslav@svjatoslav.eu\r
\r
' program to determine avaiable video modes\r
' it assumes that 1 is always avaiable\r
1\r
a = a + 1\r
IF a > 1000 THEN\r
-SCREEN 1\r
-PRINT "Avaiable video modes on this machine is:"\r
-FOR a = 1 TO b - 1\r
-PRINT mo(a)\r
-NEXT a\r
-END\r
+ SCREEN 1\r
+ PRINT "Avaiable video modes on this computer:"\r
+ FOR a = 1 TO b - 1\r
+ PRINT mo(a)\r
+ NEXT a\r
+ END\r
END IF\r
RESUME\r
\r