VB Scripting 101 - Page 2 - CNCzone.com-The Largest Machinist Community on the net!

#13

05-18-2009, 06:04 AM

UKRobotics UKRobotics is offline

Join Date: Dec 2003

Location: UK

Posts: 218

permalink

Thanks for all the help guys.

Based on the examples you provided i've ended up with this for operating my drawbar:

If GetOEMLED(11) Then
Message("Spindle Must Be OFF to Change Tool!!")
ElseIf GetOEMLED(852) Then
DeActivateSignal(OUTPUT1)
Message("Tool Locked")
Else
ActivateSignal(OUTPUT1)
Message("Tool Released")
End If

__________________
Dom
http://www.ukrobotics.com/projects

Page 2 of 2

« Previous Thread | Next Thread »

Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)

Thread Tools	Search this Thread
Show Printable Version Email this Page	Search this Thread: Advanced Search
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Posting Rules
You may not post new threads You may not post replies You may not post attachments You may not edit your posts BB code is On Smilies are On [IMG] code is On HTML code is On Trackbacks are On Pingbacks are On Refbacks are On Forum Rules

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Scripting reference...	kiwichris	NCPlot G-Code editor / backplotter	5	11-15-2007 03:36 PM
Scripting Question	eng8248	BobCad-Cam	6	03-24-2007 02:53 PM
Scripting a constant offset curve over a contoured surface?	Splint	Rhino 3D	11	03-11-2007 04:35 AM
Bobcad scripting	69owb	BobCad-Cam	1	05-14-2006 03:20 PM
Scripting	Klox	BobCad-Cam	29	10-02-2003 10:11 PM

All times are GMT -5. The time now is 09:08 AM.