Live Chat Software by Hybrid Solutions
Knowledgebase
Account Summary on Chart
Posted by Yousef Ibrahim on 25 March 2012 04:09 PM

 '###########################################################
' Script Name: Account Summary
' Author: Ehab Kanani
' Description: This will create a label with Account Summary on the Chart
' Website: http://www.hybrid-solutions.com
' Date: March, 22nd, 2012

'###########################################################

Dim objText 
Dim objID

Public Sub main()
fontSize=40
objID="labelAccountSummary"
XPos=10
YPos=30
objText= " Equity:" & CSTR(AccountInfoDouble(ACCOUNT_EQUITY)) & " Balance:" & CSTR(AccountInfoDouble(ACCOUNT_BALANCE)) & " Credit:" & CSTR(AccountInfoDouble(ACCOUNT_CREDIT))
CreateObjectLabel 0,0,CSTR(objID),CINT(XPos),CINT(YPos),objText
End Sub

Public Sub OnTick(SymbolName)

objText= "Equity:" & CSTR(AccountInfoDouble(ACCOUNT_EQUITY)) & "Balance:" & CSTR(AccountInfoDouble(ACCOUNT_BALANCE)) & "Credit:" & CSTR(AccountInfoDouble(ACCOUNT_CREDIT)) 
ObjectSet 0,CSTR(objID),2,objText

End Sub

Public Sub OnInit()
'''TODO: initialization method

End Sub

Public Sub OnDeInit()
'''TODO: deinitialization method

End Sub

Public Sub OnTimer()
'''TODO: Timer Function
End Sub



See Also


Back to VTL Client Script Index

(0 vote(s))
Helpful
Not helpful

Comments (0)
Post a new comment
 
 
Full Name:
Email:
Comments:
CAPTCHA Verification 
 
Please enter the text you see in the image into the textbox below (we use this to prevent automated submissions).

Help Desk Software by Hybrid Solutions