المؤشرات الفنية في الامي بروكر

[ابوحمد2009]

اخواني قبل ايام في بعض المنتديات تعرفت على شخص من الطائف اشتراى
مؤشر من المؤشرات الامي بروكر من شخص بـ 3000 ريال سعودي
ويقول بعد فترة وجت المؤشر مجاني في موقع اجنبي فتصلت للشخص
الى بلده واخبرة اني وجدت المؤشر مجاني . وطالبته بإراجع مبلغي
ولكنه رفض ذلك

ولهذا فليعلم الجميع ان جميع معادلات الامي بروكر مجانية وفي مواقع اجنبية
ومن احتاج الى معادلة فل ينزل صورتها هنا وان شاء الله تعالى اجبها واركبها
ان كانت المعادلة قد مزجت ببعض المؤشرات كما يعمل البعض
يقوم بدمج بعض المؤشرات وبعد ذلك يغير في الالون ويبيع المؤشر على انه
من برمجة . يعملها في دقيقة ثم بعد ذلك بيعها للناس بمبالغ كبيرة
هذا المؤشر ب3000 وهذا 5500 ريال سعودي وهذا 1000 ريال
وهذا حرام وجرم

---

تعديل العنوان
الادارة

[ابوحمد2009]

اخواني قبل ايام في بعض المنتديات تعرفت على شخص من الطائف اشتراى
مؤشر من المؤشرات الامي بروكر من شخص بـ 3000 ريال سعودي
ويقول بعد فترة وجت المؤشر مجاني في موقع اجنبي فتصلت للشخص
الى بلده واخبرة اني وجدت المؤشر مجاني . وطالبته بإراجع مبلغي
ولكنه رفض ذلك

ولهذا فليعلم الجميع ان جميع معادلات الامي بروكر مجانية وفي مواقع اجنبية
ومن احتاج الى معادلة فل ينزل صورتها هنا وان شاء الله تعالى اجبها واركبها
ان كانت المعادلة قد مزجت ببعض المؤشرات كما يعمل البعض
يقوم بدمج بعض المؤشرات وبعد ذلك يغير في الالون ويبيع المؤشر على انه
من برمجة . يعملها في دقيقة ثم بعد ذلك بيعها للناس بمبالغ كبيرة
هذا المؤشر ب3000 وهذا 5500 ريال سعودي وهذا 1000 ريال
وهذا حرام وجرم

---

تعديل العنوان
الادارة

[ابوحمد2009]

[sor2]http://im33.gulfup.com/zD0IM.png[/sor2]

هذا المؤشر طلب فيه 2800 وهو مجاني والان هذا المؤشر بين ايديكم

[ابوحمد2009]

[sor2]http://im33.gulfup.com/zD0IM.png[/sor2]

هذا المؤشر طلب فيه 2800 وهو مجاني والان هذا المؤشر بين ايديكم

[صـقر]

السلام عليكم

اهلا وسهلا بك اخي ابواحمد

بين اخوانك وفي منتدياك

وبداية قوية ماشاء الله وموفقه

ودي ادرج المعادلة لكن للاسف انا في العمل الان

اخوك

[صـقر]

السلام عليكم

اهلا وسهلا بك اخي ابواحمد

بين اخوانك وفي منتدياك

وبداية قوية ماشاء الله وموفقه

ودي ادرج المعادلة لكن للاسف انا في العمل الان

اخوك

[ابوحمد2009]

[CENTER]

i هذا المؤشر طلب فيه 8000 ريال وهو مجاني مدموج من عدة مؤشرات والان بين ايديكم

[sor2]http://im40.gulfup.com/sUAw3.png[/sor2]

[ابوحمد2009]

[CENTER]

i هذا المؤشر طلب فيه 8000 ريال وهو مجاني مدموج من عدة مؤشرات والان بين ايديكم

[sor2]http://im40.gulfup.com/sUAw3.png[/sor2]

[صـقر]

المشاركة الأصلية كتبت بواسطة ابوحمد2009

[sor2]http://im33.gulfup.com/zD0IM.png[/sor2]

هذا المؤشر طلب فيه 2800 وهو مجاني والان هذا المؤشر بين ايديكم

_SECTION_BEGIN("graph");
SetChartOptions(0,chartShowArrows|chartShowDates);
gxs=Param("GRAPH spaceing",10,5,50,5); GraphXSpace = gxs;
strWeekday = StrMid("SunMonTueWedThuFriSat", SelectedValue(DayOfWeek())*3,3);
_SECTION_END();
_SECTION_BEGIN("Intraday ");
k = Optimize("K",Param("K",1.75,1,5,0.25),1,5,0.25);
Per= Optimize("atr",Param("atr",10,3,30,1),3,30,1);
j=(O+H+L+C)/4;
nm= (H-L);
rfsctor = WMA(nm, PER);
revers = K * rfsctor;
Trend = 1;
NW[0] = 0;
for(i = 1; i < BarCount; i++)
{
if(Trend[i-1] == 1)
{
if(j[i] < NW[i-1])
{
Trend[i] = -1;
NW[i] = j[i] + Revers[i];
}
else
{
Trend[i] = 1;
if((j[i] - Revers[i]) > NW[i-1])
{
NW[i] = j[i] - Revers[i];
}
else
{
NW[i] = NW[i-1];
}
}
}
if(Trend[i-1] == -1)
{
if(j[i] > NW[i-1])
{
Trend[i] = 1;
NW[i] = j[i] - Revers[i];
}
else
{
Trend[i] = -1;
if((j[i] + Revers[i]) < NW[i-1])
{
NW[i] = j[i] + Revers[i];
}
else
{
NW[i] = NW[i-1];
}
}
}
}
Plot(NW, "", IIf(Trend == 1, 6, 4), 4);
//---------------trading -------------
Buy=Cover=Cross(j,nw);Sell=Short=Cross(nw,j);Buy=E xRem(Buy,Sell);Sell=ExRem(Sell,Buy);Short=ExRem(Sh ort,Cover);Cover=ExRem(Cover,Short);
PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),5, 0,Low,-15);
PlotShapes(IIf(Sell, shapeHollowDownArrow, shapeNone),0, 0,High,-15);
PlotShapes(IIf(Cover, shapeHollowCircle, shapeNone),1, 0,Close,0);
PlotShapes(IIf(Short, shapeDownArrow, shapeNone),4, 0,High,-25);
//-----------end--------------
Long=Flip(Buy,Sell OR Cover);
Shrt=Flip(Sell,Buy OR Cover);
NOTrade= NOT (Long OR shrt);
Edc=(
WriteIf (Buy AND Ref(shrt,-1), " GO LONG / Reverse Signal at "+C+" ","")+
WriteIf (Buy AND Ref(NOTrade,-1), " GO LONG at "+C+" ","")+
WriteIf (Sell AND Ref(NOTrade,-1), " GO Short at "+C+" ","")+
WriteIf (Sell AND Ref(Long,-1), " EXIT LONG / Reverse Signal at "+C+" ",""));
_SECTION_END();
grid_day = IIf(Day()!=Ref(Day(),-1),1,0);

///--------------------------------------------------------------------------------------------------
UpCandle = ParamColor("", 5);
DownCandle = ParamColor("", 22);
Consolidation = ParamColor("",55);
BG2a=HHV(LLV(L,4)+ATR(4),8);
BR2a=LLV(HHV(H,4)-ATR(4),8);
Candlecolor = IIf(Close>BG2a ,UpCandle,IIf(Close < BR2a,DownCandle,Consolidation));
SetBarFillColor( IIf(O <C, 5,4) );
Plot( Close, "", 22, 92);
Plot( Close, "", CandleColor, 721);
TimeFrameSet( 2*Interval() );
BG2=HHV(LLV(L,4)+ATR(4),8);
BR2=LLV(HHV(H,4)-ATR(4),8);
C1=C;
TimeFrameRestore();
M5 = TimeFrameExpand(BG2,2*Interval() );
MM5=TimeFrameExpand( BR2,2*Interval() );
cM5=TimeFrameExpand( C1, 2*Interval() );
TimeFrameSet( 4*Interval() );
BG2=HHV(LLV(L,4)+ATR(4),8);
BR2=LLV(HHV(H,4)-ATR(4),8);
C1=C;
TimeFrameRestore();
M15 = TimeFrameExpand(BG2,4*Interval() );
MM15=TimeFrameExpand(BR2,4*Interval() );
cM15=TimeFrameExpand( C1,4*Interval() );
TimeFrameSet( 6*Interval() );
BG2=HHV(LLV(L,4)+ATR(4),8);
BR2=LLV(HHV(H,4)-ATR(4),8);
C1=C;
TimeFrameRestore();
M30 = TimeFrameExpand(BG2,6*Interval() );
MM30=TimeFrameExpand(BR2,6*Interval() );
cM30=TimeFrameExpand( C1,6*Interval() );
TimeFrameSet( 8*Interval() );
BG2=HHV(LLV(L,4)+ATR(4),8);
BR2=LLV(HHV(H,4)-ATR(4),8);
C1=C;
TimeFrameRestore();
H1 = TimeFrameExpand(BG2 ,8*Interval() );
HH1=TimeFrameExpand( BR2,8*Interval() );
Ch1=TimeFrameExpand( C1,8*Interval() );
TimeFrameSet( 16*Interval() );
BG2=HHV(LLV(L,4)+ATR(4),8);
BR2=LLV(HHV(H,4)-ATR(4),8);
C1=C;
TimeFrameRestore();
H4 = TimeFrameExpand( BG2,16*Interval() );
HH4=TimeFrameExpand( BR2,16*Interval() );
cH4 = TimeFrameExpand( C1,16*Interval() );
Com=("\n "+Name()+ " - Trend in ")+"\n "+EncodeColor(colorLightGrey)+(""+Interval(2)+":") +
WriteIf(Close>BG2a,EncodeColor(colorLime)+" UP",WriteIf(Close<BR2a,EncodeColor(colorRed)+" DN",EncodeColor(colorGrey50)+" ~~"))+
EncodeColor(colorLightGrey)+(" "+2*Interval()/60+"m:")+
WriteIf(Cm5>M5,EncodeColor(colorLime)+" UP",WriteIf(Cm5<MM5,EncodeColor(colorRed)+" DN",EncodeColor(colorGrey50)+" ~~"))+
EncodeColor(colorLightGrey)+(" "+4*Interval()/60+"m:")+
WriteIf(Cm15>M15,EncodeColor(colorLime)+" UP",WriteIf(Cm15<MM15,EncodeColor(colorRed)+" DN",EncodeColor(colorGrey50)+" ~~"))+
EncodeColor(colorLightGrey)+(" "+6*Interval()/60+"m:")+
WriteIf(Cm30>M30,EncodeColor(colorLime)+" UP",WriteIf(Cm30<MM30,EncodeColor(colorRed)+" DN",EncodeColor(colorGrey50)+" ~~"))+
EncodeColor(colorLightGrey)+(" "+8*Interval()/60+"m:")+
WriteIf(CH1>H1,EncodeColor(colorLime)+" UP",WriteIf(CH1<HH1,EncodeColor(colorRed)+" DN",EncodeColor(colorGrey50)+" ~~"))+
EncodeColor(colorLightGrey)+(" "+16*Interval()/60+"m: ")+
WriteIf(Ch4>H4,EncodeColor(colorLime)+" UP",WriteIf(Ch4<HH4,EncodeColor(colorRed)+" DN",EncodeColor(colorGrey50)+" ~~" ));

[صـقر]

المشاركة الأصلية كتبت بواسطة ابوحمد2009

[sor2]http://im33.gulfup.com/zD0IM.png[/sor2]

هذا المؤشر طلب فيه 2800 وهو مجاني والان هذا المؤشر بين ايديكم

