mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-06-02 04:41:31 +00:00
lines logo program
based on this thread on twitter: https://twitter.com/closethipster/status/1355982048071217153
This commit is contained in:
parent
1664868d96
commit
e1f1e35985
9
logo/lines.logo
Normal file
9
logo/lines.logo
Normal 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
|
Loading…
Reference in New Issue
Block a user