Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-01-11 09:29:51 +00:00
Code Issues Projects Releases Wiki Activity

lines logo program

Browse Source 
based on this thread on twitter:
https://twitter.com/closethipster/status/1355982048071217153
This commit is contained in:
Vince Weaver 2021-08-06 15:24:17 -04:00
parent 1664868d96
commit e1f1e35985
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
logo/lines.logo Normal file
View File

@ -0,0 +1,9 @@
TO L :Y
PU SETPOS SE -20 :Y PD
SETH 90 FD (8+RANDOM 132) PU SETPOS SE -20 :Y PE
REPEAT ((RANDOM 30)+2)[SETH(286-RANDOM 32) FD RANDOM 6]
END
ST CS FS PU SETPOS[-140 96] PD RT 90 FD 120 RT 90 FD 192 RT 90 FD 120 RT 90 FD 191 FILL
MAKE "Y 80
REPEAT 33[L :Y MAKE "Y (:Y-5)]
HT