_SECTION_BEGIN("graph");
SetChartOptions(0,chartShowArrows|chartShowDates);
gxs=Param("GRAPH spaceing",10,5,50,5); GraphXSpace = gxs;
strWeekday = StrMid("SunMonTueWedThuFriSat", SelectedValue(DayOfWeek())*3,3);
_SECTION_END();
_SECTION_BEGIN("Intraday ");
k = Optimize("K",Param("K",1.75,1,5,0.25),1,5,0.25);
Per= Optimize("atr",Param("atr",10,3,30,1),3,30,1);
j=(O+H+L+C)/4;
nm= (H-L);
rfsctor = WMA(nm, PER);
revers = K * rfsctor;
Trend = 1;
NW[0] = 0;
for(i = 1; i < BarCount; i++)
{
if(Trend[i-1] == 1)
{
if(j[i] < NW[i-1])
{
Trend[i] = -1;
NW[i] = j[i] + Revers[i];
}
else
{
Trend[i] = 1;
if((j[i] - Revers[i]) > NW[i-1])
{
NW[i] = j[i] - Revers[i];
}
else
{
NW[i] = NW[i-1];
}
}
}
if(Trend[i-1] == -1)
{
if(j[i] > NW[i-1])
{
Trend[i] = 1;
NW[i] = j[i] - Revers[i];
}
else
{
Trend[i] = -1;
if((j[i] + Revers[i]) < NW[i-1])
{
NW[i] = j[i] + Revers[i];
}
else
{
NW[i] = NW[i-1];
}
}
}
}
Plot(NW, "", IIf(Trend == 1, 6, 4), 4);
//---------------trading -------------
Buy=Cover=Cross(j,nw);Sell=Short=Cross(nw,j);Buy=E xRem(Buy,Sell);Sell=ExRem(Sell,Buy);Short=ExRem(Sh ort,Cover);Cover=ExRem(Cover,Short);
PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),5, 0,Low,-15);
PlotShapes(IIf(Sell, shapeHollowDownArrow, shapeNone),0, 0,High,-15);
PlotShapes(IIf(Cover, shapeHollowCircle, shapeNone),1, 0,Close,0);
PlotShapes(IIf(Short, shapeDownArrow, shapeNone),4, 0,High,-25);
//-----------end--------------
Long=Flip(Buy,Sell OR Cover);
Shrt=Flip(Sell,Buy OR Cover);
NOTrade= NOT (Long OR shrt);
Edc=(
WriteIf (Buy AND Ref(shrt,-1), " GO LONG / Reverse Signal at "+C+" ","")+
WriteIf (Buy AND Ref(NOTrade,-1), " GO LONG at "+C+" ","")+
WriteIf (Sell AND Ref(NOTrade,-1), " GO Short at "+C+" ","")+
WriteIf (Sell AND Ref(Long,-1), " EXIT LONG / Reverse Signal at "+C+" ",""));
_SECTION_END();
grid_day = IIf(Day()!=Ref(Day(),-1),1,0);

///--------------------------------------------------------------------------------------------------
UpCandle = ParamColor("", 5);
DownCandle = ParamColor("", 22);
Consolidation = ParamColor("",55);
BG2a=HHV(LLV(L,4)+ATR(4),8);
BR2a=LLV(HHV(H,4)-ATR(4),8);
Candlecolor = IIf(Close>BG2a ,UpCandle,IIf(Close < BR2a,DownCandle,Consolidation));
SetBarFillColor( IIf(O <C, 5,4) );
Plot( Close, "", 22, 92);
Plot( Close, "", CandleColor, 721);
TimeFrameSet( 2*Interval() );
BG2=HHV(LLV(L,4)+ATR(4),8);
BR2=LLV(HHV(H,4)-ATR(4),8);
C1=C;
TimeFrameRestore();
M5 = TimeFrameExpand(BG2,2*Interval() );
MM5=TimeFrameExpand( BR2,2*Interval() );
cM5=TimeFrameExpand( C1, 2*Interval() );
TimeFrameSet( 4*Interval() );
BG2=HHV(LLV(L,4)+ATR(4),8);
BR2=LLV(HHV(H,4)-ATR(4),8);
C1=C;
TimeFrameRestore();
M15 = TimeFrameExpand(BG2,4*Interval() );
MM15=TimeFrameExpand(BR2,4*Interval() );
cM15=TimeFrameExpand( C1,4*Interval() );
TimeFrameSet( 6*Interval() );
BG2=HHV(LLV(L,4)+ATR(4),8);
BR2=LLV(HHV(H,4)-ATR(4),8);
C1=C;
TimeFrameRestore();
M30 = TimeFrameExpand(BG2,6*Interval() );
MM30=TimeFrameExpand(BR2,6*Interval() );
cM30=TimeFrameExpand( C1,6*Interval() );
TimeFrameSet( 8*Interval() );
BG2=HHV(LLV(L,4)+ATR(4),8);
BR2=LLV(HHV(H,4)-ATR(4),8);
C1=C;
TimeFrameRestore();
H1 = TimeFrameExpand(BG2 ,8*Interval() );
HH1=TimeFrameExpand( BR2,8*Interval() );
Ch1=TimeFrameExpand( C1,8*Interval() );
TimeFrameSet( 16*Interval() );
BG2=HHV(LLV(L,4)+ATR(4),8);
BR2=LLV(HHV(H,4)-ATR(4),8);
C1=C;
TimeFrameRestore();
H4 = TimeFrameExpand( BG2,16*Interval() );
HH4=TimeFrameExpand( BR2,16*Interval() );
cH4 = TimeFrameExpand( C1,16*Interval() );
Com=("\n "+Name()+ " - Trend in ")+"\n "+EncodeColor(colorLightGrey)+(""+Interval(2)+":") +
WriteIf(Close>BG2a,EncodeColor(colorLime)+" UP",WriteIf(Close<BR2a,EncodeColor(colorRed)+" DN",EncodeColor(colorGrey50)+" ~~"))+
EncodeColor(colorLightGrey)+(" "+2*Interval()/60+"m:")+
WriteIf(Cm5>M5,EncodeColor(colorLime)+" UP",WriteIf(Cm5<MM5,EncodeColor(colorRed)+" DN",EncodeColor(colorGrey50)+" ~~"))+
EncodeColor(colorLightGrey)+(" "+4*Interval()/60+"m:")+
WriteIf(Cm15>M15,EncodeColor(colorLime)+" UP",WriteIf(Cm15<MM15,EncodeColor(colorRed)+" DN",EncodeColor(colorGrey50)+" ~~"))+
EncodeColor(colorLightGrey)+(" "+6*Interval()/60+"m:")+
WriteIf(Cm30>M30,EncodeColor(colorLime)+" UP",WriteIf(Cm30<MM30,EncodeColor(colorRed)+" DN",EncodeColor(colorGrey50)+" ~~"))+
EncodeColor(colorLightGrey)+(" "+8*Interval()/60+"m:")+
WriteIf(CH1>H1,EncodeColor(colorLime)+" UP",WriteIf(CH1<HH1,EncodeColor(colorRed)+" DN",EncodeColor(colorGrey50)+" ~~"))+
EncodeColor(colorLightGrey)+(" "+16*Interval()/60+"m: ")+
WriteIf(Ch4>H4,EncodeColor(colorLime)+" UP",WriteIf(Ch4<HH4,EncodeColor(colorRed)+" DN",EncodeColor(colorGrey50)+" ~~" ));

[عاشق الطفرات]

الله يجزاك الجنه

[عاشق الطفرات]

الله يجزاك الجنه

[صـقر]

المشاركة الأصلية كتبت بواسطة ابوحمد2009

[CENTER]

i هذا المؤشر طلب فيه 8000 ريال وهو مجاني مدموج من عدة مؤشرات والان بين ايديكم

[sor2]http://im40.gulfup.com/sUAw3.png[/sor2]

للاسف المف غير موجود

يمكنك رفعه ع صيغة الوورد

doc او docx

في المركز لدينا

