% % %! (C:\\windows\\desktop\\gonzo\\gonzo.ps) run % use external gonzo %%%%%%%%%%%% PHOTO INSERTS %%%%%%%%%% % When photos are needed, they are inserted here. Comment out otherwise. % no photos in this blat /pixfilename1 (F:\\newblatmuse\\stepprep\\cab4-01a.jpg) def /pixfilename2 (F:\\newblatmuse\\stepprep\\cab4-01b.jpg) def /pixfilename3 (F:\\newblatmuse\\stepprep\\cab4-01c.jpg) def /pixfilename4 (F:\\newblatmuse\\stepprep\\cab4-01d.jpg) def /pixfilename5 (F:\\newblatmuse\\stepprep\\cab4-01e.jpg) def /pixfilename6 (F:\\newblatmuse\\stepprep\\cab4-01f.jpg) def /pixfilename7 (F:\\newblatmuse\\stepprep\\cab4-01g.jpg) def /pixfilename8 (F:\\newblatmuse\\stepprep\\cab4-01h.jpg) def %%%%%%%%%%%%% /trystone true def % name of textfile: blat 70 marcia sep oct 2002 % .... %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % 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 [33 10 add 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 10 add 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.25 setgray (znyL3) stringmacro /ypos % was font3 ypos ypara 2 mul add def} def % centered title /cmacro {0.25 setgray (znhL6) stringmacro /ypos % was font3 ypos ypara 2 mul add def /ypos ypos 2 sub store } def % centered title /dmacro {black (pF1hz) stringmacro /ypos ypos ypara 2 mul add def /ypos ypos 2 add store} 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 9 mul def % height of figure one % sidebar /f2h yinc 25 mul def % temp tower figures /f3h yinc 22 mul def % temp tower figures /f2h yinc 25 mul def % image box height /f3h yinc 25 mul def % image box height /f4h yinc 25 mul def % image box height /f5h yinc 25 mul def % image box height /f6h yinc 25 mul def % image box height /f7h yinc 25 mul def % image box height /f8h yinc 25 mul def % image box height /f9h yinc 25 mul def % image box height /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 grayfig2r} def % link resource sidebar % now muse art /fig2 {cm1 cmt f2h sub 2colwide f2h yinc add true true /f2name /figure2 stdfig} def % link %%%grayfig2i /fig3 {cm1 cmt f3h sub 2colwide f3h yinc add true true /f3name /figure3 grayfig2i} def % link /fig4 {cm1 cmb yinc sub 2colwide f4h yinc add true true /f4name /figure4 grayfig2i} def % link /fig5 {cm1 cmt f5h sub 2colwide f5h yinc add true true /f5name /figure5 grayfig2i} def % link /fig6 {cm1 cmb yinc sub 2colwide f6h yinc add true true /f6name /figure6 grayfig2i} def % link /fig7 {cm1 cmt f7h sub 2colwide f7h yinc add true true /f7name /figure7 grayfig2i} def % link /fig8 {cm1 cmb yinc sub 2colwide f8h yinc add true true /f8name /figure8 grayfig2i} def % link /fig9 {cm1 cmt f9h sub 2colwide f9h yinc add true true /f9name /figure9 grayfig2i} 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 %%%%%%%%%%%% grayfig2 adapted from MUSE %%%% % has a title box /grayfig2rad 0.01 def /showboxgrays true def /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 /figheight exch def /figwidth exch def exch narrowfig 2 div add exch % set left position translate /figwidth figwidth narrowfig sub store showborder {1 2 figwidth 2 sub %%% narrowfig 2 div add figheight 5 sub grayfig2rad roundbox 0.4 figheight 28 sub moveto figwidth 1.8 sub 0 rlineto gsave showboxgrays {mastergray setgray}{1 setgray} ifelse fill grestore gsave newpath 0 figheight 5 sub moveto figwidth 1.8 sub 0 rlineto 0 -23 rlineto figwidth 1.8 sub neg 0 rlineto closepath grayshade dup 1 ne {0.20 sub pop 0.33} if setgray fill grestore [2 0 1 1] superstroke } if /font7 /Helvetica-Bold 9 0.7 add gonzofont showtitle {black white % 0.25 setgray figwidth 2 div figheight 20 sub 0.5 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 3 1 roll translate dup dup /csf exch def scale mark figproc cvx exec cleartomark stdsnap restore justx 4 jsave put } def %%% %%%%%%%%%%%% grayfig2r adapted from MUSE - just rectangular %%%% % has a title box /grayfig2rad 0.0001 def /showboxgrays true def /narrowfig 0 store /grayfig2r { /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 exch narrowfig 2 div add exch % set left position translate /figwidth figwidth narrowfig sub store showborder {1 2 figwidth 2 sub %%% narrowfig 2 div add figheight 5 sub grayfig2rad roundbox 0.4 figheight 28 sub moveto figwidth 1.8 sub 0 rlineto gsave showboxgrays {mastergray setgray 0.88 setgray }{1 setgray} ifelse fill grestore gsave newpath 0 figheight 5 sub moveto figwidth 1.8 sub 0 rlineto 0 -23 rlineto figwidth 1.8 sub neg 0 rlineto closepath grayshade dup 1 ne {0.15 sub pop 0.33} if setgray % this is dark title fill grestore % [2 0 1 1] superstroke line1 stroke } if /font7 /Helvetica-Bold 9.3 gonzofont showtitle {black white % 0.25 setgray figwidth 2 div figheight 20 sub 0.5 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 3 1 roll translate dup dup /csf exch def 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) %%%%%% try a hold %%%%%%%%%%%%%%%%% warning: modified below /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 ] % start page two [ [{aqua} {rightfooter} {fullheader} {rl1 rlb rlt rwd vrule} % {0 0 1 fig2} % {0 0 0.8 pix1} %{0 0 0.8 pix2} ] % page two figures and control % [ cm1 cmt f2h sub yinc sub cmb txw] % column1 xpos ypos ylimit txtwide [ 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 % start page three [ [{aqua} {leftfooter} {fullheader} % {0 -6 0.8 fig1} {rl1 rlb rlt rwd vrule} % {0 0 0.8 pix3} % {0 0 0.8 pix4} %{0 0 1 fig3} %{0 0 1 fig4} % {rl1 rlb f2h add 5 add rlt f2h sub yinc sub rwd vrule} ] % page three figures and control % [ cm1 cmt f1h sub yinc sub cmb txw] [ cm1 cmt cmb txw] [ cm2 cmt cmb txw] % column2 xpos ypos ylimit txtwide ] % start page four [ [{aqua} {leftfooter} {fullheader} % {0 -6 0.8 fig1} {rl1 rlb rlt rwd vrule} % {0 0 0.8 pix3} % {0 0 0.8 pix4} %{0 0 1 fig5} %{0 0 1 fig6} % {rl1 rlb f2h add 5 add rlt f2h sub yinc sub rwd vrule} ] % page three figures and control [ cm1 cmt cmb txw] [ cm2 cmt cmb txw] % column2 xpos ypos ylimit txtwide ] % start page five [ [{aqua} {leftfooter} {fullheader} % {0 -6 0.8 fig1} % {rl1 rlb rlt rwd vrule} % {0 0 0.8 pix3} % {0 0 0.8 pix4} %{0 0 1 fig7} %{0 0 1 fig8} {rl1 rlb f2h add 5 add rlt f2h sub yinc sub rwd vrule} ] % page three figures and control [ cm1 cmt cmb txw] [ cm2 cmt cmb txw] % column2 xpos ypos ylimit txtwide ] % start page six [ [{aqua} {rightfooter} {fullheader} {rl1 rlb rlt f2h sub yinc sub rwd vrule} %{0 0 1 fig9} % {0 0 0.8 pix1} %{0 0 0.8 pix2} ] % 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} {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 ] [ [{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 ] [ [{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 ] [ [{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 ] [ [{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 ] [ {exit (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 38 def % indent for drop cap CHANGE BELOW /pubname (Blatant |jOpportunist) def % for footers /issuename (Sept, 2002) def % for footers /titlename (T|khe |j|jLiv|ke\nA|ku|kctio|kn |j|jSc|kene) def % the title /blatnum (70) 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|/arcata |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 }} pop /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 /font3 /Helvetica-BoldOblique 9.5 gonzofont font3 /yinc 13 1 sub def /yposhh ypos def /amacro {/xpos xpos 284 add store /ypos yposhh 50 add store} def /bmacro {/yinc yinc 2.12 add store} def % 0.9 dup scale % TEMP COMPRESS /txtwide 1000 store % temp no cr xpos -15 add ypos 31 add (|1Jacek Artymiak, |/surl |3Data Visualization on the Web with SVG|1|/book1 |1Andrew Watt, |/surl |3Designing SVG Web Graphics|1|/book2 |1Jon Ferraiolo, |/surl |3Scalable Vector Graphics (SVG) 1.0 Spec|1|/book3 |1David Eisenberg, |/surl |3SVG Essentials|1|/book4 |1Micah Laaker, |/surl |3Teach Yourself Svg in 24 Hours|1|/book5 |h |1For more book info: |/surl |3www.tinaja.com/amlink01.html|/amlink01 ) cl } def %%%% Image figure reference stash goes here /jpegimageproc { % name of textfile: namehere % ............................ % figure 2 % save /snap2 exch def -5 -2 translate % adjust position in box % -30 -30 translate %%%% temporary clip check /infilename exch store % grab passed pix file /vpixels exch store /hpixels exch store translate % adjust position for final figure ??? %%%%%%%%%%%%%%%%%%% 8 15 translate % position on box electronics begin /DeviceRGB setcolorspace % pick color model 3 -6 translate % set page position hpixels vpixels scale % magnify unit square 1 dup scale /infile infilename (r) file def % establish input read file /Data {infile /DCTDecode filter} def % define a data source << % start image dicationary /ImageType 1 % always one /Width hpixels % JPEG width in pixels /Height vpixels % JPEG height in pixels /ImageMatrix [hpixels 0 0 vpixels neg 0 vpixels ] /DataSource Data % proc to get filtered JPEG /BitsPerComponent 8 % color resolution /Decode [0 1 0 1 0 1] % per red book 4.10 >> image % call the image operator end ypos snap2 restore /ypos exch def } def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /figure2 {0 0 466 235 pixfilename1 jpegimageproc} def % image link /figure3 {0 0 466 235 pixfilename2 jpegimageproc} def % image link /figure4 {0 0 466 235 pixfilename3 jpegimageproc} def % image link /figure5 {0 0 466 235 pixfilename4 jpegimageproc} def % image link /figure6 {0 0 466 235 pixfilename5 jpegimageproc} def % image link /figure7 {0 0 466 235 pixfilename6 jpegimageproc} def % image link /figure8 {0 0 466 235 pixfilename7 jpegimageproc} def % image link /figure9 {35 38 395 159 pixfilename8 jpegimageproc} def % image link %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % /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|jRECOMMENDED |j|jSVG |j|jBOOKS |j|j) def /f2name (A |j|jTYPICAL |j|jTRAM |j|jTOWER) def /f3name (THE |j|jTRAM |j|jCAR |j|jOR |j|j"CARRIER") def /f2name (FIG 1 \320 RAW SCANNED IMAGE READY TO POST PROCESS) def /f3name (FIG 2 \320 BACKGROUND AND MAIN WIRE BODY CREATED) def /f4name (FIG 3 \320 BRAID COPIED AND ROOM MADE FOR NEW BRAID) def /f5name (FIG 4 \320 BRAID EDGE DETAILED AND RELETTERING BEGUN) def /f6name (FIG 5 \320 BACKGROUND EXTENDED AND BRAID COMPLETED) def /f7name (FIG 6 \320 SHIELD COPIED AND NEWLY STRANDED WIRES REPLACED) def /f8name (FIG 7 \320 NEW SHIELD REPOSITIONED AND KNOCKOUT FINISHED) def /f9name (FIG 8 \320 CROP, (ROTATE), (RESIZE), BRIGHTEN, SHARPEN, AND JPEG) 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 2002 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 2002 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 2002 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 2002 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 %%%% grayfig2i is experimental for clipped? images /grayfig2i { /jsave justx 4 get def % hold current justify mode save /stdsnap exch def % save and snap /colcheck {} def % no main column changes /figproc exch def % save figure proc and name cvx /figname exch def /showtitle exch def % save show booleans /showborder exch def 2 add /figheight exch def % adjust and save size 20 sub /figwidth exch def translate % position on page showborder { % start conditional border 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.12 settint 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 pop 1 setgray fill grestore gsave clip [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 grestore [2 0 1 1] superstroke % warning: should be conditional stdsnap restore justx 4 jsave put } def /grayshade 0.92 def % %%%ZZZZ%%%%%%%%%%%%%% URL PATCHES %%%%%%%%%%%%%%%%%%%%%%%%%%%% % patch definitions... % dictionary method << /auctionadvisory (http://www.auctionadvisory.com) /naaorg (http://www.auctioneers.org) /findauct (http://www.auctioneers.org/findAuctioneer/search.cfm) /azstateorg (http://www.azauctioneers.org) /natpaper (http://www.usnpl.com) /azpaper (http://www.usnpl.com/aznews.html) /mccoll (http://www.dist.maricopa.edu/surplus) /walt (http://www.swliquidators.com) /tec (http://www.testequipmentconnection.com) /levylatham (http://www.levylatham.com) /hostess (http://www.tinaja.com/glib/twinkie.pdf) /ivy (http://www.tinaja.com/glib/psnt.pdf) /schizo (http://www.tinaja.com/psutils/autobadg.pdf) /mitzi (http://www.tinaja.com/psutils/begstuff/menujust.pdf) /scam (http://www.tinaja.com/glib/resbn63.pdf) /massteleport (http://www.tinaja.com/glib/hack16.pdf) /jannot (http://webhome.idirect.com/~jproc/rrp/an_nom.html) /emergop1 (http://www.tinaja.com/glib/emergop1.pdf) /emergop2 (http://www.tinaja.com/glib/emergop2.pdf) /emergop3 (http://www.tinaja.com/glib/emergop3.pdf) /emergop4 (http://www.tinaja.com/glib/emergop4.pdf) /emergop5 (http://www.tinaja.com/glib/emergop5.pdf) /emergop6 (http://www.tinaja.com/glib/emergop6.pdf) /book1 (http://www.amazon.com/exec/obidos/ISBN=1556229593/donlancastersgurA/) /book2 (http://www.amazon.com/exec/obidos/ISBN=0735711666/donlancastersgurA/) /book3 (http://www.amazon.com/exec/obidos/ISBN=0595136931/donlancastersgurA/) /book4 (http://www.amazon.com/exec/obidos/ISBN=0596002238/donlancastersgurA/) /book5 (http://www.amazon.com/exec/obidos/ISBN=0672322900/donlancastersgurA/) /surplusbid (http://www.surplusbid.com) /gonzomain (http://www.tinaja.com/post01.asp#gonzo) /stepprep1 (http://www.tinaja.com/glib/stepprep.psl) /terra (http://terraserver.homeadvisor.msn.com/default.asp) /topo (http://www.topozone.com) /pacman (http://www.tinaja.com/blender/alphaout.jpg) /blender (http://www.tinaja.com/psutils/blender.psl) /refurb (http://www.tinaja.com/glib/refurb.pdf) /myebays (http://www.tinaja.com/glib/myebays.pdf) /auct01 (http://www.tinaja.com/auct01.asp) /midlevel (http://www.tinaja.com/includes/green01x.asp) /javacalc (http://www.tinaja.com/mscal108q.asp) /javaps (http://www.tinaja.com/psutils/mscal108q.psl) /adobesearch (http://www.adobe.com) /linkexample (http://www.tinaja.com/glib/muse153.psl) /drhtml (http://www2.imagiware.com/RxHTML) /webtrends (http://www.webtrends.com) /bwhistle (http://www.tinaja.com/glib/bwhistle.pdf) /svg (http://www.w3.org/Graphics/SVG/Overview.htm8) /w3org (http://www.w3.org) /svgadobe (http://www.adobe.com:80/svg/) /awebutil (http://www.tinaja.com/text/awebutil.html) /autoexample (http://www.tinaja.com/glib/muse153.pdf) /videonics (http://www.videonics.com) /slider (http://www.tinaja.com/psutils/galley1.psl) /stepprep (http://www.tinaja.com/glib/stepprep.psl) /bouncy (http://www.tinaja.com/glib/bouncy.pdf) /begstuff (http://www.tinaja.com/post01.asp#begstuff) /pssecrets (http://www.tinaja.com/post01.asp#secrets) /showtell (http://www.tinaja.com/post01.asp#showtell) /psbooks (http://www.tinaja.com/post01.asp#books) /daystats (http://www.tinaja.com/users/day.htm) /monthstats (http://www.tinaja.com/users/month.htm) /resbn63 (http://www.tinaja.com/glib/resbn63.pdf) /adobe (http://www.adobe.com/support/downloads/) /mscalcs (http://www.tinaja.com/magsn01.asp#calculators) /distlang (http://www.tinaja.com/psutils/distlang.html) /postflut (http://www.tinaja.com/glib/postflut.pdf) /stepsynt (http://www.tinaja.com/glib/stepsynt.pdf) /stepcalc28 (http://www.tinaja.com/mscal28n.asp) /drms (http://www.drms.com) /drmscat (http://www.drms.com/catalog/Catsite.html) /arcata (http://www.arcatapet.com/imgv32.html) /cab04 (http://www.tinaja.com/images/bargs/cab04.bmp) /hp (http://www.hp.com) /bitmfont (http://www.tinaja.com/psutils/bitmfont.txt) /antifont (http://www.tinaja.com/psutils/antifont.psl) /pdf2bmpbmp (http://www.tinaja.com/psutils/pdf2bmp.bmp) /pdf2bmp (http://www.tinaja.com/psutils/pdf2bmp.psl) /figbm1 (http://www.tinaja.com/images/bargs/cab4-01a.bmp) /figbm2 (http://www.tinaja.com/images/bargs/cab4-01b.bmp) /figbm3 (http://www.tinaja.com/images/bargs/cab4-01c.bmp) /figbm4 (http://www.tinaja.com/images/bargs/cab4-01d.bmp) /figbm5 (http://www.tinaja.com/images/bargs/cab4-01e.bmp) /figbm6 (http://www.tinaja.com/images/bargs/cab4-01f.bmp) /figbm7 (http://www.tinaja.com/images/bargs/cab4-01g.bmp) /figbm8 (http://www.tinaja.com/images/bargs/cab4-01h.bmp) /blatsc (http://www.tinaja.com/glib/stepprep.psl) /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) /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 /magsn01 /muse153 /alphadem /hack84 /muse112 /muse113 /colorizd2 /spotcolr /urlindoc /emergop1 /emergop5 /resbn63 /muse135 /muse120 /muse131 /resbn88 /contests /muse115 /muse137 /infopack /hack64 /hack68 /resbn37 /resbn18 /stezine /ebayphen /stepprep /resbn26 /hack47 /hack68 /hack60 /hack69 /newsgrp /bwhistle /elesimp /resbn80 /resbn91 /resbn82 /resbn73 /resbn87 /imagimag /muse90 /muse151 /waywere /imagimag /twinkie /hack71 /hack73 /hack76 /resbn19 /acrocat /twenty47 /muse139 /muse115 /muse116 /bannyear /advetorl /resbn81 /infopack /postjust ] {setglib} forall [ /magsn01 /patnt01 /blat01 /h2gas01 /capvid01 /whtnu01 /auct01 /aafont01 /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 /glair01 /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.asp) 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 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 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /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 /info01x {(http://www.tinaja.com/info01.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 /ebay01x {(http://cgi6.ebay.com/aw-cgi/eBayISAPI.dll?ViewListedItems&userid=abeja&include=0&since=-1&sort=2) 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 (|/ebay01x |1 View our |/surl eBay auctions|/ebay ) 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 25 def /tabs [20] def /font0 /StoneSans-Bold [37 0 0 40.1 0 -23] gonzofont % temp thin W THIS ONE IS IT /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 [ 7 0 ] def startgonzo |a T |b here sure seems to be a lot of those |/tinton1 |6dot.bomb|1|/tintoff bankruptcy auctions lately. Along with older live auctions, these can be useful resources to pick up test and lab gear. As well as getting deep distress priced stuff you can sell on |/surl |6eBay|1|/ebay to fund your ongoing |/surl |6research|1|/magsn01 .|p Although I overwhelmingly prefer sealed bid sales where I can keep my intent unknown and my time and my psychic energy involvement to a bare minimum, I have found live auctions to be a useful ongoing addition to the mix. So, I thought I might go over some insider secrets of what does and does not seem to be working for me\274 |c Finding events |d Many auctioneers still consider the web (and especially |/surl |6eBay|1|/ebay ) an enemy to be avoided, rather than essential tools. So, finding the better industrial and dot-com bankruptcy auctions remains a serious problem\274|p |h|z|L|/shiftin |/staytint1r |6Unless you have to really dig for it, the auction is probably not worth attending. |h|p|F|1|/shiftout |/aqua |/black A set of very useful auction-finding tools I've developed does appear on my |/surl |6Auction Help|1|/auct01 library page. These are somewhat Arizona specific, but I'll be glad help you make your own local or regional |/surl |6Custom Auction Finder|1|/info01 The object of your gathering should be a custom personal web page full of useful links. At one time, there was the superb |/surl |6Auction Advisory|1|/auctionadvisory magazine, but they've sold out their listing service to the |/surl |6National Auctioneers Association|1|/naaorg who apparently seem chronically unable to find a pig in a dishpan. They have not picked up on the fact that you have to aggressively seek out auction listings, rather than waiting for them to come to you. But I have found a few of their odd listings to be most useful. Their |/surl |6find an auctioneer|1|/findauct links can be of considerable value, though. Your next stop should be your state auctioneer's org, such as this |/surl |6Arizona Example|1|/azstateorg . Start off by linking their auction calendar. Then go through their membership list and link every auctioneer with a web site. Most of the sites will be utterly atrocious, but a few may become favorites you'll often return to. Get on useful email lists. Then, go to a |/surl |6national newspaper finder|1|/natpaper and a |/surl |6state|/azpaper |/surl newspaper finder|1|/azpaper and link all of the classified pages in your area. Try to reach deep into these sites to minimize clicking and having to type the search phrase "auction" over and over again. Next, get a list of all schools in your area. I personally have found high school auctions to be largely trash and university auctions to have too much insider higrading. But community colleges (especially the remote rural ones) have literally been a goldmine for me. Some schools will have their own auction website as |/surl |6this|/mccoll |/surl example|1|/mccoll , while others may leave the promotion to the auctioneer |/surl |6as here|1|/walt . You might have to send emails to find out the policies on each individual school. Live community college auctions run from one to six times a year. I've personally found city and county auctions of little value, even though they can offer exceptional vehicle and construction equipment bargains to others. My policy here is to preview the nearby ones but not attend. There are a bunch of |/surl |6live auction listers|1|/auct01 on the web, but I have yet to find one that is really useful to me. Still, be sure to link any of these you find interesting. They are easiest located by using |/surl |6Google|1|/google or |/surl |6Hotbot|1|/hotbot . |/surl |6Military surplus|1|/drmo auctions are not normally live any more, having been privatized and usually sealed bid or internet based. Much more on this on our |/surl |6Auction Help|1|/auct01 page. While these are an incredible opportunity, they will not be our focus here. But these definitely should be linked on your access pages. One key website is |/surl |6SurplusBid|1|/levylatham . More on my |/surl |6Guru's Lair|1|/tinaja website. Finally, look for "second tier" resources in which auction sites on your link page give you links to yet other auction sites. Try to stash at least fifty resources on your live auction link file. Check them daily. |c Learn how to become a crooked auctioneer |d Do try to study and learn live auctioneering. For the sole purpose of knowing exactly how and why you are being manipulated. I've been unable to find much in the way of books on live industrial auctions. Insider schools and apprenticing are the usual new auctioneer sources.|p At your next few auctions during lots you don't want, inconspicuously work your way on around |/tinton1 |6behind|1|/tintoff the auctioneer and then carefully study the process from their perspective. But blend in. Do not ever give the auctioneer the slightest clue what you are up to or why. Note particularly how the crowd gets worked and the relationship between the auctioneer, the flag man, the recorder, the talker-uppers, and the ringman or spotter. The main goal of the auctioneer is usually to maximize the seller's return. There are all sorts of things they can do that involve varying degrees of crookedosity\274|z |y |/tinton1 |6shilling|j\320|1|/tintoff A shill is a friend of the auctioneer whose main purpose is to raise the bid prices by bidding against you. By watching the manic fervor of the mark bidder, they usually can stop well short of an actual award. |h |/tinton1 |6monopoly money|j\320|1|/tintoff Some bidder's dollars may be worth a lot less than yours. Somebody may be spending corporate or company money rather than their own. Or acting as a hired-gun agent. A lien holder may bid up minimums with zero value dollars that go right back into their own pocket. Or a bankruptee may only have to pay the lien price and might get to keep most of the rest. Thus, on a sale with a |4$50,000|1 lien, your |4$230,000|1 bid may be countered by a |4$240,000|1 one that is only going to cost |4$50,000|1. |h |/tinton1 |6hidden proxies|j\320|1|/tintoff These may range from legit absentee bids to outright charades under insider control. Regardless, the ultimate high bidder need not be present to win. |h |/tinton1 |6off-the-wall bidding|1|j\320|/tintoff This is a more blatant form of shilling where bids are simply taken from a ceiling light fixture in the far corner of the room. By reading the marks, the auctioneer can almost always avoid letting the light "win". If they do, a simple "I'm sorry sir, I could have sworn you had your hand up" can often be used as a bailout. |h |/tinton1 |6personal buying|j\320|1|/tintoff Most auctioneers are upfront about having personal or relative accounts they can bid on. Thus, they can block any unconscionably low bids and make a potential killing in the process. Besides simply setting the good stuff aside. Sometimes you can work this to your advantage on a next day buyback. |h |/tinton1 |6overbidding|j\320|1|/tintoff happens when the auctioneer accepts two more bids from you |/tinton1 |6after|1|/tintoff you have stopped bidding. One defense is to be extremely obvious with your head shaking and body language when you are finished. Still, there is at least one Phoenix area auctioneer so good at this scam that he still nails me every now and then. |h |/tinton1 |6buyer's premium|j\320|1|/tintoff This is sort of a tip or tax which the auctioneer appends to the total of everything you bid on. Depending on the auction, this can range from essential to outright greed. Be sure to subtract out this percentage from all your final bids. |h |/tinton1 |6fast hammer|j\320|1|/tintoff The fast hammer dramatically shortens the going-going-gone process whenever the auctioneer wants to reward a friend or encourage a bidder to spend more lately. With care, you can use this to your advantage by personally shilling ahead of time. |h |/tinton1 |6home court advantage|j\320|1|/tintoff I tend to avoid "auction barn" sales where the auctioneer is on their home turf. There is simply too much they can control in way too many subtle ways. Also, the merchandise has been moved, inspected, and, most likely, highgraded. |h |/tinton1 |6overstated implied value|j\320|1|/tintoff "Genuine Steelcase!" "Do you know what one of these costs uptown?" "This is the real deal!" If the item was that good, chances are it would not be up for auction in the first place. |h |/tinton1 |6only a dollar more|j\320|1|/tintoff There are all sorts of psycic games that can be used to goad yet another bid. And get yet a higher price from an unsuspecting bidder. Only slightly more subtle than "Raise your hand if you haven't bid yet". |y |/tinton1 |6the hypnotic drone|j\320|1|/tintoff The reason for the auctioneer's chant is to create an unreal and mesmerizing environment where you hypnotically stand there dumbfounded with your hand raised. Just like the high from an indian drum circle. This is possibly the greatest auction con of all.|p Study it as a work of art. |c before you decide to bid on a lot |d Let us look at a few common sense rules that I feel you should have firmly in place before you even start your bidding on any lot\274|p |h|L|/staytint1 |6|/shiftin |z \267 Do not bid on anything you cannot afford. |h \267 Clear your triage of the previous auction |tbefore starting a new one. |h \267 Never bid on anything you do not have a |tdefinite use or resale plan for. |h \267 Never bid on anything that you cannot |tadd significant personal value to. |h \267 Never get into a pissing contest with any |tother bidder. |h \267 Never send an auctioneer any ambiguous |tvisual or verbal signal. |h \267 Most psycic games will fail you miserably. |h \267 If more than 5% of your bids win, you are |tpaying too much. |h \267 Seek out a 30:1 or higher buy to sell price. |tTrue auction costs lie in your time, your |ttrucking, storage, labor, and similar |tnondirect business expenses. |h \267 Try to keep your bids in the 1/4 to 1/3 of a |tcent on the dollar range. |h|F|/aqua |/black |/shiftout |1 But the real biggie is\274 |h|L|/staytint1r |6|/shiftin |z |6\267 pre-determine your max bid and NEVER |texceed it. Not by a penny. EVER. |F|/aqua |/black |/shiftout |1|c Some Bidding Strategies |d There are probably as many bidding strategies as there are bidders. Obviously, only some of them will work. And then only some of the time. Here's four that I use\274|p |h|z |/tinton1 |6The bottom feeder ploy|j\320 |/tintoff |1 Here, you'll offer an extreme lowball bid over and over again. Typically |4$2.50|1, but rarely |4$250|1. You'll get mountains of stuff nobody else wants or appreciates. Note that auctioneers welcome knowing where a floor bid is, but hate anyone trashing their bid level. So, offer your bids |/tinton1 |6silently|1|/tintoff and |/tinton1 |6subtly|1|/tintoff . Such as doing a $2.50 Churchill "V for Victory" against your chest close to the auctioneer. The message you want to deliver is "Here is a floor bid if and when you care to accept it". The bid is best entered while the lot is still being described. Eventually, the auctioneer may get lazy and might repeatedly use you for momentum or catch-up. |h|z |/tinton1 |6The big ticket ploy|j\320 |/tintoff |1If there is some high value item you really want, bid your max |/tinton1 |6once|1|/tintoff late in the auction. Let others open and run the price up. Should the bidding not reach your max, wait patiently until the second "going" of every going-going-gone before bidding. If needed, split increment up to your max, and then stop. For this to work, you |/tinton1 |6must|1|/tintoff stay in close eye contact with the auctioneer. While psycic games usually do not work, an anguished look on your face and wringing your left hand near your belt just may be of help here. |h|z |/tinton1 |6The dancing elephants ploy|j\320 |/tintoff |1 This happens when two heavy bidders keep running up the lot prices way beyond what you want to pay. For lot after lot, open with a single very modest bid, then fold. Eventually they will run out of money, make a big mistake, or ignore a lot or two that is way beneath their contempt. The crucial rule here is |/tinton1r |6when |/tinton1r dancing with elephants, keep your eyes on their feet |/tinton1r at all times|1|/tintoff . |h|z|/aqua |/tinton1 |6The table scraps ploy|j\320 |/tintoff |1While this works much better with sealed bid sales, sometimes you can simply wait till after the auction to find out what did not sell, what was not paid for, or what the auctioneer had personally bid his minimums on. Astounding bargains can sometimes be picked up amongst the trash.|p |h A stunt surprising few bidders know: By wiping your hand palm down across your chest, you can request the auctioneer cut the bid increment in half. Going, say, from a |4$20|1 bid to a |4$17.50|1 one. Used often, this can save you significant bucks. Especially when approaching a threshold (|4$20|1, |4$100|1, etc...) that nobody else wants to cross. The auctioneer is never obligated to split an increment, but usually will do so for momentum. What about multiple lot items that you'd really like all of? I'm not sure what the best strategy is. If you make or beat your max price, taking them all at once is surest. Besides pleasing the auctioneer. But if another bidder only wants one, possibly you can get the remainder for a song. Which leads to games in which your low bid encourages others to take all of them, or your high bid just keeps repeating for no gain. Watch your non-auction costs on this as well. A truck or storage rental is better amortized over |41000|1 items rather than |1100|1. If they sell. Another route is to not bid at all till the dust settles. And then bottom feed. But you may get nothing at all this way. Supply and demand. Lead or lag. Your call. |c Seeking value that others miss |d I've often done best when the items I am after are a very minor part of the overall auction. And thus do not attract serious specialty buyers. By knowing your needs and your market, you might often benefit. Being the only serious bidder on a pallet of Tektronix oscilloscopes or whatever gives you a compelling advantage.|p Sometimes something awful looking or apparently useless can offer ugly duckling benefits. My best score along these lines: At a laptop accessories bankruptcy, there were these huge, heavy, and ugly obsolete test stations. Including broken membrane keyboards and loose wires all over everywhere. Particle board, no less, hand painted a hideous baby blue with crib paint. But buried inside were mint laser bar code scanners. For $24 a dozen. Heavy and obsolete electronics can occasionally be stripped for individual parts that still sell well and remain in demand. And sometimes five broken items can be combined to make four good ones. As another ferinstance, nobody wants legal sized paper anymore, so the reams go for pennies. But we've got this power paper cutter at home that instantly converts them into ordinary reams. Plus dozens of free note pads. No telling what's in the bottom of that huge mixed boxlot. But be sure to check. Sometimes, obviously broken, dirty, or obsolete items will "poison" a lot, masking the true hidden goodies lurking in the shadows. It does pay to know where the closest dump is and what their tipping fees and hours might be. Along with the local rules are on stuffing dumpsters. Early triage can often make even the most useless looking lots quite profitable. |c A few random thoughts from Don\274 |d Always make sure the auction is really going to be held. Driving hundreds of miles for nothing is a real downer. Some auctions are cancelled or delayed at the last minute; others are simply a lienholder's blackmail ploy that are never intended to take place at all.|p Know the payment terms ahead of time. Many auctions demand cash or certified checks. Bid deposits might be required, possibly huge ones. I have found that getting personally addressed certified checks ahead of time in "binary" denominations of |4$100, $200, $400, $800 \274|1 to be useful. An unsigned certified check can sometimes be substituted for a cash deposit. But always try to prequalify for saner methods of payment. This is usually easy to do on your second or third auction from the same auction house. Don't forget to bring your sales tax certificate copy. Be sure to spend as much time previewing as you possibly can. Make sure you know the condition of each and every item you intend bidding on. Check the |/tinton1 |6entire|1|/tintoff contents of box lots or multi pallets. Keep bluebooks handy but well hidden, such as that freebie |/surl |6Test Equipment|/tec |/surl Connection|1|/tec essential reference. If you don't like what you see at the preview or early in the show, cut your losses and leave. |/tinton1 |6Never|1|/tintoff buy stuff just because you are there. Know how many bidder's cards are issued. Usually, you can look at the table and see the next available number. Assume |/tinton1 |6one-third|1|/tintoff of these to be serious competition. Fewer if you are after specialty stuff at a general auction. Ask to have lots split or combined when it is to your advantage. But only ahead of time and quietly. It may pay to politely point out stuff that is supposed to go together that is wildly spread across the site. Always keep a few five and ten dollar bills loose in your pocket. To hire teenagers to help you with loading, to grease any security or loading hassles, or to make quick low level deals with other buyers. A big math error that |/tinton1 |6everybody|1|/tintoff always makes: Lots |484|1 through |488|1 are combined into a one-price offering. How many lots are offered? Wanna bet? Count again. |/tinton1r |6Don't damage your stuff with sloppy loading! |/aqua |1Dress down to the point of being somewhat shabby. Keep a "no threat" quiet low profile. Avoid interacting with other bidders. |6|/tinton1r Never piss off the auctioneer!|/tintoff |1Never say anything negative or derogatory about any item. Try to help the auctioneer in subtle ways. Such as repeatedly offering floor bids, feigning close interest in items you do not really want, making positive and upbeat comments, or honestly answering questions about what an item really is. Carefully study the auctioneer's style and tone. Then help them emphasize it.|/aqua Suppress your ego at all times. Never reveal your intent or needs to anybody. But always go out of your way to personally thank the auctioneer after the show. |/surl |6U-Haul|1|/uhaul trucks and trailers can be extremely useful for carting off the goodies. A class-2 hitch preinstalled on your pickup, van, or |4SUV|1 can be a very good investment. But watch your weight limits and tire pressures. Always print out the U-haul rate and location sheets before the auction. Note that most U-haul rates are situational. Ferinstance, recently, a local Thatcher trailer was |4$34|1, Thatcher to Wickenburg one way was |4$44|1, but Wickenburg to Thatcher was a staggering |4$167|1. Guess which way I needed to go? Have places to stash your trophies when you return. We use combinations of oversize doghouses that your tax dollars paid |4$48,000|1 each for, commercial storage rental units, and in-home stashes. Use last-in-first out where you re-triage into your unprocessed, waiting-for-prep, and ready-to-sell storage. Flush the trash or it will eat you alive. More on this in |/surl |6My Ebay Secrets|1|/myebays . |c \274 and from Bee\274 |d Have a combined folder and travel envelope that holds your expense records, mileage, auction location and maps, tax certificate copy, and U-haul info.|p A team of two or more can avoid judgement errors. Hauling something home is |/tinton1 |6much|1|/tintoff easier than properly preparing it for |4UPS|1 or other commercial shipment to a customer\274 |h|z|L|/shiftin |/staytint1r |6Avoid buying anything that you cannot hold extended at arm's length. |h|p|F|1|/shiftout |/aqua |/black Run price checks on |/surl |6eBay|1|/ebay ahead of time (or even better live). It is super easy to overestimate value, especially on items you do not have personal expertise in. Avoid bidding on anything whose market you do not intimately know. Do make absolutly sure you know which item is being currently bid and on what terms. Watch the auctioneer like a hawk at all times. Carry your own edible snacks. Especially water or cold drinks. Avoid the roach wagon. Find the restrooms well before you need them. Wear comfortable and appropriate clothes. Shoes and hats in particular. Anticipate the weather and lack of air conditioning. Be sure to have a small notebook where you record every win and other essential info. Provide business cards for contacts with other bidders. Know what forms of payment and deposits are or are not acceptable. Work with your bank ahead of time. Have a list of local branches. |c Opporknockity tunes but once |d OK. It is fourteen hours into what was supposed to be a two hour auction. It is |4117|1 degrees in the shade, but there is no shade. Your third |/surl |6El Fumarole|1|/twinkie Burrito Grande from the roach wagon is about to live up to its name. All the exciting stuff is long gone. You are way overspent, have won far more than you can possibly ever haul away and are utterly emotionally drained. The auction is interminably dragging and has become mind-numbingly slow and dull. Many others have left. You have a backache, sunburn, and wore the wrong shoes. Besides being asleep on your feet.|p Guess what? Everybody else is in the same shape, only even worse off. |/tinton1 |6Especially the auctioneer!|1|/tintoff . Other bidders are probably even more out of money than you are. This is the critical time for you to find reserves of energy, quick reaction, and quiet unemotional responses. For the remaining items are about to be combined into dozen skid lots that literally are going to be given away. This is where the auctioneer gets sloppy and in a big hurry. This is where you think triage, hauling off huge bunches of trash to gain small gems of unspeakably exceptional value. Watch for this time. It can be a golden opportunity for you. And not one to be missed. |c For More Help |d Additional tutorials and links appear on our |/surl |6Auction Help|1|/auct01 library page. Custom auction finders and specific solutions are available to you per our |/surl |6InfoPack|1|/info01 services. And you can use this link for our |/surl |6eBay Auctions|1|/ebay |/tinton1 |-F|1 |h|h |/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