Skip to content

Instantly share code, notes, and snippets.

@minikomi
Last active August 29, 2015 14:23
Show Gist options
  • Save minikomi/0b27d4b90b208eb6c641 to your computer and use it in GitHub Desktop.
Save minikomi/0b27d4b90b208eb6c641 to your computer and use it in GitHub Desktop.
hmm
/radius 0 def
/currentgray 1 def
/pagewidth currentpagedevice /PageSize get 0 get def
/pageheight currentpagedevice /PageSize get 1 get def
/incRadius {
/radius radius 8 add def
} def
/setGray {
/currentgray radius pagewidth div def
} def
/doCircle {
currentgray setgray
radius pagewidth div pagewidth -1 mul mul radius 1.2 mul radius 0 360 arc
stroke
radius pagewidth div pagewidth mul radius -1.2 mul radius 0 360 arc
stroke
radius pagewidth div pagewidth -1 mul mul radius -0.7 mul radius 0 360 arc
stroke
radius pagewidth div pagewidth mul radius 0.7 mul radius 0 360 arc
stroke
} def
pagewidth 2 div
pageheight 2 div
translate
{
radius pagewidth le
{
doCircle
incRadius
setGray
}
{
exit
} ifelse
} loop
showpage
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment