قديم 17-08-2019, 05:45 PM
  المشاركه #1

عضو هوامير المميز

تاريخ التسجيل: Oct 2005
المشاركات: 436
amiralshoq غير متواجد حالياً  

Icon2 عدة معادلات للإيمي بروكر تمت تجربتها


السلام عليكم ورحمة الله وبركاته
نظرا للتفاعل الطيب بمشاركتي الأولى في هذا الرابط

https://hawamer.com/vb/hawamer2319004

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



وآمل أن تكون مفيدة برجاء ممن يجربها وتعجبه التفضل بالدعاء لوالدي مع شكري الجزيل مقدماً

المؤشر او المعادلة الثانية إشارات البيع والشراء بالأسعار والأهداف صعودا وهبوطا وإتجاه الترند

عدة معادلات للإيمي بروكر تمت تجربتها


المعادلة أسفل الخط
================

_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_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", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();
_SECTION_BEGIN("SAR");
acc = Param("Acceleration", 0.1, 0, 1, 0.001 );
accm = Param("Max. acceleration", 0.06, 0, 1, 0.001 );
SAR1 = SAR(acc,accm);
Buy1 = Cross(Open, SAR(acc,accm));
Sell1 = Cross(SAR(acc,accm), Open );
if (ParamToggle("SAR","Show|Hide",1)){
Plot(SAR1,"",1,styleDots|styleNoLine);
PlotShapes(IIf(Buy1,shapeUpArrow,shapeNone), colorYellow, 0, Low, Offset=-15);
PlotShapes(IIf(Buy1,shapeSmallCircle,shapeNone), colorYellow, 0, Low, Offset=-28);
PlotShapes(IIf(Sell1, shapeDownArrow,shapeNone), colorWhite, 0, High, Offset=-15);
PlotShapes(IIf(Sell1, shapeSmallCircle,shapeNone), colorWhite, 0, High, Offset= 28);
}
_SECTION_END();
messageboard = ParamToggle("Message Board","Show|Hide",0);
exitlong = Sell1;
PlotShapes(exitlong * shapeDownArrow, colorRed,0,H,-10);
exitshort = Buy1;
PlotShapes(exitshort * shapeUpArrow, colorBlack,0,L,-15);
Buy = exitshort;
Sell = exitlong;
Buy = ExRem(Buy,Sell);
Sell = ExRem(Sell,Buy);
AlertIf( Buy, "", "BUY @ " + C, 1 );
AlertIf( Sell, "", "SELL @ " + C, 2 );
for(i=BarCount-1;i>1;i--)
{
if(Buy[i] == 1)
{
entry = C[i];
sig = "BUY";
sl = sar1[i];
tar1 = entry + (entry * .0056);
tar2 = entry + (entry * .0116);
tar3 = entry + (entry * .0216);
bars = i;
i = 0;
}
if(Sell[i] == 1)
{
sig = "SELL";
entry = C[i];
sl = SAR1[i];
tar1 = entry - (entry * .0056);
tar2 = entry - (entry * .0116);
tar3 = entry - (entry * .0216);
bars = i;
i = 0;
}
}
Offset = 20;
Clr = IIf(sig == "BUY", colorLime, colorRed);
ssl = IIf(bars == BarCount-1, sar1[BarCount-1], Ref(SAR1, -1));
sl = ssl[BarCount-1];
Plot(LineArray(bars-Offset, tar1, BarCount, tar1,1), "", Clr, styleLine|styleDots, Null, Null, Offset);
Plot(LineArray(bars-Offset, tar2, BarCount, tar2,1), "", Clr, styleLine|styleDots, Null, Null, Offset);
Plot(LineArray(bars-Offset, tar3, BarCount, tar3,1), "", Clr, styleLine|styleDots, Null, Null, Offset);
Plot(LineArray(bars-Offset, sl, BarCount, sl,1), "", colorDarkRed, styleLine|styleLine, Null, Null, Offset);
Plot(LineArray(bars-Offset, entry, BarCount, entry,1), "", colorGreen, styleLine|styleLine, Null, Null, Offset);
for (i=bars; i <BarCount;i++)
{
PlotText(""+sig+"@"+entry, BarCount+1,entry,Null,colorBlue);
PlotText("T1@"+tar1,BarCount+3,tar1,Null,Clr);PlotText("T2@"+tar2,BarCount+3,tar2,Null,Clr);PlotText ("T3@"+tar3,BarCount+3,tar3,Null,Clr);
}
printf("Last " + sig + " Signal came " + (BarCount-bars) + " bars ago");
printf("\n" + sig + " @ : " + entry + "\nStop Loss : " + sl + " (" + WriteVal(IIf(sig == "SELL",entry-sl,sl-entry), 2.2) + ")"+ "\nTarget_1 : " + tar1 + "\nTarget_2 : " + tar2 + "\nTarget_3 : " + tar3);
printf("\nCurrent P/L : " + WriteVal(IIf(sig == "BUY",(C-entry),(entry-C)),2.2));
if (messageboard == 0 )
{
GfxSelectFont( "Tahoma", 9, 100 );
GfxSetBkMode( 1 );
GfxSetTextColor( colorWhite );
if ( sig =="BUY")
{
GfxSelectSolidBrush( colorBlue ); // this is the box background color
}
else
{
GfxSelectSolidBrush( colorRed ); // this is the box background color
}
pxHeight = Status( "pxchartheight" ) ;
xx = Status( "pxchartwidth");
Left = 1100;
width = 310;
x = 5;
x2 = 210;
y = pxHeight;
GfxSelectPen( colorGreen, 1); // broader color
GfxRoundRect( x, y - 163, x2, y , 7, 7 ) ;
GfxTextOut( ( " Message Box "),88,y-165);
GfxTextOut( (" "),27,y-160);
GfxTextOut( ("Last " + sig + " Signal came " + (BarCount-bars-1) * Interval()/60 + " mins ago"), 13, y-140) ; // The text format location
GfxTextOut( ("" + WriteIf(sig =="BUY",sig + " @ ",sig + " @") + " : " + entry), 13, y-120);
GfxTextOut( ("Trailing SL : " + sl + " (" + WriteVal(IIf(sig == "SELL",entry-sl,sl-entry), 2.2) + ")"), 13, y-100);
GfxTextOut( ("TGT:1 : " + tar1), 13, y -80);
GfxTextOut( ("TGT:2 : " + tar2), 13,y-60);
GfxTextOut( ("TGT:3 : " + tar3), 13,y-40);
GfxTextOut( ("Current P/L : " + WriteVal(IIf(sig == "BUY",(C-entry),(entry-C)),2.2)), 88, y-22);;
}
_SECTION_BEGIN("ADX");
uptrend=PDI()>MDI()AND Signal()<MACD();
downtrend=MDI()>PDI()AND Signal()>MACD();
Plot( 2, "ADX",IIf( uptrend, colorGreen, IIf( downtrend, colorRed, colorBlack )), styleOwnScale|styleArea|styleNoLabel, -0.5, 100 );
_SECTION_END();
GraphXSpace=5;

