Hello Guest it is March 28, 2024, 09:48:59 PM

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 - xLocksmith

Pages: 1
1
Does mach 3 offer an interface lib? or is this something only the developers can do?

I can easily write the c++ code, so if there is some interface that would be great :)

regards,
Ross

2
No luck with the beta version :(

It does sort of work, but the sleep seems to just make everything jerky. Looks like it might be a threading priority problem.

Does anyone know if you can capture events from the VBScript interface?? It would be perfect if there was an event that was generated when the mill is moving. I could only see the isMoving() function which is not event based as far as i can see.

3
I believe I am running the version 3.041  from this link: http://www.machsupport.com/downloads/Mach3VersionR3.041.exe

I will confirm this tomorrow when I get back to work. Can you suggest the best version to try for sleeps / serial coms ?

Cheers,
Ross

4
VB and the development of wizards / Constantly sending DRO to serial port
« on: September 16, 2008, 02:16:21 AM »
Hey all,

I would like to send the current DRO values to the serial port, I found that : Call SendSerial (GetOEMDRO(83) & " " & GetOEMDRO(84) & " " & GetOEMDRO(85) & "*") does this with no problem :).

Now I would like to send the values constantly while running a part. I have tried putting it in a while loop with a short sleep but it seems to hang the system. It looks like the sleep is actually causing the problems. Perhaps there is some event based approach I could be using, any ideas? Current script is below:

'Loop endlessly writing the current DRO values to the serial port
'While true
  'Write the DRO values
  Call writeDROSerial()

  'Sleep for a bit so we dont flood the serial port
  Sleep(100)
'Wend

'Dump the DRO values out to the serial port with a * as the end line (Not sure how to create a CRLF!!! so a * will do for now)
Sub writeDROSerial()
  Call SendSerial (GetOEMDRO(83) & " " & GetOEMDRO(84) & " " & GetOEMDRO(85) & "*")
End Sub

Pages: 1