i=51
R = Close[i] / 4409.59
CountR = CountR + R
i=i-1
R = Close[i] / 4348.33
CountR = CountR + R
i=i-1
R = Close[i] / 4450.38
CountR = CountR + R
i=i-1
R = Close[i] / 4398.95
CountR = CountR + R
i=i-1
R = Close[i] / 4505.42
CountR = CountR + R
i=i-1
R = Close[i] / 4536.34
CountR = CountR + R
i=i-1
R = Close[i] / 4582.23
CountR = CountR + R
i=i-1
R = Close[i] / 4478.03
CountR = CountR + R
i=i-1
R = Close[i] / 4464.05
CountR = CountR + R
i=i-1
R = Close[i] / 4369.71
CountR = CountR + R
i=i-1
R = Close[i] / 4405.71
CountR = CountR + R
i=i-1
R = Close[i] / 4515.77
CountR = CountR + R
i=i-1
R = Close[i] / 4457.49
CountR = CountR + R
i=i-1
R = Close[i] / 4450.32
CountR = CountR + R
i=i-1
R = Close[i] / 4320.06
CountR = CountR + R
i=i-1
R = Close[i] / 4288.05
CountR = CountR + R
i=i-1
R = Close[i] / 4308.5
CountR = CountR + R
i=i-1
R = Close[i] / 4327.78
CountR = CountR + R
i=i-1
R = Close[i] / 4224.16
CountR = CountR + R
i=i-1
R = Close[i] / 4117.37
CountR = CountR + R
i=i-1
R = Close[i] / 4358.34
CountR = CountR + R
i=i-1
R = Close[i] / 4415.24
CountR = CountR + R
i=i-1
R = Close[i] / 4514.02
CountR = CountR + R
i=i-1
R = Close[i] / 4559.34
CountR = CountR + R
i=i-1
R = Close[i] / 4594.63
CountR = CountR + R
i=i-1
R = Close[i] / 4604.37
CountR = CountR + R
i=i-1
R = Close[i] / 4719.19
CountR = CountR + R
i=i-1
R = Close[i] / 4754.63
CountR = CountR + R
i=i-1
R = Close[i] / 4769.83
CountR = CountR + R
i=i-1
R = Close[i] / 4697.24
CountR = CountR + R
i=i-1
R = Close[i] / 4783.83
CountR = CountR + R
i=i-1
R = Close[i] / 4839.81
CountR = CountR + R
i=i-1
R = Close[i] / 4890.97
CountR = CountR + R
i=i-1
R = Close[i] / 4958.61
CountR = CountR + R
i=i-1
R = Close[i] / 5026.61
CountR = CountR + R
i=i-1
R = Close[i] / 5005.57
CountR = CountR + R
i=i-1
R = Close[i] / 5088.8
CountR = CountR + R
i=i-1
R = Close[i] / 5137.08
CountR = CountR + R
i=i-1
R = Close[i] / 5123.69
CountR = CountR + R
i=i-1
R = Close[i] / 5117.09
CountR = CountR + R
i=i-1
R = Close[i] / 5234.18
CountR = CountR + R
i=i-1
R = Close[i] / 5254.35
CountR = CountR + R
i=i-1
R = Close[i] / 5204.34
CountR = CountR + R
i=i-1
R = Close[i] / 5123.41
CountR = CountR + R
i=i-1
R = Close[i] / 4967.23
CountR = CountR + R
i=i-1
R = Close[i] / 5099.96
CountR = CountR + R
i=i-1
R = Close[i] / 5127.79
CountR = CountR + R
i=i-1
R = Close[i] / 5222.68
CountR = CountR + R
i=i-1
R = Close[i] / 5303.27
CountR = CountR + R
i=i-1
R = Close[i] / 5304.72
CountR = CountR + R
i=i-1
R = Close[i] / 5277.51
CountR = CountR + R
i=i-1
R = Close[i] / 5346.99
CountR = CountR + R
BasePrice = CountR / 52
FR = ((R / BasePrice) – 1) * 10
CERO = 0
SENYAL = FR
RETURN SENYAL AS “FR”