Permalink
Switch branches/tags
Nothing to show
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
73 lines (58 sloc) 1.01 KB
%!PS-Adobe-3.0
%%Title: Printable Havannah Boards
%%Creator: Zhen Wang [zmxv.com]
%%Pages: 7
%%BoundingBox: 0 0 612 792
%%DocumentPaperSizes: Letter
%%EndComments
%%BeginProlog
/hw {25} bind def
/fw {hw 2 mul} bind def
/fh {hw 3 sqrt mul ceiling} bind def
/cell {
newpath
moveto
fw 0 rmoveto
hw neg fh rlineto
fw neg 0 rlineto
hw neg fh neg rlineto
hw fh neg rlineto
fw 0 rlineto
closepath
} bind def
/column {
dup fh mul 1 1 3 index {
fh 2 mul mul 1 index sub 396 add 3 index 3 hw mul mul 306 add exch
cell stroke
} for
pop pop pop
} bind def
/board {
dup 1 sub dup neg -1 exch {
dup abs 2 index 2 mul 1 sub exch sub
column
} for
pop
} bind def
%%EndProlog
%%Page: 0
/hw {25} bind def
4 board showpage
%%Page: 1
/hw {20} bind def
5 board showpage
%%Page: 2
/hw {16} bind def
6 board showpage
%%Page: 3
/hw {14} bind def
7 board showpage
%%Page: 4
/hw {12} bind def
8 board showpage
%%Page: 5
/hw {11} bind def
9 board showpage
%%Page: 6
/hw {10} bind def
10 board showpage