Полезная статья "Приемы параметрического программирования"

В сегодняшней статье хотелось бы поделиться примером программы с использованием параметрического программирования и оператора WHILE. Подробно использование этих приёмов изучается на курсе Продвинутого программирования Fanuc.

Пример:

Основная программа

O0002 (SVERLENIE PO PERIMETRU);
G90 G40 G17 G54;
T1 M6;
G43 H1 Z300;
S1000 F150 M3;
;
G83 G99 R5. Z-15. Q10. K0 ;
G65 P8011 X10. Y10. A50. B50. I6. J3. ;
G80;
;
M30;
Макропрограмма

O8011 (S RAMKA) ;
#31=[#1/[#4-1]] (SHAG_X);
#32=[#2/[#5-1]] (SHAG_Y);
;
G90 X#24 Y#25;
;
#30=1;
WHILE[#30LT#4] DO1;
G91 X#31;
#30=[#30+1];
END1 ;
;
#30=1;
WHILE [#30LT#5] DO1;
G91 Y#32;
#30=[#30+1];
END1 ;
;
#30=1;
WHILE[#30LT#4]DO1;
G91 X[-#31] ;
#30=[#30+1];
END1 ;
;
#30=1;
WHILE[#30LT[#5-1]]DO1;
G91 Y[-#32] ;
#30=[#30+1];
END1 ;
;
G90;
M99;