IF [#4201 EQ 6] THEN M30

while-do, if-then, case, for, repeat, ....

 

O0001;

T2;

......

G91 G00 .....

M06T3;

 

Промышленный цикл T0000 - SYNTEC

https://ru.cnc.uno/learn/theme2/topic0/lesson2-1-main07/content/t0000.txt

%@MACRO
#6010:=0;               
#6011:=0;              
M77;                    
WAIT();
-----------------------------

G@201 G@202

#1000:=@201

if @201<>#1000 then g@201

#1034:=@203

-----------------------------

G10 L2 P0 X0.Y0.Z0.;    
WAIT();

  IF ( @502 = #1036 ) THEN
     G90 G53 Z0.;
     M99;
  END_IF;

@201:=#1000;   //00
@202:=#1004;    //90     
@203:=#1036;    
@999:=1;        
WAIT();
M5;


--СМЕНА ИНСТРУМЕНТА
IF @203<13 THEN       
WAIT();
G94;                    
M7;                    
M46;                   
M50;                    
G90 G53 G00 Z0.;           
WAIT();
T@203;                
WAIT();
M52;                   
G90 G53 G00 Z#26023 C#26024;     
M51;                   
WAIT();
@502:=@203;             
G04 X0.5;
M53;                   
G@202;                  
M99;
END_IF;

...

g90.....

 

Наверх