Syntax

Public Sub GoldenDeathCrossOnArray(ByVal Ary As Variant, ByVal ShortTerm As Integer, ByVal MediumTerm As Integer, ByVal LongTerm As Integer, ByVal MA_Type As Integer, ByRef Result As Variant)

Description

A procedure that calculates Golden Death Cross 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

Return value

Returns a double value.

Sample

 Public Sub main()        Dim ary ()        Dim result()        Dim ShortTerm        Dim MediumTerm        Dim LongTerm        Dim MA_Type         Period = 14        MA_Type = 1        ShortTerm = 7        MediumTerm = 14        LongTerm = 20         CopyClose 0, 1, Bars (0), Ary        GoldenDeathCrossOnArray Ary, CInt(ShortTerm), CInt(MediumTerm), CInt(LongTerm), CInt(MA_Type), Result        AlertMessage "The indicator value of the record 50 :" & Result(50)End Sub  

See Also

• KeltnerOnArray
• NeuralIndicatorOnArray
• StochRSIOnArray

Back to VTL Client Script Index