G81鑽孔用G1方式

m1738264

      IF (G01 == 1)  //正常鑽孔模式
*   SET_ON  MCH_FEED;

* IF_SET (CYC_RETR)  OUTPUT CYC_RETR  " " ; END_IF ; 取消輸出G98 G99
IF_SET (MOTION_CODE) OUTPUT MOTION_CODE  " " ; END_IF ;

IF_SET (X_CURPOS)  OUTPUT "X" X_CURPOS " " ; END_IF ;
IF_SET (Y_CURPOS)  OUTPUT "Y" Y_CURPOS " " ; END_IF ;
IF_SET (Z_CYC_DEPTH) OUTPUT "Z" Z_CYC_DEPTH " " ; END_IF ;
IF_SET (Z_CYC_CLEAR) OUTPUT "R" Z_CYC_CLEAR " " ; END_IF ;
IF_SET (CYC_PECK)  OUTPUT "Q" CYC_PECK " " ; END_IF ;
IF_SET (CYC_DWELL)  OUTPUT "P" CYC_DWELL " " ; END_IF ;
IF_SET (CYC_XSHFT)  OUTPUT "Q" CYC_XSHFT " " ; END_IF ;
IF_SET (MCH_FEED)  OUTPUT "F" MCH_FEED " " ; END_IF ;
  END_IF ;
* 使用G1鑽孔

IF (G01 == 2)  //G81方式用G01鑽孔
  OUTPUT  "G00Z"  Z_CYC_DZINIT;
      OUTPUT  $;
     OUTPUT "X" X_CURPOS;
      OUTPUT "Y" Y_CURPOS;
      OUTPUT  $;
     OUTPUT "Z" Z_CYC_CLEAR;  
     OUTPUT  \J;
      IF_SET (MOTION_CODE)    OUTPUT "G01";    END_IF;
      OUTPUT "X" X_CURPOS;  
     OUTPUT "Y" Y_CURPOS;  
      OUTPUT "Z" Z_CYC_DEPTH;
      OUTPUT "F" MCH_FEED" ";
       END_IF ;

PS:這只是片段~~請加入在鑽孔循環(CYCLE:)內~~還有開頭那邊請加鑽孔的開關INTERACTION (MULTI_CHOICE)  "鑽孔模式/正常/G81=G01/G83=G01"     G01 = 1 ;不會整合的請不要使用~因為不同的代碼~會有定義的問題~會出現很多的錯誤~

kklldehuoze

{:soso__3409329614010722382_4:}

710279284

？？可以实现G1钻孔？

710279284

G83怎么实现用G1模拟钻孔

m1738264

710279284 发表于 2016-8-13 20:31
G83怎么实现用G1模拟钻孔

我已經發表了在文章區

710279284

m1738264 发表于 2016-8-14 18:15
我已經發表了在文章區

在哪里？怎么找不到，发我一份可以吗？