Syntax
Public Sub MACDOnArray(ByVal OpenAry As Variant, ByVal HighAry As Variant, ByVal LowAry As Variant, ByVal CloseAry As Variant, ByVal SignalPeriod As Integer, ByVal FastEMA As Integer, ByVal SlowEMA As Integer, ByRef Result As Variant, ByRef Signal As Variant)
Description
A procedure that calculates MACD, 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 open array | |
HighAry | The High array |
The low array | |
CloseAry | The close array |
FastEMA | FastEMA as integer |
SlowEMA | SlowEMA as integer |
Result | The Result Array |
Signal |
Return value
Returns a double value.
Sample
Public Sub main() Dim HighAry () Dim LowAry () Dim OpenAry () Dim CloseAry () Dim result() Dim SignalPeriod Dim FastEMA Dim SlowEMA Dim Signal SignalPeriod = 9 FastEMA = 12 SlowEMA = 26 CopyHigh 0, 1, Bars (0), HighAry CopyLow 0, 1, Bars (0), LowAry CopyOpen 0, 1, Bars (0), OpenAry CopyClose 0, 1, Bars (0), CloseAry MACDOnArray OpenAry, HighAry, LowAry, CloseAry, CInt (SignalPeriod), CInt (FastEMA), CInt (SlowEMA), Result, Signal AlertMessage "The indicator value of the record 50 : " & Result(50)End Sub
See Also