logo

هوامير البورصة السعودية > الاقسام الرئيسية لموقع هوامير البورصة > برامج التحليل الفني والاساسي

افكار تحتاج الى من يصنع منها مؤشرات للايمي بروكر او الميتاستوك



إضافة رد
صفحة 5 من 7
1
2
3
4
5
6
7
قديم 03-02-2015, 04:03 PM
  المشاركه #49

برسلي

كاتب مميز

تاريخ التسجيل: Feb 2010
المشاركات: 8,223
برسلي غير متواجد حالياً  

اقتباس:
المشاركة الأصلية كتبت بواسطة aboothman مشاهدة المشاركة
اعتذر منكم لانشغالي.
هذه صورة للشروط التي ذكرتها اخ برسلي

رد: افكار تحتاج الى من يصنع منها مؤشرات للايمي بروكر او الميتاستوك

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

وهذا الكود بدون اضافة الشروط الاخرى

كود:
// bersli's strategy.. Coded by aboothman 01-2015 and being developed...

_section_begin("price");
setchartoptions(0,chartshowarrows|chartshowdates);
_n(title = strformat("{{name}} - {{interval}} {{date}} open %g, hi %g, lo %g, close %g (%.1f%%)  vol " +writeval( v, 1.0 ) +"       "+" {{values}}", o, h, l, c, selectedvalue( roc( c, 1 ) ) ));
plot( c, "close", paramcolor("color", colorwhite ), stylenotitle | paramstyle("style") | getpricestyle() );
_section_end();

/*bodycolors*/
greenbody=c>=o;
redbody=o>c;

/*bodysize*/
smallbodymaximum=0.0025;//less than 0.25%
longbodyminimum=0.01;//greater than 1.0%

/*candlesshadow*/
longuppershadow=(greenbody and h>=c*(1+longbodyminimum))
  or (redbody and h>=o*(1+longbodyminimum));
  
longlowershadow=(greenbody and l<=o*(1-longbodyminimum))
  or (redbody and l<=c*(1-longbodyminimum));
lus=longuppershadow;
lusc=iif(lus,colorseagreen,colorwhite);
lls=longlowershadow;
llsc=iif(lls,colorpink,colorwhite);

  
/*candleidentification*/

bullishengulfing=o<ref(l,-1) and c>ref(h,-1) ;
buec=iif(bullishengulfing,colorbrightgreen,colorwhite);
semibullishengulfing=o<=ref(c,-1) and c>ref(h,-1);
semibuec=iif(semibullishengulfing,colorbrightgreen,colorwhite);

bearishengulfing=o>ref(h,-1) and c<ref(l,-1) ;
beec=iif(bearishengulfing,colorred,colorwhite);
semibearishengulfing=o>=ref(c,-1) and c<ref(l,-1);
semibeec=iif(semibearishengulfing,colorred,colorwhite);

 
plotshapes(lus*shapesmallcircle,colorgreen,0,h,offset=15);
plotshapes(lls*shapesmallcircle,colorred,0,l,offset=-15);
plotshapes(bullishengulfing*shapedigit0,colorgreen,0,l,-35);
plotshapes(bearishengulfing*shapedigit0,colorred,0,h,35);
plotshapes(semibullishengulfing*shapehollowsmalluptriangle,colorgreen,0,l,-25);
plotshapes(semibearishengulfing*shapehollowsmalldowntriangle,colorred,0,h,-25);


filter =
addcolumn(longuppershadow,"long upper shadow",1,colorblack,lusc);
addcolumn(longlowershadow,"long lower shadow",1,colorblack,llsc);
addcolumn(bullishengulfing,"bullish engulfing",1,colorblack,buec);
addcolumn(bearishengulfing,"bearish engulfing",1,colorblack,beec);
addcolumn(semibullishengulfing,"s-bullish engulfing",1,colorblack,semibuec);
addcolumn(semibearishengulfing,"s-bearish engulfing",1,colorblack,semibeec);
رقم 1 بلع كلي ايجابي وعلامتة الدائره الخضراء
رقم 2 بلع جزئي ايجابي وعلامته المثلث الاخضر

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

البالعه الجزئي متغيرة الشروط حسب الشمعه التي تسبقها

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

