function MiniTHCSetting()
if(MiniTHCVolts > 0 and MiniTHCDelay > 0 ) then
post.Text ( " G92 C0 \n" )
post.Text ( " G0 C8 \n" )
post.Text ( " G4 P100 \n" )
post.Text ( " G92 C0 \n" )
post.Text ( " G0 C",MiniTHCVolts," (MiniTHC Voltage Setpoint) \n" )
post.Text ( " G4 P100 \n" )
post.Text ( " G92 C0 \n" )
post.Text ( " G0 C",MiniTHCDelay," (MiniTHC Delay, hundreths of a sec) \n" )
post.Text ( " G4 P100 \n" )
post.Text ( " G92 C0 \n")
post.Text ( " G0 C5 \n" )
post.Text ( " G92 C0 \n" )
elseif(MiniTHCVolts > 0 and MiniTHCDelay == 0 ) then
post.Text ( " G92 C0 \n" )
post.Text ( " G0 C9 \n" )
post.Text ( " G4 P100 \n" )
post.Text ( " G92 C0 \n" )
post.Text ( " G0 C",MiniTHCVolts," (MiniTHC Voltage Setpoint) \n" )
post.Text ( " G4 P100 \n" )
post.Text ( " G92 C0 \n" )
post.Text ( " G0 C5 \n" )
post.Text ( " G92 C0 \n" )
else
post.Text ("(No THC Voltage / Delay Set, using previous settings) \n")
end
end
post.DefineCustomToolParam("PlasmaTool", "MiniTHC volts", "MiniTHCVolts", sc.unit0DECPLACE, 130, 0, 200)
post.DefineCustomToolParam("PlasmaTool", "MiniTHC delay -hundreths sec", "MiniTHCDelay", sc.unit0DECPLACE, 1, 1, 20)
Users browsing this forum: No registered users and 4 guests