% % %! (C:\\windows\\desktop\\gonzo\\gonzo.ps) run % use external gonzo /trystone true def % name of textfile: blat 63 waywere % .... % X E Activate XON/XOFF if necessary. % Z Values are shown for Apple Super Serial Card %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % This .GPS (Guru PostScript) file DEMANDS the persistant download % of GONZO15A.PTL #517 and GUTIL13A.PTL #280. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % statusdict begin % statusdict /setduplexmode known {true setduplexmode} if % end systemdict /setstrokeadjust known {true setstrokeadjust} if %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % modified nextcol allows pages without text and deferred xpos calcs. /nextcol { numpgcol 0 gt { curpage curcol get aload pop exec /txtwide exch def exec /ylimit exch def exec /ypos exch def exec /xpos exch def /curcol curcol 1 add def}{ nextpage} ifelse} def %%%%%% doembeddedproc executes |/name installdoembeddedproc links it /doembeddedproc {mark 50 {stringmode {getstringchar}{currentfile read} ifelse not {exit} if dup dup dup 32 eq exch 13 eq or exch 10 eq or {pop exit} if} repeat counttomark dup string /pstr1 exch def 1 sub -1 0 {pstr1 3 1 roll exch put} for pstr1 exch pop cvx exec} def /installdoembeddedproc {gonzo begin commands (/) 0 get {doembeddedproc} put end} def installdoembeddedproc %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % ------ COMMAND SUMMARY --------- % Note that "|" is used as a printable escape command below % |0 - drop cap font |1 - main text font |2 - text italics % |3 - heading font |4 - text caps font |5 - txt ital. caps % |6 - txt bold caps |8 - special font |= - symbol font % |a - start drop cap |b - indent drop text |c - start header % |d - finish header |k - kern -1 point |j - kern +1 point % |h - half linefeed |y - neg linefeed |C - center justify % |Z - column rule |x - enter PostScript |F - fill justify % \261 - em dash \274 elipsis ... %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % MIDNIGHT ENGINEERING TEMPLATE CORE ps.util.1 begin % here to simplify debug printerror nuisance begin systemdict /setstrokeadjust known {true setstrokeadjust} if /boxgrays 0.94 def % color of box fills. Use 1.0 for white 0.94 for gray % blackflash % This default gonzo page making template is a useful starting point for % creating your own custom templates. It allows multiple page documents % with full picture insertions and total text control. % Note that any template MUST have an internal proc named templatestartup % and that your template MUST NOT call gonzofont before run time. 300 dict /midnightdoc exch def midnightdoc begin /templatefonts { % Remember: all fonts MUST defer till run time! /font0 /StoneSans-Bold [45 0 0 40.1 0 -23] gonzofont % temp "I" /font1 /StoneSerif 8.38 gonzofont /font2 /StoneSerif [ 7.95 0 1.10 8.38 0 0 ] gonzofont /font3 /StoneSans-Bold [9.25 0 0 9.25 0 -8] gonzofont % old /font4 /StoneSerif 8.15 gonzofont /font5 /StoneSerif [ 8.12 0 1.1 8.12 0 0 ] gonzofont /font6 /StoneSerif-Bold [8.5 0 0 8.5 0 -5] gonzofont /font7 /StoneSans-Bold 7.9 gonzofont /font8 /Benguiat-Bold [22 0 0 24 0 0] gonzofont /font9 /Benguiat-Bold [14 0 0 14 0 0] gonzofont /font= /Symbol 9.75 gonzofont /font: /Times-Bold 9.75 gonzofont /font- /ZapfDingbats [9 0 0 9.01 0 -.7] gonzofont } def trystone not { /templatefonts { % Remember: all fonts MUST defer till run time! /font0 /Helvetica-Bold [45 0 0 40.1 0 -23] gonzofont /font1 /Times-Roman 9.75 gonzofont /font2 /Times-Italic 9.75 gonzofont /font3 /Helvetica-Bold [10 0 0 10.05 0 -8] gonzofont % old /font4 /Times-Roman 9.25 gonzofont /font5 /Times-Italic 9.25 gonzofont /font6 /Times-Bold [9 0 0 9.1 0 -6] gonzofont /font7 /Helvetica-Bold 9.5 gonzofont /font8 /Benguiat-Bold [22 0 0 24 0 0] gonzofont /font9 /Benguiat-Bold [14 0 0 14 0 0] gonzofont /font= /Symbol 9.75 gonzofont /font: /Times-Bold 9.75 gonzofont /font- /ZapfDingbats [9 0 0 9.01 0 -.7] gonzofont } def } if % values used by gonzo justify ... /cstretch 0.15 def % minimum character kerning /sstretch 0 def % minimum space kerning /dropcount 3 def % number of lines drop cap drops /lastlinestretch 0.04 def % open last paragraph line slightly /pm 10 def % use paragraph indents /yinc 11 def % line spacing /ypara yinc 2 div def % extra interparagraph spacing /ypara 0 def % but not here % These macros handle an initial drop cap and low center subheads ... /amacro {(zyL0) stringmacro /ypos ypos ypara add def} def % start drop cap /bmacro {(iFy1) stringmacro /ypos ypos ypara add def} def % finish drop cap /cmacro {0.33 setgray (znyL3) stringmacro /ypos ypos ypara 2 mul add def} def % centered title /dmacro {black (pF1) stringmacro /ypos ypos ypara 2 mul add def} def % normal text after centered title % reference values for internal doc control that become calculated % array values. Note that it is best to work in fixed yinc heights % to prevent alignment problems under figures. Note that it is nearly % always best to AVOID FIXED VALUES IN DOCMATRIX. % set screen here or comment out for stock gray 106 45 {dup mul exch dup mul add 1.0 exch sub} setscreen /showboxgrays true def % show grays in boxes and figs? /txw 242 def % width of normal text columns /cmb 60 def % column bottom position /cmt cmb 62 1 sub yinc mul add .1 add def % page is 63 normal text lines high /cml 60 def % first column left margin /cms 260 def % spacing of normal columns /cm# 2 def % number of normal columns /cm1 cml def % c1 starts at left margin /cm2 cml cms add def % c2 in middle /cm3 cml cms 2 mul add def % c3 to right /cmw cms txw sub def % white space between columns /hdw cms txw add def % normal header/footer width /hdc cm1 hdw 2 div add def % normal header/footer center /hdr cm1 hdw add def % normal header/footer right /hdl cm1 def % normal header left /fdp 28 def % amount of footer drop below cml /bh1 yinc 13 mul def % 12 vlines reserved for title & blurb /rwd 0.50 def % width of rules /rlt {cmt 12 add} def % adjusted vrule top /rlb {cmb 7 sub} def % adjusted vrule bottom /rl1 {cm2 cmw 2 div sub} def % center rules /stdfigrad 4 def % radius of standard figure box /1colwide txw def % width of single column figure /2colwide txw cms add def % width of double column figure /3colwide txw cms 2 mul add def % width of triple column figure /f1h yinc 25 mul def % height of figure one % sidebar /f2h yinc 22 mul def % temp tower figures /f3h yinc 22 mul def % temp tower figures /pix1h yinc 21 mul def % steplock picture /pix2h yinc 21 mul def % steplock picture /pix3h yinc 21 mul def % steplock picture /pix4h yinc 21 mul def % steplock picture /s1h yinc 20 mul def % height of figure two /fig1 {cm1 cmt f1h sub 1colwide f1h yinc add true true /f1name /figure1 stdfig} def % link resource sidebar /fig2 {cm2 cmt f2h sub 1colwide f2h yinc add true true /f2name /figure2 grayfig2} def % link /fig3 {cm2 cmt f2h sub 1colwide f3h yinc add true true /f3name /figure3 grayfig2} def % link /side1 {cm1 cmt s1h sub 5 add 3colwide s1h true false /s1name /sidebar1 stdfig} def % link /pix1 {cm1 cmt pix1h sub 1colwide pix1h yinc add true true /pix1name /picture1 stdfigx} def % link pix /pix2 {cm2 cmt pix2h sub 1colwide pix2h yinc add true true /pix1name /picture2 stdfigx} def % link pix /pix3 {cm1 cmt pix3h sub 1colwide pix3h yinc add true true /pix3name /picture3 stdfigx} def % link pix /pix4 {cm2 cmt pix4h sub 1colwide pix4h yinc add true true /pix1name /picture4 stdfigx} def % link pix % this is an experimental pull /pull1 [ cm2 70 sub % left position cmb 8 yinc mul add % bottom position 1 index 204 add % width in points 1 index 9 yinc mul add % top position (|3I've yet to find any product whose main purpose is to let end users attractively hold |j|j|jpapers |j|j|jtogether.) % message NOT USED THIS COLUMN ] def /pull1top {pull1 3 get} def /pull1bot {pull1 1 get 0.1 add yinc sub} def % requires column [ cm1 pullleftset etc.. /pull1leftset {pull1 3 get yinc sub pull1 1 get yinc sub pull1 0 get 3 index sub} def /pull1rightset { pull1 2 get exch pull1 3 get yinc sub exch pull1 1 get yinc sub exch pull1 2 get sub txw add} def % this is an experimental "standard" pull for MIDENG... /stdpull {aload pop save /pullsnap exch def /msg exch def 6 sub /pt exch def 6 sub /pr exch def 0 add /pb exch def 6 add /pl exch def newpath pl pb moveto pl pt lineto pr pt lineto pr pb lineto closepath gsave 1 setgray 8 setlinewidth stroke grestore gsave showboxgrays {0.94}{0} ifelse setgray fill grestore [2 0 1 1] superstroke /sstretch 0.8 def /cstretch 0.2 def /font1 /Helvetica-Bold 12.5 gonzofont /font2 /Helvetica-Bold 11.5 gonzofont font1 /yinc 15 def /ylimit -9999 def pl dup pr sub 2 div neg add pt 28 sub msg cc pullsnap restore} def % this is a "standard" figure border for MIDENG. It has rounded edges, % a bottom single line title, and links to the actual figure art... /stdfig { /jsave justx 4 get def save /stdsnap exch def /colcheck {} def /figproc exch def cvx /figname exch def /showtitle exch def /showborder exch def /figheight exch def /figwidth exch def translate showborder {1 5 figwidth 2 sub figheight 15 sub stdfigrad roundbox gsave showboxgrays {0.94}{0} ifelse setgray fill grestore [2 0 1 1] superstroke } if /font7 /Helvetica-Bold 9 gonzofont showtitle {figwidth 2 div 12 font7 figname cc} if /bw figwidth def /bt figheight def /bl 0 def /bb 0 def /bc figwidth 2 div def /xpos 20 def /ypos bt 20 sub def /cstretch 0 def /sstretch 0 def /lastlinestretch 0 def /pmrun 0 def /ypara 0 def /linestring linestring2 def % needed to run interference 3 1 roll translate dup scale mark figproc cvx exec cleartomark stdsnap restore justx 4 jsave put } def %%%%%%%%%%%% % stdfigx just lets the artwork do its thing after translation /stdfigx { /jsave justx 4 get def save /stdsnap exch def /colcheck {} def /figproc exch def cvx /figname exch def /showtitle exch def /showborder exch def /figheight exch def /figwidth exch def translate {showborder {1 5 figwidth 2 sub figheight 15 sub stdfigrad roundbox gsave showboxgrays {0.94}{0} ifelse setgray fill grestore [2 0 1 1] superstroke } if } pop /font7 /Helvetica-Bold 9 gonzofont {showtitle {figwidth 2 div 12 font7 figname cc} if /bw figwidth def /bt figheight def /bl 0 def /bb 0 def /bc figwidth 2 div def /xpos 20 def /ypos bt 20 sub def /cstretch 0 def /sstretch 0 def /lastlinestretch 0 def /pmrun 0 def /ypara 0 def} pop /linestring linestring2 def % needed to run interference 3 1 roll translate dup scale mark figproc cvx exec cleartomark stdsnap restore justx 4 jsave put } def %%%%%%%%%%%% %%%%%%%%%%%%%%%%% % grayfig two has a title box (modified for reverse) /grayfig2 { /jsave justx 4 get def save /stdsnap exch def /colcheck {} def /figproc exch def cvx /figname exch def /showtitle exch def /showborder exch def 2 add % temp for blat 25 /figheight exch def 20 sub /figwidth exch def translate showborder {1 10 add 5 10.4 figheight 33 sub moveto figwidth 0.8 sub 0 rlineto figwidth 2 sub figheight 15 sub stdfigrad roundbox % gsave showboxgrays {grayshade}{1} ifelse setgray fill grestore gsave white fill grestore % temp gray box, white top gsave newpath 0 0 moveto 0 figheight 38 sub rlineto figwidth 2 sub 0 rlineto 0 figheight 38 sub neg rlineto closepath 0.33 setgray setgray fill grestore [2 0 1 1] superstroke } if /font7 /Helvetica-Bold 9 gonzofont trystone { /cstretch 0.5 store /font7 /StoneSans-Bold 9 gonzofont} if showtitle {white figwidth 2 div figheight 31 sub font7 figname cc black} if /bw figwidth def /bt figheight def /bl 0 def /bb 0 def /bc figwidth 2 div def /xpos 20 def /ypos bt 20 sub def /cstretch 0 def /sstretch 0 def /lastlinestretch 0 def /pmrun 0 def /ypara 0 def /linestring linestring2 def % needed to run interference 3 1 roll translate dup scale mark figproc cvx exec cleartomark stdsnap restore justx 4 jsave put } def % Here is the master document control matrix. It is manual in this example % Note that the result of internal calcs are ORDINARY NUMBERS. Note also % that you make room for figures by adding or subtracting only where and % as needed. /docmatrix [ [ { } { } { } ] % initial document files [ [{leftfooter} {fullheader} {cm1 cmt bh1 sub titleblock} {rl1 rlb rlt bh1 sub yinc 2 mul sub rwd vrule} % {pull1 stdpull} ] % page one figures and control % no stdpull this time % [ cm1 cmt bh1 sub pull1top txw] % column1 xpos ypos ylimit txtwide % [ cm1 pull1leftset] % [ cm1 pull1bot cmb txw] % [ cm2 cmt bh1 sub pull1top txw] % column2 xpos ypos ylimit txtwide % [ cm2 pull1rightset] % [ cm2 pull1bot cmb txw] % adjusted for double title [ cm1 cmt bh1 sub yinc 2 mul sub cmb txw] % column1 xpos ypos ylimit txtwide [ cm2 cmt bh1 sub yinc 2 mul sub cmb txw] % column2 xpos ypos ylimit txtwide ] [ [{aqua} {rightfooter} {fullheader} {rl1 rlb rlt rwd vrule} % {0 0 0.8 fig1} % {0 0 0.8 pix1} %{0 0 0.8 pix2} {rl1 rlb rlt rwd vrule} ] % page two figures and control [ cm1 cmt cmb txw] % column1 xpos ypos ylimit txtwide [ cm2 cmt cmb txw] % column2 xpos ypos ylimit txtwide ] /coladj {yinc 21 mul pop 0 add} def [ [{aqua} {leftfooter} {fullheader} % {0 -6 0.8 fig1} {rl1 rlb rlt rwd vrule} % {0 0 0.8 pix3} % {0 0 0.8 pix4} {rl1 rlb rlt rwd vrule} ] % page three figures and control % was f1h sub yinc sub % [ cm1 cmt f1h sub yinc sub cmb coladj txw] % column1 xpos ypos ylimit txtwide [ cm1 cmt cmb txw] [ cm2 cmt cmb txw] % column2 xpos ypos ylimit txtwide ] [ [{aqua} {rightfooter} {fullheader} {rl1 rlb rlt rwd vrule} ] % page four figures and control [ cm1 cmt cmb txw] % column1 xpos ypos ylimit txtwide [ cm2 cmt cmb txw] % column1 xpos ypos ylimit txtwide ] [ [{leftfooter} {fullheader} {rl1 rlb rlt rwd vrule} ] % page four figures and control [ cm1 cmt cmb txw] % column1 xpos ypos ylimit txtwide [ cm2 cmt cmb txw] % column1 xpos ypos ylimit txtwide ] [ [{rightfooter} {rightheader} {rl1 rlb rlt rwd vrule} ] % page five figures and control [ cm1 cmt cmb txw] % column1 xpos ypos ylimit txtwide [ cm2 cmt f2h sub yinc sub cmb txw] % column1 xpos ypos ylimit txtwide ] [ {quit} ] % final document wrapup % NOTE: will not execute with short copy! ] def /nextpage { showpage adjustpage /pagenum pagenum 1 add def docpage numpages lt { /docpage docpage 1 add def docmatrix docpage get /curpage exch def curpage length 1 sub /numpgcol exch def curpage 0 get {cvx exec} forall /curcol 1 def nextcol} {docmatrix curpage 1 add get {cvx exec} forall } ifelse } def /nextcol { curpage curcol get aload pop /txtwide exch def /ylimit exch def /ypos exch def /xpos exch def /curcol curcol 1 add def } def /colcheck { ypos ylimit le { curcol numpgcol gt {nextpage} {nextcol} ifelse} if } def /templatestartup { templatefonts font1 /gonzojust true def /rslashok true def docmatrix length /numpages exch def /docpage 1 def docmatrix 0 get {cvx exec} forall % do initial document files docmatrix docpage get /curpage exch def curpage length 1 sub /numpgcol exch def curpage 0 get {cvx exec} forall % do initial page files /curcol 1 def nextcol } def end % simpledoc template %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%% MIDNIGHT 35 TEXT STARTS HERE %%%%%%%%%%%%%%%% % //// demo - remove or alter before reuse //// % ps.util.1 begin % blurb uses my utilities % printerror % nuisance begin gonzo begin % be sure to start gonzo first! /dropindent 19 def % indent for drop cap CHANGE BELOW /pubname (Blatant |jOpportunist) def % for footers /issuename (Jan-Feb, 2002) def % for footers /titlename (Th|k|kou|kghts |j|j|jon |j|j|jRefurb) def % the title /blatnum (65) def % for blurb /pagenum 1 def % first printed page number % this can give you oversize copies for camera ready use /makeitbig false def % big is 150 percent /printbottomhalf true def % only used if 1.5 scale /adjustpage { makeitbig {landscape printbottomhalf {0 -20 translate} {0 -550 translate} ifelse 1.333 dup scale}if} def adjustpage % roundbox draws a box path with rounded corners and locks you to the % lower lefthand box corner using this format ... % -xpos- -ypos- -yheight- -cornerrad- roundbox % (this will become a part of the utilities) /roundbox {gsave /rad exch def /bt exch def /br exch def /bb exch def /bl exch def bl bb translate rad mark br 2 div 0 0 0 0 bt br bt br 0 br 2 div 0] roundpath} def %% INCLUDED FILES (blurbs, figures, pulls, rules, footers, etc..) % vrule gives a fixed vertical rule, inputting xpos ystart yend linewidth /vrule {gsave newpath setlinewidth 2 index 4 2 roll moveto exch lineto 0 setgray stroke grestore} def % hrule gives a fixed horizontal rule, inputting ypos xstart xend linewidth /hrule {gsave newpath setlinewidth 1 index 4 2 roll moveto lineto 0 setgray stroke grestore} def % titleblock straddles all three columns at top of first page % blatlogo here /blatlogo {save /blsave exch def translate 5 dup scale /cstretch .05 def /sstretch 0.7 def /font; /Revue [2.6 0 0 2.6 0 0] gonzofont /font: /Revue [5 0 0 6 0 0] gonzofont /kern -0.1 def 1 [10 0 0 0 0 9 20 9 20 0 10 0] roundpath gsave boxgrays setgray fill grestore [0.9 0 0.7 1 0.55 0] superinsidestroke gsave -0.45 0 translate 1 [25 0 20 0 20 9 30 9 30 0 25 0] roundpath gsave boxgrays setgray fill grestore [0.9 0 0.7 1 0.55 0] superinsidestroke grestore /yinc 3 def font; 10 5 (the |j|jblatant opportunist) cc font: 24.55 2 blatnum cc blsave restore } def /titleblock { save /tbsnap exch def translate /ylimit -9999 def /txtwide 1000 def 340 10 yinc 2 add % temporary upshift mul 3 add blatlogo /cstretch 0.2 def /sstretch 0.2 def /font1 /Helvetica-Bold 11 gonzofont trystone {/font1 /StoneSans-Bold 11 gonzofont} if font1 412 102 yinc 2 mul add % temp upshift 5 sub (by Don Lancaster) cc /cstretch 0.05 def /sstretch 0.05 def /font2 /Helvetica-Bold 47 gonzofont trystone {/font2 /StoneSans-Bold [43.6 0 0 45 0 0] gonzofont} if /yinc 50 def % temp for two %%% 0 87 18 sub 22 sub % 24 add % temp shift two lines 0 87 18 sub 22 sub % 24 add % temp shift two lines when active titlename cl tbsnap restore } def % mergestr is a tool useful for page numbers; evenutally it will go % into the nuisance dictionary /mergestr {2 copy length exch length add string dup dup 4 3 roll 4 index length exch putinterval 3 1 roll exch 0 exch putinterval} def % fullheader is stripe across top. /fullheader {save /hdrsnap exch def cml cmt 21 add moveto 2 setlinewidth hdw 0 rlineto stroke hdrsnap restore} def % leftheader is left column stripe /leftheader {save /hdrsnap exch def cml cmt 21 add moveto 2 setlinewidth txw 0 rlineto stroke hdrsnap restore} def % rightheader is right column stripe /rightheader {save /hdrsnap exch def cml hdw add cmt 21 add moveto 2 setlinewidth txw neg 0 rlineto stroke hdrsnap restore} def % left footer has left, center, and right elements for the left pages /leftfooter {save /footsnap exch def /colcheck {} def font7 hdc cmb fdp sub pubname cc hdl cmb fdp sub issuename cl hdr cmb fdp sub pagenum ( ) cvs cr footsnap restore} def % right footer does the same for right pages; headers would work the same /rightfooter {save /footsnap exch def /colcheck {} def font7 hdc cmb fdp sub (Blatant |jOpportunist) cc hdr cmb fdp sub issuename cr hdl cmb fdp sub pagenum ( ) cvs cl footsnap restore} def % this is a simple horizontal rule that tracks text position ... /Zmacro {xpos ypos 2 add xpos txw add 4 add 0.5 hrule} def %%%%%%%%%%%%%% FIGURES START HERE %%%%%%%%%%%%%%%%%%%%% /figure1 { /title ( ) def /figscale 0.8 def % makes position size independent /cstretch 0.1 def /sstretch 0.1 def /font2{/Helvetica-Bold findfont [9 0 0 9 0 0 ] makefont setfont}def /font7 {/Helvetica-Bold findfont [6 0 0 6 0 0] makefont setfont} def /font8 {/Helvetica findfont [8 0 0 8 0 0] makefont setfont} def font2 bc bt 25 sub 2 add % ( ) % use stdfig title below instead ( ) cc /amacro {/ypos ypos squash add def} def /bmacro {/yhold ypos def /ypos ytopoflist def /xpos xpos columnspacing add def /ypos ypos yinc add def} def /squash 0.8 def % default /squash -2.5 def /yinc 9 def /colspacing 85 def /font7 {/Helvetica findfont [8 0 0 8 0 0] makefont setfont} def /font8 {/Helvetica-Bold findfont [8 0 0 8 0 0] makefont setfont} def /font1 {/Helvetica findfont [8 0 0 8 0 0] makefont setfont} def % bee patch /font2 {/Helvetica-Bold findfont [8 0 0 8 0 0] makefont setfont} def /xpos bl 28 add def /ypos bt 52 sub def /ytopoflist ypos figscale div def /columnspacing 116 def xpos figscale div ypos figscale div % (|8Adobe Acrobat|7 % 1585 Charleston Rd % Mountain View CA 94039 % (800) 833-6687 % |a % ) cl (|2Adobe Acrobat System|1 1585 Charleston Rd Mountain View CA 94039 (800) 833-6687 |/surl |2www.adobe.com|1|/adobe |a |2Arcata ImageViewer|1 600 F Street Arcata CA 95521 (800) 822-9085 |/surl |2www.arcatapet.com|/arcatapet |a |2Auction Advisory|1 Box 61104 Phoenix 85082 (602) 994-4512 |/surl |2www.auctionadvisory.com|/auctionadvmag |a |2eBay|1 2005 Hamilton Ave, Ste 350 San Jose CA 95125 |/surl |2www.ebay.com|1|/ebay |a |2eBay Magazine|1 700 E. State St. Iola, WI 54990 (715) 445-4087 |/surl |2http://www.krause.com|/ebaymag |b |2 Ipswitch, Inc |1 81 Hartwell Ave Lexington MA 02421 (781) 676-5700 |/surl |2http://www.ipswitch.com|/ipswitch |a |2Levy-Latham|1 6263 N. Scottsdale Rd #371 Scottsdale, Arizona 85250 (480) 367-1100 |/surl |2http://www.levylatham.com|/levylat |a |2Synergetics|1 Box 809 Thatcher AZ 85552 (928) 428-4073 |/surl |2www.tinaja.com|1|/tinaja |a |2Test Equipment Connection|1 525 Technology Park Lake Mary FL 32746 (800) 615-8378 |/surl |2www.4testequipment.com|/tec |a |2WebTrends|1 621 SW Morrison #1025 Portland OR 97205 (502) 294-7025 |/surl |2www.webtrends.com|1|/webtrends |a )cl /font9 {/Helvetica findfont [9 0 0 9 0 0] makefont setfont} def font9 % /yinc 14 def /yinc yinc 1.9 add def % temp adjust /up3 {/ypos ypos -7 add store} def % gsave % xpos 108 add 69 sub ytopoflist 187 sub 15 add mt 135 pr 93 pd % 135 pl closepath grayshade 0.10 sub setgray fill grestore % xpos 108 add ytopoflist 187 sub % (|8RECOMMENDED WEB SITES % |h|7|/up3 % |/surl www.amazon.com|/amazon % |/surl www.keynet.net/~lindsay|/lindsay % |/surl www.patent.womplex.ibm.com|/patent.womplex.ibm % |/surl www.tinaja.com/patnt01.html|/patnt01 % |/surl www.mediafinder.com|/mediafinder % ) cc {{ /tabs [75] def (|7address finder |/surl |t|8bigfoot.com |/bigfoot |7address finder |/surl |t|8www.drebes.com|/drebes |7address finder |/surl |t|8www.infospace.com |/infospace |7address finder |/surl |t|8www.whowhere.com |/whowhere |7book locator |/surl |t|8www.tinaja.com/amlink01.html|/amlink01 |7consulting net |/surl |t|8net www.tinaja.com/consul01.html|/consul01 |h |7electronic data |/surl |t|8www.tinaja.com/eeweb01.html|/eeweb01 |7ezine & zines |/surl |t|8www.factsheet5.com|/factsheet5 |7ezine directory |/surl |t|8www.meer.net/~johnl/e-zine-list|/meer |7ezine directory |/surl |t|8www.dominis.com/Zines|/dominis |7ezine directory |/surl |t|8www.edoc.com/ejurnal|/ejournal |7faq library |/surl |t|8www.faqlib.com|/faq |h |7infopacks |/surl |t|8www.tinaja.com/info1.html|/info01 |7manufacturers |/surl |t|8www.thomasregister.com|/thomas |7maps |/surl |t|8www.mapquest.com/map|/mapquest |7newsgroup finder |/surl |t|8www.tinaja.com/text/newslist.html|/newslist |7newsletter index |/surl |t|8www.NeoSoft.com/internet/paml|/paml |7newsgroup search |/surl |t|8web3.dejanews.com|/deja |h |7search tutorials |/surl |t|8www.searchenginewatch.com|/watch |7search engine |/surl |t|8www.altavista.digital.com|/alta |7search engine |/surl |t|8www.hotbot.com|/hotbot |7search engine |/surl |t|8www.inference.com/infind|/infer |7search engine |/surl |t|8www.wp.com/resch/search.htm|/wpsearch |7patent stash |/surl |t|8patent.womplex.ibm.com|/patent |h |7patents |/surl |t|8www.tinaja.com/patnt01.html|/patnt01 |7phone numbers |/surl |t|8www.lookupusa.com|/lookup |7phone numbers |/surl |t|8www.switchboard.com|/switchboard |7resource help |/surl |t|8www.tinaja.com/resbn01.html|/resbn01 |7technical info |/surl |t|8techweb.cmp.com/eet|/techweb |7tech info |/surl |t|8news:sci.electronics.design|/scieldes |h |7techical info |/surl |t|8www.questlink.com|/quest |7technical ventures |/surl |t|8www.tinaja.com/ismm01.html |/ismm01 |7toll free phones |/surl |t|8att.net/dir800|/bell800 |7trade journals |/surl |t|8www.mediafinder.com|/oxbridge |7useful web links |/surl |t|8www.tinaja.com/webwb01.html|/webwb01 |7zip code info |/surl |t|8www.usps.gov/ncsc|/zipcode ) cl }} pop } def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /figure2 {save /f1snap exch def f1snap restore} def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /figure3 {save /f1snap exch def f1snap restore} def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /adjpix {-16 1 translate 0.835 dup scale} def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /picture1 {save /f1psnap exch def adjpix /ylimit -9999 def /colbot -9999 def /ybot -9999 def /showpage {} def (E:\\Medocs-E\\Blat\\steplock\\pixn24.psl) run f1psnap restore} def /picture2 {save /f2psnap exch def adjpix /ylimit -9999 def /colbot -9999 def /ybot -9999 def /showpage {} def (E:\\Medocs-E\\Blat\\steplock\\pixe24.psl) run f2psnap restore} def /picture4 {save /f4psnap exch def adjpix /ylimit -9999 def /colbot -9999 def /ybot -9999 def /showpage {} def (E:\\Medocs-E\\Blat\\steplock\\pixd24.psl) run f4psnap restore} def /picture3 {save /f3psnap exch def adjpix /ylimit -9999 def /colbot -9999 def /ybot -9999 def /showpage {} def (E:\\Medocs-E\\Blat\\steplock\\pixp24.psl) run f3psnap restore} def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /sidebar1 {} def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % This is a titling and tracking box used for the figures.. /ttheight 20 yinc mul def /ttwidth 240 def /ttrad 3 def /ttbox {/ttmsg exch def /ylimit -9999 def /colbot -9999 def /ybot -9999 def xpos txtwide ttwidth sub 2 div add ypos ttheight sub 2 add 10 setgrid 0 ttheight 10 div 1.5 sub 0.5 sub moveto ttwidth 10 div 0 rlineto 0 0 ttwidth 10 div ttheight 10 div ttrad 10 div roundbox gsave 0.33 setgray fill grestore % temp whitebox, gray top gsave newpath 0 0 moveto 0 ttheight 10 div 1.5 sub 0.5 sub rlineto ttwidth 10 div 0 rlineto 0 ttheight 10 div 1.5 sub 0.5 sub neg rlineto closepath white fill grestore [0.2 0 0.1 1] superstroke % 14 8 showgrid /cstretch 0.02 def /sstretch 0.02 def /font1 /Helvetica-Bold 0.85 gonzofont font1 white ttwidth 10 div 2 div ttheight 10 div 1.3 sub ttmsg cc black } def /makeroom {/ypos ypos ttheight sub yinc 0 mul sub def} def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /twobrain.cut {save /cutsnap exch def % name of textfile: PostScript to flutterwumper interface % ............................ electronics begin (POSTSCRIPT DRIVEN FLUTTERWUMPER) ttbox % bl -10 add bb -60 add 10 setgrid % 30 40 showgrid -0.5 -4.6 translate 0.75 dup scale /cstretch 0.015 def /sstretch 0.07 def /font1 /Helvetica 0.85 gonzofont /font2 /Helvetica-Bold 0.75 gonzofont % bold /font3 /Helvetica 0.75 gonzofont /yinc 0.85 def gsave 10 20 translate line1 5 6 mt 11 r [{5 5 mt 1 u} 0.5 23] xrpt line2 5 5 mt 5 u 11 r 5 d 11 l 1.5 [14 8 4 8 4 11 14 11] roundpath closepath gsave white fill grestore stroke font1 10.5 6.8 (PostScript laser printer) cc grestore %%%%%%%%%%%%%%%%%%% % stamp box gsave 0 2 translate line2 4 15.5 mt 4 r 4.5 u 4 l 4.5 d font1 6 18 (PIC Micro) cc grestore %%%%%%%%%%%%%%%%%%% % lasercomm line1 15 27.35 mt 10 l 2.15 d 6.5 r 4.2 d 3.5 l 4.5 26.7 mt darrow 15 27.6 mt 10.5 l 3.8 d 6.5 r 2.3 d 3 l 5 26.7 mt uarrow /box2.54 {gsave translate line1 0 0 mt 2.5 u 4 r 2.5 d 4 l grestore} def % flutter %%%%%%%%%%%% gsave 0 -5 translate line2 13 13 mt 13.5 u 15 r 13.5 d 15 l line1 8 25.5 mt 3 r 0.75 d 3 rx 8 25 mt 2.5 r 1.25 d 3.5 rx 8 24.5 mt 2 r 2.75 d 4 rx 8 24 mt 1.5 r 3.25 d 4.5 rx 8 23.5 mt 1 r 5.25 d 5 rx 8 23 mt 0.5 r 7.75 d 5.5 rx 11.4 15.25 mt larrow 12.3 18.25 mt rarrow 12.3 20.75 mt rarrow 12.3 21.75 mt rarrow 12.3 23.75 mt rarrow 12.3 24.75 mt rarrow [{14 14 box2.54} 3 4] yrpt font3 16 24.5 (x-axis stepper) cc 16 21.5(y-axis stepper) cc 16 18.5 (pen up/down) cc 16 15.5 (home sensor) cc /yinc 1.1 def /kern 0.1 def font1 23 24.6 (Custom vinyl cutter, wood|j routing, milling|k|k machine, animation stand, awards engraver, embroidery|j|j setup, circuit|j board|j drilling, Santa|k Claus|k machine, etc. etc. etc\274) cc grestore %%%%%%%%%%%% font3 8 13.8 11.7 add (task feedback) cc 8 12.3 11.8 add (task commands) cc 12.7 26.5 (serial port) cc font1 20.5 22.2 (HOMEBREW FLUTTERWUMPER) cc cutsnap restore makeroom } def %%%%%%%%%%%%%%%%%%%%%%%%%%%%% /schmidtcut {save /cutsnap exch def cutsnap restore makeroom } def %%%%%%%%%%%%%%%%%%%%%%%%%%%% /vortexcut {save /cutsnap exch def cutsnap restore makeroom } def %%%%%%%%%%%%%%%%%%%%%%%%%%%% /hposccut {save /cutsnap exch def cutsnap restore makeroom } def %%%%%%%%%%%%%%%%%%%%%%%%%%%% /duracellcut {save /cutsnap exch def cutsnap restore makeroom } def %%%%%%%%%%%%%%%%%%%%%%%%%%%% /ne2cut {save /cutsnap exch def cutsnap restore makeroom } def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /f1name (SOME |j|jMENTIONED |j|jRESOURCES) def /f2name (A |j|jTYPICAL |j|jTRAM |j|jTOWER) def /f3name (THE |j|jTRAM |j|jCAR |j|jOR |j|j"CARRIER") def /s1name (No name used) def /pix1name { } def % for steplock /pix2name { } def /pix3name { } def /pix4name { } def %% patches for internet %%%% %%%%% TEMPORARY TINTER %%%% makes gray a blue tint error under .11 setgray /setgray {/gvalue exch store % .12360 = .11/.89 gvalue 0 eq {0 0 0 setrgbcolor} if gvalue 1 eq {1 1 1 setrgbcolor} if gvalue 0 gt gvalue 1 lt and {gvalue 1 gvalue sub 0.12360 mul sub dup 1 setrgbcolor} if } bind def %%%%%%%%%%%% BLAT WEB PATCHES %%%%%%%%%% % Beige tinter /setgray {dup 0.731 ge { 1 exch dup .41 mul .30 sub .11 div setrgbcolor} {.856 div dup 1.155 mul exch 1.155 div 0 setrgbcolor} ifelse} def /showgrays true store /boxgrays 0.94 def /leftfooter {save /footsnap exch def /colcheck {} def /font7 /Helvetica-Bold 9.5 gonzofont font7 trystone { /font7 /StoneSans-Bold 8.5 gonzofont} if font7 hdc cmb fdp sub pubname cc hdl cmb fdp sub issuename cl hdr cmb fdp sub blatnum (.) mergestr pagenum ( ) cvs mergestr cr /txtwide 1000 store /font3 /Helvetica 4.5 gonzofont font3 hdc cmb fdp sub 14 sub (Copyright c 2000 by Don Lancaster and Synergetics (928) 428-4073 www.tinaja.com \ All commercial rights and all electronic media rights fully reserved.) cc footsnap restore} def % right footer does the same for right pages; headers would work the same /rightfooter {save /footsnap exch def /colcheck {} def /font7 /Helvetica-Bold 9.5 gonzofont trystone { /font7 /StoneSans-Bold 8.5 gonzofont} if font7 hdc cmb fdp sub (Blatant |jOpportunist) cc hdr cmb fdp sub issuename cr hdl cmb fdp sub blatnum (.) mergestr pagenum ( ) cvs mergestr cl /txtwide 1000 store /font3 /Helvetica 4.5 gonzofont font3 hdc cmb fdp sub 14 sub (Copyright c 2000 by Don Lancaster and Synergetics (928) 428-4073 \ www.tinaja.com \ All commercial rights and all electronic media rights fully reserved.) cc footsnap restore} def % blatlogo here /blatlogo {save /blsave exch def translate 5 dup scale /cstretch .05 def /sstretch 0.7 def /font; /Revue [2.6 0 0 2.6 0 0] gonzofont /font: /Revue [5 0 0 6 0 0] gonzofont /kern -0.1 def 1 [10 0 0 0 0 9 20 9 20 0 10 0] roundpath gsave boxgrays setgray fill grestore [0.9 0 0.7 1 0.55 0] superinsidestroke gsave -0.45 0 translate 1 [25 0 20 0 20 9 30 9 30 0 25 0] roundpath gsave boxgrays setgray fill grestore [0.9 0 0.7 1 0.55 0] superinsidestroke grestore /yinc 3 def font; 10 5 (the |j|jblatant opportunist) cc font: 24.55 2 blatnum cc blsave restore} def %%%%%%%%%%%%%% end blatpatch %%%% TEMPORARY Gonzo patches - makes text gray for later colorize /graytocolor 0.33 def /fornet false def /blueon {fornet {mark graytocolor /setgray cvx ] cvx % printlist only printlist exch 3 index exch put exch 1 add exch}if} def /blueoff {mark 0 /setgray cvx ] cvx % printlist only printlist exch 3 index exch put exch 1 add exch} def /staygray {graytocolor setgray} def % permanant /stayblack {0 setcolor} def % permanant %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%% Blatant opportunist patches 6.0 %%%%%%%%%%%%%%%%%% % February 17, 1997 % Place at end of "A" file just before IXE /wanttouseustify % COLORIZING BLACK AND WHITE POSTSCRIPT MODULE % ==================================== midnightdoc begin /boxgrays 0.92 def % Gonzo character colorizer /blueon {mark /blue cvx 0.33 /setgray cvx] cvx printlist exch 3 index exch put exch 1 add exch} def /blueoff {mark /aqua cvx 0 /setgray cvx] cvx printlist exch 3 index exch put exch 1 add exch} def /tinton {mark 0.33 /setgray cvx] cvx printlist exch 3 index exch put exch 1 add exch} def /tinton1 {mark 0.25 /setgray cvx] cvx printlist exch 3 index exch put exch 1 add exch} def /tinton1r {mark /red cvx 0.25 /setgray cvx] cvx printlist exch 3 index exch put exch 1 add exch} def /tinton1a {mark /aqua cvx 0.25 /setgray cvx] cvx printlist exch 3 index exch put exch 1 add exch} def /tintoff {mark 0 /setgray cvx] cvx printlist exch 3 index exch put exch 1 add exch} def /staytint {aqua 0.33 setgray} def /staytint1 {aqua 0.25 setgray} def /staytint1r {red 0.25 setgray} def /staytint1b {beige 0.25 setgray} def %%%%%%%%%%%%%% COMPACT VERSION OF COLORIZER II %%%%%%%%%%%%%%%%%%%%%% /settint {dup /currenttint exch store 5.999 mul dup floor cvi /&cbar exch store dup floor sub /&cwt exch store [ {/setgray [ /dup cvx 0.3 &cwt 0.59 mul add /ge cvx [1 /exch cvx &cwt 0.59 mul 0.30 add /sub cvx 1 &cwt sub 0.59 mul 0.11 add /div cvx /dup cvx 1 &cwt sub /mul cvx &cwt /add cvx /exch cvx ] cvx [ &cwt 0.59 mul 0.3 add /div cvx /dup cvx &cwt /mul cvx 0] cvx /ifelse cvx /setrgbcolor cvx] cvx /def cvx} {/setgray [/dup cvx 0.59 1 &cwt sub 0.3 mul add /ge cvx [1 &cwt sub 0.3 mul 0.59 add /sub cvx &cwt 0.3 mul 0.11 add /div cvx /dup cvx &cwt /mul cvx 1 &cwt sub /add cvx /exch cvx 1 /exch cvx] cvx [1 &cwt sub 0.3 mul 0.59 add /div cvx /dup cvx 1 &cwt sub /mul cvx /exch cvx 0] cvx /ifelse cvx /setrgbcolor cvx] cvx /def cvx} {/setgray [/dup cvx 0.59 &cwt 0.11 mul add /ge cvx [&cwt 0.11 mul 0.59 add /sub cvx 1 &cwt sub 0.11 mul 0.30 add /div cvx /dup cvx 1 &cwt sub /mul cvx &cwt /add cvx 1 /exch cvx] cvx [0 /exch cvx &cwt 0.11 mul 0.59 add /div cvx /dup cvx &cwt /mul cvx] cvx /ifelse cvx /setrgbcolor cvx] cvx /def cvx} {/setgray [/dup cvx 0.59 1 &cwt sub mul 0.11 add /ge cvx [1 &cwt sub 0.59 mul 0.11 add /sub cvx &cwt 0.59 mul 0.30 add /div cvx /dup cvx &cwt /mul cvx 1 &cwt sub /add cvx 1] cvx [0 /exch cvx 1 &cwt sub 0.59 mul 0.11 add /div cvx /dup cvx 1 &cwt sub /mul cvx /exch cvx] cvx /ifelse cvx /setrgbcolor cvx] cvx /def cvx} {/setgray [/dup cvx 0.11 &cwt 0.30 mul add /ge cvx[&cwt 0.30 mul 0.11 add /sub cvx 1 &cwt sub 0.30 mul 0.59 add /div cvx /dup cvx 1 &cwt sub /mul cvx &cwt /add cvx /exch cvx 1] cvx [ &cwt 0.30 mul 0.11 add /div cvx /dup cvx &cwt /mul cvx /exch cvx 0 /exch cvx ] cvx /ifelse cvx /setrgbcolor cvx ] cvx /def cvx} {/setgray [ /dup cvx 0.30 1 &cwt sub 0.11 mul add /ge cvx[ 1 /exch cvx 1 &cwt sub 0.11 mul 0.30 add /sub cvx &cwt 0.11 mul 0.59 add /div cvx /dup cvx &cwt /mul cvx 1 &cwt sub /add cvx ] cvx [ 1 &cwt sub 0.11 mul 0.30 add /div cvx /dup cvx 1 &cwt sub /mul cvx 0 /exch cvx] cvx /ifelse cvx /setrgbcolor cvx ] cvx /def cvx} ] &cbar get exec exec} bind def /beige {0.10 settint} def % examples of convenience operators /aqua {0.52 settint} def /blue {0.67 settint} def /lime {0.44 settint} def /red {0 settint} def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% aqua % normal for blat /leftfooter {save /footsnap exch def /colcheck {} def 0.33 setgray /font7 /Helvetica-Bold 9.5 gonzofont font7 trystone {/font7 /StoneSans-Bold 8.5 gonzofont} if font7 hdc cmb fdp sub pubname cc hdl cmb fdp sub issuename cl hdr cmb fdp sub blatnum (.) mergestr pagenum ( ) cvs mergestr cr /txtwide 1000 store /font3 /Helvetica 4.5 gonzofont font3 hdc cmb fdp sub 14 sub (Copyright c 2000 by Don Lancaster and Synergetics (928) 428-4073 www.tinaja.com \ All commercial rights and all electronic media rights fully reserved. Reposting expressly forbidden.) cc footsnap restore} def % right footer does the same for right pages; headers would work the same /rightfooter {save /footsnap exch def /colcheck {} def 0.33 setgray /font7 /Helvetica-Bold 9.5 gonzofont font7 trystone {/font7 /StoneSans-Bold 8.5 gonzofont} if font7 hdc cmb fdp sub (Blatant Opportunist) cc hdr cmb fdp sub issuename cr hdl cmb fdp sub blatnum (.) mergestr pagenum ( ) cvs mergestr cl /txtwide 1000 store /font3 /Helvetica 4.5 gonzofont font3 hdc cmb fdp sub 14 sub (Copyright c 2000 by Don Lancaster and Synergetics (928) 428-4073 \ www.tinaja.com \ All commercial rights and all electronic media rights fully reserved. Reposting expressly forbidden.) cc footsnap restore} def % blatlogo here /blatlogo {save /blsave exch def translate 5 dup scale /cstretch .05 def /sstretch 0.7 def /font; /Revue [2.6 0 0 2.6 0 0] gonzofont /font: /Revue [5 0 0 6 0 0] gonzofont /kern -0.1 def 1 [10 0 0 0 0 9 20 9 20 0 10 0] roundpath gsave boxgrays setgray fill grestore [0.9 0.33 0.7 1 0.55 0.33] superinsidestroke gsave -0.45 0 translate 1 [25 0 20 0 20 9 30 9 30 0 25 0] roundpath gsave boxgrays setgray fill grestore [0.9 0.33 0.7 1 0.55 0.33] superinsidestroke grestore /yinc 3 def font; 10 5 (the |j|jblatant opportunist) cc font: 24.55 2 blatnum cc blsave restore} def /titleblock { save /tbsnap exch def translate 0.33 setgray /ylimit -9999 def /txtwide 1000 def 340 10 yinc 2 add % temporary upshift mul 3 add blatlogo /cstretch 0.2 def /sstretch 0.2 def /font1 /Helvetica-Bold 11 gonzofont trystone {/font1 /StoneSans-Bold 11 gonzofont} if font1 412 102 yinc 2 mul add % temp upshift 5 sub (by Don Lancaster) cc /cstretch 0.05 def /sstretch 0.05 def /font2 /Helvetica-Bold 47 gonzofont trystone {/font2 /StoneSans-Bold [43.6 0 0 45 0 0 ] gonzofont} if font2 /yinc 50 def % temp for two %%% 0 87 18 sub 22 sub % 24 add % temp shift two lines 0 87 18 sub 22 sub % 24 add % temp shift two lines when active %% THIS ONE WORKS 2 copy /tity exch store /titx exch store % for title tamper titlename cl { %%% tamper with title % 0.75 settint titx 59 add tity 47 add (|/tinton b) cl titx 115 add tity 49 add (|/tinton gg) cl 0.87 settint 0.50 setgray 6 setlinewidth 0 setlinecap titx 58 add tity 11 add mt 28 r titx 116 add tity 11 add mt 58 r } pop tbsnap restore } def /amacro {(zy0) stringmacro /ypos ypos ypara add def 0.33 setgray } def % start drop cap /bmacro {(iFy1) stringmacro /ypos ypos ypara add def black} def % finish drop cap /vrule {gsave 0.33 setgray newpath setlinewidth 2 index 4 2 roll moveto exch lineto 0.33 setgray stroke grestore} def % hrule gives a fixed horizontal rule, inputting ypos xstart xend linewidth /hrule {gsave 0.33 setgray newpath setlinewidth 1 index 4 2 roll moveto lineto 0.33 setgray stroke grestore} def /fullheader {save /hdrsnap exch def 0.33 setgray cml cmt 21 add moveto 2 setlinewidth hdw 0 rlineto stroke hdrsnap restore} def %%%%%%%%%%%%%%%%% % grayfig two has a title box (modified for reverse) /grayfig2 { /jsave justx 4 get def save /stdsnap exch def /colcheck {} def /figproc exch def cvx /figname exch def /showtitle exch def /showborder exch def 2 add % temp for blat 25 /figheight exch def 20 sub /figwidth exch def translate showborder {1 10 add 5 10.4 figheight 33 sub moveto figwidth 0.8 sub 0 rlineto figwidth 2 sub figheight 15 sub stdfigrad roundbox % gsave showboxgrays {0.94}{0} ifelse setgray fill grestore gsave 0.33 setgray fill grestore % temp gray box, white top gsave newpath 0 0 moveto 0 figheight 38 sub rlineto figwidth 2 sub 0 rlineto 0 figheight 38 sub neg rlineto closepath grayshade setgray fill grestore [2 0 1 1] superstroke } if /font7 /Helvetica-Bold 9 gonzofont trystone {/cstretch 0.5 store /font7 /StoneSans-Bold 9 gonzofont} if font7 showtitle {white figwidth 2 div figheight 31 sub font7 figname cc black} if /bw figwidth def /bt figheight def /bl 0 def /bb 0 def /bc figwidth 2 div def /xpos 20 def /ypos bt 20 sub def /cstretch 0 def /sstretch 0 def /lastlinestretch 0 def /pmrun 0 def /ypara 0 def /linestring linestring2 def % needed to run interference 3 1 roll translate dup scale mark figproc cvx exec cleartomark stdsnap restore justx 4 jsave put } def /grayshade 0.92 def % %%%ZZZZ%%%%%%%%%%%%%% URL PATCHES %%%%%%%%%%%%%%%%%%%%%%%%%%%% % patch definitions... % dictionary method << /tektronix (http://www.tektronix.com) /agilent (http://www.agilent.com) /fluke (http://www.fluke.com) /wavetek (http://www.acterna.com) /ifr (http://www.ifrsys.com) /genrad (http://www.genrad.com) /bandk (http://www.bkprecision.com) /simpson (http://www.simpsonelectric.com) /sencore (http://www.sencore.com) /triplett (http://www.triplett.com) /eico (http://users.erols.com/fiddler.interport/EICO.HTM) /heath (http://www.heathkit-museum.com) /boatanchor (http://www.dealamerica.com/deal/cgi-bin/ads/bcads.cgi) /esi (http://www.esi.com) /tec (http://www.testequipmentconnection.com) /nsn (http://www.usainfo.com) /surplusbid (http://www.surplusbid.com) /levy (http://www.levylatham.com) /govliq (http://www.govliquidation.com) /tucker (http://www.tucker.com) /testequity (http://www.testequity.com) /mhzelectronics (http://www.mhzelectronics.com) /fairradio (http://www.fairradio.com) /google (http://www.google.com) /ng1 (news:///sci.electronics.equipment) /ng2 (news:///sci.electronics.repair) /uhaul (http://www.uhaul.com) /drmo (http://www.drms.com) /hamfest (http://www.arrl.org/hamfests.html) /auctadvisory (http://www.auctionadvisory.com) /ups (http://www.ups.com) /lambda(http://www.lambdapower.com) /collins (http://www.collinsradio.org) /porter (mailto:lporter1@flash.net) /tannebaum (http://www.agtannenbaum.com) /manualman (http://www.manualman.com) /manplus (http://www.manualsplus.com) /nist (http://www.nist.gov) /rochester (http://www.rocelec.com) /luke (http://www.lukechips.com) /eei (http://www.expediters.com) /griffiths (http://www.reprise.com/ash/clients2/default.asp) /deanek (mailto:dektyr@teleport.com) /superior (http://www.superiorelectric.com) /chipcenter (http://www.chipcenter.com) /stegan (http://www.tinaja.com/amlink01.asp) {{{ }}} pop /gamewell (http://www.gamewell.com) /bentley (http://www.bentleypublishers.com) /radioshack (http://www.radioshack.com) /barro (http://www.tinaja.com/barro.jpg) /barrox (http://www.tinaja.com/barrox.jpg) /napali (http://www.topozone.com/map.asp?z=4&n=2455469&e=436636&s=25&size=1) /eac (http://www.eac.cc.az.us) /paia (http://www.paia.com) /signetics (http://www.signetics.com) /kartchner (http://www.pr.state.az.us/parkhtml/kartchner.html) /nss (http://www.caves.org) /pulaski (http://www.wildfire-equipment.com/WildfireMain.html) /nahs (http://www.nallegheny.k12.pa.us) /asu (http://www.asu.edu) /stats (http://www.tinaja.com/users/month.htm) /ti (http://www.ti.com) /lehigh (http://www.lehigh.edu) /allen (http://www.allenorgan.com) /lafayette (http://www.lafayette.edu) /bostcomp (http://www.tcm.org) /dvorak (http://www.dvorak.org) /buhl (http://www.planetarium.cc) /whole (http://www.wholeearthmag.com) /active(http://www.amazon.com/exec/obidos/ISBN=075062986X/donlancastersgurA) /enhance1(http://www.amazon.com/exec/obidos/ISBN=0672218224/donlancastersgurA) /cheap1(http://www.amazon.com/exec/obidos/ISBN=0672215241/donlancastersgurA) /cheap(http://www.amazon.com/exec/obidos/ISBN=0672215241/donlancastersgurA) /soncheap(http://www.amazon.com/exec/obidos/ISBN=0672217236/donlancastersgurA) /tvt(http://www.amazon.com/exec/obidos/ISBN=0672213133/donlancastersgurA) /micro1(http://www.amazon.com/exec/obidos/ISBN=0672218283/donlancastersgurA) /applewriter(http://www.amazon.com/exec/obidos/ISBN=0672224607/donlancastersgurA) /assy(http://www.amazon.com/exec/obidos/ISBN=0672223317/donlancastersgurA) /enhance1(http://www.amazon.com/exec/obidos/ISBN=0672218224/donlancastersgurA) /ttl(http://www.amazon.com/exec/obidos/ISBN=0672210355/donlancastersgurA) /cmos(http://www.amazon.com/exec/obidos/ISBN=0750699434/donlancastersgurA) /active(http://www.amazon.com/exec/obidos/ISBN=075062986X/donlancastersgurA) /rtl(http://www.amazon.com/exec/obidos/ISBN=067220715X/donlancastersgurA) /ismm(http://www.amazon.com/exec/obidos/ISBN=1882193652/donlancastersgurA) /smallbeaut(http://www.amazon.com/exec/obidos/ISBN=0881791695/donlancastersgurA) /fuller(http://www.amazon.com/exec/obidos/ISBN=0020653204/donlancastersgurA) /wqed (http://www.wqed.org) /pannier (http://www.pannier.com) /carnegie (http://www.cmu.edu) /ccell (http://www.circuitcellar.com/guru) /ebay (http://cgi6.ebay.com/aw-cgi/eBayISAPI.dll?ViewListedItems&userid=abeja&include=0&since=-1&sort=2) /stats (http://www.tinaja.com/users/month.htm) /drhtml (http://www2.imagiware.com/RxHTML) /ourfav (http://www.tinaja.com/favicon.ico) /favicon (http://www.favicon.com) /mostpop (http://www.tinaja.com/#sampler) /banndata (http://www.tinaja.com/banners/banndatax.txt) /deja (http://groups.google.com) /colors (http://www.htmlhelp.com/icon/hexchart.gif) /w3org (http://www.w3.org/Graphics/SVG/Overview.htm8) /iisplugin (http://www.adobe.com/support/downloads/8122.htm) /ngjava (news://comp.lang.javascript) /iis (news://microsoft.public.inet.server.iis) /auctbut (http://cgi6.ebay.com/aw-cgi/ebayISAPI.dll?ViewListedItemsLinkBUttons&userid=abeja) /drmobut (http://www.drms.dla.mil/newsales/html/drms_property.html#placeabid) /adobe (http://www.adobe.com) /arcatapet (http://www.arcatapet.com) /auctionadvmag (http://www.auctionadvisory.com) /ebay (http://www.ebay.com) /ebaymag (http://www.krause.com) /ipswitch (http://www.ipswitch.com) /levylat (http://www.levylatham.com) /tec (http://www.4testequipment.com) /webtrends (http://www.webtrends.com) /imag1 (http://www.tinaja.com/images/bargs/lumin1.jpg) /imag2 (http://www.tinaja.com/images/bargs/thermoc1.jpg) /imag3 (http://www.tinaja.com/images/bargs/noisegn1.jpg) /imag4 (http://www.tinaja.com/images/bargs/casio1.jpg) /imag5 (http://www.tinaja.com/images/bargs/punchdn1.jpg) /deja (http;//2www.dejanews.com/home_ps.shtnl) /whois (http://2www.dejanews.com/home_ps.shtnl) /whowhere (http://www.whowhere.com) /bigfoot (http://www.bigfoot.com) /infospace (http://www.infospace.com) /mapquest (http://www.mapquest.com) /mapsonus (http://www.MapsOnUs.com) /aerial (http://terraserver.microsoft.com) /postvect (http://www.tinaja.com/psutils/postvect) /levyl (http://www.levylatham.com) /auct (http://www.auctionadvisory.com) /ebay (http://www.ebay.com) /teconn (http://www.4testequipment.com) /keely (http://www.keelynet.com) /oxbridge (http://www.mediafinder.com) /arrl (http://www.arrl.com/field/hamfests) /vartel(http://www.vartel.com/hamfest.htm) /sww (http://www.auctionsww.com/results/surplus.htm) /onsale(http://www.onsale.com) /ng1 (news:///sci.electronics.equipment) /ng2 (news:///sci.electronics.repair) /drms1 (http://www.drms.com/catalog/Catsite.html) /drms2 (http://www.drms.dla.mil/national/abstracts/indexabt.html) /drms3 (http://www.drms.dla.mil/newsales/html/bid_results.html) /drms4 (http://www.drms.dla.mil/htbin/drmsrch?Z11=0) /drms5 (http://www.drms.dla.mil/) /uwb (http://www.uwb.org) /ulab (http://commsci.usc.edu/ulab/links.html) /timed (http://www.time-domain.com) /boston (http://cuprum.chem.umn.edu/boston98.html) /eecs (http://www-eecs.mit.edu/AY96-97/events/19.html) /questlink(http://www.questlink.com) /nts (http://www.nts.mh.se/~johma/psd) /whidbey (http://ww2.whidbey.net/optoinfo/LED_FAQ.html) /spie (http://www.spie.org) /bap (http://positron.aps.org/BAPSMAR98/abs/S1690007.html) /aachen (http://www.rwth-aachen.de/isea/Ww/texte/abstract/ka_vrla.html) /tefbbs (http://www.tefbbs.com/spacetime/index.htm) /dnai (http://www.dnai.com/~jfox) /forum (http://www.dejanews.com/group/dejanews.members.tech.tinaja.gurus-lair) /xx1 (http://www.tinaja.com/glib/bannyear.pdf) /xx2 (http://www.tinaja.com/glib/bwhistle.pdf) /xx3 (http://www.tinaja.com/psutils/graburls.ps) /xx4 (http://www.tinaja.com/text/reflog1.html) /xx5 (http://www.tinaja.com/text/refsum1.html) /xx6 (http://www.tinaja.com/glib/muse116.pdf) /xx7 (http://www.tinaja.com/glib/muse124.pdf) /xx8 (http://www.tinaja.com/glib/pdflink.pdf) /xx9 (http://www.tinaja.com/glib/weaveweb.pdf) /xx10 (http://www.tinaja.com/psutils/weberru2.ps) /xx11 (http://www.tinaja.com/psutils/weblogu2.ps) /xx12 (http://www.tinaja.com/psutils/websitan.ps) >> {mark exch/eurl cvx ] cvx def} forall /specialpj {(http://www.tinaja.com/glib/picojust.pdf) eurl} def % picojust not allowed as gonzo variagle /maildon {(mailto:don@tinaja.com) eurl } def /tinaja {(http://www.tinaja.com) eurl } def /consult {(http://www.tinaja.com/consul01.html) eurl} def /netscape {(http://www.netscape.com) eurl } def /adobe {(http://www.adobe.com) eurl } def /parallax {(http://www.parallaxinc.com) eurl } def /coriolis {(http://www.coriolis.com) eurl } def /hottalk {(mailto:hottalk@printer-net) eurl } def /adobe1 {(http://www.adobe.com/supportservices/devrelations/technotes.html) eurl} def /tn5150 {( http://www.adobe.com/suportservice/devrelations/PDFS/TN5150.PDFMARK.PDF) eurl} def /gonzo {(http://www.tinaja.com/psutils/gonzo.ps) eurl} def /muse {(http://www.tinaja.com/muse01.html) eurl} def /m135p {(http://www.tinaja.com/glib/muse135.psl) eurl} def /graburls {(http://www.tinaja.com/psutils/graburls.ps) eurl} def /linkpdf {(http://www.tinaja.com/linkpdf1.html) eurl} def /rxhtml {(http://www2.imagiware.com/RxHTML) eurl} def /n1 {(news://sci.electronics.design) eurl} def /n2 {(news://sci.electronics.misc) eurl} def /hotbot {(http://www.hotbot.com) eurl} def /alta {(http://www.digital.altavista.com) eurl} def /xp {(www.dejanews.com/rg_mkgrp.xp) eurl} def /ifilter {(http://www.adobe.com/prodindex/acrobat/ifilter.html)eurl} def /srchpdf {(http://www.tinaja.com/text/srchpdf.html) eurl} def /redirect {(http://www.tinaja.com/text/redirect.html) eurl} def /hack73 {(http://www.tinaja.com/glib/hack73.pdf) eurl} def /hacklib {(http://www.tinaja.com/hack01.html) eurl} def /magic {(http://www.tinaja.com/magsin01.html) eurl} def /fourier {(http://www.tinaja.com/psutils/fourier.ps) eurl} def /zeroharm {(http://www.tinaja.com/psutils/zeroharm.ps) eurl} def /sincat210 {(http://www.tinaja.com/sn210cat.ps) eurl} def % power method... yyyyyyyyy /setglib {mark (http://www.tinaja.com/glib/) 2 index 20 string cvs mergestr (.pdf) mergestr /eurl cvx ] cvx def} def /setpost {mark (http://www.tinaja.com/psutils/) 2 index 20 string cvs mergestr (.ps) mergestr /eurl cvx ] cvx def} def /sethtml {mark (http://www.tinaja.com/) 2 index 20 string cvs mergestr (.asp) mergestr /eurl cvx ] cvx def} def /setweb {mark (http://www.) 2 index 20 string cvs mergestr (.com) mergestr /eurl cvx ] cvx def} def /magicsin {/msinprop} def /parallax {/parallaxinc} def [ /when2pat /patnthor /msinprop /magicsin /nuts08 /hack35 /gramtram /muse116 /nonlingr /myebays /ebayphen /hack84 /muse112 /muse113 /colorizd2 /spotcolr /urlindoc /emergop1 /emergop5 /resbn63 /muse135 /muse120 /muse131 /resbn88 /contests /muse115 /muse137 /infopack /hack64 /hack68 /resbn37 /resbn18 /stezine /ebayphen /resbn26 /hack47 /hack68 /hack60 /hack69 /newsgrp /bwhistle /elesimp /resbn80 /resbn91 /resbn82 /resbn73 /resbn87 /imagimag /muse90 /muse151 /waywere /imagimag /hack71 /hack73 /hack76 /resbn19 /acrocat /twenty47 /muse139 /muse115 /muse116 /bannyear /advetorl /resbn81 /infopack /postjust ] {setglib} forall [ /magsn01 /patnt01 /blat01 /h2gas01 /capvid01 /whtnu01 /auct01 /ismm01 /bod01 /synlib01 /muse01 /pseudo01 /post01 /libry01 /consul01 /weblib01 /patnt01 /post01 /info01 /acrob01 /b /advt01 /info01 /dntkwb01 /beewb01 /hack01 /flut01 /webwb01 /tinaja /barg01 /blat01 /barg01 /hack01 /linkpdf1 /psweb01 /amlink01 /resbn01 /blat01 /webwb01 /amlink01 /map01 /guru01 /tinaja01 ] {sethtml} forall % now asp [/colorizd2 /websitan /acatdata /catwords /coloriz2 /catools1] {setpost} forall [ /parallaxinc /mediafinder /hotbot /patent.womplex.ibm /amazon /digital.altavista ] {setweb} forall /lindsay {(http://www.keynet.net/~lindsay) eurl} def /resch {(http://www.wp.com/resch/search.html) eurl} def /redirect {(http://www.tinaja.com/text/redirect.html) eurl} def /websitan {(http://www.tinaja.com/psutils/websitan.ps) eurl} def /bannlast {(http://www.tinaja.com/text/bannlast.html) eurl} def /byternge {(http://www.tinaja.com/text/byternge.html) eurl} def %%%%%% << /billb (http://www.eskimo.com~billb) /billbfe (http://www.eskimo.com/~bilb/freenrgl/fnrg) /randi (http://www.randi.org/jr/pigasus.html) /skeptic (http://www.csicop.org) >> {mark exch /eurl cvx ] cvx def} forall /bigfoot {(http://www.bigfoot.com) eurl} def /drebes {(http://www.drebes.com) eurl} def /infospace {(http://www.infospace.com) eurl} def /factsheet5 {(http://www.factsheet5.com) eurl} def /watch {(http://www.searchenginewatch.com) eurl} def /scieldes {(news:sci.electronics.design) eurl} def /quest {(http://www.questlink.com) eurl} def /acronews {(news:comp.text.pdf) eurl} def /acroread {(http://www.adobe.com/prodindex/acrobat/readstep.html) eurl} def /alta {(http://www.altavista.digital.com) eurl} def /dominis {(http://www.dominis.com/Zines) eurl} def /ejournal {(http://www.edoc.com/ejournal) eurl} def /parallax {(http://www.parallaxinc.com) eurl} def /homeart {(http://www.homearts.com/affil/ahi/main/ahihome.htm) eurl} def /amazon {(http://www.amazon.com) eurl} def /meer {(http://www.meer.net/~johnl/e-zine-list) eurl} def /scweb01 {(http://www.tinaja.com/scweb01.html) eurl} def /blackrange {(http://www.zianet.com/blackrange/lodge.html) eurl} def /blond {(http://www.winn.com/pwinn/humor/index/html) eurl} def /trader {(http://www.traderonline.com) eurl} def /cowmoo {(http://www.qtm.net/~geibdan/framest.html) eurl} def /subgen {(http://sunsite/unc.edu/subegnius) eurl} def /c2000 {(http://www.classifieds2000.com) eurl} def /dilbert {(http://www.unitedmedia.com/comics/dilbert) eurl} def /tinaja {(http://www.tinaja.com) eurl} def /medweb {(http://www.gen.emory.edu/medweb) eurl} def /factsheet {(http://www.well.com/conf/f5/f5index2.html) eurl} def /fmfind {(http://wmbr.mit.edu/stations/locate.html) eurl} def /four11 {(http://www.Four11.com) eurl} def /freecat {(http://catalog.savvy.com) eurl} def /freenrg {(http://www.eskimo.com/~bilb/freenrg/frng) eurl} def /healthy {(http://www.healthy.net) eurl} def /bentley {(http://www.bentleysauction.com) eurl} def /eeweb01 {(http://www.tinaja.com/eeweb01.html) eurl} def /hotbot {(http://www.hotbot.com) eurl} def /infer {(http://www.inference.com/infind) eurl} def /info01 {(http://www.tinaja.com/info01.asp) eurl} def /persian {(http://www.persiankitty.com) eurl} def /ccodes {(http://www.Four11.com/cgi-bin/Four11Main?Country) eurl} def /thelist {(http://thelist.iworld.com) eurl} def /keelynet {(http://www.keelynet.com) eurl} def /jobs {(http://www.datamation.com/PlugIn/jobs/jobs.html) eurl} def /kelly {(http://www.kbb.com) eurl} def /lindsay {(http://www.keynet.net/~lindsay) eurl} def /lookup {(http://www.lookupusa.com) eurl} def /bell800 {(http://att.net/dir800) eurl} def /mapquest {(http://www.mapquest.com) eurl} def /faq {(http://www.faqlib.com) eurl} def /pic500 {(http://www.tinaja.com/pic500) eurl} def /wpsearch {(http://www.wp.com/resch/search.htm) eurl} def /microchip {(http://www.microchip.com) eurl} def /mohotta {(http://www.mohotta.com) eurl} def /acrob01 {(http://www.tinaja.com/acrob01.asp) eurl} def /movie {(http://us.imdb.com) eurl} def /booksol {(http://www.cs.cmu.edu/books.html) eurl} def /oxbridge {(http://www.mediafinder.com) eurl} def /paml {(http://www.NeoSoft.com/internet/paml/byname.html) eurl} def /patent {(http://patent.womplex.ibm.com) eurl} def /elements {(http://www2.shef.ac.uk/~chem?web-elements) eurl} def /picup01 {(http://www.tinaja.com/picup01.html) eurl} def /yahoo {(http://www.yahoo.com/bin/top2?122.25) eurl} def /azstream {(http://wwwdaztcn.wr.usgs.gov/rt-cgi/gen_tbl_pg) eurl} def /saucer {(http://www.mcs.com/~kvg/smear.htm) eurl} def /scott {(http://www.seetron.com) eurl} def /billb {(http://www.eskimo.com/~billb) eurl} def /shepard {(http://home.att.net/~dennis.shepard) eurl} def /barg01 {(http://www.tinaja.com/barg01.asp) eurl} def /switchboard{(http://www.switchboard.com/) eurl} def /techweb {(http://techweb.cmp.com/eet/docs) eurl} def /govsurp {(http://131.87.1.51) eurl} def /zipcode {(http://www.usps.gov/ncsc) eurl} def /vanagon {(mailto:Vanagon@gerry.sdsc.edu) eurl} def /wsrn {(http://wsrn.com) eurl} def /launch {(http://www2com.com/~upfront/launch) eurl} def /webann {(http://www.ep.com/faq/webannounce.html) eurl} def /whois {(http://www.internic.net/cgi-bin/whois) eurl} def /internic {(http://www.internic.net) eurl} def /weblib01 {(http://www.tinaja.com/weblib01.html) eurl} def /whowhere {(http://www.whowhere.com) eurl} def /deja {(http://www.dejanews.com/home_ps.shtml) eurl} def /newslist {(http://www.tinaja.com/text/newslist.html) eurl} def /thomas {(http://www.thomasregister.com/index.html) eurl} def /selfref {(http://www.tinaja.com/glib/resbn71.pdf) eurl} def % This code locks pdfmark commands out of a PostScript printer. /pdfmark where {pop}{userdict /pdfmark /cleartomark load put} ifelse % /surl "start url" marks the beginning of a text sequence to be urled. % It also paints the text blue... /surl {mark /blue cvx 0.33 /setgray cvx % change text to blue /currentpoint cvx % remember box start /urly /exch cvx /store cvx /urlx /exch cvx /store cvx ] cvx % complete deferred command printlist exch 3 index exch put % stuff into gonzo printlist exch 1 add exch % increment gonzo list count } def % /eurl "end url" unmarks the end of a text sequence and sets up % the pdfmark needed to define the Acrobat web link. /eurl {mark % start deferred proc exch % position url string /aqua cvx 0 /setgray cvx % turn blue marker off /makeurl cvx % defer call of url builder ] cvx % complete deferred proc printlist exch 3 index exch % stuff into gonzo printlist put exch 1 add exch % increment gonzo list count } def % /makeurl generates the pdfmark, receiving a {(urlstring) makeurl}. % Note that it is not called until formatted printlist time... /urlover 0.2 def % fraction of hot area over bounds /makeurl { /cururlname exch store % save the url string mark % start pdfmark currentfont /ScaleMatrix get 3 get /fsize exch store % guess height /Rect [ urlx fsize urlover mul sub % set box left x urly fsize urlover mul sub % set box left y currentpoint exch fsize urlover mul add exch fsize add ] /Border [ 0 0 0] % [0 0 0 ] = none; [0 0 2] = debug /Color [ .7 0 0 ] /Action <> /Subtype /Link /ANN % annotation type pdfmark % call pdf operators } def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /wanttousepicojustify true def % this globally turns picojust on or off %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% wanttousepicojustify false 40 array dictstack {/^picoset known or} forall not and { % FILL JUSTIFICATION IMPROVER version 3.0, November 3, 1994. c 1994 by % Don Lancaster & Synergetics (602) 428-4073. [support on GEnie PSRT] % Personal use premitted; All commercial & media rights fully reserved. % Install this where it will redefine all print time uses of % the -awidthshow- operator. Use picojust true or false to control. /picoflag true def % selective availability switch /picofract 0.5 def % percentage of excess space to be internalized /picothresh 0.03 def % percentage/100 increment per font change /picomax 0.15 def % percentage/100 max stretch (limits fat chars) /^picoset true def % job multiple def lockout /picojust {/picoflag exch store} def % use for local turn on or off /awidthshow {1 index 4 index 6 index add add 32 eq not picoflag not or {//awidthshow}{/^msg exch store pop /^cst exch store pop pop /^sst exch store /^cct ^msg length store /^rwd ^msg stringwidth pop store /^sct 0 ^msg {( ) search {pop pop exch 1 add exch}{pop exit} ifelse} loop store /^jwd ^cct ^cst mul ^sct ^sst mul add store /^saj ^jwd dup ^rwd add dup 0 eq {pop 0.0001} if div picothresh div floor picothresh mul picofract 1.33 mul mul dup picomax ge {pop picomax} if 1 add store gsave ^saj 1 scale /^rft 1 ^saj 1 sub ^rwd mul ^jwd dup 0 eq {pop 0.0001} if div sub ^saj div store ^sst ^rft mul 0 32 ^cst ^rft mul 0 ^msg //awidthshow grestore ^jwd ^rwd add 0 rmoveto} ifelse} bind def} if %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % /.ep0 {} def /.ep1 {} def % blat45 $650 patent %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /wanttousepicojustify false def % this globally turns picojust on or off %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% wanttousepicojustify false 40 array dictstack {/^picoset known or} forall not and { % FILL JUSTIFICATION IMPROVER version 3.0, November 3, 1994. c 1994 by % Don Lancaster & Synergetics (602) 428-4073. [support on GEnie PSRT] % Personal use premitted; All commercial & media rights fully reserved. % Install this where it will redefine all print time uses of % the -awidthshow- operator. Use picojust true or false to control. /picoflag true def % selective availability switch /picofract 0.5 def % percentage of excess space to be internalized /picothresh 0.03 def % percentage/100 increment per font change /picomax 0.15 def % percentage/100 max stretch (limits fat chars) /^picoset true def % job multiple def lockout /picojust {/picoflag exch store} def % use for local turn on or off /awidthshow {1 index 4 index 6 index add add 32 eq not picoflag not or {//awidthshow}{/^msg exch store pop /^cst exch store pop pop /^sst exch store /^cct ^msg length store /^rwd ^msg stringwidth pop store /^sct 0 ^msg {( ) search {pop pop exch 1 add exch}{pop exit} ifelse} loop store /^jwd ^cct ^cst mul ^sct ^sst mul add store /^saj ^jwd dup ^rwd add dup 0 eq {pop 0.0001} if div picothresh div floor picothresh mul picofract 1.33 mul mul dup picomax ge {pop picomax} if 1 add store gsave ^saj 1 scale /^rft 1 ^saj 1 sub ^rwd mul ^jwd dup 0 eq {pop 0.0001} if div sub ^saj div store ^sst ^rft mul 0 32 ^cst ^rft mul 0 ^msg //awidthshow grestore ^jwd ^rwd add 0 rmoveto} ifelse} bind def} if %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /activatemenu { %%%% ONLINE LINKER %%%%% %%%%% Module to insert eight pdf menu options .... % Place after |x but before last showpage % work out an HTML like PDF response /button { makeurlx % make box shaped url gsave beige % settint % 0.13 settint % try slight shift xpos ypos 0.9 sub translate 0.1 dup scale 0 0 mt 28 pu 28 pr 28 pd closepath 0.85 setgray fill 0 0 mt 0 28 pu 4 -4 rlineto 20 pd 20 pr 4 -4 rlineto closepath 0.5 setgray fill 0 28 mt 28 pr 28 pd -4 4 rlineto 20 pu 20 pl closepath 0.65 setgray fill 8 8 mt 12 pu 13 -6 rlineto closepath 0.33 setgray fill grestore xpos ypos mt } def % This code locks pdfmark commands out of a PostScript printer. /pdfmark where {pop}{userdict /pdfmark /cleartomark load put} ifelse % /surl "start url" marks the beginning of a text sequence to be urled. % It also paints the text blue... /surl {mark /blue cvx 0.33 /setgray cvx % change text to blue /currentpoint cvx % remember box start /urly /exch cvx /store cvx /urlx /exch cvx /store cvx ] cvx % complete deferred command printlist exch 3 index exch put % stuff into gonzo printlist exch 1 add exch % increment gonzo list count } def % /eurl "end url" unmarks the end of a text sequence and sets up % the pdfmark needed to define the Acrobat web link. /eurl {mark % start deferred proc exch % position url string /black cvx 0 /setgray cvx % turn blue marker off /makeurl cvx % defer call of url builder ] cvx % complete deferred proc printlist exch 3 index exch % stuff into gonzo printlist put exch 1 add exch % increment gonzo list count } def % /makeurl generates the pdfmark, receiving a {(urlstring) makeurl}. % Note that it is not called until formatted printlist time... /urlover 0.2 def % fraction of hot area over bounds /makeurl { /cururlname exch store % save the url string mark % start pdfmark currentfont /ScaleMatrix get 3 get /fsize exch store % guess height /Rect [ urlx fsize urlover mul sub % set box left x urly fsize urlover mul sub % set box left y currentpoint exch fsize urlover mul add exch fsize add ] /Border [ 0 0 0] % [0 0 0 ] = none; [0 0 2] = debug /Color [ .7 0 0 ] /Action <> /Subtype /Link /ANN % annotation type pdfmark % call pdf operators } def % /makeurlx generates the box specific pdfmark, receiving % a {(urlstring) makeurl}. % Note that it is not called until formatted printlist time... /makeurlx { /cururlnamex exch store % save the url string mark % start pdfmark /Rect [ xpos % set box left x ypos 0.9 sub % set box left y xpos 2.8 add % box right x ypos 0.9 sub 2.8 add % box right y ] /Border [ 0 0 0] % [0 0 0 ] = none; [0 0 2] = debug /Color [ .7 0 0 ] /Action <> /Subtype /Link /ANN % annotation type pdfmark % call pdf operators } def % text link specific data /syncat01 {(http://www.tinaja.com/glib/syncat01.pdf) eurl} def /ismm01 {(http://www.tinaja.com/ismm01.asp) eurl} def /amlink01 {(http://www.tinaja.com/amlink01.asp) eurl} def /tinaja01 {(http://www.tinaja.com/tinaja01.asp) eurl} def /info01 {(http://www.tinaja.com/info01.asp) eurl} def /barg01 {(http://www.tinaja.com/barg01.asp) eurl} def /advt01 {(http://www.tinaja.com/advt01.asp) eurl} def /maildon {(mailto:don@.tinaja.com) eurl} def % button link specific data /syncat01x {(http://www.tinaja.com/glib/syncat01.pdf) button} def /ismm01x {(http://www.tinaja.com/ismm01.asp) button} def /libry01x {(http://www.tinaja.com/libry01.asp) button} def /amlink01x {(http://www.tinaja.com/amlink01.asp) button} def /tinaja01x {(http://www.tinaja.com/tinaja01.asp) button} def /info01x {(http://www.tinaja.com/info01.asp) button} def /barg01x {(http://www.tinaja.com/barg01.asp) button} def /advt01x {(http://www.tinaja.com/advt01.asp) button} def /maildonx {(mailto:don@.tinaja.com) button} def /menu8v {gsave translate save /dosnap exch def /beige {0.10 settint} def 0.12 settint % force beige 0.5 setgray black /ybot -9999 def /ylimit -9999 def font3 font0 0 0 10 setgrid % 50 50 showgrid /cstretch 0.015 def /sstretch 0.015 def /font0 /Revue 1.2 gonzofont /font0 /StoneSans-Bold 1 gonzofont /font1 /StoneSans-Bold 1 gonzofont /font3 /Helvetica-Bold 3 gonzofont /kern 0.1 def 0 0 23 1 add 30 3.2 add 1 roundbox % clip gsave beige 0.33 setgray fill % gsave % 0 27 mt 3 pu 50 pr 3 pd closepath 0.33 setgray fill % grestore % 0.33 setgray stroke white font3 /cstretch 0.1 def 12.5 31.8 (|0PLEASE |j|jCLICK |j|jHERE |j|jTO\274 ) cc /cstretch 0.015 def 0.5 1.2 23 30 0.8 roundbox 0.75 setgray fill % /yinc 3.5 def black font1 3.2 12.1 14.8 add (|/libry01x |1 Go to the |/surl main library |/libry01 ) cl 3.2 8.7 14.8 add (|/ismm01x |1 Start your |/surl tech venture|/ismm01 ) cl 3.2 5.3 14.8 add (|/advt01x |1 Sponsor a display |/surl banner|/advt01 ) cl 3.2 1.9 14.8 add (|/info01x |1 Find |/surl research|/info01 solutions) cl 3.2 12.1 (|/maildonx |1 Send Don Lancaster |/surl email|/maildon ) cl 3.2 8.7 (|/barg01x |1 Pick up surplus |/surl bargains|/barg01 ) cl 3.2 5.3 (|/tinaja01x |1 Find out what a |/surl tinaja|/tinaja01 is) cl 3.2 1.9 (|/amlink01x |1 View recommended |/surl books|/amlink01 ) cl grestore dosnap restore} def } def % as in activate menu %%%% END LNKER %%%%%%%%%%%%%%%%%%%%%%%%%% midnightdoc starttemplate /dropindent 18 def /tabs [20] def /font0 /StoneSans-Bold [40 0 0 40.1 0 -23] gonzofont % temp fat s /font6 /Times-BoldItalic 9.75 gonzofont /font7 /Times-BoldItalic 9.25 gonzofont /font8 /Times-BoldItalic 9.75 gonzofont /font: /Times-Roman 7 gonzofont /font= /Helvetica-Bold 8 gonzofont /font; /Symbol 9.5 gonzofont /nicebar {gsave bestgray 1 setlinecap xpos ypos 5.9 add moveto txtwide 5 sub 0 rlineto [4 0 2.5 .95] superstroke /ypos ypos yinc 2 div sub def grestore} def /emacro {ypos 190 lt {/ypos ypos 200 sub def}if } def /fmacro {/sstretch 0 def} def /Wmacro {/ttheight 12 yinc mul def} def /Xmacro {/ttheight 10 yinc mul def} def /Ymacro {/ttheight 10 yinc mul def} def /tabs [54] def /specialbox {gsave xpos 46 add ypos 3 add 135 0 18 yinc mul add neg stdfigrad roundbox gsave 0.94 setgray fill grestore [2 0 1 1] superstroke grestore grestore} def % /boxit illustrates marked Acrobat button % gonzo box autoposition linker /topstrlist {mark 3 1 roll {/roomleft exch roomleft exch sub def printlist exch 3 index exch put exch 1 add exch} /exec cvx ] cvx def} def /boxit{ gsave line1 currentpoint translate -1 -3 mt 10.5 pu 50.5 pr 10.5 pd closepath line1 stroke grestore} 0 topstrlist /fancybox {gsave currentpoint translate -7 -5 205 16 2 roundbox gsave showboxgrays {0.94}{1} ifelse setgray fill grestore [2 0 1 1] superstroke grestore} 0 topstrlist /orangeon {mark 0.04 /settint cvx 0.45 setgray cvx ] cvx % temp printlist exch 3 index exch put exch 1 add exch} def /aquaon {mark 0.52 /settint cvx 0 /setgray cvx ] cvx printlist exch 3 index exch put exch 1 add exch} def /tabs [26] def /shiftin {/xpos xpos 16 add store /txtwide txtwide 32 sub store}def /shiftout {/xpos xpos 16 sub store /txtwide txtwide 32 add store}def /font9 /Times-Roman [9.75 0 0 -9.77 0 4.5] gonzofont % special effect %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % tracking inset for the isopod energy reporter cut /isopodcut {save /cutsnap exch def /ttheight 13 yinc mul def /ttwidth 160 def /ttrad 3 def aqua (ISOPOD ENERGY REPORTER) ttbox beige %% 1.3 0.4 translate 0.1 dup scale % isopod 100 dict /Prolog exch def Prolog begin -150 -180 translate 0.6 dup scale /bd {bind def} bind def /c {curveto} bd /f {fill} bd /g {setgray} bd /gs {gsave} bd /gr {grestore} bd /l {moveto lineto stroke } bd /m {moveto} bd /r {rlineto} bd /s {stroke} bd /w {setlinewidth} bd /y {0 exch rlineto} bd 1 setlinecap 0.33 g % near strands 1.32 w 256.9 314.5 278.1 320.2 l 256.4 316.4 277.6 322.1 l 255.8 318.3 277.1 324 l 255.3 320.3 276.6 326 l 254.8 322.2 276.1 327.9 l 254.3 324.1 275.5 329.8 l 1.32 w 468.4 467.4 446.5 465.1 l % far strands 468.6 465.4 446.7 463.1 l 468.8 463.4 446.9 461.1 l 469 461.4 447.1 459.1 l 469.2 459.5 447.3 457.2 l 469.4 457.5 447.5 455.2 l 0 setlinecap % far wire 1 g 18 w 387 425 m 405.8 440.7 422.8 455.7 447 460 c % gs s gr % white break gs 0.33 g 16 w s gr % brown edge 0.8 g 13 w s % orange inside 1 setlinecap lime 0.92 g % ball 10 w 406.9 410 m 406.9 432.1 389 450 366.9 450 c 344.8 450 326.9 432.1 326.9 410 c 326.9 387.9 344.8 370 366.9 370 c 389 370 406.9 387.9 406.9 410 c gs f gr % gs 4 w s gr % outline omitted 0.33 g 1.8 w s 0.6 w 327 410 m 330.4 400.6 338.3 394.9 347 390 c 365.1 379.5 392 383.9 405.5 400 c s beige 1 g 18 w 1 setlinecap 347 390 m 326.8 373.1 319.7 348.1 297 335 c % gs s gr % white outline omitted gs 0.33 g 16 w s gr 0.8 g 13 w s 0 setlinecap % rest of front wire 1 g 18 w 297 335 m 290.1 331 284.6 327 277 325 c % gs s gr gs 0.33 g 16 w s gr 0.8 g 13 w s 1 setlinecap lime 0.92 g % notch 1.6 w 394.6 391 387.5 388 l 0.33 g 0.6 w 387 387.5 m 4 y 8 3.9 r -3.97 y s end grestore cutsnap restore /tthh ttheight def /ttheight 13 yinc mul def % temp workaround makeroom /ttheight tthh def } def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /shiftin {20 0 translate /txtwide txtwide 40 sub store} def /shiftout {-20 0 translate /txtwide txtwide 40 add store} def black /font6 /StoneSerif-Bold [8 0 1.8 8 0 0] gonzofont /font8 /StoneSans-Bold [7.5 0 0 7.5 0 0] gonzofont /beige {0.82 settint} def /reallybeige {0.12 settint} def /narrower {12 0 translate /txtwide txtwide 15 sub store} def /tabs [-8 0 ] def startgonzo |a I |b do seem to have pretty much gotten into the used test equipment business as yet another |/surl |6money machine|1|/ismm01 income stream. Both on my |/surl |6website bargain pages|1|/barg01 and on |/surl |6eBay|1|/ebay . So I thought we might look into the perils and pitfalls that may be involved.|p On one hand, really primo used test equipment can now be profitably resold at pennies on the dollar. For great end user bargains. You can easily build your own superb dream lab from stuff that "fell off the truck" somewhere along the way. And there's often good vibes in recycling old gear. Then again, older low-demand items are often bulky and heavy, as they often lack modern switching power supplies. They may not even be worth storing, let alone shipping. Or may not be microprocessor controlled. Repairs can take forever or demand unobtainable manuals or parts. Worst of all, they may not provide for a |4PC|1 or Internet interface. The days of making your measurement, writing it down in a notebook, and later copying it to a report are thankfully long gone. Fewer and fewer people are aware what electronic hardware is, let alone trying to build their own. Finally, simulation often can eliminate much of what classic test gear did. |c Establishing |j|jValue |d|z By far the two most in-demand brands of used test gear are |/surl |6Hewlett Packard|1|/agilent (now renamed Agilent) and |/surl |6Tektronix|1|/tektronix . For oscilloscopes, the only choices will end up |/surl |6Tektronix|1|/tektronix , |/surl |6Tektronix|1|/tektronix , or |/surl |6Tektronix|1|/tektronix . The urban lore fantasy that |4HP|1 knew how to build oscilloscopes went out with the |4130C|1.|p And has been downhill ever since.|p With few exceptions, there in not much point at all in worrying about other brands. Yeah, |/surl |6Fluke|1|/fluke did have some interesting frequency counters and thermocouple readouts, |/surl |6Wavetek|1|/wavetek (now Acterna) several nice function generators and sweepers, and |/surl |6IFR|1|/ifr built outstanding comm monitor gear. |/surl |6ESI|1|/esi remains a useful source for lab standards. And, of course, |/surl |6General Radio|1|/genrad forms a unique niche market for collectibles of the finest test equipment ever built. "Service Grade" equipment such as |/surl |6B&K|1|/bandk or |/surl |6Sencore|1|/sencore or |/surl |6Simpson|1|/simpson or |/surl |6Triplett|1|/triplett or others of their ilk is not usually worth the hassle of removing it from a skid. If you must bid over |4$2.50|1 for the lot, make sure the skid is solid oak and has no splinters. |/surl |6EICO|1|/eico and "radio school" gear is less than useless. Certain |/surl |6Heathkit|1|/heath products are eagerly sought by collectors (such as analog computers or Hero robots ferinstance), while others have little demand. There's also a strange low end market for vacuum tube era test gear by the |/surl |6boatanchor|1|/boatanchor aficionados on the web. Boatanchor enthusiasts can often be spotted by their very long arms. The shipping charges usually eat you alive. There are several ways to establish the current value of used test equipment. The closest thing to a "blue Book" are all those free catalogs from |/surl |6Test Equipment Connection|1|/tec . Divide these prices by |/tinton1 |6six|1|/tintoff to get the best possible |/surl |6eBay|1|/ebay selling price and by |/tinton1 |6thirty|1|/tintoff to get the absolute maximum you should ever pay for anything. A search on |/surl |6eBay|1|/ebay should give you their current price spreads of more popular items. Note that these vary widely with how clean the instrument is, which accessories are provided, and presence or absence of manuals and docs. Plus warranties, cal or inspection privileges. Supply and demand plus the competence of the seller also makes a huge difference on your final price. Be sure to check the completed auctions, not the current ones. Final prices are typically determined by last second snipers. National Serial Numbers, or |4NSN|1's sometimes will tell you what the government paid for any piece of test gear. Along with how old it was and how long it was popular. These are available free from |/surl |6Surplus Bid|1|/surplusbid , but normally only on their current items. Other |4NSN|1's can sometimes be gotten for a fee through |/surl |6USA Info|1|/nsn . Be certain to divide any NSN price by |/tinton1 |6100|1|/tintoff to get the absolute maximum you should pay. Ads in Nuts & Volts, Poptronix, or ham magazines also give you some largely useless test equipment pricing. Other dealers can also be checked into for price quotes. Those I've found useful include |/surl |6Tucker|1|/tucker , |/surl |6Test Equity|1|/testequity , and |/surl |6Megahertz Electronics|1|/mhzelectronics . Plus good old |/surl |6Fair Radio Sales|1|/fairradio for older military surplus electronics. Naturally, a good way to establish price is to try and buy the item on the web. A surprising number of scientific or other more specialized instruments may still have current or upgraded versions in production. Sometimes, you can simply guess at their website as |/tinton1 |6www.theirname.com|1|/tintoff If this does not work, try the purple search engine buttons on my |/surl |6Guru's Lair|1|/tinaja website. Especially |/surl |6Hotbot|1|/hotbot and |/surl |6Google|1|/google . Also visit newsgroups such as |/surl |6sci.electronics.equipment|2|/ng1 or |/surl |6sci.electronics.repair|1 |/ng2 . Plus the good old |/surl |6Thomas Register|1|/thomas . |c Scoring |jthe |jGoodies |d|z Your overall goal is to average out buying for one cent on the dollar and selling for ten. While trying to make a nine percent profit in the process.|p My own policy is to watch out for inefficient, unpopular, surplus, or distress markets. And buying in quantity. From distances that are |/surl |6U-haulable|1|/uhaul from my home. As mentioned I'll rarely bid over |41/100|1th of the |4NSN|1 value or |41/30|1th of the |4TEQ|1 bluebook value. Mixed skids are normally bid at |40.25|1 cents on the original dollar, rarely going as high as a lofty third of a cent.|p I firmly believe that if more than five percent of my bids are accepted, then I am paying too much. I'll make up for this by bidding on |/tinton1 |6twenty times|1|/tintoff what I can use. Alas, direct military surplus bargains are no more. In the process of selling stuff for an average of |40.8|1 cents on the dollar, they managed to rack up admin costs of |4$1.60|1 or so for each |4$1.00|1 in actual sales. All that usually remains on |/surl |6DRMO Websites|1|/drmo are hazmat and term sales. Instead, the feds have privatized military surplus sales. Mostly to one company which goes by their three names of |/surl |6Levy-Latham|1|/levy , or |/surl |6Government Liquidation|1|/govliq , or |/surl |6Surplus|/surplusbid |/surl Bid|1|/surplusbid . Both live internet auctions and sealed bid sales are currently offered. Side deals are sometimes possible when working directly with their sales managers. Called |4POC|1's. As in |/tinton1 |6point of contact|1|/tintoff . Military gear almost always starts out first rate and fully loaded. And typically has very little wrong with it. Some of it can end up way too specialized to resell, though. It pays to restrict your range. Distant sites create preview problems. When you have to involve a third party packer or shipper, the chances are you will lose every time. Paying extra for shipping heavy and useless trash. Community college auctions have been extremely useful to me. But the days of them phasing out their electronics departments are largely gone. I have done best with poorly announced sales at remote rural sites. But I've found high school and university auctions not nearly as useful. Because of too much trash and highgrading. |/surl |6Hamfests|1|/hamfest have long been a useful source for electronic bargains. But these have gotten a lot more junky. Dot.bomb bankruptcies can offer exceptional bargains as can related distress auctions. I've found the best results on auctions that list only a very few electronic or techie items in an otherwise large sale. |/surl |6Auction Advisory|1|/auctadvisory is a superb source to pin down these events. Needless to say, you never get yourself into a pissing contest at an auction. Either start off with a ridiculously lowball bid and quit early, or bid your max once very late in the process. Note that you can cut your bid increment in half by waving your hand across your chest palm down. Most web truckload "palletized salvage" outfits are best avoided. Cherry picking and scams are the norms. |c What |jto |jAvoid |d|z Anything excessively bulky or heavy, of course.|p Certainly anything that cannot be shipped by |/surl |6UPS|1|/ups . A good rule\274|p |h|/red |6|/staytint1r avoid involving yourself with anything you cannot hold extended at arms length. |h|1|/aqua |/black I had a huge load bank sit in my driveway for over a year. No way you could call it a white elephant, though. Seems it was a perfectly normal gray elephant color. And size. My first clue that all was not well with this was when the |/surl |6DRMO|1|/drmo loader guy got off his regular forklift and fired up his huge all-terrain one. In all fairness, though, it did make an excellent toaster. Doing thirteen loaves at a time. That F-size |4HP|1 Plotter did make a graciously understated credenza in the dining room for many months. Uh, avoid anything over ten years old. Anything in sad shape, unless you get a lot of them for pennies. And are heavily into refurb. The real losers are oscilloscope cameras (save the lens) and carts (save the casters; check the drawer for surprise goodies), paper chart recorders, pen drafting machines, analog X-Y plotters and graphic tablets. Older and heavier logic analyzers and digitizers are extremely hard to sell. As are outdated communications protocol analyzers. But the pods and manuals for either of these can go quite well at outrageously high prices. Any specialized laboratory gear (such as a particle size analyzer) is difficult to find interest in. But if and when you do, price is usually no object. It is easy to overvalue stuff in fields that you know nothing about. Surprisingly, power supplies may not do well at all. "As new" industrial brick supplies including all the bells and whistles (remote sensing, load protection, etc\274) may be worth |4$17|1 on |/surl |6eBay|1|/ebay . Those beautiful Mac |4LC|1 power supplies would appear perfect for homebrew experimenter use, but I have not even been able to give them away. Anybody can, of course, strip a free power supply out of an old PC. Older, full metered |/surl |6Lambda|1|/lambda , HP, or Harris (merged into HP) lab supplies of sane size and weight are still very much in demand, though. Lightweight and quite clean unused motors, syncros, servos, certain steppers, and such can do pretty well if you get them in quantity, clearly identify them and their specs, link |/surl |6data and tutorial websites|1|/muse01 and keep your time and expenses down. But the heavies don't seem very popular. I'm now in the process of throwing one never used |4$1500|1 super premium motor per week into our local trash pickup. It will take months to flush them. "Real" military specialized test sets are generally less than useless. Despite their outrageously high acquisition costs. But some |/surl |6Collins|1|/collins gear has high collector interest. Middle age computers, of course, are an outright joke. But I have found |4286|1 and |4386|1 computers at auctions to be a cheap way to pick up line cords. A cord new costs |4$4|1. But attached to a palletized |4286|1, it costs twelve cents. Ancient computers are another story entirely as they can sell quite well to the collectible market. Especially the real Apples (no Macs, of course), Commodores, and, above all, early |4KIM-1|1 class logic trainers. But avoid monitors. Lots of links and more assistance on these topics on our |/surl |6Auction Help|1|/auct01 library page. |c Getting |jManuals |j& |jData |d|z If you ever see the least technical problem on something apparently worth fixing\274|p |h|6|/red |/staytint1r Do not attempt serious repairs without full manuals and proper test gear! |h|1|/aqua |/black By far the easiest way to pick up manuals is to |6|/tinton1 use |/surl eBay|1|/ebay |/tinton1 |6as a lending library|1|/tintoff . Popular and some obscure manuals are often found in the |4$12|1 to |4$30|1 range, and |4CD|1 collections of military electronics stuff are readily available. You can often resell the manual on eBay for more than you paid for them. Or else add new value to the equipment by including the new manual with it. Either way, all of the manuals should be "free". Of the commercial manual vendors, I very much prefer |/surl |6HK Porter|1|/porter . His competitors include |/surl |6Tannebaum|1|/tannebaum , |/surl |6Manual|/manualman |/surl Man|1|/manualman , and |/surl |6Manuals Plus|1|/manplus . There are hundreds more, easily found through the |/surl |6Boatanchor Circle|1|/boatanchor . Besides our previously mentioned links, chances are also good that somebody has posted something to a random newsgroup, so be sure to try |/surl |6Deja News|1|/deja , which recently has become a part of |/surl |6Google|1|/google . If you can luck into a few pallets of Tek or HP manuals in your wanderings, they can be worth a fortune. |c Actual |jRefurb |d|z I try to refurb mid quality ready-to-use products for resale. They are all thoroughly cleaned and have their cosmetics improved. Most major functions are checked out and they often will be guaranteed serviceable. Some calibration is checked but usually not redone.|p There's a fifteen day inspection privilege. But we normally do |/tinton1 |6not|1|/tintoff offer warranties, full calibration, manuals, excessive handholding, or any |/surl |6NIST|1|/nist tracking services. We do try to understate condition and overstate problems.|p Heavier repairs are made only when getting a manual is justified and the process seems like it will end up time and cost effective. Some units are simply stashed until another one shows up. Refurb can be easiest when you can start with six nearly identical instruments. And then create four great ones, one useful one, and a future parts store from them. Ferinstance, you can combine good case bottoms with tops and put the best knobs on your first unit. Very often, improving cosmetics, cleaning switches, and tightening knobs is all you will really need. Once again, serious repairs should not be attempted without the proper manuals, tools, and test gear on hand. I'll normally do only a brief check and minimal crucial repairs on an item before offering it for sale. Just enough to be fairly certain it can be brought up to decent condition. Only after the item sells do we do a thorough cleaning and most of the cosmetic improvements. Unless there is a zillion of them in stock. In which case I'll try to stay two or three ahead. There is no point in wasting time and energy on something that will not sell at a decent price. Your two most important refurb tools are an |4.050|1 hex Allen wrench (buy them by the dozen) and a can of |/surl |6Radio|/radioshack |/surl Shack|1|/radioshack tuner cleaner. The latter to deal with noisy switches. Other items high on the "must have" list are an ac power pen detector (|/surl |6Radio Shack|1|/radioshack model |/tinton1 |61LAC-A VoltAlert|1|/tintoff ) or equivalent, a tube of superglue, fuses, some silicon rubber adhesive/sealant, and a strong household cleaner such as Simple Green. Plus glop removers. Perhaps full strength Citra-solv or Armorall or De-Solv-it. Tire cleaner works surprisingly well to renew black Bakelite cases. Some tips: Soak problem stickers or whatever overnight before you try to remove them. Removing the "top half" of a label makes getting the glop part off easier. A small sponge bungee corded in place helps a lot. Plastic spatulas and toothbrushes can also be a great help. Steel wool may be too harsh. Try to match missing screws. Be sure you get all knobs in the correct position after tightening! I had a Tek |4TG501|1 bounce because I forgot this crucial but easily forgotten detail. Repainting is usually a bad scene and should always be avoided. But Sharpie permanent marker "retouch" pens can cover multiple sins. Especially on those |/surl |6Wavetek|1|/wavetek knobs. Solder damage on plastic bezels can sometimes be fixed by a little filing or sanding. A good rule on cosmetics is to "take half and leave half" when improving appearance. Should parts be needed, search the web for collectors or specialists. Then try |/surl |6Questlink|1|/questlink or |/surl |6Chipcenter|1|/chipcenter or similar resources on our |/surl |6E.E. Resources|1|/eeweb01 library pages. For obsolete semiconductors, check into |/surl |6Rochester Electronics|1|/rochester or try |/surl |6Luke Systems|1|/luke . Or |/surl |6Electronic Expediters International|1|/eei . Additional links appear on |/surl |6my website|1|/tinaja . It is |/tinton1 |6not|1|/tintoff a good idea to do much refurb on a collectible. The buyer may want to do this himself in an "approved" manner. Even powering up an older piece of vacuum tube gear is fraught with peril. Because the electrolitics are almost certainly shorted and may need replacement. Instead, you simply state the exact condition of what you are offering. Be on the lookout for locals who can help you in strange and unexpected ways. Amazingly, a nearby glass company charges around |4$1.15|1 to replace a broken meter face. A dentist has proved extremely useful for repairing cases, evaluating X-ray testers, snooping into potted mystery modules, and sculpting missing "front incisor" triggers for barcode readers. Our rug company is perfect for free giant shipping tubes. Check Wal-Mart, your local furniture store, and other merchants for free recycled shipping materials, peanuts, and bubble wrap. It is exceptionally important to package your items so they can withstand a howitzer at point blank range. |c Tek |jscopes |d|z Once again, when it does not say "Tektronix" on its front panel, an oscilloscope is probably unsellable at any price. There are several different ages and classes of Tek scopes, all of which may appeal to different markets. Needless to say, clean working scopes with probes and manuals will command much higher prices than untested junk.|p Oldest are those Tek vacuum tube "doghouses". These are of interest mostly to hard core collectors and are useless for general lab work due to their outrageous size and weight. Of these, the |4515|1 |4545A|1 and |4561|1 are probably the best of the lot. Their |4570|1 vacuum tube curve tracers still can bring outrageously high prices to a niche market. |/surl |6Stan Griffiths|1|/griffiths is a recognized authority on older Tek restorations, having published |/surl |6Oscilloscopes \320 Restoring|/amlink01 |/surl a Classic|1|/amlink01 . His |/surl |6website|1|/griffiths includes definitive resources. Somewhat newer are the tek |45000|1 mainframes. These have virtually zero demand due to poor performance. Next are the |47000|1 series which still sees modest popularity, especially for the higher speed horizontal plugins. The industry standard workhorse scope for years and years was the Tek |4465|1 or its related |4455|1 plastic or its mil ruggedized versions. These were the first "modern" scopes. Being portable, reasonably light weight, fast, and largely solid state. While they remain eminently useful, they are getting somewhat long in the tooth. The best and most desirable Tek scopes for resale today are the |42213|1 and |42215|1 for individuals and students, or the |42246|1 for serious professionals. The newer digital scopes are somewhat specialized and all but the latest cannot handle certain traditional analog measurements very well. Consult |/surl |6eBay|1|/ebay for the current model-by-model going rate. Rebranded scopes such as Tek/Telequipment or Tek/Sony generally don't sell well. Tek scopes whose model numbers begin with "T" are typical of this breed. Most Tek spectrum analyzers do command premium prices, but replacing the sometimes burned out mixer diodes may need advanced skills or big bucks. Note that the newest spectrum analyzers use wildly improved |4FFT|1 computer techniques, leaving all of the older versions in the dust. As mentioned, awkward and heavier scope carts are not usually worth bothering over, but there can be some real surprises hidden in their drawers. Some carts may also have valuable TM-series mainframes or plugins that can easily and profitably be removed and sold separately. While you can visit the |/surl |6Tektronix|1|/tektronix website, support for older equipment is limited and the prices for service parts is several orders of magnitude beyond outrageous. One useful source for older Tek parts is |/surl |6Deane Kidd|1|/deanek . |c Strip |jit |d|z It pains me deeply to smash thousands to millions of dollars worth of unused top quality equipment per month. But if all else fails, surprising value can be found in strange nooks and crannies. Just by selling bits and pieces.|p Case in point: I paid |4$36|1 to the feds for a |4$96,000.00|1 relay rack full of brand new but horribly ancient |/tinton1 |6Gould|1|/tintoff chart recorders. Your tax dollars at work. I got it delivered free by giving our |4ISP|1 the mint rack itself. But those insanely heavy recorders went unsold on |/surl |6ebay|1|/ebay . Even for a cent on the dollar. So I stripped them. Selling three sets of heavy duty rack sliders for |4$72|1, dozens of big wirewound pots at |4$3|1 each (snapped up by tattoo parlors), and the three steppers and drivers for |4$80|1. While saving some small pieces of plastic that were perfect to repair some other instruments. I was unable to sell the |424|1 pen motors at any price. But by simply renaming them as "laser light show galvo kits", they flew out of here to overjoyed customers. At |4$15|1 each. Other strippable components that remain in demand are clean analog panel meters, larger stepper motors (especially |/surl |6SloSyn|1|/superior ) with drivers, |4SMA|1 microwave plumbing, certain modern wireless components, attenuators, flowmeters, adaptors, or precision mechanical positioners. Be sure to scarf the lenses off obsolete video cameras or similar gear. But expect other photo items to drop precipiticously in the near future. Do save any smaller knobs or feet or hardware that may fit something useful. The sad thing about stripping is that you generally end up throwing |495%|1 of the instrument away. Especially the worthless trash such as older circuit cards and unmarked transformers. But the bulk and weight sure goes down in the process. Pruning shears and ten inch Vise Grip pliers are very useful tools here. But a tad on the light side. Failing to get rid of useless junk eats up storage costs and drives you out of house and home. Continuous triage is absolutely essential. |c Sell |jit |d I've found |/surl |6eBay|1|/ebay to be best for actual test instrument sales and more in-demand electronic parts. While the more scientific stuff (such as thermocouples or eddy current probes) seems to do better long term up on my website's |/surl |6Bargain Pages|1|/barg01 . Additional eBay selling info appears in my |/surl |6MYEBAYS.PDF|1|/myebays , |/surl |6EBAYPHEN.PDF|1|/ebayphen and newer files on our |/surl |6Auction Help|1|/auct01 library pages. Here's a summary of some |/surl |6eBay|1|/ebay guidelines that seem to be working very well for me\274 |/staytint1 |6 \267 Seek a 30:1 difference between buy and sell price. |h \267 VISA/MC, Paypal or instant epayments only. |h \267 Keep terms under fifteen words absolute max. |h \267 Outstanding images are an absolute must. |h \267 Never sell anything unsuited to the buyer's needs. |h \267 No foreign bidders, buyers, or trans-shipments. |h \267 Pack exceptionally ruggedly and carefully. |h \267 Give a fifteen day inspection privilege. |h \267 Offer additional inventory to the top bidders. |h \267 Clearly state revenue neutral shipping policies. |h \267 Always give email tracking info. Always insure. |h \267 Give feedback ~only~ after item receipt. |h \267 No color, sound, music, or similar annoyances. |h \267 Answer all questions, then improve descriptions. |h \267 Understate condition; overstate shortcomings. |h \267 Give hot links to |/surl |6tutorial|1|/muse01 |6|/tinton1 and reference sites. |h|1|/black The key secret to top eBay prices on test equipment is to make each and every callout in the image clearly legible. A scanner is often a better choice than a digital camera, since it offers a hundred times the resolution. One thing I cannot emphasize too strongly: |h|6|/red |/staytint1r Spend an absolute minimum of two hours doing your image prep! |h|1|/aqua |/black More details in |/surl |6IMAGIMAG.PDF|1|/imagimag Your images can be protected by subtle |/surl |6steganography|1|/stegan tricks. Such as interchanging the focus and intensity knobs on an oscilloscope photo. We've gone over this on our |/surl |6Auction Help|1|/auct01 library pages. I'll try to work up additional details in some future |/surl |6Blatant Opportunist|1|/blat01 ezine columns. |c For |jMore |jHelp |d Start with our |/surl |6Auction Help|1|/auct01 page, followed up by the equipment tutorials you'll find in our |/surl |6Tech Musings|1|/muse01 columns and ezines. Then our |/surl |6InfoPack|1|/info01 services. |/tinton1 |-F|1 |/aqua |/staytint1 |Z|F|p |2Microcomputer pioneer and guru \ Don Lancaster is the \ author of |535|2 books and countless articles. Don maintains a \ |5US|2 technical helpline you will find at |5(928) 428-4073|2, \ besides offering \ his own |/surl |6books|1|/amlink01 |/aqua |/tinton1 , \ reprints and |/surl |6consulting services|1|/info01 . |/aqua Don also offers surplus bargains \ found on |/surl |6eBay|1|/ebay |/aqua |/tinton1 and \ on his |/surl |6Bargain Pages|1|/barg01 . Don is also the webmaster of |/surl |6www.tinaja.com|1|/tinaja |/tinton1 \ You can also reach Don at Synergetics, Box |5809|2, \ Thatcher, |5AZ 85552|2. Or you can use email via |/surl \ |6don@tinaja.com|1|/maildon |x reallybeige 0.10 settint 0.5 setgray black activatemenu % cannot hit earlier cm2 0 add 0.12 settint 0.5 setgray black % cmb 0 add % 230 add % special % 190 380 % try centered % 322 406 % upper right % 322 59 % lower right % 1 0.98 scale % slight adjust 190 380 % center if not text menu8v % and show the final page. Don't skip the |x gonzo ender above! Otherwise % you never return to PostScript and never print the last page... showpage