PriceOscillatorOnArray
Posted by Mohammad Rahhal, Last modified by Abdullah Almasharfah on 09 January 2019 07:33 PM

 

Syntax

Public Sub PriceOscillatorOnArray(ByVal Ary As Variant, ByVal LongCycle As Integer, ByVal ShortCycle As Integer, ByVal MA_Type  As Integer, ByRef Result As Variant)

A procedure that calculates Detrend Price Oscillator 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.


Parameters

Parameter  Description 
Ary The source array, that contains prices
Period Period as an integer value
LongCycle Long cycle as an integer
ShortCycle Short cycle as an integer
MA_Type An integer value of type ENUM_MA_METHOD
Result The Result Array


Return value

Returns a double value.


Sample

Public Sub main()

        Dim ary ()

        Dim result()

        Dim LongCycle

        Dim ShortCycle

        Dim MA_Type

        Period = 14

        MA_Type = 1

        LongCycle = 22

        ShortCycle = 14

        CopyClose 0, 1, Bars (0), Ary

        PriceOscillatorOnArray Ary, CInt(LongCycle), CInt(ShortCycle), CInt (MA_Type), Result

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

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