في السلبيه العكس
اذا كان امس اخضر اليوم يجب ان فتح اعلى من اغلاق امس ويقفل ادنى من الافتتاح
واذا كان امس احمر يفتح اعلى من افتتاح امس ويقفل ادنى من اغلاق امس


رد مع اقتباس
 
  
قديم 03-02-2015, 07:06 PM
  المشاركه #50

AboOthman

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

تاريخ التسجيل: May 2011
المشاركات: 873
AboOthman غير متواجد حالياً  

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

البالعه الجزئي متغيرة الشروط حسب الشمعه التي تسبقها

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

في السلبيه العكس
اذا كان امس اخضر اليوم يجب ان فتح اعلى من اغلاق امس ويقفل ادنى من الافتتاح
واذا كان امس احمر يفتح اعلى من افتتاح امس ويقفل ادنى من اغلاق امس


كود:
// Bersli's Strategy.. Coded By AboOthman 01-2015 And Being developed...

_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%)  Vol " +WriteVal( V, 1.0 ) +"       "+" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorWhite ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();

/*BodyColors*/
GreenBody=C>=O;
RedBody=O>C;

/*BodySize*/
smallBodyMaximum=0.0025;//less than 0.25%
LongBodyMinimum=0.01;//greater than 1.0%


/*CandlesShadow*/

LongUpperShadow=(GreenBody AND H>=C*(1+LongBodyMinimum))
  OR (RedBody AND H>=O*(1+LongBodyMinimum));
  
LongLowerShadow=(GreenBody AND L<=O*(1-LongBodyMinimum))
  OR (RedBody AND L<=C*(1-LongBodyMinimum));
LUS=LongUpperShadow;
LUSC=IIf(LUS,colorSeaGreen,colorWhite);
LLS=LongLowerShadow;
LLSC=IIf(LLS,colorPink,colorWhite);

  
/*CandleIdentification*/

BullishEngulfing=O<Ref(L,-1) AND C>Ref(H,-1) AND Ref(RedBody,-1);
BuEC=IIf(BullishEngulfing,colorBrightGreen,colorWhite);
ORG_BullishEngulfing=O<=Ref(C,-1) AND C>Ref(H,-1);
SemiBullishEngulfing=(Ref(GreenBody,-1) AND O<Ref(O,-1) AND C>Ref(C,-1) AND ORG_BullishEngulfing)
 OR (Ref(RedBody,-1) AND O<Ref(C,-1) AND C>Ref(O,-1) AND ORG_BullishEngulfing);
SemiBuEC=IIf(SemiBullishEngulfing,colorBrightGreen,colorWhite);

BearishEngulfing=O>Ref(H,-1) AND C<Ref(L,-1) AND Ref(GreenBody,-1);
BeEC=IIf(BearishEngulfing,colorRed,colorWhite);
ORG_BearishEngulfing=O>=Ref(C,-1) AND C<Ref(L,-1);
SemiBearishEngulfing=(Ref(GreenBody,-1) AND O>Ref(C,-1) AND C<O AND ORG_BearishEngulfing)
 OR (Ref(RedBody,-1) AND O>Ref(O,-1) AND C<Ref(C,-1) AND ORG_BearishEngulfing);
SemiBeEC=IIf(SemiBearishEngulfing,colorRed,colorWhite);

 
PlotShapes(LUS*shapeSmallCircle,colorGreen,0,H,Offset=15);
PlotShapes(LLS*shapeSmallCircle,colorRed,0,L,Offset=-15);
PlotShapes(BullishEngulfing*shapeDigit0,colorGreen,0,L,-35);
PlotShapes(BearishEngulfing*shapeDigit0,colorRed,0,H,35);
PlotShapes(SemiBullishEngulfing*shapeHollowSmallUpTriangle,colorGreen,0,L,-25);
PlotShapes(SemiBearishEngulfing*shapeHollowSmallDownTriangle,colorRed,0,H,-25);


Filter =
AddColumn(LongUpperShadow,"Long Upper Shadow",1,colorBlack,LUSC);
AddColumn(LongLowerShadow,"Long Lower Shadow",1,colorBlack,LLSC);
AddColumn(BullishEngulfing,"Bullish Engulfing",1,colorBlack,BuEC);
AddColumn(BearishEngulfing,"Bearish Engulfing",1,colorBlack,BeEC);
AddColumn(SemiBullishEngulfing,"S-Bullish Engulfing",1,colorBlack,SemiBuEC);
AddColumn(SemiBearishEngulfing,"S-Bearish Engulfing",1,colorBlack,SemiBeEC);
اتمنى اني توصلت لفكرتك رغم تداخل الشروط نوعا ما وحسب ماقرات عن الشموع البالعه من انها اذا كانت ايجابية ياتي قبلها فقط شمعة حمراء والعكس.


