Syntax

Public Sub SwingIndexOnArray(ByVal Ary As Variant, ByVal LimitMoveValue As Double, ByRef Result As variant)

Description

A procedure that calculates Swing Index 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 HighAry ()        Dim OpenAry ()        Dim CloseAry ()        Dim LowAry ()        Dim result()        Dim LimitMoveValue        LimitMoveValue = 12.00        CopyClose 0, 1, Bars (0), CloseAry        CopyHigh 0, 1, Bars (0), HighAry        CopyOpen 0, 1, Bars (0), OpenAry        CopyLow 0, 1, Bars (0), LowAry        SwingIndexOnArray OpenAry, HighAry, LowAry, CloseAry, CInt(LimitMoveValue), Result        AlertMessage "The indicator value of the record 50 : " & Result(50)End Sub

See Also

• RainbowOscillatorOnArray
• TypicalPriceOnArray
• UltimateOscillatorOnArray

Back to VTL Client Script Index