#10/1/04 comp spots 4 arrays only
#use 4 spot MACCMANDS
$XCENTER1 = 99484
$YCENTER1 = -21758
$XCENTER2 = 132530
$YCENTER2 = -22058
$XCENTER3 = 99575
$YCENTER3 = -58879
$XCENTER4 = 132540
$YCENTER4 = -58903
$XCENTER5 = 99573
$YCENTER5 = -95567
$XCENTER6 = 132540
$YCENTER6 = -95657
$XCENTER7 = 99768
$YCENTER7 = -132354
$XCENTER8 = 132529
$YCENTER8 = -132354
$XA=4467
$Y1=-126717
$XSQ=0
$YSQ=0
$XCLEAR=148000
$YCLEAR=-3881
$QINK=-98518
Speed,80000,80000,80000
Quill,-81944,-92905,-81944
Quill,clear
# 1:2000
MoveAXY,XCLEAR,YCLEAR
$XCENTER = XCENTER1
$YCENTER = YCENTER1
Square,37,1,P,20
$XCENTER = XCENTER2
$YCENTER = YCENTER2
Square,37,1,P,20
$XCENTER = XCENTER3
$YCENTER = YCENTER3
Square,37,1,P,20
$XCENTER = XCENTER4
$YCENTER = YCENTER4
Square,37,1,P,20
Square,40,1,P,20
$QINK=-98518
Pclean,P,24,10
Pclean,O,24,10
Pclean,N,24,10
Pclean,M,24,10
Pclean,L,24,10
Pclean,K,24,10
Pclean,J,24,10
Pclean,I,24,10
Pclean,H,24,10
Pclean,G,24,10
Pclean,F,24,10
Pclean,E,24,10
Pclean,D,24,10
Pclean,C,24,10
Pclean,B,24,10
Pclean,A,24,10
# 1:1000
$XCENTER = XCENTER1
$YCENTER = YCENTER1
Square,38,1,P,18
$XCENTER = XCENTER2
$YCENTER = YCENTER2
Square,38,1,P,18
$XCENTER = XCENTER3
$YCENTER = YCENTER3
Square,38,1,P,18
$XCENTER = XCENTER4
$YCENTER = YCENTER4
Square,38,1,P,18
$QINK=-98518
Pclean,P,23,10
Pclean,O,23,10
Pclean,N,23,10
Pclean,M,23,10
Pclean,L,23,10
Pclean,K,23,10
Pclean,J,23,10
Pclean,I,23,10
Pclean,H,23,10
Pclean,G,23,10
Pclean,F,23,10
Pclean,E,23,10
Pclean,D,23,10
Pclean,C,23,10
Pclean,B,23,10
Pclean,A,23,10
# 1:500
$XCENTER = XCENTER1
$YCENTER = YCENTER1
Square,39,1,P,16
$XCENTER = XCENTER2
$YCENTER = YCENTER2
Square,39,1,P,16
$XCENTER = XCENTER3
$YCENTER = YCENTER3
Square,39,1,P,16
$XCENTER = XCENTER4
$YCENTER = YCENTER4
Square,39,1,P,16
$QINK=-98518
Pclean,P,22,10
Pclean,O,22,10
Pclean,N,22,10
Pclean,M,22,10
Pclean,L,22,10
Pclean,K,22,10
Pclean,J,22,10
Pclean,I,22,10
Pclean,H,22,10
Pclean,G,22,10
Pclean,F,22,10
Pclean,E,22,10
Pclean,D,22,10
Pclean,C,22,10
Pclean,B,22,10
Pclean,A,22,10
Quill,clear
MoveAXY,XCLEAR,YCLEAR
End