الموضوع الأصلي : اضغط هنا    ||   المصدر : منتدى هوامير البورصة السعودية


رد مع اقتباس
 
 

قديم 17-08-2019, 07:54 PM
  المشاركه #2

عضو هوامير المميز

تاريخ التسجيل: Oct 2005
المشاركات: 436
amiralshoq غير متواجد حالياً  

رد: عدة معادلات للإيمي بروكر تمت تجربتها


المؤشر الثالث او المعادلة الثالثة
إشارات دخول وخروج وأهداف


رد: عدة معادلات للإيمي بروكر تمت تجربتها




أنسخ اسفل الخط
====================




_SECTION_BEGIN("Price");




SetChartOptions(0,chartShowArrows|chartShowDates);


_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));


SD = StochD(8, 3, 3);


MH = MACD(8, 21) - Signal(8, 21, 5);


trendup = IIf(MH > 0 OR (MH > 0 AND MH > Ref(MH, -1)) AND RSI(3) >50 AND SD < 80 AND SD > Ref(SD, -1) AND ValueWhen(C,O<C), colorBlue, colorWhite);


trendcolor = IIf(MH < 0 OR (MH < 0 AND MH < Ref(MH, -1)) AND RSI(3) <50 AND SD > 20 AND SD < Ref(SD, -1) AND ValueWhen(C,O>C), colorRed, trendup);