رد مع اقتباس
قديم 03-02-2015, 07:16 PM
  المشاركه #51

AboOthman

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

تاريخ التسجيل: May 2011
المشاركات: 873
AboOthman غير متواجد حالياً  

تعديل بسيط على معادلة الظلال لنتائج افضل

كود:
// Bersli's Strategy.. Coded By AboOthman 01-2015 And Being developed...

_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%)  Vol " +WriteVal( V, 1.0 ) +"       "+" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorWhite ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();

/*BodyColors*/
GreenBody=C>=O;
RedBody=O>C;

/*BodySize*/
smallBodyMaximum=0.0025;//less than 0.25%
LongBodyMinimum=0.01;//greater than 1.0%
RealBodySize=abs(O-C);


/*CandlesShadow*/

LongUpperShadow=(GreenBody AND H>=C*(1+LongBodyMinimum)AND H-C>RealBodySize)
  OR (RedBody AND H>=O*(1+LongBodyMinimum)AND H-O>RealBodySize);
  
LongLowerShadow=(GreenBody AND L<=O*(1-LongBodyMinimum)AND O-L>RealBodySize)
  OR (RedBody AND L<=C*(1-LongBodyMinimum)AND C-L>RealBodySize);
LUS=LongUpperShadow;
LUSC=IIf(LUS,colorSeaGreen,colorWhite);
LLS=LongLowerShadow;
LLSC=IIf(LLS,colorPink,colorWhite);

  
/*CandleIdentification*/

BullishEngulfing=O<Ref(L,-1) AND C>Ref(H,-1) AND Ref(RedBody,-1);
BuEC=IIf(BullishEngulfing,colorBrightGreen,colorWhite);
ORG_BullishEngulfing=O<=Ref(C,-1) AND C>Ref(H,-1);
SemiBullishEngulfing=(Ref(GreenBody,-1) AND O<Ref(O,-1) AND C>Ref(C,-1) AND ORG_BullishEngulfing)
 OR (Ref(RedBody,-1) AND O<Ref(C,-1) AND C>Ref(O,-1) AND ORG_BullishEngulfing);
SemiBuEC=IIf(SemiBullishEngulfing,colorBrightGreen,colorWhite);

BearishEngulfing=O>Ref(H,-1) AND C<Ref(L,-1) AND Ref(GreenBody,-1);
BeEC=IIf(BearishEngulfing,colorRed,colorWhite);
ORG_BearishEngulfing=O>=Ref(C,-1) AND C<Ref(L,-1);
SemiBearishEngulfing=(Ref(GreenBody,-1) AND O>Ref(C,-1) AND C<O AND ORG_BearishEngulfing)
 OR (Ref(RedBody,-1) AND O>Ref(O,-1) AND C<Ref(C,-1) AND ORG_BearishEngulfing);
SemiBeEC=IIf(SemiBearishEngulfing,colorRed,colorWhite);

 
PlotShapes(LUS*shapeSmallCircle,colorGreen,0,H,Offset=15);
PlotShapes(LLS*shapeSmallCircle,colorRed,0,L,Offset=-15);
PlotShapes(BullishEngulfing*shapeDigit0,colorGreen,0,L,-35);
PlotShapes(BearishEngulfing*shapeDigit0,colorRed,0,H,35);
PlotShapes(SemiBullishEngulfing*shapeHollowSmallUpTriangle,colorGreen,0,L,-25);
PlotShapes(SemiBearishEngulfing*shapeHollowSmallDownTriangle,colorRed,0,H,-25);


Filter =
AddColumn(LongUpperShadow,"Long Upper Shadow",1,colorBlack,LUSC);
AddColumn(LongLowerShadow,"Long Lower Shadow",1,colorBlack,LLSC);
AddColumn(BullishEngulfing,"Bullish Engulfing",1,colorBlack,BuEC);
AddColumn(BearishEngulfing,"Bearish Engulfing",1,colorBlack,BeEC);
AddColumn(SemiBullishEngulfing,"S-Bullish Engulfing",1,colorBlack,SemiBuEC);
AddColumn(SemiBearishEngulfing,"S-Bearish Engulfing",1,colorBlack,SemiBeEC);



