Hello Guest it is November 17, 2019, 07:10:28 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

651
General Mach Discussion / Re: Messaging is wrong
« on: April 20, 2018, 03:41:24 AM »
the message box has real low priority. so for example

this macro code:

message "message 1"
message "message 2"
message "message 3"
message "message 4"
message "message 5"
message "message 6"
message "message 7"

will maybe Show two or three of the Messages


this macro code:

message "message 1"
Sleep(200)
message "message 2"
Sleep(200)
message "message 3"
Sleep(200)
message "message 4"
Sleep(200)
message "message 5"
Sleep(200)
message "message 6"
Sleep(200)
message "message 7"

will Show all of them and all will be reported in the history file.
even if there are other codelines between (if they have low excecution time)




652
General Mach Discussion / Re: Macro or brain???? Help needed
« on: April 20, 2018, 03:26:54 AM »
if you want to toogle an Output by button, vbscript would be the choice.
for example

Code: [Select]
If IsActive(OUTPUT1) Then
  DeactivateSignal(OUTPUT1)
Else
  ActivateSignal(OUTPUT1)
End If

653
General Mach Discussion / Re: G31 Probing with G68 Rotation enabled
« on: April 20, 2018, 03:17:56 AM »
made a compare of your profiles.

i can see three things witch may influence the probing, but i am not sure, but you can test.

here the three setting's i noticed:
- distance mode
- IJ mode
- soflimit's

Thomas

btw. here is a good mach3 Profile Viewer where you can also compare two profile's.

http://www.kd-dietz.com/klausphp/pages/eng/machprofile/description/m_profile_description.html

654
General Mach Discussion / Re: Need Stop before running script
« on: April 20, 2018, 02:43:59 AM »
glad to hear that it is working now.

btw witch Version are you running, just to keep in mind.

Thank You

655
General Mach Discussion / Re: G31 Probing with G68 Rotation enabled
« on: April 19, 2018, 12:55:12 AM »
i am out today, will have a look tomorrow.

656
General Mach Discussion / Re: Need Stop before running script
« on: April 18, 2018, 11:35:21 AM »
made some changes to your code, pls test

Code: [Select]
'Check oemdro# And oemled#

'Code"1003"

SetOEMDRO(800,0.5)
SetOEMDRO(801,0.5)
SetOEMDRO(802,2.0)

Sleep(100)

CurrentFeed = GetOemDRO(818) 'Get the current feedrate.
PlateThickness =1.250 'Set gauge thickness
ProbeFeed = 20 'Set feedrate during probing

Code "G90 F" &ProbeFeed 'Set to Absolute Distance mode

'X Axis Home

If GetOemLed (825)=0 Then 'Check LED to see probe is ready
Code "G4 P1"             'Time to get to the X-plate
Code "G31X4 F" &ProbeFeed 'Start X probe routine
While IsMoving() 'Probe moving X axis
Sleep(50)
Wend 'End of move
Code "G4 P0.25" 'Pause
XProbePos = GetVar(2000) 'Get position of probe
Code "G0 X" &XProbePos
While IsMoving () 'Axis moving
Sleep(50)
Wend 'End of move
SetOEMDRO(800,0) 'Set X DRO for correct direction
Sleep(100) 'Pause for Dro to update.
Code "G0 X-1.065"           'Change the X retract distance here
While IsMoving () 'Axis moving
Sleep(50)
Wend 'End of move
Code "(X axis is now homed)"
'Code "F" &CurrentFeed 'Store current feedrate to F
Else
Code "(Plate is grounded, check connection and try again)"
End If

'Y Axis Home
Code "G90 F" &ProbeFeed 'Set to Absolute Distance mode


If GetOemLed (825)=0 Then 'Check LED to see probe is ready
'Code "G4 P1"               'Time to get to the  Y-plate
Code "G31Y4 F" &ProbeFeed 'Start Y probe routine
While IsMoving() 'Probe moving Y axis
Sleep(50)
Wend 'End of move
Code "G4 P0.25" 'Pause
YProbePos = GetVar(2001) 'Get position of probe
Code "G0 Y" &YProbePos
While IsMoving ()
Sleep(50)
Wend
SetOEMDRO(801,0)
Sleep(100) 'Pause for Dro to update.
Code "G0 Y-6.820 F20" 'Change the Y retract distance here
While IsMoving () 'Axis moving
Sleep(50)
Wend 'End of move
Code "(Y axis is now homed)"
'Code "F" &CurrentFeed 'Store current feedrate to F

SetOEMDRO(800,8.8641) 'Set X work offset for Spoons
SetOEMDRO(802,2) 'Set Z work offset for All
SetOEMDRO(801,0.0000) 'Set Y work offset for Spoons

Else
Code "(Plate is grounded, check connection and try again)"
Exit Sub

End If

Code "X0 Y0"   'Ready to make spoons
While IsMoving () 'Axis moving
Sleep(50)
Wend 'End of move


657
General Mach Discussion / Re: G31 Probing with G68 Rotation enabled
« on: April 18, 2018, 01:48:47 AM »
post your both XML files, and i will do a compare für the Settings.

658
General Mach Discussion / Re: Need Stop before running script
« on: April 18, 2018, 01:39:59 AM »
sounds like a endless Loop in your code.
post your code and we will see.

659
General Mach Discussion / Re: G31 Probing with G68 Rotation enabled
« on: April 17, 2018, 03:32:21 PM »
selected the right plane (G17)?

660
General Mach Discussion / Re: Keygrabber ---> Brain
« on: April 16, 2018, 02:21:49 PM »
i have tryed this for hour's.

ended up in puting a button to Screen 0
hotkey (an other that TAB) to the button
vbscript and the rest is easy.

TAB key seems to be hardcoded