Plot( C, "Close", trendcolor, styleCandle | styleThick );


_SECTION_END();




no=Param( "Swing", 5, 1, 55 );


res=HHV(H,no);


sup=LLV(L,no);


tsl=IIf(ValueWhen(IIf(C>Ref(res,-1),1,IIf(C<Ref(sup,-1),-1,0))!=0,IIf(C>Ref(res,-1),1,IIf(C<Ref(sup,-1),-1,0)),1)==1,sup,res);


Plot(tsl, _DEFAULT_NAME(), colorBlue, styleStaircase);




Buy = Cross(C,res) ;


Sell = Cross(sup,C) ;


_SECTION_END();






a=C;


g=(EMA(Close,3) * (2 / 4 - 1)-EMA(Close,5) * (2 / 6 - 1)) / (2 /4- 2 /6);


e=Ref(tsl,-1);


Buy = Cross(C,tsl) ;


Sell = Cross(tsl,C) ;


SellPrice=ValueWhen(Sell,e,1);


BuyPrice=ValueWhen(Buy,e,1);


Long=Flip(Buy,Sell);


Shrt=Flip(Sell,Buy );




Filter=Buy OR Sell;


Buy = Cross(C,tsl) ;


Sell = Cross(tsl,C) ;




shape = Buy * shapeUpArrow + Sell * shapeDownArrow;


PlotShapes( shape, IIf( Buy, colorGreen, colorRed ),0, IIf( Buy, Low, High ) );


a1=Ref(tsl,-1);


dist = 0.8*ATR(1); //0.8


dist1 = 1.8*ATR(1); //1.2


for( i = 0; i < BarCount; i++ )




{


if( Buy[i] )




{


PlotText( "Buy:" + L[ i ] + "\nTgt: " + (a1[i]*1.005) + "\nSL: " + (tsl[i]*0.9975), i, L[ i ]-dist[i], colorLime);




}


if( Sell[i] )




{


PlotText( "Sell:" + H[ i ] + "\nT: " + (a1[i]*0.995) + "\nSL: " + (tsl[i]*1.0025), i, H[ i ]+dist1[i], colorBlack);




}


}





رد مع اقتباس
قديم 17-08-2019, 09:12 PM
  المشاركه #3

عضو هوامير المميز

تاريخ التسجيل: Oct 2005
المشاركات: 436
amiralshoq غير متواجد حالياً  

رد: عدة معادلات للإيمي بروكر تمت تجربتها


المعادلة الرابعة تعتمد على الزقزاق وتعمل على اليومي والاسبوعي والشهري بشكل جيد تتبع الدوائر الخضراء والحمراء للدخول والخروج وكذلك الأسهم الخضراء والحمراء الثخينة والغامقة اللون فقط


رد: عدة معادلات للإيمي بروكر تمت تجربتها




انسخ المعادلة اسفل الخط
=====================

