Posted by Mohammad Rahhal, Last modified by Rawan Al Hourani on 19 June 2016 11:06 AM


Public Sub MAEnvelopeOnArray(ByVal Ary As Variant, ByVal Period As Integer, ByVal MA_Type  As IntegerByVal Shift As Double, ByVal Mode As INDICATOR_LINESByRef Result As Variant)

Procedure that calculate MAEnvelope, based on custom array, and the result passed by result parameter as 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 contain prices, value of type variant
Period The calculation period, on which the indicator will be calculated, value of type Integer
MA_Type   Moving average method , can be one of ENUM_MA_METHOD.
Shift Horizontal shift of the indicator ,value of type Double.
Mode Appling indicator mode, can be value of type INDICATOR_LINES
Result The result calcualtion buffer, value of type Variant.


Public Sub main()

        Dim ary ()

        Dim result()

        Period = 14 'make sure this value less than the chart bars count

        MA_Type = 1

        Mode = 1

        Record = 50

        CopyClose 0, 1, Bars (0), Ary

        MAEnvelopeOnArray Ary, CInt (Period), CInt (MA_Type), 0.1, CInt (mode), Result

        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