Posted by Mohammad Rahhal, Last modified by Diana Alkouni on 27 August 2020 10:12 AM


Public Sub NeuralIndicatorOnArray(ByVal Ary As Variant, ByVal Period As Integer, ByVal LearningRate As Double, ByVal Epochs As Long, ByVal PercentTrain As Integer, ByRef Result As Variant)


A procedure that calculates the Neural Indicator 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.


Parameter  Description 
Ary The source array, that contains prices
Period Period as integer
LearningRate Neural network learning rate (0.1 to 1+)
Epochs The amount of neural network learning to perform (1 to 32,000 – 500 or less is recommended)
PercentTrain The amount of data to be used as an out-of-sample neural network training set
Result The Result Array

Return value

Returns a double value.


 Public Sub main()

        Dim ary ()

        Dim result()

        Dim Period

        Period = 14

        CopyClose 0, 1, Bars (0), Ary

        NeuralIndicatorOnArray Ary, CInt(Period), 0.5, 5, 60, Result

        AlertMessage "The indicator value of the record 50 :" & Result(50)

End Sub


See Also

Back to VTL Client Script Index

(0 vote(s))
Not helpful

Comments (0)
Post a new comment
Full Name:
CAPTCHA Verification 
Please enter the text you see in the image into the textbox below (we use this to prevent automated submissions).

Help Desk Software by Hybrid Solutions