Useful Plasma Thread

component THC2 "Torch Height Control for stepper and servo machines, compatible with external offset branche";

description 
"""

Todo

""";
 
author "Newbie Anonimous";

license "GPLv2 or greater";

option singleton yes;

// Input Pins
pin in float Gcode_current_line    "read in current g-code line";
pin in float Gcode_go_back_value   "the value in g-code lines to restart back";
pin out float Gcode_restart_line   "the G-code line to restart";

pin in bit THC_enable_in           "enable the thc component fuction";
pin in bit Torch_on_M3             "connect to motion.spindle-on";
pin in bit Arc_ok                  "connect to THC arc oke signal";

pin in float Ingition_time_out     "time for torch to fire up, input time in millisecond, float in"; 
pin in float Pierce_delay          "the pierce delay value in seconds, float in";
pin in float Pierce_height         "the pierce height value in mm, float in";

pin in bit Enable_autostart_retry  "automatic restart procedure, pin in";  
pin in float Autostart_retry       "the number of retry, float in";

pin in bit Enable_probe            "enable probing before torch start, bit in";
pin in bit Probe                   "connect to motion.probe-input, probe trigger";
pin in float Probe_height_offset   "the value for height sensor offset in mm, float in";

pin in bit Enable_probe_xy_offset  "do we want to probe not each time, but probe over input xy distance";  
pin in float Probe_xy_offset       "the probe distance value, float in";

// Output Pins
pin out bit THC_enable_out         "monitoring signal";
pin out bit Pause_machine          "connect to motion.feed-hold/inhibited, dont know the difference at this moment";

pin out bit Mesa_torch_up          "6";
pin out bit Mesa_torch_down        "7";

// Global Variables
variable float Time;


function _;

;;

#include "rtapi_math.h"

FUNCTION(_) {

       //main function between {}

               //sub function between {}

       
       if(THC_enable_in){              // no comments today.
            THC_enable_out  = 1;       // plc callback.
 
                  if(Torch_on_M3){ Time = Time + 1 ;}   // maybe this should take real time milliseconds in the bitcoin python coded trade war, this is c coded ....

                       if(Ingition_time_out > Time){Pause_machine = 1;}                  

                  else {Pause_machine = 1;}
        }


        if(!THC_enable_in){ 
            THC_enable_out  = 0;      // plc callback.

        }

        if(!Torch_on_M3){ Time = 0 ;}  // reset Time for ignition time out     
}

grotius@grotius:~/Desktop$ python dot.py | dot -Tpng > mymachine.png
rtapi_shmem_new failed due to shmget(key=0x48414c32): Invalid argument
HAL: ERROR: could not open shared memory
halcmd: hal_init() failed: -22
NOTE: 'rtapi' kernel module must be loaded
Error: <stdin>: syntax error in line 5 near '}'
grotius@grotius:~/Desktop$ ^C
grotius@grotius:~/Desktop$ 

component THC2 "Torch Height Control for stepper and servo machines, compatible with external offset branche";

description 
"""

Todo

""";
 
author "Grotius CNC Machines";

license "GPLv2 or greater";

option singleton yes;

// Input Pins
pin in bit Enable                  "Enable THC function";
pin in float Travelheight          "Z axis travelheigt in";
pin in float Cutheight             "Z axis cut height in";
pin out float Speed                "Z axis speed out";
pin in float Piercespeed           "Z axis pierce speed in";
pin in float Piercedelay           "Z axis pierce delay time in seconds";
pin in float Maxspeed              "Max Z axis speed value in";
pin in float Zpos_in               "Connected to external offsets z input";
pin out float Zpos_out             "Connected to external offsets z output";
pin in float Zpos_cmd_in           "Connectod to external offsets z real time current z axis position input";

pin in float Pierceheight          "the pierce height value in mm";
pin out float Offset               "Z axis Offset command to external offsets, the z axis is moving to this offset when set, even in pause";

