Syntax
Public Sub CommodityChannelIndexOnArray(ByVal OpenAry As Variant, ByVal HighAry As Variant, ByVal LowAry As Variant, ByVal CloseAry As Variant, ByVal Period As Integer, ByRef Result As Variant)Description
A procedure that calculates Commodity Channel 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
| Parameter | Description |
| The openprice buffer, a value of type variant. | |
| HighAry | The high price buffer, a value of type variant |
| The low price buffer, a value of type |
|
| CloseAry | The close price buffer, a value of type variant. |
| Period | Calculation period on which indicator will be calculated, a |
| Result | The result bufferrepresents indicator value, a value of type Variant. |
Return value
No returns value.
Sample
Public Sub main() Dim result() Dim Period Dim HighAry () Dim LowAry () Dim OpenAry () Dim CloseAry () Period = 14 CopyHigh 0, 1, Bars (0), HighAry CopyLow 0, 1, Bars (0), LowAry CopyOpen 0, 1, Bars (0), OpenAry CopyClose 0, 1, Bars (0), CloseAry CommodityChannelIndexOnArray OpenAry, HighAry, LowAry, CloseAry, CInt (Period), Result AlertMessage "The indicator value of the record 50 : " & Result(50)End SubSee Also