import Foundation
import OpenGLES
class iFrAMA: NSObject{
var InpPeriodFrAMA:Int = 14
var InpShift:Int = 0
var FrAmaBuffer:[GLfloat] = []
override init() {
super.init()
}
convenience init(InpPeriodFrAMA:Int,InpShift:Int) {
self.init()
self.InpPeriodFrAMA = InpPeriodFrAMA
self.InpShift = InpShift
}
func loadElementArray(_ price: [GLfloat], _ open: [GLfloat], high: [GLfloat], low: [GLfloat], close: [GLfloat], volume: [GLfloat])
{
FrAmaBuffer = [GLfloat](repeating: 0.0,count: open.count)
let rates_total = open.count
if rates_total < 2*InpPeriodFrAMA
{return}
var limit:Int = 0
var Hi1:GLfloat = 0
var Hi2:GLfloat = 0
var Hi3:GLfloat = 0
var Lo1:GLfloat = 0
var Lo2:GLfloat = 0
var Lo3:GLfloat = 0
var N1:GLfloat = 0
var N2:GLfloat = 0
var N3:GLfloat = 0
var D:GLfloat = 0
var ALFA:GLfloat = 0
let prev_calculated:Int = 0
if prev_calculated==0
{
limit = 2*InpPeriodFrAMA-1;
for i in 0...limit
{
FrAmaBuffer[i]=price[i]
}
}
for i in limit..<rates_total
{
Hi1=iHighest(i,InpPeriodFrAMA,high)
Lo1=iLowest(i,InpPeriodFrAMA,low)
Hi2=iHighest(i-InpPeriodFrAMA,InpPeriodFrAMA,high)
Lo2=iLowest(i-InpPeriodFrAMA,InpPeriodFrAMA,low)
Hi3=iHighest(i,2*InpPeriodFrAMA,high)
Lo3=iLowest(i,2*InpPeriodFrAMA,low)
N1=(Hi1-Lo1)/GLfloat(InpPeriodFrAMA)
N2=(Hi2-Lo2)/GLfloat(InpPeriodFrAMA)
N3=(Hi3-Lo3)/GLfloat(2*InpPeriodFrAMA)
D=(log(N1+N2)-log(N3))/log(2.0)
ALFA=exp(-4.6*(D-1.0))
let item = FrAmaBuffer[i-1]
let last = (1-ALFA) * item
let value = ALFA * price[i] + last
FrAmaBuffer[i] = value
}
}
func iHighest(_ StartPos:Int, _ Depth:Int,_ High:[GLfloat]) -> GLfloat
{
var res:GLfloat = 0
if StartPos<0 || StartPos-Depth+1<0 || Depth<0
{
return 0.0
}
res = High[StartPos];
for i in StartPos-Depth+1..<StartPos
{
if High[i]>res
{
res = High[i]
}
}
return(res);
}
func iLowest(_ StartPos:Int, _ Depth:Int,_ Low:[GLfloat]) -> GLfloat
{
var res:GLfloat = 0
if StartPos<0 || StartPos-Depth+1<0 || Depth<0
{
return 0.0
}
res = Low[StartPos];
for i in StartPos-Depth+1..<StartPos
{
if Low[i]<res
{
res = Low[i]
}
}
return(res);
}
}