http://up.mrkazksa.com/


بعد التسجيل

[صـقر]

المشاركة الأصلية كتبت بواسطة ابوحمد2009

[CENTER]

i هذا المؤشر طلب فيه 8000 ريال وهو مجاني مدموج من عدة مؤشرات والان بين ايديكم

[sor2]http://im40.gulfup.com/sUAw3.png[/sor2]

للاسف المف غير موجود

يمكنك رفعه ع صيغة الوورد

doc او docx

في المركز لدينا

http://up.mrkazksa.com/


بعد التسجيل

[ابوحمد2009]

المشاركة الأصلية كتبت بواسطة صـقر

السلام عليكم

اهلا وسهلا بك اخي ابواحمد

بين اخوانك وفي منتدياك

وبداية قوية ماشاء الله وموفقه

ودي ادرج المعادلة لكن للاسف انا في العمل الان

اخوك

شكراً على موافقتكم على الانضمام لهذا الصرح التعليمي وان شاء الله تعالى نفيدكم ونستفيد منك
تحياتي لكم ولجميع اعضاء المنتدى .

[ابوحمد2009]

المشاركة الأصلية كتبت بواسطة صـقر

السلام عليكم

اهلا وسهلا بك اخي ابواحمد

بين اخوانك وفي منتدياك

وبداية قوية ماشاء الله وموفقه

ودي ادرج المعادلة لكن للاسف انا في العمل الان

اخوك

شكراً على موافقتكم على الانضمام لهذا الصرح التعليمي وان شاء الله تعالى نفيدكم ونستفيد منك
تحياتي لكم ولجميع اعضاء المنتدى .

[منادي]

يسعد صباحك

بعض الناس لا يحب ان يتعب نفسه شوي ويبحث لا سيما وجود عدد كبير من المواقع الخاصة بالأمي بروكر كذلك وجود بعض الأخوان الذين يقدمون المشورة بالمجان

بارك الله فيك ونفع بك

وفهمت الرسالة

والأشخاص المسوقين للمعادلات معروفين وبدون ذكر أسماء

[منادي]

يسعد صباحك

بعض الناس لا يحب ان يتعب نفسه شوي ويبحث لا سيما وجود عدد كبير من المواقع الخاصة بالأمي بروكر كذلك وجود بعض الأخوان الذين يقدمون المشورة بالمجان

بارك الله فيك ونفع بك

وفهمت الرسالة

والأشخاص المسوقين للمعادلات معروفين وبدون ذكر أسماء

[ابوحمد2009]

هذا مؤشر الاختراق ومازلت في اكمال البقية
////



