Skip to Content

Register Login

Industry Online Support

Technical Forum

Navigation

Make Object Flash with VBS

Created by: mags755 at: 12/23/2008 9:48 PM (7 Replies)

Rating (0)

Thanks 0

8 Entries

12/23/2008 9:48 PM	Rate (0)
mags755 Posts: 15 Rating: (0)	I want to make a circle flash if a binary value is 1 and go steady of it is 0. How can I do this using VBS? I need to run a script because I am using an indirect address. Thanks
mags755 Posts: 15 Rating: (0)
Suggestion To thank Quote Answer

12/23/2008 11:45 PM	Rate (0)
Phantom75 Posts: 2661 Rating: (279)	Hi, Try the following VB script in the Flashing Background Active attribute of object CircleX: ========================================================== Dim objCircFlashTrig, objCirc Set objCircFlashTrig = HMIRuntime.Tags("Sel_A") 'Bool variable for trigger Set objCirc = ScreenItems ("CircleX") 'Circle object objCirc.FlashBackColor = objCircFlashTrig.Read () ========================================================== Regards
Phantom75 Posts: 2661 Rating: (279)
Suggestion To thank Quote Answer

12/24/2008 9:09 PM	Rate (0)
mags755 Posts: 15 Rating: (0)	Thanks for the help. Do I need to set the two colors within VBS also?
mags755 Posts: 15 Rating: (0)
Suggestion To thank Quote Answer

12/24/2008 9:24 PM	Rate (0)
Phantom75 Posts: 2661 Rating: (279)	mags755 ... Do I need to set the two colors within VBS also? ... Only if you want the colors themselves to change dynamically. Otherwise the colors set in the Flash Color On and Flash Color Off attributes (of the circle object)will be used.
Phantom75 Posts: 2661 Rating: (279)
Suggestion To thank Quote Answer

12/29/2008 5:52 PM	Rate (0)
mags755 Posts: 15 Rating: (0)	The VBS code you supplied me to flash the circle is working fine. The problem I am still having is that the function is being called every 2 seconds. This is slowing down my program considerably. Is there any way to have an INDIRECT ADDRESS configured as the trigger tag so that it will only call the function "UPON CHANGE"?
mags755 Posts: 15 Rating: (0)
Suggestion To thank Quote Answer

12/29/2008 6:47 PM	Rate (0)
Phantom75 Posts: 2661 Rating: (279)	You can change the default trigger in the VBS action. See attached screenshot. Attachment VBS_Trig.pdf (549 Downloads)
Phantom75 Posts: 2661 Rating: (279)
Suggestion To thank Quote Answer

12/29/2008 7:20 PM	Rate (0)
mags755 Posts: 15 Rating: (0)	Thank you for this help but I still dont think it will work becuase I am using an indirect address. Will this work if "Sel_A" is an indirect address?
mags755 Posts: 15 Rating: (0)
Suggestion To thank Quote Answer

12/29/2008 8:28 PM	Rate (0)
Phantom75 Posts: 2661 Rating: (279)	Ideally you would like the flashing to start/stop when the "real" tag inside your indirect tag changes state.So using the indirect tag for trigger is meaningless. This means you could either use the real tag for trigger or you could create a special trigger tag that changes state when any of the real tags within the indirect tag change state.
Phantom75 Posts: 2661 Rating: (279)
Suggestion To thank Quote Answer

|

Share this page:

Share this page on...

Follow us on