1 - 14 en-938872/2
%20
$ X START:
L0=$
$ Y START:
L1=$
$ X STEP:
L10=$
$ Y STEP:
L11=$
L4=0
WHILE L4 <> 25 DO
Test for answer yes: Y
REPEAT $ NUMBER OF POINTS IN X:
L2=$
UNTIL L2>0
Test for number of columns greater
than 0
REPEAT $ NUMBER OF POINTS IN Y:
L3=$
UNTIL L3>0
Test for number of rows greater than 0
REPEAT $ PATTERN OF POINTS IN X:
$=L2
$+ /Y:
$=L3
$+ OK (Y/N) :
L4=$
UNTIL L4=14 OR L4=25
Wait for answer: N (no) or Y (yes)
ENDW
$
N.. G00 G52 XO Z0
N.. T1 D1 M06
N..
FOR L5=1 TO L3 DO
Loop on rows
$ ROW POSITION:
$=L5
XL0 L6=L5-1
*
L11+L1 YL6
G00 Z0
FOR L4=1 TO L2 DO
Loop on columns
$ DRILL THE ROW POINT:
$=L5
$+COLUMN:
$=L4
L6=L4-1
*
L10+L0 XL6
G01 Z-10 F50
G00 Z0
ENDF
ENDF
N..
M02
To Next Page
Loading...