slope = Param("slope",2,2,100,1);Color20= IIf(LinRegSlope(EMA(C,13),slope)<0,5,55);
event1= LinRegSlope(EMA(C,13),slope)<1;Plot( EMA( C,13), "",5,styleDashed);
slope = Param("slope",2,2,100,1);
Color20= IIf(LinRegSlope(EMA(C,9),slope)<0,4,colorDarkBlue) ;event1= LinRegSlope(EMA(C,9),slope)<1;
Plot( EMA( C,9), "",4,styleLine);
Col_bar = IIf(EMA(CCI(14),2) > Ref(EMA(CCI(14),2),-1),colorYellow,colorCustom12);
Plot(Close,"price",col_bar,styleCandle);
r= RSI(14);pR=PeakBars(H,1)==0;pivothigh = Ref(pR,-1)<pR AND pR>Ref(pR,1);
y0=SelectedValue(ValueWhen(pivothigh,H,2));
y1=SelectedValue(ValueWhen(pivothigh,H,1));
x0=SelectedValue(ValueWhen(pivothigh,Cum( 1)-1,2));
x1=SelectedValue(ValueWhen(pivothigh,Cum( 1)-1,1));
LineA=LineArray(x0,y0,x1,y1,1);
Plot(LineA,"",colorWhite,4+8,styleNoLabel);
pS =TroughBars(L,1)==0;
pivotlow = Ref(pS,-1)<pS AND pS>Ref(pS,1);
yt0=SelectedValue(ValueWhen(pivotlow,L,2));
yt1=SelectedValue(ValueWhen(pivotlow,L,1));
xt0=SelectedValue(ValueWhen(pivotlow,Cum( 1)-1,2));
xt1=SelectedValue(ValueWhen(pivotlow,Cum( 1)-1,1));
LineB=LineArray(xt0,yt0,xt1,yt1,1);
Plot(LineB,"",colorWhite,4+8,styleNoLabel);
u00=LastValue(Peak(H,1,2));
u11=LastValue(Peak(H,1,1));
a00=BarCount - 1 - LastValue(PeakBars(H,1,2));
price_start1=Close[a00];
a11=BarCount - 1 - LastValue(PeakBars(H,1,1));
price_end1=Close[a11];
Line = LineArray(a00,u00,a11,u11, 0 );
LastPointSell = LineArray(a11-1,u11-1,a11,u11,0);
GG=u11<u00 AND price_end1>price_start1;
PlotShapes(shapeSmallCircle*GG ,colorCustom12,0,Line,10);
PlotShapes(shapeDownTriangle*GG,colorCustom12,0,La stPointSell,-30);
u0=LastValue(Trough(L,1,2));
u1=LastValue(Trough(L,1,1));
a0=BarCount - 1 - LastValue(TroughBars(L,1,2));
price_start=Close[a0];
a1=BarCount - 1 - LastValue(TroughBars(L,1,1));
price_end=Close[a1];
Line = LineArray(a0,u0,a1,u1, 0 );
TT=u1>u0 AND price_end<price_start;
LastPointBuy = LineArray(a1-1,u1-1,a1,u1,0);
PlotShapes(shapeSmallCircle*TT,colorYellow,0,Line) ;
PlotShapes(shapeUpTriangle*TT,colorYellow,0,LastPo intBuy);
r1 = Param("Fast avg", 10, 2, 200, 1);
r2 = Param("Slow avg", 22, 2, 200, 1);
r3 = Param("Signal avg", 5, 2, 200, 1);
m1 = MACD(r1,r2);s1 = Signal(r1,r2,r3);
Hist=m1-s1;Buy= Cross(Hist,0);Sell = Cross( 0, Hist );
PlotShapes(IIf(Buy,shapeDigit1,Null),colorBrightGr een,0,L,-25);
PlotShapes(IIf(Buy,shapeUpArrow,Null),colorBrightG reen,0,L,-35);
j1 = Cross(m1,s1)AND m1>0;
PlotShapes(IIf(j1,shapeDigit3 ,Null),colorWhite,0,L,Offset=-65);
PlotShapes(IIf(j1,shapeUpArrow,Null),colorWhite,0, L,Offset=-75);
Plot(Buy,"",colorCustom13,styleDashed|styleHistogr am|styleOwnScale|styleNoLabe l,0,1,0,0);
j2 = Cross(m1,s1)AND m1<0 ;
PlotShapes(IIf(j2,shapeDigit2,Null),colorYellow,0, L,Offset=-45);
PlotShapes(IIf(j2,shapeUpArrow,Null),colorYellow,0 ,L,Offset=-55);
Plot(Buy,"",colorYellow,styleDashed|styleHistogram |styleOwnScale|styleNoLabel, 0,1,0,0);
j3 = Cross(s1,m1) AND m1>0;
PlotShapes(IIf(j3,shapeDigit4 ,Null),colorCustom12,0,H,Offset=65);
PlotShapes(IIf(j3,shapeHollowDownArrow,Null),color Custom12,0,H,Offset=-75);
Plot(j3,"",colorViolet,styleHistogram|styleDashed| styleOwnScale|styleNoLabel,0 ,1,0,0);
Mothc=Ref(H,-1)>H AND Ref(L,-1)<L;
y0 = StrToNum(NumToStr(ValueWhen(Mothc, Ref(L,-1))));
TDL = LineArray(0, y0, (BarCount-1), y0);
Plot(TDL, "", colorGold,styleDashed|styleNoLabel);
y0 = StrToNum(NumToStr(ValueWhen(Mothc, Ref(H,-1))));
TDH= LineArray(0, y0, (BarCount-1), y0);
PlotShapes(shapeSmallCircle*(Ref(Mothc,1)),colorGo ld,0,H,5);
PlotShapes(shapeSmallCircle*(Ref(Mothc,1)),colorGo ld,0,L,-5);
Plot(TDH, "", colorCustom12,styleDashed|styleNoLabel);
Buy2=Cross(C,TDH);
Sell2=Cross(TDL,C);
numbars = SelectedValue(Cum(Status("barvisible")));
fraction= IIf(StrRight(Name(),3) == "",3.2,3.2);
hts = Param ("Text Shift", -50,-100,100,10);
PlotText("" + WriteVal(TDH,fraction),
SelectedValue(BarIndex()+5)-(numbars/hts),SelectedValue(TDH),colorCustom12);
PlotText("" + WriteVal(TDL,fraction),
SelectedValue(BarIndex()+5)-(numbars/hts),SelectedValue(TDL),colorGold);
bb2top = BBandTop(Close,20,2.25);
bb1top = BBandTop(Close,20,1);
bb2bot = BBandBot(Close,20,2.25);
bb1bot = BBandBot(Close,20,1);
Plot (bb2top,"",IIf(bb2top > Ref(bb2top,-1) AND bb2bot < Ref(bb2bot,-1),2,2),styleLine|33);
Plot (bb2bot,"",IIf(bb2top > Ref(bb2top,-1) AND bb2bot < Ref(bb2bot,-1),3,3),styleLine|33);
Plot (bb1top,"",IIf(bb1top > Ref(bb1top,-1) AND bb1bot < Ref(bb1bot,-1),44,44),styleLine|33);
Plot (bb1bot,"",IIf(bb1top > Ref(bb1top,-1) AND bb1bot < Ref(bb1bot,-1),33,33),styleLine|33);
Buy=Cross(C,bb2top)AND RSI(14)<70;
Sell=Cross(bb1top,C)AND RSI(14)>30;
PlotShapes(Buy * shapeSmallUpTriangle , colorCustom12,0,C,-15);
PlotShapes(Sell * shapeSmallDownTriangle , colorGold,0,C,-7);
Plot(Buy,"",5,styleHistogram|styleArea|styleOwnSca le|styleNoLabel ,10,1,0,0);
Plot(Sell,"t",4,styleHistogram|styleArea|styleOwnS cale|colorYellow,10 ,1,0,0);
Col_action = IIf(Close >bb1top AND PDI(14) > MDI(14),colorBrightGreen,IIf(Close <bb1bot AND PDI(14) < MDI(14),colorRed,7));
Plot(5, "", Col_action, styleOwnScale| 7,-0.5,100);
PlotOHLC(bb2top,bb2top,bb1top,bb1top,"",ColorRGB(3 9,39,39),styleCloud);
PlotOHLC(bb1bot,bb1bot,bb2bot,bb1bot,"",ColorRGB(3 9,39,39),styleCloud);
PlotOHLC(EMA( Close, 19 ),IIf(EMA( Close, 19 ) > EMA( Close, 21 ),EMA( Close, 19 )
,EMA( Close, 21 )),IIf(EMA( Close, 19 )<EMA( Close, 21 ),EMA( Close, 19 ),
EMA( Close, 21 )),EMA( Close, 20 ),"",IIf(EMA( Close, 20 ) > MA(EMA( Close, 20 ),3),4,5),8);
SetChartOptions(0,chartShowDates);
SetChartBkColor(16);
GraphXSpace=Param("GraphXSpace",10,-100,100,1);
SetBarFillColor(IIf(O>C,24,19));
Plot(C,"Price",IIf(O>C,32,34),64);
dtn=DateNum();
haC=EMA((O+H+L+C)/4,3); haO=AMA(Ref(haC,-1),0.5);
haH=Max(H,Max(haC,haO)); haL=Min(L,Min(haC,haO));
SetChartOptions(0,chartShowArrows|chartShowDates);
fraction= IIf(StrRight(Name(),3) == "", 3.2, 3.2);
tchoice=Param("Title Selection ",2,1,2,1);
PlotCandle = ParamToggle("Plot Nifty Candle", "No,Yes", 0);
fibs = ParamToggle("Plot Fibs","Off|On",1);
pctH = Param ("Pivot Hi %", 0.325,0.001,2.0,0.002);
HiLB = Param ("Hi LookBack",1,1,BarCount-1,1);
pctL = Param ("Pivot Lo %", 0.325,0.001,2.0,0.002);
LoLB = Param ("Lo LookBack",1,1,BarCount-1,1);
Back = Param ("Extend Left = 2",1,1,500,1);
Fwd = Param("Plot Forward", 0, 0, 500, 1);
text = ParamToggle("Plot Text","Off|On",1);
hts = Param ("Text Shift", -33.5,-50,50,0.10);
style =ParamStyle("Line Style",styleLine,styleNoLabel);
x = BarIndex();
pRp = PeakBars( H, pctH, 1) == 0;
yRp0 = LastValue(ValueWhen( pRp, H, HiLB));
xRp0 = LastValue(ValueWhen( pRp, x, HiLB));
pSp = TroughBars( L, pctL, 1) == 0;
ySp0 = LastValue(ValueWhen( pSp, L, LoLB));
xSp0 = LastValue(ValueWhen( pSp, x, LoLB));
Delta = yRp0 - ySp0;
function fib(ret) {
retval = (Delta * ret);
Fibval = IIf(ret < 1.0
AND xSp0 < xRp0, yRp0 - retval, IIf(ret < 1.0
AND xSp0 > xRp0, ySp0 + retval,IIf(ret > 1.0
AND xSp0 < xRp0, yRp0 - retval, IIf(ret > 1.0
AND xSp0 > xRp0, ySp0 + retval, Null))));
return FibVal;
}
x0 = Min(xSp0,xRp0)-Back;
x1 = (BarCount -1);
r236 = fib(0.236); r236I = LastValue (r236,1);
r382 = fib(0.382);r382I = LastValue (r382,1);
r050 = fib(0.50);r050I = LastValue (r050,1);
r618 = fib(0.618);r618I = LastValue (r618,1);
r786 = fib(0.786);r786I = LastValue (r786,1);
e127 = fib(1.27);e127I = LastValue (e127,1);
e162 = fib(1.62);e162I = LastValue (e162,1);
e200 = fib(2.00);e200I = LastValue (e200,1);
e262 = fib(2.62);e262I = LastValue (e262,1);
e424 = fib(4.24);e424I = LastValue (e424,1);
p00 = IIf(xSp0 > xRp0,ySp0,yRp0); p00I = LastValue (p00,1);
p100 = IIf(xSp0 < xRp0,ySp0,yRp0); p100I = LastValue (p100,1);
color00 =IIf(xSp0 > xRp0,colorLime,colorRed);
color100 =IIf(xSp0 < xRp0,colorLime,colorRed);
numbars = LastValue(Cum(Status("barvisible")));
fraction= IIf(StrRight(Name(),3) == "", 3.2, 3.2);
UTValue1=LastValue(Trough(L,1,2));
UTValue2=ySp0;UTBar1=BarCount - 1 - LastValue(TroughBars(L,1,2));
price_utbar1=Close[UTBar1];UTBar2=xSp0;price_utbar2=Close[UTBar2];
UpTrendLine = LineArray( UTBar1, UTValue1, UTBar2,UTValue2, 1 );
UTLine = LineArray( UTBar1, UTValue1, UTBar2,UTValue2, 0 );
Plot( UpTrendLine , _DEFAULT_NAME(), colorGreen,styleDots | styleNoTitle | styleNoLabel);
DTValue1=LastValue(Peak(H,1,2)); DTValue2=yRp0;
DTBar1=BarCount - 1 - LastValue(PeakBars(H,1,2));
price_dtbar1=Close[DTBar1]; DTBar2=xRp0; price_dtbar2=Close[DTBar2];
DownTrendLine = LineArray( DTBar1, DTValue1, DTBar2,DTValue2, 1 );
DTLine = LineArray( DTBar1, DTValue1, DTBar2,DTValue2, 0 );
Plot( DownTrendLine ,_DEFAULT_NAME(), colorRed,styleDots | styleNoTitle | styleNoLabel);
Plot( DTLine ,_DEFAULT_NAME(), colorRed,styleDots | styleNoTitle | styleNoLabel);
PlotOHLC( DownTrendLine , DownTrendLine , UpTrendLine ,
UpTrendLine , "", 24, styleCloud | styleNoRescale);
DTLine = LineArray(xRp0-Fwd,yRp0,x1,yRp0,Back);
UTLine = LineArray(xSp0-Fwd,ySp0,x1,ySp0,Back);
CBuy = Cross(C,DownTrendLine ); CSell = Cross(UpTrendLine ,C);
baratcbuy = LastValue(ValueWhen(CBuy,BarIndex()));
baratcsell = LastValue(ValueWhen(CSell,BarIndex()));
CBuy = CBuy AND BarIndex() == baratcbuy ;
CSell = CSell AND BarIndex() == baratcsell ;
PlotShapes(shapeUpTriangle* CBuy ,colorBlue,O,L);
PlotShapes(shapeDownTriangle* CSell ,colorRed,O,H);
CBuy1 = Cross(C,DTLine ); CSell1 = Cross(UTLine ,C);
baratcbuy1 = LastValue(ValueWhen(CBuy1,BarIndex()));
baratcsell1 = LastValue(ValueWhen(CSell1,BarIndex()));
CBuy1 = CBuy1 AND BarIndex() == baratcbuy1 ;
CSell1 = CSell1 AND BarIndex() == baratcsell1 ;

