Hello Guest it is January 16, 2021, 12:46:16 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

1721
VB and the development of wizards / Re: Tangential spindle
« on: April 16, 2015, 02:41:03 PM »
Ok seems not to be so easy,

act_feedrate=GetDro(18)

If (act_feedrate<1500) and (GetLed(4)=1) Then
If Not IsActive(Input1) Then
DoSpinCW()
End if
End If

If IsActive(Input1) Then
DoSpinStop()
End if

Thomas

1722
VB and the development of wizards / Re: Tangential spindle
« on: April 16, 2015, 06:37:36 AM »
Hi,

something like this might work:

act_feedrate=GetDro(18)

If (act_feedrate<1500) and (GetLed(4)=1) Then
If Not IsActive(Input1) Then
DoSpinCW()
End if
If IsActive(Input1) Then
DoSpinStop()
End if
End If

Thomas

1723
VB and the development of wizards / Re: Tangential spindle
« on: April 16, 2015, 03:07:39 AM »
Hi,

macropump can help:

If IsActive(Input1) Then
DoSpinStop()
End If

Thomas

1724
General Mach Discussion / Re: axis move wrong in mach 3
« on: April 15, 2015, 03:38:40 AM »
Hi,

i think it is based on your step resolution (but dont know 100%)

320 steps per mm means a resolution of 0,003125mm

Mach can only do one step, so if i does one step more:

0,0094 + 0,003125 = 0,012525 or in the other way

a move of 0.01 would be 3.2 steps

0,250 would be 8 step's and so on.

Thomas

1725
Modbus / Re: My experiments with Mach3 ModBus and Arduino, Part I
« on: April 13, 2015, 02:29:25 AM »
Hi, aluplastvz

quote from the first post:
Equipment:
1. Arduino board (I using Arduino Duemilanove but you can use any other Arduino board)
2. PC with Windows XP and Mach3 because software who I using for monitoring ModBus communication no support new versions Windows.
3. Software's
- Arduino IDE

i do not have any code, and i am not a Arduino guy.

Thomas

1726
Modbus / Re: My experiments with Mach3 ModBus and Arduino, Part I
« on: April 12, 2015, 05:39:24 AM »
how to increase the number of inputs

just use an other Arduino for example Mega2560 has 54 digital input/output pins .

1727
General Mach Discussion / Re: ative low or active high??
« on: April 12, 2015, 05:34:18 AM »

1728
General Mach Discussion / Re: Help Please
« on: April 09, 2015, 02:44:23 AM »
Hi,

to keep the spindle and dust collector on remove:

N720M09

and in config -> general config -> program End, M30 deselect turn spindle off
(hope it is in the english version there)

Thomas

1729
General Mach Discussion / Re: new guy with problems
« on: April 06, 2015, 05:13:26 AM »
Hi,

one simple thing to test for loose spindle is:
-chouse slow jog speed
-hold the spindle with one hand
-jog with the other had backward and foreward and try to block the spindle
there you can feel if there is any loose part.

an other test is to do G1 moves in the MDI, allways the same distance forward
and backward, mark your startpoint and endpoint and check that it goes allways to the same
points.

Thomas

1730
VB and the development of wizards / Re: "Z-Correction" problem after Tool-Probing
« on: April 03, 2015, 07:31:11 AM »
Hi,

this macros worked here.

M6Start
Code: [Select]
`  'Save coolantSetUSERLED(1200, 1)If GetOEMLED(12) ThenDoOEMButton(114)SetUSERLED(1200, 0)End IfSetOEMDRO(1216,GetOEMDRO(83))  'Save xSetOEMDRO(1217,GetOEMDRO(84))  'save y'Code "M1001"message "Fahre Save-Z"Code "G0G53 Z" & GetOEMDRO(54)While IsMoving()Wendmessage "Fahre zur Ref-Switch Pos."code "g0 g53 x" & GetOEMDRO(33) & "g0 g53 y" & GetOEMDRO(34)While IsMoving()Wendtool = GetSelectedTool()SetCurrentTool( tool )`

M6End:
Code: [Select]
`'code "M1002" DeActivateSignal(Output14) DeActivateSignal(Output16) DeActivateSignal(Output17)If GetOEMDRO (24) <>0 Then        message "Fahre zur Tool Probe" code "g0 g53 x" & GetOEMDRO(1218) & "g0 g53 y" & GetOEMDRO(1219) 'Go to probe Position While IsMoving() Wend 'Probing process    message "Z-Vorpos"     code "g0 g53 z" & -GetOEMDRO(1220) While IsMoving() Wend        message "Z-Probe schnell" code "g31 z-1000 f700"   While IsMoving() Wend' code "M1002"' code "M1010"        message "Z-Probe Rückzug" code "g53 g0 z" & GetOEMDRO(85)+3 While IsMoving() Wend        message "Z-Probe langsam" code "g31 z-1000 f50" While IsMoving() Wend' code "M1002" Axis_Pos = GetOEMDRO(85) Tool_Offset = Axis_Pos Call setOEMDRO(42, Tool_Offset)        message "Z Save Pos."        Code "G0G53 Z" & GetOEMDRO(54) 'safe-Z While IsMoving() Wend        message "X/Y zurück"        Code "G0G53 X" & GetOEMDRO(1216) & "G0G53 Y" & GetOEMDRO(1217) While IsMoving() Wend'Restart coolantIf GetUSERLED(1200)<>1 Then If GetOEMLED(12) Then Else DoOEMButton(114) End IfSetUSERLED(1200, 1)End IfElse MsgBox "Keine Werkzeug-Nummer gewählt",0 End If      `

Thomas