GIT.Harvie.CZ
/
mirrors
/
Programs.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Borland TurboBASIC & TurboPASCAL stuff from 1998 when i started with programming...
[mirrors/Programs.git]
/
turbobasic
/
255-ZNAK.BAS
diff --git a/turbobasic/255-ZNAK.BAS
b/turbobasic/255-ZNAK.BAS
new file mode 100755
(executable)
index 0000000..
afd1bb3
--- /dev/null
+++ b/
turbobasic/255-ZNAK.BAS
@@ -0,0
+1,15
@@
+CLS
\r
+FOR A=0 TO 255
\r
+COLOR 0,15
\r
+SCREEN 0
\r
+LOCATE B,A
\r
+PRINT A CHR$ (A)"* "
\r
+
\r
+
\r
+REM POKR:
\r
+REM LOCATE 5,5
\r
+REM PRINT CHR$ (A)
\r
+REM FOR I=0 TO 99999
\r
+REM NEXT I
\r
+NEXT A
\r
+END
\1a
\ No newline at end of file
This page took
0.110092 seconds
and
4
git commands to generate.