ccdsnap_00.pmc

基于PMAC运动控制卡的八轴数控磨床PLC运动控制程序

#include "address.h"
#include "oem.h"
#include "tsodick1.h"
#include "tsodick2.h"
#include "tsodick3.h"

/*M1210->X:$078003,0,24,S
M1211->X:$078000,11,1
M1212->X:$078000,12,1
M1213->X:$078000,13,1
M1216->X:$078000,16,1
M1217->y:$0000ce,0,24,S
M1218->X:$078002,0,24,S*/

/*#define  m1220 ccdsnap_position
#define  m1221  ccdsnap_flag_lock
#define  m1222  ccdsnap_enable
#define  m1223  ccdsnap_level_contral
#define  m1226  ccdsnap_flag
#define  m1227  ccdsnap_encode_offset
#define  m1228  ccdsnap_encode_positon
#define  p1228  ccdsnap_encode_home_positon_p
#define  p1220  ccdsnap_enable_p
M1220->X:$078107,0,24,S
M1221->X:$078104,11,1
M1222->X:$078104,12,1
M1223->X:$078104,13,1
M1226->X:$078104,16,1
M1227->y:$00034e,0,24,S
M1228->X:$078106,0,24,S*/


OPEN PLC 0 CLEAR

/*M1211=1
M1212=1
M1213=1*/

ccdsnap_flag_lock=1
ccdsnap_enable=1
ccdsnap_level_contral=1

While (1 < 2)
  
  /* If (M1216 = 1)and(p1210=0)
    @SET_ON(OUT_2_M,1024)
    M1211=0
    M1211=1
  Else
    @SET_OFF(OUT_2_M,1024)
    EndIf*/
    
    If (ccdsnap_flag = 1)and(ccdsnap_enable_p=0)
      @SET_ON(OUT_2_M,1024)
      ACC34_2B=OUT_2_M
      TIME_WAIT_CNT_P=10
      While (TIME_WAIT_CNT_P > 0)
        TIME_WAIT_CNT_P=TIME_WAIT_CNT_P-1
      EndWhile
      ccdsnap_flag_lock=0
      ccdsnap_flag_lock=1
      
    Else
      @SET_OFF(OUT_2_M,1024)
    EndIf
    
    /* If (OUT_2_M != OUT_2_CHNG_M)
      OUT_2_CHNG_M=OUT_2_M
      ACC34_2B=OUT_2_M
      EndIf*/
      
    EndWhile
    
CLOSE