#used for 5/21/03 Shannas'arrays
$XCENTER1 = 110185
$YCENTER1 = -122890
$XCENTER2 = 135408
$YCENTER2 = -97721
$XCENTER3 = 110121
$YCENTER3 = -72185
$XA=73412
$Y1=-35927
$XSQ=300
$YSQ=300
$XCLEAR=148000
$YCLEAR=-31318
$QINK=-77211
Speed,40000
Quill,-57035,-70079,-40000
Quill,clear
MoveAXY,XCLEAR,YCLEAR
$XCENTER = XCENTER1
$YCENTER = YCENTER1
Square,27,1,A,4
Square,28,1,A,4
Square,29,1,A,4
Square,30,1,A,4
$XCENTER = XCENTER2
$YCENTER = YCENTER2
Square,27,1,A,4
Square,28,1,A,4
Square,29,1,A,4
Square,30,1,A,4
$XCENTER = XCENTER3
$YCENTER = YCENTER3
Square,27,1,A,4
Square,28,1,A,4
Square,29,1,A,4
Square,30,1,A,4
$QINK=-75192
Pclean,P,17,10
Pclean,O,17,10
Pclean,N,17,10
Pclean,M,17,10
Pclean,L,17,10
Pclean,K,17,10
Pclean,J,17,10
Pclean,I,17,10
Pclean,H,17,10
Pclean,G,17,10
Pclean,F,17,10
Pclean,E,17,10
Pclean,D,17,10
Pclean,C,17,10
$QINK=-77211
# end of U338 section
$XCENTER = XCENTER1
$YCENTER = YCENTER1
Square,23,1,A,6
Square,26,1,A,6
Square,25,1,A,6
Square,22,1,A,6
Square,20,1,A,6
$XCENTER = XCENTER2
$YCENTER = YCENTER2
Square,23,1,A,6
Square,26,1,A,6
Square,25,1,A,6
Square,22,1,A,6
Square,20,1,A,6
$XCENTER = XCENTER3
$YCENTER = YCENTER3
Square,23,1,A,6
Square,26,1,A,6
Square,25,1,A,6
Square,22,1,A,6
Square,20,1,A,6
$QINK=-75192
Pclean,P,18,10
Pclean,O,18,10
Pclean,N,18,10
Pclean,M,18,10
Pclean,L,18,10
Pclean,K,18,10
Pclean,J,18,10
Pclean,I,18,10
Pclean,H,18,10
Pclean,G,18,10
Pclean,F,18,10
Pclean,E,18,10
Pclean,D,18,10
Pclean,C,18,10
$QINK=-77211
# end of B941 section
$XCENTER = XCENTER1
$YCENTER = YCENTER1
Square,31,1,A,8
Square,32,1,A,8
Square,34,1,A,8
Square,35,1,A,8
Square,36,1,A,8
$XCENTER = XCENTER2
$YCENTER = YCENTER2
Square,31,1,A,8
Square,32,1,A,8
Square,34,1,A,8
Square,35,1,A,8
Square,36,1,A,8
$XCENTER = XCENTER3
$YCENTER = YCENTER3
Square,31,1,A,8
Square,32,1,A,8
Square,34,1,A,8
Square,35,1,A,8
Square,36,1,A,8
$QINK=-75192
Pclean,P,19,10
Pclean,O,19,10
Pclean,N,19,10
Pclean,M,19,10
Pclean,L,19,10
Pclean,K,19,10
Pclean,J,19,10
Pclean,I,19,10
Pclean,H,19,10
Pclean,G,19,10
Pclean,F,19,10
Pclean,E,19,10
Pclean,D,19,10
Pclean,C,19,10
$QINK=-77211
#end of B1066 section
$XCENTER = XCENTER1
$YCENTER = YCENTER1
Square,33,1,A,10
Square,0,1,A,10
Square,15,1,A,10
Square,12,1,A,10
Square,10,1,A,10
$XCENTER = XCENTER2
$YCENTER = YCENTER2
Square,33,1,A,10
Square,0,1,A,10
Square,15,1,A,10
Square,12,1,A,10
Square,10,1,A,10
$XCENTER = XCENTER3
$YCENTER = YCENTER3
Square,33,1,A,10
Square,0,1,A,10
Square,15,1,A,10
Square,12,1,A,10
Square,10,1,A,10
$QINK=-75192
Pclean,P,20,10
Pclean,O,20,10
Pclean,N,20,10
Pclean,M,20,10
Pclean,L,20,10
Pclean,K,20,10
Pclean,J,20,10
Pclean,I,20,10
Pclean,H,20,10
Pclean,G,20,10
Pclean,F,20,10
Pclean,E,20,10
Pclean,D,20,10
Pclean,C,20,10
$QINK=-77211
#end of Pdiat4S section
Quill,clear
MoveAXY,XCLEAR,YCLEAR
End