‘###########################################################
‘ Script Name: Targetted PL
‘ Author: Ehab Kanani
‘ Descreption: This Client Script will create a time label on your chart
‘ Website:http://www.hybridsolutions.com
‘ Date: March, 22nd, 2012
‘###########################################################
Dim objID''' ''' The main function is the entry point for any Script program''' Public Sub main()objID="label1"CreateObjectLabel 0,0,CSTR(objID),20,20,TimeLocal()ObjectSet 0,CSTR(objID),1,FalseIntervalTimer 1000EnableTimer TrueEnd Sub''' ''' The function is generated when a new tick is received fro any symbol''' Public Sub OnTimer() ObjectSet 0,CSTR(objID),2,TimeLocal()End Sub''' ''' The function is generated when a new tick is received fro any symbol''' Public Sub OnTick(SymbolName)End SubPublic Sub OnInit()'''TODO: initialization methodEnd Sub''' ''' The function is generated when deinitialization script''' Public Sub OnDeInit()'''TODO: deinitialization methodEnd Sub
See Also