spiral

Your challenge: make a pretty postscript picture as one tweet

By Hal Canary, 2013-06-11 14:00:34 (link)
#computers-code

Your challenge: make a pretty postscript picture as one tweet. "%!\n" is not necessary (tweet)

%!
300 300 translate newpath 3 0 2 copy moveto 604 { 5 add
exch 1.01 mul exch 2 copy cos mul 3 copy pop sin mul
lineto } repeat stroke showpage


gmfawcett:

%!
/n 90 def 150 150 translate newpath n n moveto 36 { 170
rotate n n lineto} repeat stroke showpage


seanjensengrey:

%!
/box { newpath moveto 72 0 rlineto 0 72 rlineto -72 0
rlineto closepath stroke } def 99 99 translate 0 1 5{60
rotate -20 0 box}for showpage


gmfawcett:

%!
/Courier findfont 50 scalefont setfont 150 250 moveto
(#postscriptchallenge) { 1 string dup 0 4 3 roll put
show -18 rotate} forall
showpage


Note: to display these,m I used this command:

gs -sDEVICE=png16m -g500x500 -sOutputFile=out.png <<EOF
300 300 translate newpath 3 0 2 copy moveto 604 { 5 add
exch 1.01 mul exch 2 copy cos mul 3 copy pop sin mul
lineto } repeat stroke showpage
EOF

(back)