pin in bit Torch_on_in             "Connected to spindle-cw";
pin out bit Torch_on_out           "Torch start signal, connect to parport output";

pin in bit Probe_enable            "Connected to user interface button";
pin in bit Probe_in                "Connected to Probe input sensor";
pin out bit Probe_high              "If probe is triggered this pin becomes high";
pin in float Probe_z_limit         "Connected to user interface input, z axis probe end limit. For example Z -10 = probing to max Z-10.";
pin in float Probe_switch_offset  "Probe sensor switch correction value, positive z-value";

pin in bit Arc_ok_in               "Connected to THC arc oke signal";

pin out float Timeloop             "Timeloop for pierce function";
pin out bit Piercetime_reached     "Piercetime reached";


// Output Pins
pin out bit Pause_machine          "Connect to motion.feed-hold-inhibited";

// Global Variables
variable float x;
variable float y;
variable float z;
variable float a;
variable float b;
variable float c;
variable double time;


function _;

;;

#include "rtapi_math.h"
#include "stdlib.h"
#include "stdio.h"




FUNCTION(_) {  Zpos_out = Zpos_in; 

         x = Pierceheight;
         y = Zpos_cmd_in; 
         z = Travelheight;
         a = Cutheight;  


   if(Enable && !Probe_enable){
    
         if(Torch_on_in){Offset = Pierceheight;}  

         if(!Torch_on_in){Offset = Travelheight; Pause_machine = 0;}  

         if(!Torch_on_in && (z > y) ){Pause_machine = 1; Torch_on_out = 0; Speed = Maxspeed;} 
         if(!Torch_on_in && (z < y) ){Pause_machine = 1; Torch_on_out = 0; Speed = Maxspeed;}    
         if(!Torch_on_in && (z == y)){Pause_machine = 0; Torch_on_out = 0; Speed = Maxspeed;}  
             
         if(Torch_on_in && (x > y) ){Pause_machine = 1; Speed = Maxspeed; time=0;}      
         if(Torch_on_in && (x < y) ){Pause_machine = 1; Speed = Maxspeed; time=0;}   
         if(Torch_on_in && (x == y)){Pause_machine = 0; Torch_on_out = 1; Speed = Maxspeed;} 
       
         time += fperiod; 
         if(Torch_on_in){time += fperiod; Timeloop = time;}                     
         if(Timeloop >= Piercedelay){ Piercetime_reached = 1;}
         if(!Torch_on_in){time = 0; Timeloop = time; Piercetime_reached = 0;}     
                            
         if(Torch_on_in && Torch_on_out && Piercetime_reached ){Pause_machine = 1; Offset = Cutheight;}          
         if(Torch_on_in && Torch_on_out && (a == y) && Arc_ok_in){Pause_machine = 0; Speed = Piercespeed; }      
         if(Torch_on_in && Torch_on_out && (a == y) && !Arc_ok_in){Pause_machine = 1; Speed = Piercespeed; }   
         if(Torch_on_in && Torch_on_out && (a < y) ){Pause_machine = 1; Speed = Piercespeed; }
         if(Torch_on_in && Torch_on_out && (a > y) ){Pause_machine = 1; Speed = Piercespeed; }

   }
   if(Enable && Probe_enable){

         if(!Torch_on_in){Offset = Travelheight; Pause_machine = 0;} 
         if(Torch_on_in && !Probe_in){Offset = Probe_z_limit; Pause_machine = 1;}  
         if(Torch_on_in && Probe_in){b = Zpos_cmd_in; Probe_high = 1;} //save actual position in b
         
         if(Torch_on_in && Probe_high){Offset = b + Probe_switch_offset + Pierceheight;}


   }

   if(!Enable){
         Offset = 0; Pause_machine = 0; Speed = Maxspeed;//reset 
   }
}

I can ask Rod if he can make modification's after the full code is perfect to use.

float in mesa input_arc_voltage

float in Mesa_arc_voltage_calibration_value

For example : setp THC2.Mesa_arc_voltage_calibration_value 0.981