Twitte
ادامه مطلب از صفحه قبل ............
XTL Bull
--------
tgt:=100;
a:=CCI(20)<-tgt;
b:=CCI(20)>tgt;
state:=If(a>b,-1,If(a=b,0,1));
state=1
XTL Bear
--------
tgt:=100;
a:=CCI(20)<-tgt;
b:=CCI(20)>tgt;
state:=If(a>b,-1,If(a=b,0,1));
state=-1
_SECTION_BEGIN("XTL");
periods = Param( "Periods", 20, 2, 200, 1 );
//Plot( CCI( periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
CCI20=CCI(20);
_SECTION_END();
_SECTION_BEGIN("PriceBars");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Colorbar=IIf(CCI20>35,colorBrightGreen,IIf(CCI20<-35,colorRed,colorWhite));
Plot( C, "Close", Colorbar, styleNoTitle| styleThick | styleCandle );
_SECTION_END();
_SECTION_BEGIN("64 channel");
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
//Plot( C, "Close", ParamColor("Color", Null ), styleNoTitle | styleCandle );
P = ParamField("Field");
Type = ParamList("Type", "Simple,Exponential,Double Exponential,Tripple Exponential,Wilders,Weighted");
//Periods = Param("Periods", 30, 2, 300 );
//Displacement = Param("Displacement", 4, -50, 50 );
//m = 0;
//if( Type == "Simple" )
A = MA( H,6 );
B = MA( L,6 );
x= Ref(A,-4);
y= Ref(B,-4);
D=.0003;
xb=x-x*D;
yt=y+y*D;
//PlotOHLC( 0,xt,xb,xb ,"",ColorRGB(200,0,0), styleCloud);
//PlotOHLC( 0,yt,yb,yb ,"",ColorRGB(0,200,0), styleCloud);
PlotOHLC( 0,x,xb,xb ,"",colorGold, styleCloud);
PlotOHLC( 0,yt,y,y ,"",colorGold, styleCloud);
PlotOHLC( 0,x,y,y ,"",ColorRGB(50,50,10), styleCloud);
_SECTION_END();
/*
Whenever cci(20) crosses 35, you get XTL blue bar. Whenever CCI(20) falls below 35, you get red XTL bar. CCI(20) between -35 & 35 paints black XTL bar
هرگاه CCI(20) از 35 بیشتر شود، XTL یک کندل آبی تشکیل میدهد. و هرگاه CCI(20) به زیر 35 سقوط کند، XTL یک کندل قرمز تشکیل میدهد. هرگاه CCI(20) بین 35 و -35 باشد یک کندل مشکی تشکیل می دهد.
XTL Bull
--------
tgt:=100;
a:=CCI(20)<-tgt;
b:=CCI(20)>tgt;
state:=If(a>b,-1,If(a=b,0,1));
state=1
XTL Bear
--------
tgt:=100;
a:=CCI(20)<-tgt;
b:=CCI(20)>tgt;
state:=If(a>b,-1,If(a=b,0,1));
state=-1
_SECTION_BEGIN("XTL");
periods = Param( "Periods", 20, 2, 200, 1 );
//Plot( CCI( periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
CCI20=CCI(20);
_SECTION_END();
_SECTION_BEGIN("PriceBars");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Colorbar=IIf(CCI20>35,colorBrightGreen,IIf(CCI20<-35,colorRed,colorWhite));
Plot( C, "Close", Colorbar, styleNoTitle| styleThick | styleCandle );
_SECTION_END();
_SECTION_BEGIN("64 channel");
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
//Plot( C, "Close", ParamColor("Color", Null ), styleNoTitle | styleCandle );
P = ParamField("Field");
Type = ParamList("Type", "Simple,Exponential,Double Exponential,Tripple Exponential,Wilders,Weighted");
//Periods = Param("Periods", 30, 2, 300 );
//Displacement = Param("Displacement", 4, -50, 50 );
//m = 0;
//if( Type == "Simple" )
A = MA( H,6 );
B = MA( L,6 );
x= Ref(A,-4);
y= Ref(B,-4);
D=.0003;
xb=x-x*D;
yt=y+y*D;
//PlotOHLC( 0,xt,xb,xb ,"",ColorRGB(200,0,0), styleCloud);
//PlotOHLC( 0,yt,yb,yb ,"",ColorRGB(0,200,0), styleCloud);
PlotOHLC( 0,x,xb,xb ,"",colorGold, styleCloud);
PlotOHLC( 0,yt,y,y ,"",colorGold, styleCloud);
PlotOHLC( 0,x,y,y ,"",ColorRGB(50,50,10), styleCloud);
_SECTION_END();
/*
Whenever cci(20) crosses 35, you get XTL blue bar. Whenever CCI(20) falls below 35, you get red XTL bar. CCI(20) between -35 & 35 paints black XTL bar
هرگاه CCI(20) از 35 بیشتر شود، XTL یک کندل آبی تشکیل میدهد. و هرگاه CCI(20) به زیر 35 سقوط کند، XTL یک کندل قرمز تشکیل میدهد. هرگاه CCI(20) بین 35 و -35 باشد یک کندل مشکی تشکیل می دهد.
نظر