صفحة 1 من 2 12 الأخيرةالأخيرة
النتائج 1 إلى 15 من 20
  1. #1
    الصورة الرمزية FXLVL2
    FXLVL2 غير متواجد حالياً عضو المتداول العربي
    تاريخ التسجيل
    Mar 2009
    العمر
    44
    المشاركات
    69

    افتراضي إكسبيرت مؤشرات بالخياط

    الاخوه الكرام...

    من يستطيع ان يقترح طريقه عمل محدده ليتم برمجتها كإكسبيرت للعمل على أساس مؤشرات بالخياط


  2. #2
    الصورة الرمزية FXLVL2
    FXLVL2 غير متواجد حالياً عضو المتداول العربي
    تاريخ التسجيل
    Mar 2009
    العمر
    44
    المشاركات
    69

    افتراضي رد: إكسبيرت مؤشرات بالخياط

    توضيح .....

    انا لا أطلب من أحد برمجه إكسبيرت وإنما أطلب ممن عمل بهذه المؤشرات وله طريقه عمل محدده ان يوضح طريقته لأبرمجها وفى نفس الوقت لنتعاون على إجراء الاختبارات اللازمه للخروج بإكسبيرت يحقق ربح .




  3. #3
    الصورة الرمزية FXLVL2
    FXLVL2 غير متواجد حالياً عضو المتداول العربي
    تاريخ التسجيل
    Mar 2009
    العمر
    44
    المشاركات
    69

    افتراضي رد: إكسبيرت مؤشرات بالخياط

    طيب تنشيطا وتحفيزاً للإخوه المهتمين بالمؤشرات وتحويلها الى نظام متاجره آلى ..

    قمت بإعداد نسخه أوليه إعتماداً على مؤشر الجرافتى سنتر فقط مبدئيا ومرفق نتيجه اول إختبار تاريخى للإكسبيرت .وهو من 1/1/2009 والى اليوم .


    ومبدئياً الاكسبيرت فى صورته النهائيه إن شاء الله هيكون حصريا لمن يشارك بفاعليه فى تطويره ولو حتى بإجراء الاختبارات التاريخيه وإرفاق نتائجها أو بفكره .

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


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

    لوجيك الاكسبيرت فى الوقت الحالى إغلاق أعلى خط المنتصف ( الازرق ) مع تقاطع الموفنج 7 و 20 شراء والعكس بالنسبه للبيع .
    الصور المصغرة للصور المرفقة الصور المصغرة للصور المرفقة 3-28-2009 11-16-04 PM.jpg‏   3-28-2009 11-38-20 PM.jpg‏  

  4. #4
    الصورة الرمزية وضاح عطار
    وضاح عطار غير متواجد حالياً عضو مميز ومشرف سابق
    تاريخ التسجيل
    Apr 2006
    الإقامة
    السعودية
    العمر
    52
    المشاركات
    7,043

    افتراضي رد: إكسبيرت مؤشرات بالخياط

    عمل ممتاز أخي بارك الله فيك

    أحييك على خبرتك ووعيك العاليين .
    توقيع العضو
    اثنان لا يجتمعان علم وسوء خلق

  5. #5
    الصورة الرمزية 101
    101
    101 غير متواجد حالياً عضو اللجنة الاستشارية سابقاً
    تاريخ التسجيل
    Sep 2008
    الإقامة
    المملكة العربية السعودية
    المشاركات
    2,759

    افتراضي رد: إكسبيرت مؤشرات بالخياط

    السلام عليكم
    لي استفسار بسيط ليه ادخلت تقاطع المتوسطات
    وماهو الفاصل الزمني الذي اخترته في الاختبار (كبرت الصوره وعرفت اسف على السؤال المتسرع )

    تقبل تقديري

  6. #6
    الصورة الرمزية 101
    101
    101 غير متواجد حالياً عضو اللجنة الاستشارية سابقاً
    تاريخ التسجيل
    Sep 2008
    الإقامة
    المملكة العربية السعودية
    المشاركات
    2,759

    افتراضي رد: إكسبيرت مؤشرات بالخياط

    مداخله اخرى

    على فاصل 4 ساعات اذا تم اختراق الخط العلوي او السفلي واغلاق الشمعه على هذا الوضع

    ماينقذك الا فاصل الساعه

    ولنا في الباوند عبره يوم الجمعه

    جرب اضافه موشر التريجر اعدادات 8 - 3

    لزياده تاكيد الدخول والخروج
    آخر تعديل بواسطة 101 ، 29-03-2009 الساعة 01:41 AM

  7. #7
    الصورة الرمزية FXLVL2
    FXLVL2 غير متواجد حالياً عضو المتداول العربي
    تاريخ التسجيل
    Mar 2009
    العمر
    44
    المشاركات
    69

    افتراضي رد: إكسبيرت مؤشرات بالخياط

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

    أحييك على خبرتك ووعيك العاليين .
    حياك الله أخى وأتمنى نستفيد من خبرتك بالموضوع وخصوصا فى المحاوله الاولى عندما استخدمت مؤشر التايمنج أصبح الاكسبيرت تقيل جداً فى الباك تست .

    اقتباس المشاركة الأصلية كتبت بواسطة 101 مشاهدة المشاركة
    السلام عليكم
    لي استفسار بسيط ليه ادخلت تقاطع المتوسطات
    وماهو الفاصل الزمني الذي اخترته في الاختبار (كبرت الصوره وعرفت اسف على السؤال المتسرع )

    تقبل تقديري
    وعليكم السلام أخى
    المتوسطات إستخدمتها كتأكيد بدل مؤشر التايمنج مؤقتا الى أن أجد الطريقه الامثل للعمل .

    وعلى العموم العمل مازال فى أول مرحله وخاضع للتطوير حسب الاقتراحات والتجارب

  8. #8
    الصورة الرمزية AYMAN_DOMAIN
    AYMAN_DOMAIN غير متواجد حالياً عضو المتداول العربي
    تاريخ التسجيل
    Jun 2006
    المشاركات
    859

    افتراضي رد: إكسبيرت مؤشرات بالخياط

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

  9. #9
    الصورة الرمزية abdmomen
    abdmomen غير متواجد حالياً عضو المتداول العربي
    تاريخ التسجيل
    Apr 2008
    الإقامة
    سوريا
    المشاركات
    361

    افتراضي رد: إكسبيرت مؤشرات بالخياط

    //+------------------------------------------------------------------+
    //| ********** Expert Advisor.mq4 |
    //| Copyright © 2009, TradingSytemForex |
    //| http://www.tradingsystemforex.com |
    //+------------------------------------------------------------------+
    #property copyright "Copyright © 2009, TradingSytemForex"
    #property link "http://www.tradingsystemforex.com"
    //|----------------------------------------------you can modify this expert
    //|----------------------------------------------you can change the name
    //|----------------------------------------------you can add "modified by you"
    //|----------------------------------------------but you are not allowed to erase the copyrights
    #define EAName "********** Expert Advisor"
    extern string S1="---------------- Center Of Gravity Settings";
    extern double bars_back=120;
    extern double m=4;
    extern double kstd1=1.4;
    extern double kstd2=2.4;
    extern double kstd3=3.4;
    extern bool ExitAtOpposite=false;
    extern string S2="---------------- Money Management";
    extern double Lots=0.2;//|-----------------------lots size
    extern bool RiskMM=false;//|---------------------risk management
    extern double RiskPercent=1;//|------------------risk percentage
    extern bool Martingale=false;//|-----------------martingale
    extern double Multiplier=2.0;//|-----------------multiplier martingale
    extern double MinLots=0.01;//|-------------------minlots
    extern double MaxLots=100;//|--------------------maxlots
    extern bool IncrementLots=true;
    extern double IncrementedLots=0.2;
    extern bool UseTargetProfit=true;
    extern int TargetProfit=10;
    /*
    extern bool BasketProfitLoss=false;//|-----------use basket loss/profit
    extern int BasketProfit=100000;//|---------------if equity reaches this level, close trades
    extern int BasketLoss=9999;//|-------------------if equity reaches this negative level, close trades
    */
    extern string S3="---------------- Order Management";
    extern int StopLoss=0;//|------------------------stop loss
    extern int TakeProfit=0;//|----------------------take profit
    extern bool HideSL=false;//|---------------------hide stop loss
    extern bool HideTP=false;//|---------------------hide take profit
    extern int TrailingStop=0;//|--------------------trailing stop
    extern int TrailingStep=0;//|--------------------trailing step
    extern int BreakEven=0;//|-----------------------break even
    extern int MaxOrders=100;//|---------------------maximum orders allowed
    extern int Slippage=3;//|------------------------slippage
    extern int Magic=2009;//|------------------------magic number
    /*
    extern string S4="---------------- MA Filter";
    extern bool MAFilter=false;//|-------------------moving average filter
    extern int MAPeriod=20;//|-----------------------ma filter period
    extern int MAMethod=0;//|------------------------ma filter method
    extern int MAPrice=0;//|-------------------------ma filter price
    */
    /*
    extern string S5="---------------- Time Filter";
    extern bool TradeOnSunday=true;//|---------------time filter on sunday
    extern bool MondayToThursdayTimeFilter=false;//|-time filter the week
    extern int MondayToThursdayStartHour=0;//|-------start hour time filter the week
    extern int MondayToThursdayEndHour=24;//|--------end hour time filter the week
    extern bool FridayTimeFilter=false;//|-----------time filter on friday
    extern int FridayStartHour=0;//|-----------------start hour time filter on friday
    extern int FridayEndHour=21;//|------------------end hour time filter on friday
    */
    extern string S6="---------------- Extras";
    extern bool Hedge=false;//|----------------------enter an opposite trade
    extern int HedgeSL=0;//|-------------------------stop loss
    extern int HedgeTP=0;//|-------------------------take profit
    extern bool ReverseSystem=false;//|--------------buy instead of sell, sell instead of buy
    /*
    extern bool ReverseAtStop=false;//|--------------buy instead of sell, sell instead of buy
    extern int Expiration=240;//|--------------------expiration in minute for the reverse pending order
    extern bool Comments=true;//|--------------------allow comments on chart
    */
    datetime PreviousBarTime1;
    datetime PreviousBarTime2;
    double maxEquity,minEquity,Balance=0.0;
    double LotsFactor=1;
    double InitialLotsFactor=1;
    //|---------initialization
    int init()
    {
    //|---------martingale initialization

    int tempfactor,total=OrdersTotal();
    if(tempfactor==0 && total>0)
    {
    for(int cnt=0;cnt<total;cnt++)
    {
    if(OrderSelect(cnt,SELECT_BY_POS))
    {
    if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
    {
    tempfactor=NormalizeDouble(OrderLots()/Lots,1+(MarketInfo(Symbol(),MODE_MINLOT)==0.01));
    break;
    }
    }
    }
    }
    int histotal=OrdersHistoryTotal();
    if(tempfactor==0&&histotal>0)
    {
    for(cnt=0;cnt<histotal;cnt++)
    {
    if(OrderSelect(cnt,SELECT_BY_POS,MODE_HISTORY))
    {
    if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
    {
    tempfactor=NormalizeDouble(OrderLots()/Lots,1+(MarketInfo(Symbol(),MODE_MINLOT)==0.01));
    break;
    }
    }
    }
    }

    if (tempfactor>0)
    LotsFactor=tempfactor;
    /*if(Comments)Comment("\nLoading...");*/
    return(0);
    }
    //|---------deinitialization
    /*int deinit()
    {
    return(0);
    }*/
    int start()
    {
    //|---------trailing stop
    if(TrailingStop>0)MoveTrailingStop();
    //|---------break even
    if(BreakEven>0)MoveBreakEven();

    /*
    //|---------basket profit loss
    if(BasketProfitLoss)
    {
    double CurrentProfit=0,CurrentBasket=0;
    CurrentBasket=AccountEquity()-AccountBalance();
    if(CurrentBasket>maxEquity)maxEquity=CurrentBasket ;
    if(CurrentBasket<minEquity)minEquity=CurrentBasket ;
    if(CurrentBasket>=BasketProfit||CurrentBasket<=(Ba sketLoss*(-1)))
    {
    CloseBuyOrders(Magic);
    CloseSellOrders(Magic);
    return(0);
    }
    }
    */
    if(UseTargetProfit&&AccountEquity()>(AccountBalanc e()+TargetProfit))
    {
    CloseBuyOrders(Magic);
    CloseSellOrders(Magic);
    return(0);
    }
    /*
    //|---------time filter
    if((TradeOnSunday==false&&DayOfWeek()==0)||(Monday ToThursdayTimeFilter&&DayOfWeek()>=1&&DayOfWeek()< =4&&!(Hour()>=MondayToThursdayStartHour&&Hour()<Mo ndayToThursdayEndHour))||(FridayTimeFilter&&DayOfW eek()==5&&!(Hour()>=FridayStartHour&&Hour()<Friday EndHour)))
    {
    CloseBuyOrders(Magic);
    CloseSellOrders(Magic);
    return(0);
    }
    */
    //|---------signal conditions
    int limit=1;
    for(int i=1;i<=limit;i++)
    {

    /*
    //|---------moving average filter
    double MAF=iMA(Symbol(),0,MAPeriod,0,MAMethod,MAPrice,i);
    string MABUY="false";string MASELL="false";
    if((MAFilter==false)||(MAFilter&&Bid>MAF))MABUY="t rue";
    if((MAFilter==false)||(MAFilter&&Ask<MAF))MASELL=" true";

    //|---------last price

    double LastBuyOpenPrice=0;
    double LastSellOpenPrice=0;
    int BuyOpenPosition=0;
    int SellOpenPosition=0;
    int TotalOpenPosition=0;
    int cnt=0;
    for(cnt=0;cnt<OrdersTotal();cnt++)
    {
    OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    if(OrderSymbol()==Symbol()&&OrderMagicNumber()==Ma gic&&OrderCloseTime()==0)
    {
    TotalOpenPosition++;
    if(OrderType()==OP_BUY)
    {
    BuyOpenPosition++;
    LastBuyOpenPrice=OrderOpenPrice();
    }
    if(OrderType()==OP_SELL)
    {
    SellOpenPosition++;
    LastSellOpenPrice=OrderOpenPrice();
    }
    }
    }
    */
    //|---------main signal

    double COG0=iCustom(NULL,0,"Center_Of_Gravity",bars_back, m,0,kstd1,1102,0,i);
    double COG1=iCustom(NULL,0,"Center_Of_Gravity",bars_back, m,0,kstd1,1102,1,i);
    double COG2=iCustom(NULL,0,"Center_Of_Gravity",bars_back, m,0,kstd1,1102,2,i);
    double COG3=iCustom(NULL,0,"Center_Of_Gravity",bars_back, m,0,kstd2,1102,1,i);
    double COG4=iCustom(NULL,0,"Center_Of_Gravity",bars_back, m,0,kstd2,1102,2,i);
    double COG5=iCustom(NULL,0,"Center_Of_Gravity",bars_back, m,0,kstd3,1102,1,i);
    double COG6=iCustom(NULL,0,"Center_Of_Gravity",bars_back, m,0,kstd3,1102,2,i);
    string BUY="false";
    string SELL="false";
    if(Bid<COG4)BUY="true";
    if(Ask>COG3)SELL="true";

    string SignalBUY="false";
    string SignalSELL="false";

    if(BUY=="true"/*&&MABUY=="true"*/)if(ReverseSystem)SignalSELL="true";else SignalBUY="true";
    if(SELL=="true"/*&&MASELL=="true"*/)if(ReverseSystem)SignalBUY="true";else SignalSELL="true";

    }
    //|---------risk management
    if(RiskMM)CalculateMM();
    //|---------open orders
    double SL,TP,SLH,TPH,SLP,TPP,OPP,ILots;
    int Ticket,TicketH,TicketP,Expire=0;
    /*if(Expiration>0)Expire=TimeCurrent()+(Expiration* 60)-5;*/

    if((CountOrders(OP_BUY,Magic)+CountOrders(OP_SELL, Magic))<MaxOrders)
    {
    if(SignalBUY=="true"&&NewBarBuy())
    {
    if(HideSL==false&&StopLoss>0){SL=Ask-StopLoss*Point;/*OPP=Bid-StopLoss*Point;SLP=Bid;*/}else {SL=0;/*SLP=0;*/}
    if(HideTP==false&&TakeProfit>0){TP=Ask+TakeProfit* Point;/*TPP=Bid-(TakeProfit*2)*Point;*/}else {TP=0;/*TPP=0;*/}
    if(HideSL==false&&HedgeSL>0)SLH=Bid+HedgeSL*Point; else SLH=0;
    if(HideTP==false&&HedgeTP>0)TPH=Bid-HedgeTP*Point;else TPH=0;
    if(Martingale)ILots=NormalizeDouble(Lots*Martingal eFactor(),2);else ILots=Lots;
    if(IncrementLots)ILots=Lots+IncrementedLots*(Count Orders(OP_BUY,Magic)+CountOrders(OP_SELL,Magic));
    if(ILots<MinLots)ILots=MinLots;if(ILots>MaxLots)IL ots=MaxLots;

    Ticket=OrderSend(Symbol(),OP_BUY,ILots,Ask,Slippag e,SL,TP,EAName,Magic,0,Blue);
    if(Hedge)TicketH=OrderSend(Symbol(),OP_SELL,ILots, Bid,Slippage,SLH,TPH,EAName,Magic,0,Red);
    /*if(ReverseAtStop&&StopLoss>0)TicketP=OrderSend(Sy mbol(),OP_SELLSTOP,Lots,OPP,Slippage,SLP,TPP,EANam e,Magic,Expire,Red);*/
    }
    if(SignalSELL=="true"&&NewBarSell())
    {
    if(HideSL==false&&StopLoss>0){SL=Bid+StopLoss*Poin t;/*OPP=Ask+StopLoss*Point;SLP=Ask;*/}else {SL=0;/*SLP=0;*/}
    if(HideTP==false&&TakeProfit>0){TP=Bid-TakeProfit*Point;/*TPP=Ask+(TakeProfit*2)*Point;*/}else {TP=0;/*TPP=0;*/}
    if(HideSL==false&&HedgeSL>0)SLH=Ask-HedgeSL*Point;else SLH=0;
    if(HideTP==false&&HedgeTP>0)TPH=Ask+HedgeTP*Point; else TPH=0;
    if(Martingale)ILots=NormalizeDouble(Lots*Martingal eFactor(),2);else ILots=Lots;
    if(IncrementLots)ILots=Lots+IncrementedLots*(Count Orders(OP_BUY,Magic)+CountOrders(OP_SELL,Magic));
    if(ILots<MinLots)ILots=MinLots;if(ILots>MaxLots)IL ots=MaxLots;

    Ticket=OrderSend(Symbol(),OP_SELL,ILots,Bid,Slippa ge,SL,TP,EAName,Magic,0,Red);
    if(Hedge)TicketH=OrderSend(Symbol(),OP_BUY,ILots,A sk,Slippage,SLH,TPH,EAName,Magic,0,Blue);
    /*if(ReverseAtStop&&StopLoss>0)TicketP=OrderSend(Sy mbol(),OP_BUYSTOP,Lots,OPP,Slippage,SLP,TPP,EAName ,Magic,Expire,Red);*/
    }
    }
    //|---------close orders

    if(ExitAtOpposite&&Hedge==false&&SELL=="true")
    {
    if(ReverseSystem)CloseSellOrders(Magic);else CloseBuyOrders(Magic);
    }
    if(ExitAtOpposite&&Hedge==false&&BUY=="true")
    {
    if(ReverseSystem)CloseBuyOrders(Magic);else CloseSellOrders(Magic);
    }

    //|---------hidden sl-tp

    if(Hedge==false&&HideSL&&StopLoss>0)
    {
    CloseBuyOrdersHiddenSL(Magic);CloseSellOrdersHidde nSL(Magic);
    }
    if(Hedge==false&&HideTP&&TakeProfit>0)
    {
    CloseBuyOrdersHiddenTP(Magic);CloseSellOrdersHidde nTP(Magic);
    }
    //|---------not enough money warning
    int err=0;
    if(Ticket<0)
    {
    if(GetLastError()==134)
    {
    err=1;
    Print("Not enough money!");
    }
    return (-1);
    }

    /*
    if(Comments)
    {
    Comment("\nCopyright © 2009, TradingSytemForex",
    "\n\nL o t s = " + DoubleToStr(Lots,2),
    "\nB a l a n c e = " + DoubleToStr(AccountBalance(),2),
    "\nE q u i t y = " + DoubleToStr(AccountEquity(),2));
    }
    */
    return(0);
    }
    //|---------close buy orders
    int CloseBuyOrders(int Magic)
    {
    int total=OrdersTotal();
    for (int cnt=total-1;cnt>=0;cnt--)
    {
    OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    if(OrderMagicNumber()==Magic&&OrderSymbol()==Symbo l())
    {
    if(OrderType()==OP_BUY)
    {
    OrderClose(OrderTicket(),OrderLots(),Bid,3);
    }
    }
    }
    return(0);
    }
    int CloseBuyOrdersHiddenTP(int Magic)
    {
    int total=OrdersTotal();
    for (int cnt=total-1;cnt>=0;cnt--)
    {
    OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    if(OrderMagicNumber()==Magic&&OrderSymbol()==Symbo l())
    {
    if(OrderType()==OP_BUY&&Bid>(OrderOpenPrice()+Take Profit*Point))
    {
    OrderClose(OrderTicket(),OrderLots(),Bid,3);
    }
    }
    }
    return(0);
    }
    int CloseBuyOrdersHiddenSL(int Magic)
    {
    int total=OrdersTotal();
    for (int cnt=total-1;cnt>=0;cnt--)
    {
    OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    if(OrderMagicNumber()==Magic&&OrderSymbol()==Symbo l())
    {
    if(OrderType()==OP_BUY&&Bid<(OrderOpenPrice()-StopLoss*Point))
    {
    OrderClose(OrderTicket(),OrderLots(),Bid,3);
    }
    }
    }
    return(0);
    }
    //|---------close sell orders
    int CloseSellOrders(int Magic)
    {
    int total=OrdersTotal();
    for(int cnt=total-1;cnt>=0;cnt--)
    {
    OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    if(OrderMagicNumber()==Magic&&OrderSymbol()==Symbo l())
    {
    if(OrderType()==OP_SELL)
    {
    OrderClose(OrderTicket(),OrderLots(),Ask,3);
    }
    }
    }
    return(0);
    }
    int CloseSellOrdersHiddenTP(int Magic)
    {
    int total=OrdersTotal();
    for(int cnt=total-1;cnt>=0;cnt--)
    {
    OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    if(OrderMagicNumber()==Magic&&OrderSymbol()==Symbo l())
    {
    if(OrderType()==OP_SELL&&Ask<(OrderOpenPrice()-TakeProfit*Point))
    {
    OrderClose(OrderTicket(),OrderLots(),Ask,3);
    }
    }
    }
    return(0);
    }
    int CloseSellOrdersHiddenSL(int Magic)
    {
    int total=OrdersTotal();
    for(int cnt=total-1;cnt>=0;cnt--)
    {
    OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    if(OrderMagicNumber()==Magic&&OrderSymbol()==Symbo l())
    {
    if(OrderType()==OP_SELL&&Ask>(OrderOpenPrice()+Sto pLoss*Point))
    {
    OrderClose(OrderTicket(),OrderLots(),Ask,3);
    }
    }
    }
    return(0);
    }
    //|---------count orders
    int CountOrders(int Type,int Magic)
    {
    int _CountOrd;
    _CountOrd=0;
    for(int i=0;i<OrdersTotal();i++)
    {
    OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
    if(OrderSymbol()==Symbol())
    {
    if((OrderType()==Type&&(OrderMagicNumber()==Magic) ||Magic==0))_CountOrd++;
    }
    }
    return(_CountOrd);
    }
    //|---------trailing stop
    void MoveTrailingStop()
    {
    int cnt,total=OrdersTotal();
    for(cnt=0;cnt<total;cnt++)
    {
    OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    if(OrderType()<=OP_SELL&&OrderSymbol()==Symbol()&& OrderMagicNumber()==Magic)
    {
    if(OrderType()==OP_BUY)
    {
    if(TrailingStop>0&&Ask>NormalizeDouble(OrderOpenPr ice(),Digits))
    {
    if((NormalizeDouble(OrderStopLoss(),Digits)<Normal izeDouble(Bid-Point*(TrailingStop+TrailingStep),Digits))||(Order StopLoss()==0))
    {
    OrderModify(OrderTicket(),OrderOpenPrice(),Normali zeDouble(Bid-Point*TrailingStop,Digits),OrderTakeProfit(),0,Blu e);
    return(0);
    }
    }
    }
    else
    {
    if(TrailingStop>0&&Bid<NormalizeDouble(OrderOpenPr ice(),Digits))
    {
    if((NormalizeDouble(OrderStopLoss(),Digits)>(Norma lizeDouble(Ask+Point*(TrailingStop+TrailingStep),D igits)))||(OrderStopLoss()==0))
    {
    OrderModify(OrderTicket(),OrderOpenPrice(),Normali zeDouble(Ask+Point*TrailingStop,Digits),OrderTakeP rofit(),0,Red);
    return(0);
    }
    }
    }
    }
    }
    }
    //|---------break even
    void MoveBreakEven()
    {
    int cnt,total=OrdersTotal();
    for(cnt=0;cnt<total;cnt++)
    {
    OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    if(OrderType()<=OP_SELL&&OrderSymbol()==Symbol()&& OrderMagicNumber()==Magic)
    {
    if(OrderType()==OP_BUY)
    {
    if(BreakEven>0)
    {
    if(NormalizeDouble((Bid-OrderOpenPrice()),Digits)>BreakEven*Point)
    {
    if(NormalizeDouble((OrderStopLoss()-OrderOpenPrice()),Digits)<0)
    {
    OrderModify(OrderTicket(),OrderOpenPrice(),Normali zeDouble(OrderOpenPrice()+0*Point,Digits),OrderTak eProfit(),0,Blue);
    return(0);
    }
    }
    }
    }
    else
    {
    if(BreakEven>0)
    {
    if(NormalizeDouble((OrderOpenPrice()-Ask),Digits)>BreakEven*Point)
    {
    if(NormalizeDouble((OrderOpenPrice()-OrderStopLoss()),Digits)<0)
    {
    OrderModify(OrderTicket(),OrderOpenPrice(),Normali zeDouble(OrderOpenPrice()-0*Point,Digits),OrderTakeProfit(),0,Red);
    return(0);
    }
    }
    }
    }
    }
    }
    }
    //|---------allow one action per bar
    bool NewBarBuy()
    {
    if(PreviousBarTime1<Time[0])
    {
    PreviousBarTime1=Time[0];
    return(true);
    }
    return(false);
    }
    bool NewBarSell()
    {
    if(PreviousBarTime2<Time[0])
    {
    PreviousBarTime2=Time[0];
    return(true);
    }
    return(false);
    }
    //|---------calculate money management
    void CalculateMM()
    {
    double MinLots=MarketInfo(Symbol(),MODE_MINLOT);
    double MaxLots=MarketInfo(Symbol(),MODE_MAXLOT);
    Lots=AccountFreeMargin()/100000*RiskPercent;
    Lots=MathMin(MaxLots,MathMax(MinLots,Lots));
    if(MinLots<0.1)Lots=NormalizeDouble(Lots,2);
    else
    {
    if(MinLots<1)Lots=NormalizeDouble(Lots,1);
    else Lots=NormalizeDouble(Lots,0);
    }
    if(Lots<MinLots)Lots=MinLots;
    if(Lots>MaxLots)Lots=MaxLots;
    return(0);
    }
    //|---------martingale
    int MartingaleFactor()
    {
    int histotal=OrdersHistoryTotal();
    if (histotal>0)
    {
    for(int cnt=histotal-1;cnt>=0;cnt--)
    {
    if(OrderSelect(cnt,SELECT_BY_POS,MODE_HISTORY))
    {
    if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
    {
    if(OrderProfit()<0)
    {
    LotsFactor=LotsFactor*Multiplier;
    return(LotsFactor);
    }
    else
    {
    LotsFactor=InitialLotsFactor;
    if(LotsFactor<=0)
    {
    LotsFactor=1;
    }
    return(LotsFactor);
    }
    }
    }
    }
    }
    return (LotsFactor);
    }

  10. #10
    الصورة الرمزية FXLVL2
    FXLVL2 غير متواجد حالياً عضو المتداول العربي
    تاريخ التسجيل
    Mar 2009
    العمر
    44
    المشاركات
    69

    افتراضي رد: إكسبيرت مؤشرات بالخياط

    أخ abdmomen

    مفهمتش المقصود إيه من مشاركتك ياريت التوضيح ..... ؟!

  11. #11
    الصورة الرمزية typhoon_gr9
    typhoon_gr9 غير متواجد حالياً عضو المتداول العربي
    تاريخ التسجيل
    Jul 2006
    الإقامة
    الاسكندرية
    المشاركات
    236

    افتراضي رد: إكسبيرت مؤشرات بالخياط

    شكرا للأخ abdmomen و نرجو ارفاق الاكسبيرت مضغوط بصيغتة البرمجية لأنة لا يعمل بهذة الطريقة و يعطي عدة رسائل خطاء عند تفعيلة لأنتاج الصيغة التنفيذية علي الميتا ايدتور .

  12. #12
    الصورة الرمزية abdmomen
    abdmomen غير متواجد حالياً عضو المتداول العربي
    تاريخ التسجيل
    Apr 2008
    الإقامة
    سوريا
    المشاركات
    361

    افتراضي رد: إكسبيرت مؤشرات بالخياط

    اقتباس المشاركة الأصلية كتبت بواسطة FXLVL2 مشاهدة المشاركة
    أخ abdmomen

    مفهمتش المقصود إيه من مشاركتك ياريت التوضيح ..... ؟!
    اخي الكريم اردت بوضع هذا الكود ربما تقوم باضافة ماتريد او تاخذ منه مايفيد في عملك والله من وراء القصد وسارفق المؤشرربما يستفاد منه ولكم فائق احترامي
    الملفات المرفقة الملفات المرفقة

  13. #13
    الصورة الرمزية ahlawyalatol
    ahlawyalatol غير متواجد حالياً عضو المتداول العربي
    تاريخ التسجيل
    Apr 2007
    الإقامة
    مصراوى اماراتى
    المشاركات
    268

    افتراضي رد: إكسبيرت مؤشرات بالخياط

    تفضلو باك تست من اول 2009 على الباوند دولار فريم 4 ساعات,النتائج حلوه
    الملفات المرفقة الملفات المرفقة

  14. #14
    الصورة الرمزية tajer
    tajer غير متواجد حالياً عضو المتداول العربي
    تاريخ التسجيل
    Jan 2009
    الإقامة
    Abu Dhabi
    العمر
    53
    المشاركات
    361

    افتراضي رد: إكسبيرت مؤشرات بالخياط

    اقتباس المشاركة الأصلية كتبت بواسطة abdmomen مشاهدة المشاركة
    اخي الكريم اردت بوضع هذا الكود ربما تقوم باضافة ماتريد او تاخذ منه مايفيد في عملك والله من وراء القصد وسارفق المؤشرربما يستفاد منه ولكم فائق احترامي

    thanks brother

    but the indicator doesnt work on Altrade

  15. #15
    الصورة الرمزية ahlawyalatol
    ahlawyalatol غير متواجد حالياً عضو المتداول العربي
    تاريخ التسجيل
    Apr 2007
    الإقامة
    مصراوى اماراتى
    المشاركات
    268

    افتراضي رد: إكسبيرت مؤشرات بالخياط

    باك تست على اليورو فريم 4 ساعات
    الملفات المرفقة الملفات المرفقة

