Hi,
Having trouble getting a macropump to run

It seems like there is somethng wrong with the code/syntax in the if/then statements. With this removed, the pump runs and I can see the Macro calls counting in the message bar.

i=i+1
 
 message" Macro Running #"&i
 
 a=GetUserLed(2000)   
 
 If a = 0 Then
   i=0
   DoOemButton (1024)
   While IsMoving()
   Wend
   DoOemButton (1023)
   While IsMoving()
   Wend
   DoOemButton (1022)
   While IsMoving()
   
   DoOemButton (1026)
   While IsMoving()
   Wend
   
   DoOEMButton(133)
   DoOEMButton(134)
   DoOEMButton(135)

End If 
   

What am i doing wrong?

You seem to be missing a Wend see below

DoOemButton (1022)
   While IsMoving()
    Wend

Hood

I am not sure WHAT you are doing but code like that will bring the macropump down to a crawl and be VERY unpredictable.

(;-) TP

Thanks Hood. Sometimes you can stare at a piece of code and not see a simple error!

It's a script to home my axis which is called from a brain. The script is much cleaner than that now, the counts and other variable sets were just a test to confirm the script was running as if there is an error in the code the whole script gets ignored. I wanted to do the whole thing as a brain so I could have a timer set so that the button needs to be held for 2 seconds. Using the refall in a brain does not home my dual screw axis as I like, so to align it for square I had to go with the brain / macro pump way.
Why do you think it will be slow and unpredictable? If the condition at the beginning is not met, it just exits and runs again when it's called. If I've asked for a refall (led 2000 is active), there is nothing else going on with the machine, and nothing else in the pump that needs to be done, so it's ok if the pump timer pauses whilst the code runs.

If there is abetted way to do this please tell me.
It's working pretty good now.