| عضو مميز
تاريخ التسجيل: Dec 2013
المشاركات: 3,293
|  رد: حصري لمنتدى مركز السوق السعودي اخصكم بمؤشر مع ترقيم بموجات اليوت
up=Cross(StochK(14,3),StochD(14,3,3));
DN=Cross(StochD(14,3,3),StochK(14,3));
VAR1=Cum(UP);
VAR2=2*Cum (UP)-2*int (Cum(UP)/10 )*10+33; //count every 10 steps
VAR3=2*Cum (dn)-2*int (Cum(dn)/10)*10+34 ; // IF.....1*cum()=up_and_down
WriteVal( VAR1 ,1.8)+" VAR1 "; WriteVal( VAR2 ,1)+" VAR2 ";
WriteVal( VAR3 ,1)+" VAR3 ";
PlotShapes(IIf(up,VAR2,IIf(dn,Var3,0)) , IIf(up,colorWhite,colorWhite),0,StochK(14,3),-15);
_SECTION_BEGIN("Unnamed 7");
K1=StochK(14,3);
F1=StochD(14,3,3);
r=RSI(21);
Plot(K1,"",colorBlue,styleDots+styleThick);
Plot(F1,"",colorYellow,styleDots+styleThick);
Plot(20, "20", colorDarkRed,styleLine);
Plot(80, "80", colorDarkRed,styleLine);
Plot(50,"",colorWhite,styleDashed+styleThick);
_SECTION_END();
Buy=Cross(K1,F1);
Sell=Cross(F1,K1);
PlotOHLC(StochD(14,3,3),StochD(14,3,3),50,StochD(1 4,3,3), "", IIf(StochD(14,3,3)> 50, colorRed , colorGreen), styleCloud | styleClipMinMax,20,80);
SetChartBkGradientFill( ParamColor("BgTop", colorBrightGreen),ParamColor("BgBottom", colorGreen));
SetChartBkColor(ParamColor("Outer panel",colorYellow));
_SECTION_BEGIN("CompanyName");
k = (GetPerformanceCounter()/100)%100;
printf("GetPerformance Counter %g",k);
GfxSelectFont("Andalus",22,800);
GfxSetBkMode(1);
GfxSetTextColor(colorBlue);
GfxTextOut(FullName(),295+k,7);
RequestTimedRefresh(10);
_SECTION_END();
_SECTION_BEGIN("CompanyName");
k = (GetPerformanceCounter()/100)%100;
printf("GetPerformance Counter %g",k);
GfxSelectFont("Andalus",22,800);
GfxSetBkMode(1);
GfxSetTextColor(colorWhite);
GfxTextOut(FullName(),295+k,520);
RequestTimedRefresh(10);
_SECTION_END();
_SECTION_END();
بعد التصويب |