home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Club Amiga de Montreal - CAM
/
CAM_CD_1.iso
/
files
/
063.lha
/
PostScript
/
grid
< prev
next >
Wrap
Text File
|
1986-11-20
|
454b
|
44 lines
/b {-10 -10 moveto
-10 10 lineto
10 10 lineto
10 -10 lineto
-10 -10 lineto
} def
/spiral {
save
currentpoint translate
5 5 scale
25 { b
stroke
5 rotate
0.9 0.9 scale
} repeat
restore
} def
/row {
save
5 {
spiral
100 0 rmoveto
} repeat
restore
} def
/grid {
5 {
row
0 100 rmoveto
} repeat
} def
50 50 moveto
grid