jv@mh.nl (Johan Vromans) (02/23/91)
Due to popular demand (in comp.fonts and comp.text.tex) I hereby
donate my EPSF versions for Compact Disc and Compact Cassette to the
public domain. Have fun!
Johan
--
Johan Vromans jv@mh.nl via internet backbones
Multihouse Automatisering bv uucp: ..!{uunet,hp4nl}!mh.nl!jv
Doesburgweg 7, 2803 PL Gouda, The Netherlands phone/fax: +31 1820 62911/62500
------------------------ "Arms are made for hugging" -------------------------
---- Cut Here and feed the following to sh ----
#!/bin/sh
# This is a shell archive (produced by shar 3.49)
# To extract the files from this archive, save it to a file, remove
# everything above the "!/bin/sh" line above, and type "sh file_name".
#
# made 02/23/1991 11:14 UTC by jv@pronto
# Source directory /u1/users/jv
#
# existing files will NOT be overwritten unless -c is specified
#
# This shar contains:
# length mode name
# ------ ---------- ------------------------------------------
# 14787 -rw-r--r-- CDIcon.ps
# 12526 -rw-r--r-- CassetteIcon.ps
#
# ============= CDIcon.ps ==============
if test -f 'CDIcon.ps' -a X"$1" != X"-c"; then
echo 'x - skipping CDIcon.ps (File already exists)'
else
echo 'x - extracting CDIcon.ps (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'CDIcon.ps' &&
%!PS-Adobe-2.0 EPSF-1.2
%%Copyright 1990,1991 Johan Vromans
%%Creator: Adobe Illustrator 88(TM) r2
%%For: (Johan Vromans) (Squirrel Design)
%%Title: (cd2)
%%CreationDate: (26/5/90) (23:15)
%%DocumentProcSets: Adobe_packedarray 0 0
%%DocumentSuppliedProcSets: Adobe_packedarray 0 0
%%DocumentProcSets: Adobe_cmykcolor 0 0
%%DocumentSuppliedProcSets: Adobe_cmykcolor 0 0
%%DocumentProcSets: Adobe_cshow 0 0
%%DocumentSuppliedProcSets: Adobe_cshow 0 0
%%DocumentProcSets: Adobe_customcolor 0 0
%%DocumentSuppliedProcSets: Adobe_customcolor 0 0
%%DocumentProcSets: Adobe_Illustrator881 0 0
%%DocumentSuppliedProcSets: Adobe_Illustrator881 0 0
%%ColorUsage: Black&White
%%DocumentProcessColors: Black
%%DocumentFonts: Helvetica-Bold
%%BoundingBox:237 371 276 396
%%TemplateBox:288 360 288 360
%%TileBox:-538 781 0 1562
%%EndComments
%%BeginProcSet: Adobe_packedarray 0 0
% packedarray Operators
% Version r1 5/2/1988
% Copyright (C) 1987, 1988
% Adobe Systems Incorporated
% All Rights Reserved
userdict /Adobe_packedarray 5 dict dup begin put
/initialize % - initialize -
{
/packedarray where
X {
X pop
X }
X {
X Adobe_packedarray begin
X Adobe_packedarray
X {
X dup xcheck
X {
X bind
X } if
X userdict 3 1 roll put
X } forall
X end
X } ifelse
} def
/terminate % - terminate -
{
} def
/packedarray % arguments count packedarray array
{
array astore readonly
} def
/setpacking % boolean setpacking -
{
pop
} def
/currentpacking % - setpacking boolean
{
false
} def
currentdict readonly pop end
%%EndProcSet
Adobe_packedarray /initialize get exec
%%BeginProcSet:Adobe_cmykcolor 0 0
% cmykcolor Operators
% Version r1 5/2/1988
% Copyright (C) 1987, 1988
% Adobe Systems Incorporated
% All Rights Reserved
currentpacking true setpacking
userdict /Adobe_cmykcolor 4 dict dup begin put
/initialize % - initialize -
{
/setcmykcolor where
X {
X pop
X }
X {
X userdict /Adobe_cmykcolor_vars 2 dict dup begin put
X /_setrgbcolor
X /setrgbcolor load def
X /_currentrgbcolor
X /currentrgbcolor load def
X Adobe_cmykcolor begin
X Adobe_cmykcolor
X {
X dup xcheck
X {
X bind
X } if
X pop pop
X } forall
X end
X end
X Adobe_cmykcolor begin
X } ifelse
} def
/terminate % - terminate -
{
currentdict Adobe_cmykcolor eq
X {
X end
X } if
} def
/setcmykcolor % cyan magenta yellow black setcmykcolor -
{
1 sub 4 1 roll
3
X {
X 3 index add neg dup 0 lt
X {
X pop 0
X } if
X 3 1 roll
X } repeat
Adobe_cmykcolor_vars /_setrgbcolor get exec
pop
} def
/currentcmykcolor % - currentcmykcolor cyan magenta yellow black
{
Adobe_cmykcolor_vars /_currentrgbcolor get exec
3
X {
X 1 sub neg 3 1 roll
X } repeat
0
} def
currentdict readonly pop end
setpacking
%%EndProcSet
%%BeginProcSet: Adobe_cshow 0 0
% cshow Operator
% Version r1 5/2/1988
% Copyright (C) 1987, 1988
% Adobe Systems Incorporated
% All Rights Reserved
currentpacking true setpacking
userdict /Adobe_cshow 3 dict dup begin put
/initialize % - initialize -
{
/cshow where
X {
X pop
X }
X {
X userdict /Adobe_cshow_vars 1 dict dup begin put
X /_cshow % - _cshow proc
X {} def
X Adobe_cshow begin
X Adobe_cshow
X {
X dup xcheck
X {
X bind
X } if
X userdict 3 1 roll put
X } forall
X end
X end
X } ifelse
} def
/terminate % - terminate -
{
} def
/cshow % string proc cshow -
{
Adobe_cshow_vars
X exch /_cshow
X exch put
X {
X 0 0 Adobe_cshow_vars /_cshow get exec
X } forall
} def
currentdict readonly pop end
setpacking
%%EndProcSet
%%BeginProcSet: Adobe_customcolor 0 0
% Custom Color Operators
% Version r1 5/2/1988
% Copyright (C) 1987, 1988
% Adobe Systems Incorporated
% All Rights Reserved
currentpacking true setpacking
userdict /Adobe_customcolor 5 dict dup begin put
/initialize % - initialize -
{
/setcustomcolor where
X {
X pop
X }
X {
X Adobe_customcolor begin
X Adobe_customcolor
X {
X dup xcheck
X {
X bind
X } if
X pop pop
X } forall
X end
X Adobe_customcolor begin
X } ifelse
} def
/terminate % - terminate -
{
currentdict Adobe_customcolor eq
X {
X end
X } if
} def
/findcmykcustomcolor % cyan magenta yellow black name findcmykcustomcolor object
{
5 packedarray
} def
/setcustomcolor % object tint setcustomcolor -
{
exch
aload pop pop
4
X {
X 4 index mul 4 1 roll
X } repeat
5 -1 roll pop
setcmykcolor
} def
/setoverprint % boolean setoverprint -
{
pop
} def
currentdict readonly pop end
setpacking
%%EndProcSet
%%BeginProcSet: Adobe_Illustrator881 0 0
% Adobe Illustrator (TM) Prolog
% Version r1 5/2/1988
% Copyright (C) 1987, 1988
% Adobe Systems Incorporated
% All Rights Reserved
currentpacking true setpacking
userdict /Adobe_Illustrator881 72 dict dup begin put
% initialization
/initialize % - initialize -
{
userdict /Adobe_Illustrator881_vars 29 dict dup begin put
% paint operands
/_lp /none def
/_pf {} def
/_ps {} def
/_psf {} def
/_pss {} def
% text operands
/_a null def
/_as null def
/_tt 2 array def
/_tl 2 array def
/_tm matrix def
/t {} def
% color operands
/_gf null def
/_cf 4 array def
/_if null def
/_of false def
/_fc {} def
/_gs null def
/_cs 4 array def
/_is null def
/_os false def
/_sc {} def
/_i null def
Adobe_Illustrator881 begin
Adobe_Illustrator881
X {
X dup xcheck
X {
X bind
X } if
X pop pop
X } forall
end
end
Adobe_Illustrator881 begin
Adobe_Illustrator881_vars begin
newpath
} def
/terminate % - terminate -
{
end
end
} def
% definition operators
/_ % - _ null
null def
/ddef % key value ddef -
{
Adobe_Illustrator881_vars 3 1 roll put
} def
/xput % key value literal xput -
{
dup load dup length exch maxlength eq
X {
X dup dup load dup
X length 2 mul dict copy def
X } if
load begin def end
} def
/npop % integer npop -
{
X {
X pop
X } repeat
} def
% marking operators
/sw % ax ay length string sw x y
{
stringwidth
exch 5 -1 roll 3 index 1 sub mul add
4 1 roll 3 1 roll 1 sub mul add
} def
/ss % ax ay length string matrix ss -
{
3 -1 roll pop
4 1 roll
X {
X 2 npop (0) exch
X 2 copy 0 exch put pop
X gsave
X false charpath
X currentpoint
X 4 index setmatrix
X stroke
X grestore
X moveto
X 2 copy rmoveto
X } cshow
3 npop
} def
% path operators
/sp % ax ay length string sp -
{
exch pop
X {
X 2 npop (0) exch
X 2 copy 0 exch put pop
X false charpath
X 2 copy rmoveto
X } cshow
2 npop
} def
% path construction operators
/pl % x y pl x y
{
transform
0.25 sub round 0.25 add exch
0.25 sub round 0.25 add exch
itransform
} def
/setstrokeadjust where
{
pop true setstrokeadjust
/c % x1 y1 x2 y2 x3 y3 c -
{
curveto
} def
/C
/c load def
/v % x2 y2 x3 y3 v -
{
currentpoint 6 2 roll curveto
} def
/V
/v load def
/y % x1 y1 x2 y2 y -
{
2 copy curveto
} def
/Y
/y load def
/l % x y l -
{
lineto
} def
/L
/l load def
/m % x y m -
{
moveto
} def
}
{
/c
{
pl curveto
} def
/C
/c load def
/v
{
currentpoint 6 2 roll pl curveto
} def
/V
/v load def
/y
{
pl 2 copy curveto
} def
/Y
/y load def
/l
{
pl lineto
} def
/L
/l load def
/m
{
pl moveto
} def
} ifelse
% graphic state operators
/d % array phase d -
{
setdash
} def
/cf % - cf flatness
currentflat def
/i % flatness i -
{
dup 0 eq
X {
X pop cf
X } if
setflat
} def
/j % linejoin j -
{
setlinejoin
} def
/J % linecap J -
{
setlinecap
} def
/M % miterlimit M -
{
setmiterlimit
} def
/w % linewidth w -
{
setlinewidth
} def
% path painting operators
/H % - H -
{} def
/h % - h -
{
closepath
} def
/N % - N -
{
newpath
} def
/n % - n -
/N load def
/F % - F -
{
_pf
} def
/f % - f -
{
closepath
F
} def
/S % - S -
{
_ps
} def
/s % - s -
{
closepath
S
} def
/B % - B -
{
gsave F grestore
S
} def
/b % - b -
{
closepath
B
} def
/W % - W -
{
clip
} def
% text painting operators
/ta % length string ta ax ay length string
{
_as moveto
_tt aload pop 4 -2 roll
} def
/tl % - tl -
{
_tl aload pop translate
} def
/as % - as array
{
{
0 0
}
{
2 copy _tt aload pop 4 -2 roll sw
exch neg 2 div exch neg 2 div
}
{
2 copy _tt aload pop 4 -2 roll sw
exch neg exch neg
}
{
0 0
}
} cvlit def
/z % literal size leading tracking align z -
{
/_a exch ddef
/_as as _a get ddef
_a 2 le
X {
X 0 _tt astore pop
X 0 exch neg _tl astore pop
X }
X {
X 0 exch neg _tt astore pop
X neg 0 _tl astore pop
X } ifelse
exch findfont exch scalefont setfont
} def
/tm % matrix tm -
{
_tm currentmatrix pop
concat
} def
/I % matrix I -
{
tm
/t
X {
X ta sp
X tl
X } ddef
} def
/o % matrix o -
{
tm
/t
X {
X ta 4 npop
X tl
X newpath
X } ddef
} def
/e % matrix e -
{
tm
/t
X {
X ta _psf
X tl
X newpath
X } ddef
} def
/r % matrix r -
{
tm
/t
X {
X ta _tm _pss
X tl
X newpath
X } ddef
} def
/a % matrix a -
{
tm
/t
X {
X 2 copy
X ta _psf
X newpath
X ta _tm _pss
X tl
X newpath
X } ddef
} def
/T % - T -
{
_tm setmatrix
} def
% font operators
/Z % array literal literal direction Z -
{
pop
findfont begin
currentdict dup length 1 add dict begin
X {
X 1 index /FID ne
X {
X def
X }
X {
X 2 npop
X } ifelse
X } forall
/FontName exch def dup length 0 ne
X {
X /Encoding Encoding 256 array copy def
X 0 exch
X {
X dup type /nametype eq
X {
X Encoding 2 index 2 index put pop
X 1 add
X }
X {
X exch pop
X } ifelse
X } forall
X } if pop
currentdict dup end end
/FontName get exch definefont pop
} def
% group operators
/u % - u -
{} def
/U % - U -
{} def
/q % - q -
{
gsave
} def
/Q % - Q -
{
grestore
} def
% place operators
/` % matrix llx lly urx ury string ` -
{
/_i save ddef
6 1 roll 4 npop
concat
userdict begin
/showpage {} def
false setoverprint
pop
} def
/~ % - ~ -
{
end
_i restore
} def
% color operators
/O % flag O -
{
0 ne
/_of exch ddef
/_lp /none ddef
} def
/R % flag R -
{
0 ne
/_os exch ddef
/_lp /none ddef
} def
/g % gray g -
{
/_gf exch ddef
/_fc
{
_lp /fill ne
X {
X _of setoverprint
X _gf setgray
X /_lp /fill ddef
X } if
} ddef
/_pf
{
_fc
fill
} ddef
/_psf
{
_fc
exch pop
ashow
} ddef
/_lp /none ddef
} def
/G % gray G -
{
/_gs exch ddef
/_sc
{
_lp /stroke ne
X {
X _os setoverprint
X _gs setgray
X /_lp /stroke ddef
X } if
} ddef
/_ps
{
_sc
stroke
} ddef
/_pss
{
_sc
ss
} ddef
/_lp /none ddef
} def
/k % cyan magenta yellow black k -
{
_cf astore pop
/_fc
{
_lp /fill ne
X {
X _of setoverprint
X _cf aload pop setcmykcolor
X /_lp /fill ddef
X } if
} ddef
/_pf
{
_fc
fill
} ddef
/_psf
{
_fc
exch pop
ashow
} ddef
/_lp /none ddef
} def
/K % cyan magenta yellow black K -
{
_cs astore pop
/_sc
{
_lp /stroke ne
X {
X _os setoverprint
X _cs aload pop setcmykcolor
X /_lp /stroke ddef
X } if
} ddef
/_ps
{
_sc
stroke
} ddef
/_pss
{
_sc
ss
} ddef
/_lp /none ddef
} def
/x % cyan magenta yellow black name gray x -
{
/_gf exch ddef
findcmykcustomcolor
/_if exch ddef
/_fc
{
_lp /fill ne
X {
X _of setoverprint
X _if _gf 1 exch sub setcustomcolor
X /_lp /fill ddef
X } if
} ddef
/_pf
{
_fc
fill
} ddef
/_psf
{
_fc
exch pop
ashow
} ddef
/_lp /none ddef
} def
/X % cyan magenta yellow black name gray X -
{
/_gs exch ddef
findcmykcustomcolor
/_is exch ddef
/_sc
{
_lp /stroke ne
X {
X _os setoverprint
X _is _gs 1 exch sub setcustomcolor
X /_lp /stroke ddef
X } if
} ddef
/_ps
{
_sc
stroke
} ddef
/_pss
{
_sc
ss
} ddef
/_lp /none ddef
} def
% locked object operators
/A % value A -
{
pop
} def
currentdict readonly pop end
setpacking
%%EndProcSet
%%EndProlog
%%BeginSetup
X
Adobe_cmykcolor /initialize get exec
Adobe_cshow /initialize get exec
Adobe_customcolor /initialize get exec
Adobe_Illustrator881 /initialize get exec
%%BeginEncoding: _Helvetica-Bold Helvetica-Bold
[
39/quotesingle 96/grave 128/Adieresis/Aring/Ccedilla/Eacute/Ntilde/Odieresis
/Udieresis/aacute/agrave/acircumflex/adieresis/atilde/aring/ccedilla/eacute
/egrave/ecircumflex/edieresis/iacute/igrave/icircumflex/idieresis/ntilde
/oacute/ograve/ocircumflex/odieresis/otilde/uacute/ugrave/ucircumflex
/udieresis/dagger/degree/cent/sterling/section/bullet/paragraph/germandbls
/registered/copyright/trademark/acute/dieresis/.notdef/AE/Oslash
/.notdef/plusminus/.notdef/.notdef/yen/mu/.notdef/.notdef
/.notdef/.notdef/.notdef/ordfeminine/ordmasculine/.notdef/ae/oslash
/questiondown/exclamdown/logicalnot/.notdef/florin/.notdef/.notdef
/guillemotleft/guillemotright/ellipsis/.notdef/Agrave/Atilde/Otilde/OE/oe
/endash/emdash/quotedblleft/quotedblright/quoteleft/quoteright/divide
/.notdef/ydieresis/Ydieresis/fraction/currency/guilsinglleft/guilsinglright
/fi/fl/daggerdbl/periodcentered/quotesinglbase/quotedblbase/perthousand
/Acircumflex/Ecircumflex/Aacute/Edieresis/Egrave/Iacute/Icircumflex
/Idieresis/Igrave/Oacute/Ocircumflex/.notdef/Ograve/Uacute/Ucircumflex
/Ugrave/dotlessi/circumflex/tilde/macron/breve/dotaccent/ring/cedilla
/hungarumlaut/ogonek/caron
]/_Helvetica-Bold/Helvetica-Bold 0 Z
%%EndEncoding
%%EndSetup
0 A
u
0 O
0 g
0 R
0 G
0 i 0 J 0 j 0.24 w 4 M []0 d
%%Note:
/_Helvetica-Bold 18 12 0.9 0 z
[0.24 0 0 0.24 249.064 389.8397]e
7 (COMPACT)t
T
/_Helvetica-Bold 18 12 0.5 0 z
[0.24 0 0 0.24 239.5844 372.4404]e
13 (DIGITAL AUDIO)t
T
u
0.72 w
252.9038 377.0002 m
252.9038 388.7598 L
250.024 388.7598 L
250.024 377.0002 L
252.9038 377.0002 L
s
251.4639 382.88 m
S
U
245.4615 385.8826 m
245.4615 379.8775 l
245.4615 379.2162 244.9254 378.6802 244.2642 378.6802 c
243.603 378.6802 243.0669 379.2162 243.0669 379.8775 c
243.0669 385.8826 l
243.0669 386.5438 243.603 387.0798 244.2642 387.0798 c
244.9254 387.0798 245.4615 386.5438 245.4615 385.8826 c
s
241.885 388.7598 m
240.9458 388.7598 240.1843 387.9984 240.1843 387.0591 c
240.1843 378.7009 l
240.1843 377.7617 240.9458 377.0002 241.885 377.0002 c
248.344 377.0002 L
248.344 393.0796 L
245.4641 393.0796 L
245.4641 388.7598 L
241.6243 388.7598 l
S
272.5831 378.7009 m
272.583 381.8 L
269.7032 381.8 L
269.7005 379.9082 l
269.7005 379.2469 269.1644 378.7109 268.5032 378.7109 c
267.842 378.7109 267.3059 379.2469 267.3059 379.9082 c
267.3059 385.8826 l
267.3059 386.5438 267.842 387.0798 268.5032 387.0798 c
269.1644 387.0798 269.7005 386.5438 269.7005 385.8826 c
269.7032 384.1999 L
272.583 384.1999 L
272.5831 387.0591 l
272.5831 387.9984 271.8216 388.7598 270.8824 388.7598 c
266.1033 388.7806 l
265.164 388.7806 264.4026 388.0191 264.4026 387.0798 c
264.4233 378.7009 l
264.4233 377.7617 265.1848 377.0002 266.124 377.0002 c
270.8824 377.0002 l
271.8216 377.0002 272.5831 377.7617 272.5831 378.7009 c
s
254.5838 379.8501 m
259.2532 379.8594 l
259.7228 379.8594 260.1036 380.2401 260.1036 380.7097 c
260.1036 381.1794 259.7228 381.5601 259.2532 381.5601 c
256.2845 381.5496 L
256.2844 381.56 L
255.3452 381.56 254.5837 382.3215 254.5837 383.2607 c
254.563 387.0798 l
254.563 388.0191 255.3244 388.7806 256.2637 388.7806 c
262.7434 388.7598 L
262.7434 385.8799 l
258.074 385.8903 l
257.6044 385.8903 257.2237 385.5095 257.2237 385.0399 c
257.2237 384.5703 257.6044 384.1896 258.074 384.1896 c
261.0428 384.2 l
261.982 384.2 262.7435 383.4385 262.7435 382.4993 c
262.7435 378.7009 l
262.7435 377.7617 261.982 377.0002 261.0428 377.0002 c
254.5838 377.0002 L
254.5838 379.8501 L
s
U
%%Trailer
Adobe_Illustrator881 /terminate get exec
Adobe_customcolor /terminate get exec
Adobe_cshow /terminate get exec
Adobe_cmykcolor /terminate get exec
X
SHAR_EOF
chmod 0644 CDIcon.ps ||
echo 'restore of CDIcon.ps failed'
Wc_c="`wc -c < 'CDIcon.ps'`"
test 14787 -eq "$Wc_c" ||
echo 'CDIcon.ps: original size 14787, current size' "$Wc_c"
fi
# ============= CassetteIcon.ps ==============
if test -f 'CassetteIcon.ps' -a X"$1" != X"-c"; then
echo 'x - skipping CassetteIcon.ps (File already exists)'
else
echo 'x - extracting CassetteIcon.ps (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'CassetteIcon.ps' &&
%!PS-Adobe-2.0 EPSF-1.2
%%Copyright 1990,1991 Johan Vromans
%%Creator: Adobe Illustrator 88(TM) r2
%%For: (Johan Vromans) (Squirrel Design)
%%Title: (Pic. Cassette)
%%CreationDate: (29/1/90) (9:23)
%%DocumentProcSets: Adobe_packedarray 0 0
%%DocumentSuppliedProcSets: Adobe_packedarray 0 0
%%DocumentProcSets: Adobe_cmykcolor 0 0
%%DocumentSuppliedProcSets: Adobe_cmykcolor 0 0
%%DocumentProcSets: Adobe_cshow 0 0
%%DocumentSuppliedProcSets: Adobe_cshow 0 0
%%DocumentProcSets: Adobe_customcolor 0 0
%%DocumentSuppliedProcSets: Adobe_customcolor 0 0
%%DocumentProcSets: Adobe_Illustrator881 0 0
%%DocumentSuppliedProcSets: Adobe_Illustrator881 0 0
%%ColorUsage: Black&White
%%DocumentProcessColors: Black
%%BoundingBox:235 -111 268 -89
%%TemplateBox:248 55 248 55
%%TileBox:-578 476 -40 1257
%%EndComments
%%BeginProcSet: Adobe_packedarray 0 0
% packedarray Operators
% Version r1 5/2/1988
% Copyright (C) 1987, 1988
% Adobe Systems Incorporated
% All Rights Reserved
userdict /Adobe_packedarray 5 dict dup begin put
/initialize % - initialize -
{
/packedarray where
X {
X pop
X }
X {
X Adobe_packedarray begin
X Adobe_packedarray
X {
X dup xcheck
X {
X bind
X } if
X userdict 3 1 roll put
X } forall
X end
X } ifelse
} def
/terminate % - terminate -
{
} def
/packedarray % arguments count packedarray array
{
array astore readonly
} def
/setpacking % boolean setpacking -
{
pop
} def
/currentpacking % - setpacking boolean
{
false
} def
currentdict readonly pop end
%%EndProcSet
Adobe_packedarray /initialize get exec
%%BeginProcSet:Adobe_cmykcolor 0 0
% cmykcolor Operators
% Version r1 5/2/1988
% Copyright (C) 1987, 1988
% Adobe Systems Incorporated
% All Rights Reserved
currentpacking true setpacking
userdict /Adobe_cmykcolor 4 dict dup begin put
/initialize % - initialize -
{
/setcmykcolor where
X {
X pop
X }
X {
X userdict /Adobe_cmykcolor_vars 2 dict dup begin put
X /_setrgbcolor
X /setrgbcolor load def
X /_currentrgbcolor
X /currentrgbcolor load def
X Adobe_cmykcolor begin
X Adobe_cmykcolor
X {
X dup xcheck
X {
X bind
X } if
X pop pop
X } forall
X end
X end
X Adobe_cmykcolor begin
X } ifelse
} def
/terminate % - terminate -
{
currentdict Adobe_cmykcolor eq
X {
X end
X } if
} def
/setcmykcolor % cyan magenta yellow black setcmykcolor -
{
1 sub 4 1 roll
3
X {
X 3 index add neg dup 0 lt
X {
X pop 0
X } if
X 3 1 roll
X } repeat
Adobe_cmykcolor_vars /_setrgbcolor get exec
pop
} def
/currentcmykcolor % - currentcmykcolor cyan magenta yellow black
{
Adobe_cmykcolor_vars /_currentrgbcolor get exec
3
X {
X 1 sub neg 3 1 roll
X } repeat
0
} def
currentdict readonly pop end
setpacking
%%EndProcSet
%%BeginProcSet: Adobe_cshow 0 0
% cshow Operator
% Version r1 5/2/1988
% Copyright (C) 1987, 1988
% Adobe Systems Incorporated
% All Rights Reserved
currentpacking true setpacking
userdict /Adobe_cshow 3 dict dup begin put
/initialize % - initialize -
{
/cshow where
X {
X pop
X }
X {
X userdict /Adobe_cshow_vars 1 dict dup begin put
X /_cshow % - _cshow proc
X {} def
X Adobe_cshow begin
X Adobe_cshow
X {
X dup xcheck
X {
X bind
X } if
X userdict 3 1 roll put
X } forall
X end
X end
X } ifelse
} def
/terminate % - terminate -
{
} def
/cshow % string proc cshow -
{
Adobe_cshow_vars
X exch /_cshow
X exch put
X {
X 0 0 Adobe_cshow_vars /_cshow get exec
X } forall
} def
currentdict readonly pop end
setpacking
%%EndProcSet
%%BeginProcSet: Adobe_customcolor 0 0
% Custom Color Operators
% Version r1 5/2/1988
% Copyright (C) 1987, 1988
% Adobe Systems Incorporated
% All Rights Reserved
currentpacking true setpacking
userdict /Adobe_customcolor 5 dict dup begin put
/initialize % - initialize -
{
/setcustomcolor where
X {
X pop
X }
X {
X Adobe_customcolor begin
X Adobe_customcolor
X {
X dup xcheck
X {
X bind
X } if
X pop pop
X } forall
X end
X Adobe_customcolor begin
X } ifelse
} def
/terminate % - terminate -
{
currentdict Adobe_customcolor eq
X {
X end
X } if
} def
/findcmykcustomcolor % cyan magenta yellow black name findcmykcustomcolor object
{
5 packedarray
} def
/setcustomcolor % object tint setcustomcolor -
{
exch
aload pop pop
4
X {
X 4 index mul 4 1 roll
X } repeat
5 -1 roll pop
setcmykcolor
} def
/setoverprint % boolean setoverprint -
{
pop
} def
currentdict readonly pop end
setpacking
%%EndProcSet
%%BeginProcSet: Adobe_Illustrator881 0 0
% Adobe Illustrator (TM) Prolog
% Version r1 5/2/1988
% Copyright (C) 1987, 1988
% Adobe Systems Incorporated
% All Rights Reserved
currentpacking true setpacking
userdict /Adobe_Illustrator881 72 dict dup begin put
% initialization
/initialize % - initialize -
{
userdict /Adobe_Illustrator881_vars 29 dict dup begin put
% paint operands
/_lp /none def
/_pf {} def
/_ps {} def
/_psf {} def
/_pss {} def
% text operands
/_a null def
/_as null def
/_tt 2 array def
/_tl 2 array def
/_tm matrix def
/t {} def
% color operands
/_gf null def
/_cf 4 array def
/_if null def
/_of false def
/_fc {} def
/_gs null def
/_cs 4 array def
/_is null def
/_os false def
/_sc {} def
/_i null def
Adobe_Illustrator881 begin
Adobe_Illustrator881
X {
X dup xcheck
X {
X bind
X } if
X pop pop
X } forall
end
end
Adobe_Illustrator881 begin
Adobe_Illustrator881_vars begin
newpath
} def
/terminate % - terminate -
{
end
end
} def
% definition operators
/_ % - _ null
null def
/ddef % key value ddef -
{
Adobe_Illustrator881_vars 3 1 roll put
} def
/xput % key value literal xput -
{
dup load dup length exch maxlength eq
X {
X dup dup load dup
X length 2 mul dict copy def
X } if
load begin def end
} def
/npop % integer npop -
{
X {
X pop
X } repeat
} def
% marking operators
/sw % ax ay length string sw x y
{
stringwidth
exch 5 -1 roll 3 index 1 sub mul add
4 1 roll 3 1 roll 1 sub mul add
} def
/ss % ax ay length string matrix ss -
{
3 -1 roll pop
4 1 roll
X {
X 2 npop (0) exch
X 2 copy 0 exch put pop
X gsave
X false charpath
X currentpoint
X 4 index setmatrix
X stroke
X grestore
X moveto
X 2 copy rmoveto
X } cshow
3 npop
} def
% path operators
/sp % ax ay length string sp -
{
exch pop
X {
X 2 npop (0) exch
X 2 copy 0 exch put pop
X false charpath
X 2 copy rmoveto
X } cshow
2 npop
} def
% path construction operators
/pl % x y pl x y
{
transform
0.25 sub round 0.25 add exch
0.25 sub round 0.25 add exch
itransform
} def
/setstrokeadjust where
{
pop true setstrokeadjust
/c % x1 y1 x2 y2 x3 y3 c -
{
curveto
} def
/C
/c load def
/v % x2 y2 x3 y3 v -
{
currentpoint 6 2 roll curveto
} def
/V
/v load def
/y % x1 y1 x2 y2 y -
{
2 copy curveto
} def
/Y
/y load def
/l % x y l -
{
lineto
} def
/L
/l load def
/m % x y m -
{
moveto
} def
}
{
/c
{
pl curveto
} def
/C
/c load def
/v
{
currentpoint 6 2 roll pl curveto
} def
/V
/v load def
/y
{
pl 2 copy curveto
} def
/Y
/y load def
/l
{
pl lineto
} def
/L
/l load def
/m
{
pl moveto
} def
} ifelse
% graphic state operators
/d % array phase d -
{
setdash
} def
/cf % - cf flatness
currentflat def
/i % flatness i -
{
dup 0 eq
X {
X pop cf
X } if
setflat
} def
/j % linejoin j -
{
setlinejoin
} def
/J % linecap J -
{
setlinecap
} def
/M % miterlimit M -
{
setmiterlimit
} def
/w % linewidth w -
{
setlinewidth
} def
% path painting operators
/H % - H -
{} def
/h % - h -
{
closepath
} def
/N % - N -
{
newpath
} def
/n % - n -
/N load def
/F % - F -
{
_pf
} def
/f % - f -
{
closepath
F
} def
/S % - S -
{
_ps
} def
/s % - s -
{
closepath
S
} def
/B % - B -
{
gsave F grestore
S
} def
/b % - b -
{
closepath
B
} def
/W % - W -
{
clip
} def
% text painting operators
/ta % length string ta ax ay length string
{
_as moveto
_tt aload pop 4 -2 roll
} def
/tl % - tl -
{
_tl aload pop translate
} def
/as % - as array
{
{
0 0
}
{
2 copy _tt aload pop 4 -2 roll sw
exch neg 2 div exch neg 2 div
}
{
2 copy _tt aload pop 4 -2 roll sw
exch neg exch neg
}
{
0 0
}
} cvlit def
/z % literal size leading tracking align z -
{
/_a exch ddef
/_as as _a get ddef
_a 2 le
X {
X 0 _tt astore pop
X 0 exch neg _tl astore pop
X }
X {
X 0 exch neg _tt astore pop
X neg 0 _tl astore pop
X } ifelse
exch findfont exch scalefont setfont
} def
/tm % matrix tm -
{
_tm currentmatrix pop
concat
} def
/I % matrix I -
{
tm
/t
X {
X ta sp
X tl
X } ddef
} def
/o % matrix o -
{
tm
/t
X {
X ta 4 npop
X tl
X newpath
X } ddef
} def
/e % matrix e -
{
tm
/t
X {
X ta _psf
X tl
X newpath
X } ddef
} def
/r % matrix r -
{
tm
/t
X {
X ta _tm _pss
X tl
X newpath
X } ddef
} def
/a % matrix a -
{
tm
/t
X {
X 2 copy
X ta _psf
X newpath
X ta _tm _pss
X tl
X newpath
X } ddef
} def
/T % - T -
{
_tm setmatrix
} def
% font operators
/Z % array literal literal direction Z -
{
pop
findfont begin
currentdict dup length 1 add dict begin
X {
X 1 index /FID ne
X {
X def
X }
X {
X 2 npop
X } ifelse
X } forall
/FontName exch def dup length 0 ne
X {
X /Encoding Encoding 256 array copy def
X 0 exch
X {
X dup type /nametype eq
X {
X Encoding 2 index 2 index put pop
X 1 add
X }
X {
X exch pop
X } ifelse
X } forall
X } if pop
currentdict dup end end
/FontName get exch definefont pop
} def
% group operators
/u % - u -
{} def
/U % - U -
{} def
/q % - q -
{
gsave
} def
/Q % - Q -
{
grestore
} def
% place operators
/` % matrix llx lly urx ury string ` -
{
/_i save ddef
6 1 roll 4 npop
concat
userdict begin
/showpage {} def
false setoverprint
pop
} def
/~ % - ~ -
{
end
_i restore
} def
% color operators
/O % flag O -
{
0 ne
/_of exch ddef
/_lp /none ddef
} def
/R % flag R -
{
0 ne
/_os exch ddef
/_lp /none ddef
} def
/g % gray g -
{
/_gf exch ddef
/_fc
{
_lp /fill ne
X {
X _of setoverprint
X _gf setgray
X /_lp /fill ddef
X } if
} ddef
/_pf
{
_fc
fill
} ddef
/_psf
{
_fc
exch pop
ashow
} ddef
/_lp /none ddef
} def
/G % gray G -
{
/_gs exch ddef
/_sc
{
_lp /stroke ne
X {
X _os setoverprint
X _gs setgray
X /_lp /stroke ddef
X } if
} ddef
/_ps
{
_sc
stroke
} ddef
/_pss
{
_sc
ss
} ddef
/_lp /none ddef
} def
/k % cyan magenta yellow black k -
{
_cf astore pop
/_fc
{
_lp /fill ne
X {
X _of setoverprint
X _cf aload pop setcmykcolor
X /_lp /fill ddef
X } if
} ddef
/_pf
{
_fc
fill
} ddef
/_psf
{
_fc
exch pop
ashow
} ddef
/_lp /none ddef
} def
/K % cyan magenta yellow black K -
{
_cs astore pop
/_sc
{
_lp /stroke ne
X {
X _os setoverprint
X _cs aload pop setcmykcolor
X /_lp /stroke ddef
X } if
} ddef
/_ps
{
_sc
stroke
} ddef
/_pss
{
_sc
ss
} ddef
/_lp /none ddef
} def
/x % cyan magenta yellow black name gray x -
{
/_gf exch ddef
findcmykcustomcolor
/_if exch ddef
/_fc
{
_lp /fill ne
X {
X _of setoverprint
X _if _gf 1 exch sub setcustomcolor
X /_lp /fill ddef
X } if
} ddef
/_pf
{
_fc
fill
} ddef
/_psf
{
_fc
exch pop
ashow
} ddef
/_lp /none ddef
} def
/X % cyan magenta yellow black name gray X -
{
/_gs exch ddef
findcmykcustomcolor
/_is exch ddef
/_sc
{
_lp /stroke ne
X {
X _os setoverprint
X _is _gs 1 exch sub setcustomcolor
X /_lp /stroke ddef
X } if
} ddef
/_ps
{
_sc
stroke
} ddef
/_pss
{
_sc
ss
} ddef
/_lp /none ddef
} def
% locked object operators
/A % value A -
{
pop
} def
currentdict readonly pop end
setpacking
%%EndProcSet
%%EndProlog
%%BeginSetup
X
Adobe_cmykcolor /initialize get exec
Adobe_cshow /initialize get exec
Adobe_customcolor /initialize get exec
Adobe_Illustrator881 /initialize get exec
%%EndSetup
0 A
u
0 O
0 g
0 R
0 G
0 i 0 J 0 j 0.5 w 4 M []0 d
%%Note:
265.122 -108.928 m
265.592 -108.928 265.973 -108.547 265.973 -108.078 C
265.973 -91.919 L
265.973 -91.449 265.592 -91.069 265.122 -91.069 C
238.475 -91.069 L
238.005 -91.069 237.625 -91.449 237.625 -91.919 C
237.625 -108.078 L
237.625 -108.547 238.005 -108.928 238.475 -108.928 C
265.122 -108.928 L
s
251.799 -99.998 m
S
U
242.098 -108.899 m
242.698 -104.399 l
260.799 -104.399 l
261.399 -108.899 l
S
u
245.798 -100.699 m
246.738 -100.699 247.499 -99.938 247.499 -98.998 c
247.499 -98.059 246.738 -97.297 245.798 -97.297 c
244.859 -97.297 244.098 -98.059 244.098 -98.998 c
244.098 -99.938 244.859 -100.699 245.798 -100.699 c
s
245.798 -98.998 m
S
U
u
257.699 -100.699 m
258.639 -100.699 259.4 -99.938 259.4 -98.998 c
259.4 -98.059 258.639 -97.297 257.699 -97.297 c
256.76 -97.297 255.998 -98.059 255.998 -98.998 c
255.998 -99.938 256.76 -100.699 257.699 -100.699 c
s
257.699 -98.998 m
S
U
245.798 -98.998 m
S
257.699 -101.209 m
258.92 -101.209 259.91 -100.219 259.91 -98.998 c
259.91 -97.777 258.92 -96.787 257.699 -96.787 c
245.798 -96.787 l
244.577 -96.787 243.587 -97.777 243.587 -98.998 c
243.587 -100.219 244.577 -101.209 245.798 -101.209 c
257.699 -101.209 l
s
257.699 -98.998 m
S
%%Trailer
Adobe_Illustrator881 /terminate get exec
Adobe_customcolor /terminate get exec
Adobe_cshow /terminate get exec
Adobe_cmykcolor /terminate get exec
X
SHAR_EOF
chmod 0644 CassetteIcon.ps ||
echo 'restore of CassetteIcon.ps failed'
Wc_c="`wc -c < 'CassetteIcon.ps'`"
test 12526 -eq "$Wc_c" ||
echo 'CassetteIcon.ps: original size 12526, current size' "$Wc_c"
fi
exit 0
--
Johan Vromans jv@mh.nl via internet backbones
Multihouse Automatisering bv uucp: ..!{uunet,hp4nl}!mh.nl!jv
Doesburgweg 7, 2803 PL Gouda, The Netherlands phone/fax: +31 1820 62911/62500
------------------------ "Arms are made for hugging" -------------------------