The Average Negative Changes show average of successive decreases of value
for last PERIOD time periods.
Public Function AverageNegativeChanges(ByVal ANCIn() As Double, ByVal Lag As Long) As Double
Example:
Dim TA4Net As
New TA4Net.CTAFunctions("YOUR-REGISTRATION-CODE")
Dim Result() As
Double
Dim CloseValues() As
Double
' loading values to array
CloseValues =
GetCloseValues()
' calculating Technical Analysis function
Result = TA4Net.AverageNegativeChanges(CloseValues, 14)