Borland TurboBASIC & TurboPASCAL stuff from 1998 when i started with programming...

[mirrors/Programs.git] / turbobasic / COPY.BAS

diff --git a/turbobasic/COPY.BAS b/turbobasic/COPY.BAS
new file mode 100755 (executable)
index 0000000..67447cd
--- /dev/null
+++ b/turbobasic/COPY.BAS
@@ -0,0 +1,8 @@
+SCREEN 0\r
+LOCATE 2,2\r
+INPUT " CO CHCES SCOPIROVAT " ;COPY$\r
+LOCATE 12,2\r
+PRINT COPY$\r
+FOR SPOMAL=1 TO 15555\r
+NEXT SPOMAL\r
+END\1a
\ No newline at end of file