PHP Code:
var V = Sistem.GrafikVerileri ;
var period = 100 ;
var atrfact = 5f ;
var H = Sistem.GrafikFiyatOku(V, "Yuksek" ) ;
var L = Sistem.GrafikFiyatOku(V, "Dusuk" ) ;
var C = Sistem.GrafikFiyatOku(V, "Kapanis" ) ;
var HLF = Sistem.Liste(V.Count, 0) ;
for (int i = 1; i < V.Count; i++)
{
HLF[i] = H[i] - L[i] ;
}
var MA1 = Sistem.MA(HLF, "Simple", period ) ;
var a = Sistem.Liste(V.Count, 0) ;
var HiLo = Sistem.Liste(V.Count, 0) ;
var Href = Sistem.Liste(V.Count, 0) ;
var Lref = Sistem.Liste(V.Count, 0) ;
var diff1 = Sistem.Liste(V.Count, 0) ;
var diff2 = Sistem.Liste(V.Count, 0) ;
var atrmod = Sistem.Liste(V.Count, 0) ;
for (int i = 1; i < V.Count; i++)
{
a[i] = 1.5f * MA1[i] ;
if ( HLF[i] < a[i] )
HiLo[i] = HLF[i] ;
else
HiLo[i] = a[i] ;
if ( L[i] <= H[i-1] )
Href[i] = H[i] - C[i-1] ;
else
Href[i] = ( H[i]-C[i-1] )-( L[i]-H[i-1] )/2 ;
if ( H[i] <= L[i-1] )
Lref[i] = C[i-1] - L[i] ;
else
Lref[i] = ( C[i-1] - L[i] )-( L[i-1]-H[i] )/2 ;
if ( H[i] <= L[i-1] )
Lref[i] = C[i-1] - L[i] ;
else
Lref[i] = ( C[i-1] - L[i] )-( L[i-1]-H[i] )/2 ;
if ( HiLo[i] > Href[i] )
diff1[i] = HiLo[i] ;
else
diff1[i] = Href[i] ;
if ( diff1[i] > Lref[i] )
diff2[i] = diff1[i] ;
else
diff1[i] = Lref[i] ;
}
atrmod = Sistem.MA(diff2, "Wilder", period ) ;
var loss= Sistem.Liste(V.Count, 0) ;
var trail= Sistem.Liste(V.Count, 0) ;
for (int i = 1; i < V.Count; i++)
{
loss[i] = atrfact * atrmod[i];
if ( C[i] > trail[i-1] && C[i-1] > trail[i-1] )
{
if ( trail[i-1] > (C[i] - loss[i]) )
trail[i] = trail[i-1] ;
else
trail[i] = (C[i] - loss[i]) ;
}
if ( C[i] < trail[i-1] && C[i-1] < trail[i-1] )
{
if ( trail[i-1] < (C[i] + loss[i]) )
trail[i] = trail[i-1] ;
else
trail[i] = (C[i] + loss[i]) ;
}
{
if ( C[i] > trail[i-1] )
trail[i] = C[i] - loss[i] ;
else
trail[i] = (C[i] + loss[i]) ;
}
}
var SonYon = "";
for (int i = 1; i < Sistem.BarSayisi; i++)
{
if ( C[i] > trail[i] &&
SonYon != "A" )
{
Sistem.Yon[i] = "A";
SonYon = Sistem.Yon[i] ;
}
if ( C[i] < trail[i] &&
SonYon != "S" )
{
Sistem.Yon[i] = "S";
SonYon = Sistem.Yon[i] ;
}
}
Sistem.Cizgiler[0].Deger = trail ;
Şimdi böyle bir sistem var. Eskiden matrikste
var period = 100 ;
var atrfact = 5f ;
yazan yere OPT1 , OPT2 yazıp optimizasyonu yaptırırdık.
İdeale dışardan indikatör ekleyince hem sistemini yazmak, hemde optimizasyon kodunu yazmak gerekiyor. Sisteme çevirmek kolay kalıp sayesinde yapılabiliyor. Bu sistemin optimizasyon formülü için kolay kalıp niteliginde optmiziasyon kalıbı varmıdır.
Yer İmleri