رد مع اقتباس
قديم 03-02-2015, 10:25 PM
  المشاركه #52

برسلي

كاتب مميز

تاريخ التسجيل: Feb 2010
المشاركات: 8,223
برسلي غير متواجد حالياً  

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


البالعه الكامله انتهينا منها لكن بقي الجزئي وهو مهم جدا وهي فقط اربع شروط على الاقل لو تختصرها على الشموع الايجابيه فقط

هذه بعض من البالعه الخضرا للخضرا من سوقنا في اخر موجه وهي كثيرها جدا ومفعولها قوي

رد: افكار تحتاج الى من يصنع منها مؤشرات للايمي بروكر او الميتاستوك



رد: افكار تحتاج الى من يصنع منها مؤشرات للايمي بروكر او الميتاستوك


رد: افكار تحتاج الى من يصنع منها مؤشرات للايمي بروكر او الميتاستوك


في هذه الصوره صاد البالعه الجزئي للخضرا ولم يصيد البالعه الجزئي للحمرا

رد: افكار تحتاج الى من يصنع منها مؤشرات للايمي بروكر او الميتاستوك


المشكله لا اريد اكتب الفكره الثانيه حتى ننتهي من الفكره الاولى من اجل عدم التشتيت ان شاء الله في فراغك اخي عثمان تجيبها صح او احد الاخوان
الغريب ان اخر صوره صادها المؤشر ولكن الصور الباقيه لم يصيدها


رد مع اقتباس
قديم 03-02-2015, 10:42 PM
  المشاركه #53

AboOthman

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

تاريخ التسجيل: May 2011
المشاركات: 873
AboOthman غير متواجد حالياً  

اخر صوره لاني وضعت شرط ان يكون قبلها شمعة حمراء.
جاري التعديل


رد مع اقتباس
قديم 03-02-2015, 10:51 PM
  المشاركه #54

AboOthman

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

تاريخ التسجيل: May 2011
المشاركات: 873
AboOthman غير متواجد حالياً  

كود:
// Bersli's Strategy.. Coded By AboOthman 01-2015 And Being developed...

_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%)  Vol " +WriteVal( V, 1.0 ) +"       "+" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorWhite ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();

/*BodyColors*/
GreenBody=C>=O;
RedBody=O>C;

/*BodySize*/
smallBodyMaximum=0.0025;//less than 0.25%
LongBodyMinimum=0.01;//greater than 1.0%
RealBodySize=abs(O-C);


/*CandlesShadow*/

LongUpperShadow=(GreenBody AND H>=C*(1+LongBodyMinimum)AND H-C>RealBodySize)
  OR (RedBody AND H>=O*(1+LongBodyMinimum)AND H-O>RealBodySize);
  
LongLowerShadow=(GreenBody AND L<=O*(1-LongBodyMinimum)AND O-L>RealBodySize)
  OR (RedBody AND L<=C*(1-LongBodyMinimum)AND C-L>RealBodySize);
LUS=LongUpperShadow;
LUSC=IIf(LUS,colorSeaGreen,colorWhite);
LLS=LongLowerShadow;
LLSC=IIf(LLS,colorPink,colorWhite);

  
/*CandleIdentification*/

BullishEngulfing=O<Ref(L,-1) AND C>Ref(H,-1);
BuEC=IIf(BullishEngulfing,colorBrightGreen,colorWhite);
SemiBullishEngulfing=(Ref(GreenBody,-1) AND O<Ref(O,-1) AND C>Ref(C,-1) AND BullishEngulfing)
 OR (Ref(RedBody,-1) AND O<Ref(C,-1) AND C>Ref(O,-1) AND BullishEngulfing);
SemiBuEC=IIf(SemiBullishEngulfing,colorBrightGreen,colorWhite);

BearishEngulfing=O>Ref(H,-1) AND C<Ref(L,-1);
BeEC=IIf(BearishEngulfing,colorRed,colorWhite);
SemiBearishEngulfing=(Ref(GreenBody,-1) AND O>Ref(C,-1) AND C<O AND BearishEngulfing)
 OR (Ref(RedBody,-1) AND O>Ref(O,-1) AND C<Ref(C,-1) AND BearishEngulfing);