صفحة 1 من 2 12 الأخيرةالأخيرة

المواضيع المتشابهه

  1. مؤشرات بالخياط الاصلية
    By omda1 in forum برمجة المؤشرات واكسبرتات التداول - Experts Advisor EA
    مشاركات: 124
    آخر مشاركة: 20-11-2016, 10:18 PM
  2. ما هي إكسبيرت مؤشرات بالخياط ‏؟
    By moded in forum برمجة المؤشرات واكسبرتات التداول - Experts Advisor EA
    مشاركات: 0
    آخر مشاركة: 01-04-2009, 09:00 PM
  3. هل هذا مؤاشر بالخياط
    By القلزم in forum برمجة المؤشرات واكسبرتات التداول - Experts Advisor EA
    مشاركات: 8
    آخر مشاركة: 23-03-2009, 07:38 PM
  4. سؤال للخبراء:يعني أيه مؤشرات الارتداد,مؤشرات الترند,مؤشرات الفلتره ؟
    By magedology in forum برمجة المؤشرات واكسبرتات التداول - Experts Advisor EA
    مشاركات: 2
    آخر مشاركة: 13-10-2006, 12:03 AM
  5. سؤال للخبراء:يعني أيه مؤشرات الارتداد,مؤشرات الترند,مؤشرات الفلتره ؟
    By magedology in forum سوق تداول العملات الأجنبية والسلع والنفط والمعادن
    مشاركات: 2
    آخر مشاركة: 13-10-2006, 12:03 AM

الاوسمة لهذا الموضوع


1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17