PercentChange = 6;
mystartbar = SelectedValue(BarIndex()); // FOR GRAPHING
mystartbardate = LastValue(ValueWhen(mystartbar == BarIndex(), DateNum(),1));
InitialValue = LastValue(ValueWhen(mystartbardate == DateNum(), C , 1 ) ) ;
Temp1 = IIf(BarIndex() >= mystartbar, InitialValue, Null) ;
Plot(Temp1, " ", colorBlack,styleCandle);
Plot((1+(LastValue(PercentChange)/100))*(Temp1), " ", colorGreen, styleLine) ;
Plot((1-(LastValue(PercentChange)/100))*(Temp1), " ", colorRed, styleLine) ;
ZZ = Zig(C,LastValue(PercentChange)) ;
PivotLow = Ref(IIf(Ref(ROC(ZZ,1),-1) < 0 AND ROC(ZZ,1) > 0, 1, Null),1);
PivotHigh = Ref(IIf(Ref(ROC(ZZ,1),-1) > 0 AND ROC(ZZ,1) < 0, 1, Null),1);
PlotShapes( shapeCircle*PivotLow, colorGreen,0, L, -20) ;
PlotShapes( shapeCircle*PivotHigh,colorRed,0,H, 20) ;
Buy_Valid = IIf(C>(1+(LastValue(PercentChange)/100))*(ValueWhen(PivotLow, C,
1))
AND ROC(ZZ,1) > 0,1,0);
Sell_Valid = IIf(C<(1-(LastValue(PercentChange)/100))*(ValueWhen(PivotHigh, C,
1))
AND ROC(ZZ,1) < 0,1,0);
Buy_Valid = ExRem(Buy_Valid,Sell_Valid);
Sell_Valid = ExRem(Sell_Valid,Buy_Valid);
PlotShapes( shapeUpArrow*Buy_Valid, colorGreen,0, L, -20);
PlotShapes( shapeDownArrow*Sell_Valid, colorRed,0,H, -20) ;
BarColors =
IIf(BarsSince(Buy_Valid) < BarsSince(Sell_Valid)
AND BarsSince(Buy_Valid)!=0, colorGreen,
IIf(BarsSince(Sell_Valid) < BarsSince(Buy_Valid)
AND BarsSince(Sell_Valid)!=0, colorRed, colorBlue));
Plot(C, " ", BarColors, styleCandle ) ;
Plot(ZZ," ", colorLightGrey,styleLine|styleThick);
Plot(ZZ," ", BarColors,styleDots|styleNoLine);
Title = Name() + " " + Date() + WriteIf(PivotLow, " Up Pivot
","")+WriteIf(PivotHigh," Down Pivot ","")+ WriteIf(Buy_Valid, " Buy Point ",
"") + WriteIf(Sell_Valid, " Sell Point ", "") ;



رد مع اقتباس
قديم 18-08-2019, 12:47 PM
  المشاركه #4

عضو هوامير المميز

تاريخ التسجيل: Dec 2011
المشاركات: 311
haat غير متواجد حالياً  

رد: عدة معادلات للإيمي بروكر تمت تجربتها


جزاكم الله خيرا


رد مع اقتباس
قديم 18-08-2019, 01:53 PM
  المشاركه #5

عضو هوامير المميز

تاريخ التسجيل: Oct 2005
المشاركات: 436
amiralshoq غير متواجد حالياً  

رد: عدة معادلات للإيمي بروكر تمت تجربتها


اقتباس:
المشاركة الأصلية كتبت بواسطة haat مشاهدة المشاركة
جزاكم الله خيرا
وإياك شكرا على التعقيب



رد مع اقتباس
قديم 22-08-2019, 06:21 PM
  المشاركه #6

عضو هوامير المميز

تاريخ التسجيل: Mar 2007
المشاركات: 2,286
برق نجد متواجد حالياً  

رد: عدة معادلات للإيمي بروكر تمت تجربتها


ما شاء الله
الله يجزاك خير



رد مع اقتباس
قديم 16-09-2019, 06:00 PM
  المشاركه #7

عضو هوامير المميز

تاريخ التسجيل: Oct 2005
المشاركات: 436
amiralshoq غير متواجد حالياً  

رد: عدة معادلات للإيمي بروكر تمت تجربتها


اقتباس:
المشاركة الأصلية كتبت بواسطة برق نجد مشاهدة المشاركة
ما شاء الله
الله يجزاك خير
العفو وجعلنا الله واياك من الشاكرين




رد مع اقتباس
قديم 20-09-2019, 01:41 PM
  المشاركه #8

عضو هوامير المميز

تاريخ التسجيل: Aug 2005
المشاركات: 1,797
غنيمة غير متواجد حالياً  

رد: عدة معادلات للإيمي بروكر تمت تجربتها


بارك الله فيك


رد مع اقتباس
إضافة رد


مواقع النشر (المفضلة)

الكلمات الدلالية (Tags)
للإيمي, معادلات, بروكر, تجربتها

أدوات الموضوع

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع



07:40 AM