Hello Guest it is March 19, 2024, 07:04:11 AM

Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - TPS

2031
General Mach Discussion / Re: Scripter Compile Error bites again :(
« on: February 19, 2018, 01:52:05 AM »
Hi Dave,

i had the same Thing a couple of years ago, well without the self Fixing after 45 minutes.

the only Thing i noticed, when i watched my M3 macro with a HEX Editor was,
that the EOF() was directly behind the ")" of the DoSpinCW().

All i did was to put a couple of 'empty' lines (CRLF) after the DoSpinCW().

The Problem never came up again.

i really can't tel you wether it was

-coincidence
-woodoo
-or just luck.

Thomas
 

2032
General Mach Discussion / Re: macro for turret for boxford tcl
« on: February 18, 2018, 05:09:37 AM »
hey thats a macro for a boxford 125 i have written some time ago for an other guy here.
sorry it is in german, but with a Little Google translator you should be able to understand it.

Code: [Select]

' TPS 29.01.2018 Version 1.0
' BOXFORD 125TCL
' 8 Positionen Werkzeugwechsler mit A-Achse

Sub Main()

  Dim newtool As Integer
  Dim acttool As Integer
  Dim grad_pro_tool As Integer
  Dim grad_nach_pin As Integer
  Dim grad_rueckwaerts as Integer
  Dim Anzahl_Takte As Integer
  Dim Dist_schnell As Double
  Dim F_fast As Integer
  Dim F_slow As Integer

If IsLoading() Then
'wenn ein neues File geladen wird nichts tun
' Exit Sub
Else

grad_pro_tool = 45 ' Distanz für einen Werkzeugschritt
grad_nach_pin = 10 ' freifahren Pin
grad_rueckwaerts = 25 ' zurückfahren an Pin
f_fast = 4000 ' Speed drehen schnell
f_slow = 2000 ' Speed rückwärts gegen Pin

newtool = GetSelectedTool() ' die neue Werkzeugnummer holen
acttool = GetCurrentTool() ' die aktuelle Werkzeugnummer holen

'lass uns ein paar Basic's checken

' neues und altes Werkzeug = 0
If ((newtool = 0) and (acttool = 0)) Then
message("neues und altes Werkzeug = 0 -> nicht's tun")
Sleep(500)
Exit Sub
End If

' neues Werkzeug = 0
If (newtool = 0) Then
message("neues Werkzeug = 0 -> nicht's tun")
Sleep(500)
Exit Sub
End If

' neues und altes Werkzeug sind gleich
If newtool = acttool Then
message("neues und altes Werkzeug sind gleich -> nicht's tun!")
Sleep(500)
Exit Sub
End If
 
  'Werkzeugnummer gültig ?
If  (((newtool > 8) Or (newtool < 1)) and (newtool <> 0)) Then
DoButton(3)
Sleep(500)
Message (" Werkzeugnummer " & newtool & " nicht im Bereich (1-8). Abbruch ! ")
Exit Sub
End If

'X-Achse nicht referenziert
If GetOEMLED(807) Then
DoButton(3)
Sleep(500)
Message ("X-Achse nicht referenziert -> Abbruch !!")
Exit Sub
End If

'Z-Achse nicht referenziert
If GetOEMLED(809) Then
DoButton(3)
Sleep(500)
Message ("Z-Achse nicht referenziert -> Abbruch !!")
Exit Sub
End If

'jetzt geht's los
Message "Werkzeugwechsel von: " +CStr(acttool) + " nach: " + CStr(newtool)

'Anzahl der Takte zwischen den Werkzeugen berechnen
If newtool > acttool Then Anzahl_Takte = newtool - acttool  
If newtool < acttool Then Anzahl_Takte = 8 - acttool+newtool
    
'Distantz in Schritte umrechnen
Dist_schnell = (Anzahl_Takte * grad_pro_tool) + grad_nach_pin

msgbox("Takte: " + cstr(Anzahl_Takte) + " Distanz schnell: " + Cstr(Dist_schnell))

Message "Wechsel X-Achse freifahren"
Code "G90 G53 G0 X2"
While IsMoving()
Sleep(15)
Wend

Message "Wechsel Z-Achse freifahren"
Code "G90 G53 G0 Z2"
While IsMoving()
Sleep(15)
Wend

'A-Achse nullen
Code "G92 A0"
'incremental Mode , Einheiten pro Minute , Exakter Stop
Code "G91 G94 G61"

'A-Achse plus schnell
Message "A-Achse plus schnell zum neuen Werkzeug"
Code "G01 A" & Dist_schnell & "F" & f_fast
While IsMoving()
Sleep(15)
Wend

'A-Achse langsam zurückfahren
Message "A-Achse zurueck langsam zum Pin"
Code "G01 A-" & grad_rueckwaerts &  "F" & f_slow
While IsMoving()
Sleep(15)
Wend

'neues Werkzeug im System anmelden
SetCurrentTool(newtool)

'wieder auf Absolutmodus schalten
Code "G90" ' back to absolute movement

Message ""
End If

End Sub              



2033
General Mach Discussion / Re: MACH3PLASMA LIMIT SWITCHES FOR G540/PROMA
« on: February 17, 2018, 02:57:57 AM »
My G540 board crashed and I’m working on getting that fixed.

when i read this, an the other "strange" things witch are Happening,
have you thought about noise , grounding , shielding ?

just a thinking.

Thomas
 

2034
General Mach Discussion / Re: MACH3PLASMA LIMIT SWITCHES FOR G540/PROMA
« on: February 16, 2018, 12:20:47 PM »
have you tryed this

H - U" (High Voltage) Parameter ?

2035
General Mach Discussion / Re: ARFcnc 6040 Mach 3 USB configuration help
« on: February 16, 2018, 03:22:15 AM »
back to the actually Problem,
sounds like a wiring Problem.

do you probably have a sketch ?

2036
General Mach Discussion / Re: ARFcnc 6040 Mach 3 USB configuration help
« on: February 16, 2018, 03:00:44 AM »
i dont think it matters with this card what the pin settings are for each axis bc they have dedicated pins on the card. see page 3

i never trust this chinese stuff

2037
General Mach Discussion / Re: ARFcnc 6040 Mach 3 USB configuration help
« on: February 16, 2018, 02:38:48 AM »
yes it does

if i look at the screenshot of this reply
step pin is 1 for all axis. that cannot be ok.

Manual says it it 2,4,6,8     X,Y,Z,A

2038
General Mach Discussion / Re: MACH3PLASMA LIMIT SWITCHES FOR G540/PROMA
« on: February 16, 2018, 02:31:24 AM »
here:
http://www.machsupport.com/forum/index.php/topic,35183.0.html

i found a thread, witch sounds like the same Problem.

i have read the proma Manual again, i am a Little bit stuck
at this:

"H - U" (High Voltage) - value of the off load voltage detection
in the plasma cutter - used to detect the main (cutting) arc: 50-
300V by default: 200V

Parameter.My question is what does Proma if cutting voltage is below this Parameter ?
for my understanding this Parameter should be below cutting voltage, but i don't really know.


on the Plasma Programm run Screen is a dro called Curr:
this should be zeroed after each M3 call (Torch ON) ?

what does the DOWN LED on Proma in the Situation when the torch goes into material ?

sorry that can't provide the real solution.

Thomas






 

2039
General Mach Discussion / Re: MACH3PLASMA LIMIT SWITCHES FOR G540/PROMA
« on: February 15, 2018, 02:10:29 PM »
may i ask you to post your Profile XML

C:\Mach3\your profilename.xml

maybe i can find something there, but i think it will be tomorrow,
it late here in Bavaria  ;).

i think we are Close.

2040
General Mach Discussion / Re: MACH3PLASMA LIMIT SWITCHES FOR G540/PROMA
« on: February 15, 2018, 01:57:06 PM »
GCode is ok

the box with ideas is empty now.