SemiBeEC=IIf(SemiBearishEngulfing,colorRed,colorWhite);

 
PlotShapes(LUS*shapeSmallCircle,colorGreen,0,H,Offset=15);
PlotShapes(LLS*shapeSmallCircle,colorRed,0,L,Offset=-15);
PlotShapes(BullishEngulfing*shapeDigit0,colorGreen,0,L,-35);
PlotShapes(BearishEngulfing*shapeDigit0,colorRed,0,H,35);
PlotShapes(SemiBullishEngulfing*shapeHollowSmallUpTriangle,colorGreen,0,L,-25);
PlotShapes(SemiBearishEngulfing*shapeHollowSmallDownTriangle,colorRed,0,H,-25);

Filter =
AddColumn(LongUpperShadow,"Long Upper Shadow",1,colorBlack,LUSC);
AddColumn(LongLowerShadow,"Long Lower Shadow",1,colorBlack,LLSC);
AddColumn(BullishEngulfing,"Bullish Engulfing",1,colorBlack,BuEC);
AddColumn(BearishEngulfing,"Bearish Engulfing",1,colorBlack,BeEC);
AddColumn(SemiBullishEngulfing,"S-Bullish Engulfing",1,colorBlack,SemiBuEC);
AddColumn(SemiBearishEngulfing,"S-Bearish Engulfing",1,colorBlack,SemiBeEC);



رد مع اقتباس
قديم 03-02-2015, 11:05 PM
  المشاركه #55

AboOthman

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

تاريخ التسجيل: May 2011
المشاركات: 873
AboOthman غير متواجد حالياً  

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


رد مع اقتباس
قديم 03-02-2015, 11:10 PM
  المشاركه #56

برسلي

كاتب مميز

تاريخ التسجيل: Feb 2010
المشاركات: 8,223
برسلي غير متواجد حالياً  

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


رد مع اقتباس
قديم 03-02-2015, 11:13 PM
  المشاركه #57

AboOthman

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

تاريخ التسجيل: May 2011
المشاركات: 873
AboOthman غير متواجد حالياً  

فقط هذا التعديل يظهر ماطلبت في اول صوره والاخيره ولكن اتوقع يصبح اقل دقة من جهة اخرى

كود:
// Bersli's Strategy.. Coded By AboOthman 01-2015 And Being developed...

_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%)  Vol " +WriteVal( V, 1.0 ) +"       "+" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorWhite ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();

/*BodyColors*/
GreenBody=C>=O;
RedBody=O>C;

/*BodySize*/
smallBodyMaximum=0.0025;//less than 0.25%
LongBodyMinimum=0.01;//greater than 1.0%
RealBodySize=abs(O-C);


/*CandlesShadow*/

LongUpperShadow=(GreenBody AND H>=C*(1+LongBodyMinimum)AND H-C>RealBodySize)
  OR (RedBody AND H>=O*(1+LongBodyMinimum)AND H-O>RealBodySize);
  
LongLowerShadow=(GreenBody AND L<=O*(1-LongBodyMinimum)AND O-L>RealBodySize)
  OR (RedBody AND L<=C*(1-LongBodyMinimum)AND C-L>RealBodySize);
LUS=LongUpperShadow;
LUSC=IIf(LUS,colorSeaGreen,colorWhite);
LLS=LongLowerShadow;
LLSC=IIf(LLS,colorPink,colorWhite);

  
/*CandleIdentification*/

BullishEngulfing=O<Ref(L,-1) AND C>Ref(H,-1);
BuEC=IIf(BullishEngulfing,colorBrightGreen,colorWhite);
SemiBullishEngulfing=(Ref(GreenBody,-1) AND O<Ref(O,-1) AND C>Ref(C,-1))
 OR (Ref(RedBody,-1) AND O<Ref(C,-1) AND C>Ref(O,-1));
SemiBuEC=IIf(SemiBullishEngulfing,colorBrightGreen,colorWhite);

