Originally Posted by
TIFIL
s.a. iyi günler PMAX OPT hali verilmiş, bunu OPT siz nasıl yapabilirim, yardımcı olabilecek var mı? tşk.
var C = Sistem.GrafikFiyatSec("Kapanis");
var OrtaNokta = Sistem.GrafikFiyatSec("OrtaNokta");
var STR = Sistem.Liste(0);
var STS = Sistem.Liste(0);
var FUB = Sistem.Liste(0);
var FLB = Sistem.Liste(0);
var PMAX = Sistem.Liste(0);
var SonYon = "";
var ATRX = Sistem.IMI(1);
for (int Pd= 1; Pd < 50; Pd++)
{
var ATR = Sistem.MA(ATRX, "Simple", Pd);
for (int Mp= 1; Mp < 50; Mp++)
{
var MP = Sistem.MA(OrtaNokta, "Exp", Mp);
for (float Factor = 1.0f; Factor < 5f; Factor+=0.5f)
{
for (int i=1; i < Sistem.BarSayisi; i++)
Sistem.Yon[i] = "";
for (int i=1; i < Sistem.BarSayisi; i++)
{
STR[i] = MP[i] + (Factor*ATR[i]);
STS[i] = MP[i] - (Factor*ATR[i]);
FUB[i] = (STR[i] < FUB[i-1] || MP[i-1] > FUB[i-1]) ? STR[i] : FUB[i-1];
FLB[i] = (STS[i] > FLB[i-1] || MP[i-1] < FLB[i-1]) ? STS[i] : FLB[i-1];
PMAX[i] = (PMAX[i-1] == FUB[i-1] && MP[i] < FUB[i]) ? FUB[i] : (PMAX[i-1] == FUB[i-1] && MP[i] > FUB[i]) ? FLB[i] : (PMAX[i-1] == FLB[i-1] && MP[i] > FLB[i]) ? FLB[i] : (PMAX[i-1] == FLB[i-1] && MP[i] < FLB[i] ? FUB[i] : FUB[i]);
if (C[i] > PMAX[i] && SonYon != "A")
{
SonYon = "A";
Sistem.Yon[i] = "A";
}
else if (C[i] < PMAX[i] && SonYon != "S")
{
SonYon = "S";
Sistem.Yon[i] = "S";
}
}
Sistem.Optimizasyon("Factor, Pd, Mp", Pd, Mp, Factor);
}}}