Kod:
var LOW = Sistem.GrafikFiyatSec("Dusuk");
var HIGH = Sistem.GrafikFiyatSec("Yuksek");
var boxp = 5;
var LLV = Sistem.LLV(boxp, LOW);
var HHV = Sistem.HHV(boxp, HIGH);
var HHV3 = Sistem.HHV(boxp-2, HIGH);
var HHV4 = Sistem.HHV(boxp-1, HIGH);
var LowL = Sistem.Liste(0);
var NewH = Sistem.Liste(0);
var box1 = Sistem.Liste(0);
var box2 = Sistem.Liste(0);
var box3 = Sistem.Liste(0);
var bt15 = Sistem.Liste(0);
var bt25 = Sistem.Liste(0);
var bsince = 0 ;
for (int i=5; i< Sistem.BarSayisi; i++)
{
if (LOW [i] == LLV[i]) LowL[i] = LOW[i] ;
if (LOW[i-1] == LLV[i]) LowL[i] = LOW[i-1] ;
if (LOW[i-2] == LLV[i]) LowL[i] = LOW[i-2] ;
if (LOW[i-3] == LLV[i]) LowL[i] = LOW[i-3] ;
if (LOW[i-4] == LLV[i]) LowL[i] = LOW[i-4] ;
else LowL[i] = LLV[i]; //LowL:=If(L=LLV(L,5),L,
//If(Ref(L,-1)=LLV(L,5),Ref(L,-1),
//If(Ref(L,-2)=LLV(L,5),Ref(L,-2),
//If(Ref(L,-3)=LLV(L,5),Ref(L,-3),
//If(Ref(L,-4)=LLV(L,5),Ref(L,-4), 0)))));
if ( HIGH[i] > HHV[i-1] ) NewH[i] = HIGH[i];
else NewH[i] = NewH[i-1]; //NewH:=ValueWhen(1,H>Ref(HHV (H,5),-1),H);
if( HHV3[i] < HHV4[i] ) box1[i] = 1;
else box1[i] = -1; //box1:=HHV(H,3)<HHV(H,4);
if ( HIGH[i] > HHV[i-1] && box1[i] == -1 ) bsince = i ;
if ( i-bsince == 3 )
{
bsince = 0 ;
box2 [i] = NewH[i] ;
box3 [i] = LowL[i] ;
}
else
{
box2 [i] = box2 [i-1] ; //box2:=ValueWhen(1,BarsSince(H>Ref(HHV(H,5),-1))=3 AND box1=true,NewH);
box3 [i] = box3 [i-1] ; //box3:=ValueWhen(1,BarsSince(H>Ref(HHV(H,5),-1))=3 AND box1=true,LowL);
}
bt15 [i] = box3[i] - ( box3[i] * 1.5f ) /100 ; //BottomBox-(BottomBox*1.5)/100;
bt25 [i] = box3[i] - ( box3[i] * 2.5f ) /100 ; //BottomBox-(BottomBox*2.5)/100
}
Sistem.Cizgiler[0].Deger = box2 ;
Sistem.Cizgiler[0].Aciklama = "TopBox";
Sistem.Cizgiler[1].Deger = box3 ;
Sistem.Cizgiler[1].Aciklama = "BottomBox";
Sistem.Cizgiler[2].Deger = bt15 ;
Sistem.Cizgiler[2].Aciklama = "1.5f-";
Sistem.Cizgiler[3].Deger = bt25 ;
Sistem.Cizgiler[3].Aciklama = "2.5f-";
////
Yer İmleri