%!PS-Adobe-2.0
%%Creator: newBoard.lsp
%%Title: .ps
%%CreationDate: 
%%Pages: 1
%%DocumentFonts: Zurich ZurichFigurine-Bold ZurichDiagram Helvetica-BoldOblique
%%PageOrder: Ascend
%%BoundingBox: 0 0 612 792
%%DocumentPaperSizes: Letter
%%EndComments
 
/gamenumber 1 def
/pagenumber 1 def
/leading 12 def
/pagetop 720 def
/nextline 720 def
/left-margin 72 def
/column-width 216 def
/right-margin left-margin column-width add def
 
 
/hrule {
  gsave 
    newpath setlinewidth 1 index 4 2 roll moveto lineto 
    stroke 
  grestore
} def
 
/vrule {
  gsave 
    newpath setlinewidth 2 index 4 2 roll moveto exch lineto 
    stroke 
  grestore
} def
 
/circle {
    newpath 0 360 arc
    setlinewidth stroke
} bind def
 
/top-of-page {
  left-margin pagetop moveto newline
} def
 
/sf {
  /leading exch def
  /fontkey exch def
  fontkey findfont leading scalefont setfont
} bind def
 
/countblanks {
  /blankctr 0 def
  {
    ( ) search 
    {
      /blankctr blankctr 1 add def
      pop
      pop
    }
    {
      pop
      exit
    } ifelse
  } loop
} bind def
 
/justifytext {
  dup
  countblanks
  /linesize right-margin left-margin sub def
  dup
  /stringsize exch stringwidth pop def
  /space linesize stringsize sub def
  /blankctr 0 ne {
    /space space blankctr div def
  } if
  space 0 8#040
  4 -1 roll
  widthshow
} bind def
 
/black {
  0 setgray
} bind def
 
/vdecoration {
  /page-number exch def
  gsave
    .4 setgray
    1 306 756 13 circle
    1 306 49 13 circle
    1 306 49 16 circle
    306 743 65 1 vrule
  grestore
  black
  /ZurichDiagram 20 sf
  306 10 sub 756 5 sub moveto
  (k) show
  /Zurich-Bold 12 sf
  303 46 moveto
  page-number show
} bind def
 
/center {
  dup
  stringwidth pop
  2 div
  right-margin left-margin sub 2 div
  exch sub
  left-margin add
  nextline moveto
  show
  newline
} bind def
 
/newline {
  /nextline
    nextline leading sub
    def
} def
 
/nl {
  left-margin nextline moveto
} def
 
/justify {
  nl
  justifytext
  newline
} def
 
/left-justify {
  nl
  show
  newline
} def
 
/trace {
  pstack
  (-----) =
} bind def
 
/nlength {
  /nilcount 0 def
  {
    0 gt {/nilcount nilcount 1 add def} if
  } forall
  nilcount
} def
 
/nulltrim {
  trace
  /str exch def
  nlength /count exch def
  /tstr count string def
  /n 0 def
  str {
    count 0 gt {
      /count count 1 sub def
      /chr exch def
      tstr n chr put
      /n n 1 add def
    } if
  } forall
  tstr
  trace
} def
 
 /cat {
   exch dup length    
   2 index length add string    
   dup dup 4 2 roll copy length
   4 -1 roll putinterval
 } bind def  
 
/right-justify {
  dup
  stringwidth pop
  right-margin exch sub
  nextline moveto
  show
} def
 
/number-game {
  /str 5 string def
  gamenumber str cvs
  str nulltrim
  (G)
  exch cat
  /nextline pagetop def
  /Helvetica-BoldOblique 20 sf
  .75 setgray
  right-justify
  /gamenumber gamenumber 1 add def
} def 
 
/number-page {
  /str 5 string def
  pagenumber str cvs
  str nulltrim vdecoration
  /pagenumber pagenumber 1 add def
} def
 
/label-game {
  /Zurich-Bold 12 sf
  (Position at:) center
  /ZurichFigurine-Bold 12 sf
  center
} def

%%EndProlog
 
%%Page: 1 1
 
/Zurich 12 sf
top-of-page
(["Event" "Northern Idaho Open"]) left-justify
(["Site" "Moscow (ID)"]) left-justify
(["Date" "2004.07.17"]) left-justify
(["Round" "1.5"]) left-justify
(["White" "Eacker David J (ID)"]) left-justify
(["Black" "Looney Daniel (ID)"]) left-justify
(["Result" "1-0"]) left-justify
newline
/ZurichFigurine-Bold 12 sf
(1.d4 f5 2.c4 Nf6 3.Nc3 g6 4.Nf3 Bg7) justify
(5.e3 d6 6.Bd3 O-O 7.O-O Qe8 8.e4) justify
(fxe4 9.Nxe4 Bg4 10.Be3 Nbd7 11.Nxf6) justify
(Nxf6 12.Be2 h6 13.d5 Ne4 14.Nd4) justify
(Bd7 15.Bg4 Bxd4 16.Bxd4 Nf6) justify
(17.Bxd7 Qxd7 18.Qd3 Qg4 19.Rae1) justify
(Rf7 20.Re6 Raf8 21.h3 Qg5 22.g4) justify
(Kh7 23.f4 Nh5 24.fxg5 Rxf1 25.Qxf1) justify
(Rxf1 26.Kxf1 Nf4 27.Rxe7 1-0) left-justify
newline
/ZurichDiagram 20 sf
(cuuuuuuuuC) center
(\(wdwdwdwd}) center
(70p0w$wdk}) center
(6wdw0wdp0}) center
(5dwdPdw\)w}) center
(&wdPGwhPd}) center
(3dwdwdwdP}) center
(2P\)wdwdwd}) center
(%dwdwdKdw}) center
(v,./9EFJMV) center
(27.Rxe7) label-game
number-game
number-page
showpage
 
%%Trailer
%%EOF