Syntax
Public Sub WilliamsPctROnArray(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 Williams%, 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 |
| OpenAry | Applied open price buffer, value of type Variant. |
| HighAry | Applied Highprice buffer, a value of type Variant |
| Applied low price buffer, a value of type Variant | |
| CloseAry | Applied Closeprice buffer, a value of type Variant |
| Period | The calculation period, on which the indicator will be calculated, a value of type integer |
| Result | Result array that represents indicator value, Value of type |
Return value
No Returns value
Sample
Public Sub main() Dim result() 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 WilliamsPctROnArray OpenAry, HighAry, LowAry, CloseAry, CInt (Period), Result AlertMessage "The indicator value of the record 50 : " & Result(50)End SubSee Also