User Tools

Site Tools


plc:plc_gas_cutting_implementation

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revisionPrevious revision
Next revisionBoth sides next revision
plc:plc_gas_cutting_implementation [2017/06/07 00:36] skirillovplc:plc_gas_cutting_implementation [2017/06/07 00:37] skirillov
Line 361: Line 361:
  proc=plc_proc_cutting;  proc=plc_proc_cutting;
  
-exit(99);+ exit(99); 
 +}; 
 + 
 +</code> 
 + 
 +<code c M05.plc> 
 +#include pins.h 
 +#include vars.h 
 + 
 + 
 +main() 
 +
 + 
 +  portclr(OUTPUT_FUEL);           //Off Valves 
 +  portclr(OUTPUT_IGNITION); 
 +  portclr(OUTPUT_OXY_HEAT_HI); 
 +  portclr(OUTPUT_OXY_CUT_LO); 
 +  portclr(OUTPUT_OXY_CUT_HI); 
 + 
 +  if (proc==plc_proc_cutting) 
 +  { 
 +    portset(OUTPUT_OXY_HEAT_LO); 
 +    timer=timeout_purge;          //Set Ignition process 
 +    do{ timer--; }while(timer>0); //wait ignition 
 +    portclr(OUTPUT_OXY_HEAT_LO);  // 
 + 
 +    if (ihc_lift_height>0) 
 +    { 
 +      proc=plc_proc_moveup; 
 +      gvarset(7080,2000); 
 +      g0moveA(0x0,0x4,ihc_lift_height);      //Z axis 
 +      timer=300;do{timer--;}while(timer>0); 
 +      do { timer++;code=gvarget(6060); }while(code!=0x4d); 
 +      //wait till motion finished(7140 for Multidev) 
 +    }; 
 +  }; 
 + 
 +  portclr(OUTPUT_OXY_HEAT_LO);   // 
 + 
 +  command=0xa4;//Stop Height sensing 
 +  parameter=0; 
 +  message=PLCCMD_SET_CNC_VAR; 
 +  timer=2;do{timer--;}while(timer>0); 
 + 
 +  proc=plc_proc_idle; 
 + 
 +  exit(99);
 }; };
  
 </code> </code>
  
plc/plc_gas_cutting_implementation.txt · Last modified: 2021/11/02 17:20 by ivan

Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki