MacroPump Doesnt Run

[M250cnc]

Hi Jason,

All correct in your observation and i am using the Mach label message display.

Phil

[zealous]

I give the user 2 seconds to change it to MM after the estop is hit or it estops the sytem again.

Code:

Dim Inch_mode As Boolean
Dim Estopped As Boolean

Estopped = GetOEMLED(800)
Inch_mode = GetOEMLED(801)

If(Inch_mode)Then

'Is the sytem estopped already
If Not(Estopped)Then
'Estop system
DoOEMButton(1021)

End If

While(GetOEMLED(800))
MESSAGE "Went Into Inch Mode:"&i
sleep(250)
Wend

'Give the user time to change to mm?
Sleep(2000)

End If

[M250cnc]

Hi Jason,

Thank you so much, it beats checking a custom screen with a flashing red led 25mm x 50mm while turning the MPG.

It's so easy when you know how, i would never have got that.

Phil

[zealous]

Great to hear!
I wasn't sure that was what you wanted, but you can make changes and maybe have it force it back to MM mode or something

[M250cnc]

Jason,

I can understand the workings, with a bit of thought  , but why fix something that isn't broke.

Phil