OOOPPPs     was wondering why you stated the turret was rotating before the machine got into position....I have a error in my code:
was missing the "()"...
While IsMoving() ' Wait for machine to stop
SLEEP(250)'Slow down cycle time for CPU resources
Wend

give me a sec and will post the complete code with the 4 second check for INPUT1 one to be active

The code was more for a outline but will work.

I have a message popup for "YEP" to verify that the code is working but left this for you to decide what to do...just comment out "PRINT "YEP" and/or add a result.

Let me know what part isn’t working right and I can modify it:

I'll break it down here with description ...

1. Move Z to toolchange position:

Code:

'////MOVE THE MACHINE FOR TOOLCHANGE////
Code ("G53 G00 Z-0.200")'Move Z to position

2. Wait for Z to get to position:

Code:

While IsMoving() ' Wait for machine to stop
SLEEP(250)'Slow down cycle time for CPU resources
Wend

3. Get requested tool and activate turret with Brain:

Code:

'//GET SET TOOL////
tool = GetSelectedTool() 'Gettool
SetCurrentTool( tool )'Set tool

4. Wait 4 seconds and then Check to see if Input 1
*****************************Rather then waiting 4 seconds why dont we loop and check for INPUT1 to be active....if after 4 seonds it is not active popup message to user?

Code:

SLEEP(500)'Wait to see if input becomes active

5. If Input doesn't activate popup message:

Code:

'////CHECK INPUT/////
If Not(IsActive(INPUT1)) Then 'Is the imput active

Message box settings:

Code:

'///Message box////
msg = "Please reseat tool and continue?"   ' Define message
title = "Tool Changer"   ' Define title
buttons = 1
response = MsgBox(msg,buttons, title)

***6. If the user is finished resetting and presses the "OK" button then do this(HEre you can comment out  ("Print"yep"):

Code:

'///Responce was YES
If response = 1 Then   ' User chose Yes.

   ' Perform recheck issue has been fixed.
   Print"yep"

7. The user pressed "Cancel" you should estop the sytem and turn things off:

Code:

'///Responce was NO
Else

   ' Estop system ecit.
      Print"nope"
     
End If'exit message

8. Input was active and just continue running tool changer:

Code:

End If 'Input was active exit

You can mix this in with Hood's code for the MESSAGE BOX to let the operator activate the process again.

Code:

'////MOVE THE MACHINE FOR TOOLCHANGE////
Code ("G53 G00 Z-0.200")'Move Z to position
While IsMoving()' Wait for machine to stop
SLEEP(250)'Slow down cycle time for CPU resources
Wend

'////GET SET TOOL////
tool = GetSelectedTool() 'Gettool
SetCurrentTool( tool )'Set tool
SLEEP(500)'Wait to see if input becomes active

'////CHECK INPUT/////
If Not(IsActive(INPUT1)) Then 'Is the imput active

'///Message box////
msg = "Please reseat tool and continue?"   ' Define message
title = "Tool Changer"   ' Define title
buttons = 1
response = MsgBox(msg,buttons, title)

'///Responce was YES
If response = 1 Then   ' User chose Yes.

   ' Perform recheck issue has been fixed.
   Print"yep"
   
'///Responce was NO
Else

   ' Estop system ecit.
      Print"nope"
     
End If'exit message

End If 'Input was active exit

Great! 

try
SystemWaitFor(INPUT1) ' Torch Input ready to go

I have had a couple request for versions later then CS3.
Here is the location for users of MX2004 - Flash 8 otherwise if you are using CS2-CS4 download the above.

http://alphagraphicdesigns.com/Download/MachCompontnes_beta_1.0F8.zip

Good,
I wanted to finish up "*Remote connection" on the components and I am very close to finish it...but I felt it would be best to make them avalible while I finish it up.
*Remote allows multiple "Floating" windows of mach open at once...meaning you could have every button,LED and DRO floating around your desktop on multiple monitors if you wanted.

Here is the beta let me know how it works...the final release will have hundreds of graphics to choose from and also create or import your own.

Here is the download and info:
http://www.machsupport.com/forum/index.php/topic,10291.new.html#new

Here is the beta release of the Mach Compontnets 1.0

Please post back feed back here or send me an email: support@alphagraphicdesigns.com

If you use them please help support future development by buying Pack2 from Alphagraphicdesigns.com.

Once they are available for purchase there will be a number of enhancements and additions.

**The beta version can only be used for hobbies and cannot be resold or distributed and are intended for evaluation purposes.

Video on how they work:

The video is here:
http://alphagraphicdesigns.com/help/Quantum/MachComponents1.0.1.wmv

Components (FLA):
http://alphagraphicdesigns.com/Download/MachCompontnes_beta_1.0.zip

Please also check out a fully developed screen from Mach Motion (components in action ):
http://alphagraphicdesigns.com/machmotion/test/MM_demo.html

I didn’t see you mention anything about "RUN FROM HERE" in your post but it was brought up.
To possibly help out I can tell you two way I am able to recreate your issue:

- You cannot "Regen" a toolpath after issuing a "Run From Here" till after the machine moves in to position (know issue).

- Always put "If (Isloading() = false Then" in your macros or Mach will read them while loading a file or a "RUN from Here".
There is now an option in the "Gen config" to ignore Mcodes while loading..but it best to have this in you Macros or any VB to make sure

I agree, it has been taken out!

Request it back in on the Yahoo forum as well.
I prefer using PRINT in certain situations when access is need to Mach.

Otherwise you have to use the MSGBOX and yes this doesn’t allow you access to Mach will this dialog its up, that is why in certain situations I do not like using it.