BearishEngulfing=O>Ref(H,-1) AND C<Ref(L,-1);
BeEC=IIf(BearishEngulfing,colorRed,colorWhite);
SemiBearishEngulfing=(Ref(GreenBody,-1) AND O>Ref(C,-1) AND C<O)
 OR (Ref(RedBody,-1) AND O>Ref(O,-1) AND C<Ref(C,-1));
SemiBeEC=IIf(SemiBearishEngulfing,colorRed,colorWhite);

 
PlotShapes(LUS*shapeSmallCircle,colorGreen,0,H,Offset=15);
PlotShapes(LLS*shapeSmallCircle,colorRed,0,L,Offset=-15);
PlotShapes(BullishEngulfing*shapeDigit0,colorGreen,0,L,-35);
PlotShapes(BearishEngulfing*shapeDigit0,colorRed,0,H,35);
PlotShapes(SemiBullishEngulfing*shapeHollowSmallUpTriangle,colorGreen,0,L,-25);
PlotShapes(SemiBearishEngulfing*shapeHollowSmallDownTriangle,colorRed,0,H,-25);

Filter =
AddColumn(LongUpperShadow,"Long Upper Shadow",1,colorBlack,LUSC);
AddColumn(LongLowerShadow,"Long Lower Shadow",1,colorBlack,LLSC);
AddColumn(BullishEngulfing,"Bullish Engulfing",1,colorBlack,BuEC);
AddColumn(BearishEngulfing,"Bearish Engulfing",1,colorBlack,BeEC);
AddColumn(SemiBullishEngulfing,"S-Bullish Engulfing",1,colorBlack,SemiBuEC);
AddColumn(SemiBearishEngulfing,"S-Bearish Engulfing",1,colorBlack,SemiBeEC);

استودعكم الله


رد مع اقتباس
قديم 03-02-2015, 11:15 PM
  المشاركه #58

AboOthman

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

تاريخ التسجيل: May 2011
المشاركات: 873
AboOthman غير متواجد حالياً  

اقتباس:
المشاركة الأصلية كتبت بواسطة برسلي مشاهدة المشاركة
الله يسعدك يا ابو عثمان نتمنى في فراغك تكمل معنا ونتمنى ان نجد من يكمل العمل
ويسعدك ,, معكم ان شاء الله لكن ظروف عمل ونرجع باذنه تعالى ..وفيه اعضاء لهم مشاركات ممتازه لعلهم يشاركونكم قريبا.


رد مع اقتباس
قديم 03-02-2015, 11:20 PM
  المشاركه #59

برسلي

كاتب مميز

تاريخ التسجيل: Feb 2010
المشاركات: 8,223
برسلي غير متواجد حالياً  

اقتباس:
المشاركة الأصلية كتبت بواسطة aboothman مشاهدة المشاركة
فقط هذا التعديل يظهر ماطلبت في اول صوره والاخيره ولكن اتوقع يصبح اقل دقة من جهة اخرى

كود:
// bersli's strategy.. Coded by aboothman 01-2015 and being developed...

_section_begin("price");
setchartoptions(0,chartshowarrows|chartshowdates);
_n(title = strformat("{{name}} - {{interval}} {{date}} open %g, hi %g, lo %g, close %g (%.1f%%)  vol " +writeval( v, 1.0 ) +"       "+" {{values}}", o, h, l, c, selectedvalue( roc( c, 1 ) ) ));
plot( c, "close", paramcolor("color", colorwhite ), stylenotitle | paramstyle("style") | getpricestyle() );
_section_end();

/*bodycolors*/
greenbody=c>=o;
redbody=o>c;

/*bodysize*/
smallbodymaximum=0.0025;//less than 0.25%
longbodyminimum=0.01;//greater than 1.0%
realbodysize=abs(o-c);


/*candlesshadow*/

longuppershadow=(greenbody and h>=c*(1+longbodyminimum)and h-c>realbodysize)
  or (redbody and h>=o*(1+longbodyminimum)and h-o>realbodysize);
  
longlowershadow=(greenbody and l<=o*(1-longbodyminimum)and o-l>realbodysize)
  or (redbody and l<=c*(1-longbodyminimum)and c-l>realbodysize);
lus=longuppershadow;
lusc=iif(lus,colorseagreen,colorwhite);
lls=longlowershadow;
llsc=iif(lls,colorpink,colorwhite);

  
/*candleidentification*/

