Posted by Mohammad Rahhal, Last modified by Fouad Faraj Allah on 05 July 2019 07:09 PM


Public Sub AroonOnArray(ByVal Ary As Variant, ByVal Period As Integer,  ByRef Result As Variant, ByVal mode As INDICATOR_LINES)


A procedure that calculates Aroon, based on a custom array, and the result passed by result parameter as an array, each index of the result array represent indicator value corresponds to that index of the source array.


Parameter  Description 
Ary The source array, that contains prices
Period Period as an integer value
MA_Type   An integer value of type ENUM_MA_METHOD
Result The Result Array
Mode An integer value of type INDICATOR_LINES

Return value

Returns a double value.


 Public Sub main()

        Dim ary()

        Dim result()

        Dim Period

        Dim Mode

        Dim MA_Type

        Period = 14

        MA_Type = 1

        Mode = 1

        CopyClose 0, 1, Bars (0), Ary

        AroonOnArray Ary, CInt (Period), Result, CInt (mode)

        AlertMessage "The indicator value of the record 50 : " & Result(50)

End Sub

 See Also

Back to VTL Client Script Index

(0 vote(s))
Not helpful

Comments (0)
Post a new comment
Full Name:
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