[categories] [index] [all (532)] [latest]

1. Run animations

   Use with gv -quiet anim.ps

   %!PS
   %%BoundingBox: 0 0 320 240
   
   /sleep { 100000 mul {} repeat } def
   
   /x 50 def
   
   0 1 300 1 sub {
       pop
   
       /x x 1 add def
   
       gsave
   
       1 setgray
       0 0 320 240 rectfill
   
       x 100 45 0 360 arc
       0.5 setgray fill
   
       grestore
   
       flushpage
   
       10 sleep
   } for