bullishengulfing=o<ref(l,-1) and c>ref(h,-1);
buec=iif(bullishengulfing,colorbrightgreen,colorwhite);
semibullishengulfing=(ref(greenbody,-1) and o<ref(o,-1) and c>ref(c,-1))
 or (ref(redbody,-1) and o<ref(c,-1) and c>ref(o,-1));
semibuec=iif(semibullishengulfing,colorbrightgreen,colorwhite);

bearishengulfing=o>ref(h,-1) and c<ref(l,-1);
beec=iif(bearishengulfing,colorred,colorwhite);
semibearishengulfing=(ref(greenbody,-1) and o>ref(c,-1) and c<o)
 or (ref(redbody,-1) and o>ref(o,-1) and c<ref(c,-1));
semibeec=iif(semibearishengulfing,colorred,colorwhite);

 
plotshapes(lus*shapesmallcircle,colorgreen,0,h,offset=15);
plotshapes(lls*shapesmallcircle,colorred,0,l,offset=-15);
plotshapes(bullishengulfing*shapedigit0,colorgreen,0,l,-35);
plotshapes(bearishengulfing*shapedigit0,colorred,0,h,35);
plotshapes(semibullishengulfing*shapehollowsmalluptriangle,colorgreen,0,l,-25);
plotshapes(semibearishengulfing*shapehollowsmalldowntriangle,colorred,0,h,-25);

filter =
addcolumn(longuppershadow,"long upper shadow",1,colorblack,lusc);
addcolumn(longlowershadow,"long lower shadow",1,colorblack,llsc);
addcolumn(bullishengulfing,"bullish engulfing",1,colorblack,buec);
addcolumn(bearishengulfing,"bearish engulfing",1,colorblack,beec);
addcolumn(semibullishengulfing,"s-bullish engulfing",1,colorblack,semibuec);
addcolumn(semibearishengulfing,"s-bearish engulfing",1,colorblack,semibeec);

استودعكم الله
بالتوفيق يا ابو عثمان والموشر الان افضل مع انه لا يصيد جميع الشموع مثلا جازان في تاريخ 13/1 بالعه جزئي ولم يصيدها اان شاء الله نجد من يكمل العمل او نهمل الموضوع حتى عودتك باذن الله


رد مع اقتباس
قديم 04-02-2015, 01:04 AM
  المشاركه #60

aljofi

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

تاريخ التسجيل: Nov 2012
المشاركات: 364
aljofi غير متواجد حالياً  

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

أخر نسخه للميتاستوك مع كامل التحديثات بإذن الله لا يوجد بها أي خطأ

http://upload.hawamer.com/d.php?hash...EYYYX6RZOFGGKY


رد مع اقتباس
إضافة رد
صفحة 5 من 7
1
2
3
4
5
6
7


الكلمات الدلالية (Tags)
للايمي, من, مؤشرات, الميتاستوك, الى, او, افكار, بروكر, تحتاج, يصنع

« بخصوص ببيانات الميتاستوك ايها الخبراء | سهم الحمادي »
أدوات الموضوع

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك
BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة
الانتقال السريع

هوامير البورصة السعودية - الأرشيف - الأعلى


05:46 PM

images

adswithus

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, vBulletin Solutions, Inc.

Search Engine Optimisation provided by DragonByte SEO (Pro) - vBulletin Mods & Addons Copyright © 2024 DragonByte Technologies Ltd.
جميع المواضيع و الردود المطروحة لا تعبر عن رأي الموقع بل تعبر عن رأي كاتبها وقرار البيع والشراء مسؤليتك وحدك

جميع المواضيع و الردود المطروحة لا تعبر عن رأي المنتدى بل تعبر عن رأي كاتبها وقرار البيع والشراء مسؤليتك وحدك بناء على نظام السوق المالية بالمرسوم الملكي م/30 وتاريخ 2/6/1424هـ ولوائحه التنفيذية الصادرة من مجلس هيئة السوق المالية: تعلن الهيئة للعموم بانه لا يجوز جمع الاموال بهدف استثمارها في اي من اعمال الاوراق المالية بما في ذلك ادارة محافظ الاستثمار او الترويج لاوراق مالية كالاسهم او الاستتشارات المالية او اصدار التوصيات المتعلقة بسوق المال أو بالاوراق المالية إلا بعد الحصول على ترخيص من هيئة السوق المالية.