[ابوحمد2009]

هذا مؤشر الاختراق ومازلت في اكمال البقية
////



slope = Param("slope",2,2,100,1);Color20= IIf(LinRegSlope(EMA(C,13),slope)<0,5,55);
event1= LinRegSlope(EMA(C,13),slope)<1;Plot( EMA( C,13), "",5,styleDashed);
slope = Param("slope",2,2,100,1);
Color20= IIf(LinRegSlope(EMA(C,9),slope)<0,4,colorDarkBlue) ;event1= LinRegSlope(EMA(C,9),slope)<1;
Plot( EMA( C,9), "",4,styleLine);
Col_bar = IIf(EMA(CCI(14),2) > Ref(EMA(CCI(14),2),-1),colorYellow,colorCustom12);
Plot(Close,"price",col_bar,styleCandle);
r= RSI(14);pR=PeakBars(H,1)==0;pivothigh = Ref(pR,-1)<pR AND pR>Ref(pR,1);
y0=SelectedValue(ValueWhen(pivothigh,H,2));
y1=SelectedValue(ValueWhen(pivothigh,H,1));
x0=SelectedValue(ValueWhen(pivothigh,Cum( 1)-1,2));
x1=SelectedValue(ValueWhen(pivothigh,Cum( 1)-1,1));
LineA=LineArray(x0,y0,x1,y1,1);
Plot(LineA,"",colorWhite,4+8,styleNoLabel);
pS =TroughBars(L,1)==0;
pivotlow = Ref(pS,-1)<pS AND pS>Ref(pS,1);
yt0=SelectedValue(ValueWhen(pivotlow,L,2));
yt1=SelectedValue(ValueWhen(pivotlow,L,1));
xt0=SelectedValue(ValueWhen(pivotlow,Cum( 1)-1,2));
xt1=SelectedValue(ValueWhen(pivotlow,Cum( 1)-1,1));
LineB=LineArray(xt0,yt0,xt1,yt1,1);
Plot(LineB,"",colorWhite,4+8,styleNoLabel);
u00=LastValue(Peak(H,1,2));
u11=LastValue(Peak(H,1,1));
a00=BarCount - 1 - LastValue(PeakBars(H,1,2));
price_start1=Close[a00];
a11=BarCount - 1 - LastValue(PeakBars(H,1,1));
price_end1=Close[a11];
Line = LineArray(a00,u00,a11,u11, 0 );
LastPointSell = LineArray(a11-1,u11-1,a11,u11,0);
GG=u11<u00 AND price_end1>price_start1;
PlotShapes(shapeSmallCircle*GG ,colorCustom12,0,Line,10);
PlotShapes(shapeDownTriangle*GG,colorCustom12,0,La stPointSell,-30);
u0=LastValue(Trough(L,1,2));
u1=LastValue(Trough(L,1,1));
a0=BarCount - 1 - LastValue(TroughBars(L,1,2));
price_start=Close[a0];
a1=BarCount - 1 - LastValue(TroughBars(L,1,1));
price_end=Close[a1];
Line = LineArray(a0,u0,a1,u1, 0 );
TT=u1>u0 AND price_end<price_start;
LastPointBuy = LineArray(a1-1,u1-1,a1,u1,0);
PlotShapes(shapeSmallCircle*TT,colorYellow,0,Line) ;
PlotShapes(shapeUpTriangle*TT,colorYellow,0,LastPo intBuy);
r1 = Param("Fast avg", 10, 2, 200, 1);
r2 = Param("Slow avg", 22, 2, 200, 1);
r3 = Param("Signal avg", 5, 2, 200, 1);
m1 = MACD(r1,r2);s1 = Signal(r1,r2,r3);
Hist=m1-s1;Buy= Cross(Hist,0);Sell = Cross( 0, Hist );
PlotShapes(IIf(Buy,shapeDigit1,Null),colorBrightGr een,0,L,-25);
PlotShapes(IIf(Buy,shapeUpArrow,Null),colorBrightG reen,0,L,-35);
j1 = Cross(m1,s1)AND m1>0;
PlotShapes(IIf(j1,shapeDigit3 ,Null),colorWhite,0,L,Offset=-65);
PlotShapes(IIf(j1,shapeUpArrow,Null),colorWhite,0, L,Offset=-75);
Plot(Buy,"",colorCustom13,styleDashed|styleHistogr am|styleOwnScale|styleNoLabe l,0,1,0,0);
j2 = Cross(m1,s1)AND m1<0 ;
PlotShapes(IIf(j2,shapeDigit2,Null),colorYellow,0, L,Offset=-45);
PlotShapes(IIf(j2,shapeUpArrow,Null),colorYellow,0 ,L,Offset=-55);
Plot(Buy,"",colorYellow,styleDashed|styleHistogram |styleOwnScale|styleNoLabel, 0,1,0,0);
j3 = Cross(s1,m1) AND m1>0;
PlotShapes(IIf(j3,shapeDigit4 ,Null),colorCustom12,0,H,Offset=65);
PlotShapes(IIf(j3,shapeHollowDownArrow,Null),color Custom12,0,H,Offset=-75);
Plot(j3,"",colorViolet,styleHistogram|styleDashed| styleOwnScale|styleNoLabel,0 ,1,0,0);
Mothc=Ref(H,-1)>H AND Ref(L,-1)<L;
y0 = StrToNum(NumToStr(ValueWhen(Mothc, Ref(L,-1))));
TDL = LineArray(0, y0, (BarCount-1), y0);
Plot(TDL, "", colorGold,styleDashed|styleNoLabel);
y0 = StrToNum(NumToStr(ValueWhen(Mothc, Ref(H,-1))));
TDH= LineArray(0, y0, (BarCount-1), y0);
PlotShapes(shapeSmallCircle*(Ref(Mothc,1)),colorGo ld,0,H,5);
PlotShapes(shapeSmallCircle*(Ref(Mothc,1)),colorGo ld,0,L,-5);
Plot(TDH, "", colorCustom12,styleDashed|styleNoLabel);
Buy2=Cross(C,TDH);
Sell2=Cross(TDL,C);
numbars = SelectedValue(Cum(Status("barvisible")));
fraction= IIf(StrRight(Name(),3) == "",3.2,3.2);
hts = Param ("Text Shift", -50,-100,100,10);
PlotText("" + WriteVal(TDH,fraction),
SelectedValue(BarIndex()+5)-(numbars/hts),SelectedValue(TDH),colorCustom12);
PlotText("" + WriteVal(TDL,fraction),
SelectedValue(BarIndex()+5)-(numbars/hts),SelectedValue(TDL),colorGold);
bb2top = BBandTop(Close,20,2.25);
bb1top = BBandTop(Close,20,1);
bb2bot = BBandBot(Close,20,2.25);
bb1bot = BBandBot(Close,20,1);
Plot (bb2top,"",IIf(bb2top > Ref(bb2top,-1) AND bb2bot < Ref(bb2bot,-1),2,2),styleLine|33);
Plot (bb2bot,"",IIf(bb2top > Ref(bb2top,-1) AND bb2bot < Ref(bb2bot,-1),3,3),styleLine|33);
Plot (bb1top,"",IIf(bb1top > Ref(bb1top,-1) AND bb1bot < Ref(bb1bot,-1),44,44),styleLine|33);
Plot (bb1bot,"",IIf(bb1top > Ref(bb1top,-1) AND bb1bot < Ref(bb1bot,-1),33,33),styleLine|33);
Buy=Cross(C,bb2top)AND RSI(14)<70;
Sell=Cross(bb1top,C)AND RSI(14)>30;
PlotShapes(Buy * shapeSmallUpTriangle , colorCustom12,0,C,-15);
PlotShapes(Sell * shapeSmallDownTriangle , colorGold,0,C,-7);
Plot(Buy,"",5,styleHistogram|styleArea|styleOwnSca le|styleNoLabel ,10,1,0,0);
Plot(Sell,"t",4,styleHistogram|styleArea|styleOwnS cale|colorYellow,10 ,1,0,0);
Col_action = IIf(Close >bb1top AND PDI(14) > MDI(14),colorBrightGreen,IIf(Close <bb1bot AND PDI(14) < MDI(14),colorRed,7));
Plot(5, "", Col_action, styleOwnScale| 7,-0.5,100);
PlotOHLC(bb2top,bb2top,bb1top,bb1top,"",ColorRGB(3 9,39,39),styleCloud);
PlotOHLC(bb1bot,bb1bot,bb2bot,bb1bot,"",ColorRGB(3 9,39,39),styleCloud);
PlotOHLC(EMA( Close, 19 ),IIf(EMA( Close, 19 ) > EMA( Close, 21 ),EMA( Close, 19 )
,EMA( Close, 21 )),IIf(EMA( Close, 19 )<EMA( Close, 21 ),EMA( Close, 19 ),
EMA( Close, 21 )),EMA( Close, 20 ),"",IIf(EMA( Close, 20 ) > MA(EMA( Close, 20 ),3),4,5),8);
SetChartOptions(0,chartShowDates);
SetChartBkColor(16);
GraphXSpace=Param("GraphXSpace",10,-100,100,1);
SetBarFillColor(IIf(O>C,24,19));
Plot(C,"Price",IIf(O>C,32,34),64);
dtn=DateNum();
haC=EMA((O+H+L+C)/4,3); haO=AMA(Ref(haC,-1),0.5);
haH=Max(H,Max(haC,haO)); haL=Min(L,Min(haC,haO));
SetChartOptions(0,chartShowArrows|chartShowDates);
fraction= IIf(StrRight(Name(),3) == "", 3.2, 3.2);
tchoice=Param("Title Selection ",2,1,2,1);
PlotCandle = ParamToggle("Plot Nifty Candle", "No,Yes", 0);
fibs = ParamToggle("Plot Fibs","Off|On",1);
pctH = Param ("Pivot Hi %", 0.325,0.001,2.0,0.002);
HiLB = Param ("Hi LookBack",1,1,BarCount-1,1);
pctL = Param ("Pivot Lo %", 0.325,0.001,2.0,0.002);
LoLB = Param ("Lo LookBack",1,1,BarCount-1,1);
Back = Param ("Extend Left = 2",1,1,500,1);
Fwd = Param("Plot Forward", 0, 0, 500, 1);
text = ParamToggle("Plot Text","Off|On",1);
hts = Param ("Text Shift", -33.5,-50,50,0.10);
style =ParamStyle("Line Style",styleLine,styleNoLabel);
x = BarIndex();
pRp = PeakBars( H, pctH, 1) == 0;
yRp0 = LastValue(ValueWhen( pRp, H, HiLB));
xRp0 = LastValue(ValueWhen( pRp, x, HiLB));
pSp = TroughBars( L, pctL, 1) == 0;
ySp0 = LastValue(ValueWhen( pSp, L, LoLB));
xSp0 = LastValue(ValueWhen( pSp, x, LoLB));
Delta = yRp0 - ySp0;
function fib(ret) {
retval = (Delta * ret);
Fibval = IIf(ret < 1.0
AND xSp0 < xRp0, yRp0 - retval, IIf(ret < 1.0
AND xSp0 > xRp0, ySp0 + retval,IIf(ret > 1.0
AND xSp0 < xRp0, yRp0 - retval, IIf(ret > 1.0
AND xSp0 > xRp0, ySp0 + retval, Null))));
return FibVal;
}
x0 = Min(xSp0,xRp0)-Back;
x1 = (BarCount -1);
r236 = fib(0.236); r236I = LastValue (r236,1);
r382 = fib(0.382);r382I = LastValue (r382,1);
r050 = fib(0.50);r050I = LastValue (r050,1);
r618 = fib(0.618);r618I = LastValue (r618,1);
r786 = fib(0.786);r786I = LastValue (r786,1);
e127 = fib(1.27);e127I = LastValue (e127,1);
e162 = fib(1.62);e162I = LastValue (e162,1);
e200 = fib(2.00);e200I = LastValue (e200,1);
e262 = fib(2.62);e262I = LastValue (e262,1);
e424 = fib(4.24);e424I = LastValue (e424,1);
p00 = IIf(xSp0 > xRp0,ySp0,yRp0); p00I = LastValue (p00,1);
p100 = IIf(xSp0 < xRp0,ySp0,yRp0); p100I = LastValue (p100,1);
color00 =IIf(xSp0 > xRp0,colorLime,colorRed);
color100 =IIf(xSp0 < xRp0,colorLime,colorRed);
numbars = LastValue(Cum(Status("barvisible")));
fraction= IIf(StrRight(Name(),3) == "", 3.2, 3.2);
UTValue1=LastValue(Trough(L,1,2));
UTValue2=ySp0;UTBar1=BarCount - 1 - LastValue(TroughBars(L,1,2));
price_utbar1=Close[UTBar1];UTBar2=xSp0;price_utbar2=Close[UTBar2];
UpTrendLine = LineArray( UTBar1, UTValue1, UTBar2,UTValue2, 1 );
UTLine = LineArray( UTBar1, UTValue1, UTBar2,UTValue2, 0 );
Plot( UpTrendLine , _DEFAULT_NAME(), colorGreen,styleDots | styleNoTitle | styleNoLabel);
DTValue1=LastValue(Peak(H,1,2)); DTValue2=yRp0;
DTBar1=BarCount - 1 - LastValue(PeakBars(H,1,2));
price_dtbar1=Close[DTBar1]; DTBar2=xRp0; price_dtbar2=Close[DTBar2];
DownTrendLine = LineArray( DTBar1, DTValue1, DTBar2,DTValue2, 1 );
DTLine = LineArray( DTBar1, DTValue1, DTBar2,DTValue2, 0 );
Plot( DownTrendLine ,_DEFAULT_NAME(), colorRed,styleDots | styleNoTitle | styleNoLabel);
Plot( DTLine ,_DEFAULT_NAME(), colorRed,styleDots | styleNoTitle | styleNoLabel);
PlotOHLC( DownTrendLine , DownTrendLine , UpTrendLine ,
UpTrendLine , "", 24, styleCloud | styleNoRescale);
DTLine = LineArray(xRp0-Fwd,yRp0,x1,yRp0,Back);
UTLine = LineArray(xSp0-Fwd,ySp0,x1,ySp0,Back);
CBuy = Cross(C,DownTrendLine ); CSell = Cross(UpTrendLine ,C);
baratcbuy = LastValue(ValueWhen(CBuy,BarIndex()));
baratcsell = LastValue(ValueWhen(CSell,BarIndex()));
CBuy = CBuy AND BarIndex() == baratcbuy ;
CSell = CSell AND BarIndex() == baratcsell ;
PlotShapes(shapeUpTriangle* CBuy ,colorBlue,O,L);
PlotShapes(shapeDownTriangle* CSell ,colorRed,O,H);
CBuy1 = Cross(C,DTLine ); CSell1 = Cross(UTLine ,C);
baratcbuy1 = LastValue(ValueWhen(CBuy1,BarIndex()));
baratcsell1 = LastValue(ValueWhen(CSell1,BarIndex()));
CBuy1 = CBuy1 AND BarIndex() == baratcbuy1 ;
CSell1 = CSell1 AND BarIndex() == baratcsell1 ;