مشروع برمجي : اكسبيرت سوبابلكس للمضاعفات

**وضاح عطار** · 02-01-2008, 07:56 AM

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته

شرح طريقة سوبابلكس باختصار :

- يقوم الاكسبيرت بفتح صفقة بيع أو شراء لا يهم ( يتم تحديد نوع الدخول بناء على تحليل شخصي للمتاجر نفسه بحيث يكون أقرب ما يكون للصحة ).

- إذا ربحت الصفقة مقدارا محددا من النقاط وليكن 80 نقطة ( أيضا يتم تحديدها من قبل المتاجر نفسه ) فخير وبركة .

- إذا خسر الاكسبيرت 80 نقطة ( نفس الهدف المحدد ) فإنه يقوم بإغلاق الصفقة الخاسرة ويفتح بدلا عنها صفقة معاكسة للأولى بضعف عدد اللوتات للصفقة الأولى .

- في حال ربحت الصفقة الثانية فإن الاكسبيرت يغلق الصفقة الرابحة ويكون محصلة ربحها يغطي خسارة الأولى زائدا ربح صافي 80 نقطة بمقدار اللوت الابتدائي .

- في حال خسرت الصفقة الثانية فإن الاكسبيرت يغلق الصفقة الخاسرة الثانية ويفتح صفقة معاكسة للثانية بضعف عدد لوتات الصفقة الثانية .

- يستمر الاكسبيرت في هذا المنوال حتى تربح آخر صفقة بحيث تعوض كل خسارات الصفقات الخاسرة التي قبلها مع ربح 80 نقطة صافية على اللوت الابتدائي .

الاكسبيرت حاليا يقوم بالضبط كما شرحت سابقا .

لكن صاحب الاستراتيجية عنده عدة تقنيات أخرى لتحسين الطريقة بشكل أفضل .

هذه التقنيات هي :

- عند فتح صفقة معاكسة بضعف عدد اللوتات يكون الهدف لنصفها هو 80 نقطة . والهدف للنصف الآخر هو 160 .

- في حال حقق النصف الهدف وحقق النصف الآخر هدفه أيضا فهذا يكون شيء جميل للغاية .

- في حال تحققت أهداف نصف العقود فقط ولم تتحقق أهداف النصف الآخر فإننا في هذه الحالة نكون لم نحقق أي ربح أو خسارة من هذه المرحلة الأخيرة .

- لذلك نعاود الدخول مرة أخرى بنفس عدد اللوتات للمرحلة الفائتة ولكن عكس العملية السابقة .

- أيضا ينتظر صاحب الاستراتيجية تكون عدة قمم وقيعان بسيطة قبل الدخول فعليا في الصفقة الأولى .

فيما يلي الاكسبيرت الحالي مع الشرح البرمجي .

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

جزى الله خيرا صاحب الاستراتيجية الذي يشترط على من ربح من طريقته هذه أن يتصدق بنسبة معينة من ربحه ( نسيتها صراحة ) .

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

الكود الحالي مع الشرح بشكل بسيط :

كود PHP:

  #property copyright "Idea by Supaplex Programing by waddah attar"
#property link      "waddahattar@hotmail.com"
 
//خصائص الاكسبيرت
extern int     TakeProfit=80;
extern int     StopLoss=80;
extern double  FirstLots=0.1;
extern bool    OpenBuy=true;
extern int     LotsDouble=2;
extern int     MagicNumber = 2008;
int    Ticket1,Ticket2;
int    t1,t2,gT1,gT2;
int handle;
int init()
{
  Comment("Waddah Attar Supaplex");
  return(0);
}
int deinit()
{
  Comment("");
  return(0);
}
int start()
{
  Procces_1();
  return(0);
}
//****************************************************************************************************************  
// الوظيفة الخاصة بفتح عقد الشراء مع مضاعفة إن اقتضى الأمر
void OpenBUYOrder(double Lots,int Magic)
{
   double sl,tp;
 
   sl=Ask-StopLoss*Point;
   tp=Ask+TakeProfit*Point;
 
   if (Lots==FirstLots)
   {
     Ticket1=OrderSend(Symbol(),OP_BUY,Lots,Ask,3,sl,tp,"",Magic,0,Green);
     if(Ticket1>0)
     {
       gT1=OrderSend(Symbol(),OP_SELLSTOP,Lots,sl,3,sl+StopLoss*Point,sl-TakeProfit*Point,"",Magic,0,Green);
       gT2=OrderSend(Symbol(),OP_SELLSTOP,Lots,sl,3,sl+StopLoss*Point,sl-(TakeProfit*Point),"",Magic,0,Green);
     }
     else
     {
      Alert("خطأ شراء "," Err = ",GetLastError()," Price = ",Ask," Lots = ",Lots);
     }
   }
}
// الوظيفة الخاصة بفتح عقد البيع مع مضاعفة إن اقتضى الأمر
void OpenSELLOrder(double Lots,int Magic)
{
   double sl,tp;
 
   sl=Bid+StopLoss*Point;
   tp=Bid-TakeProfit*Point;
   if (Lots==FirstLots)
   {
     Ticket1=OrderSend(Symbol(),OP_SELL,Lots,Bid,3,sl,tp,"",Magic,0,Red);
     if(Ticket1>0)
     {
       gT1=OrderSend(Symbol(),OP_BUYSTOP,Lots,sl,3,sl-StopLoss*Point,sl+TakeProfit*Point,"",Magic,0,Green);
       gT2=OrderSend(Symbol(),OP_BUYSTOP,Lots,sl,3,sl-StopLoss*Point,sl+(TakeProfit*Point),"",Magic,0,Green);
     }
     else
     {
       Alert("خطأ بيع "," Err = ",GetLastError()," Price = ",Bid," Lots = ",Lots);
     }
   }
}
// الوظيفة الرئيسية
int Procces_1()
{
  double slot,ssl,stp,bw;
// في حال لا يوجد صفقات حالية وكان هناك صفقات معلقة فاحذفها لأنه لا داعي لها
  if (MyRealOrdersTotal(MagicNumber)==0 && MyPendingOrdersTotal(MagicNumber)==2)
  {
    DeletePendingOrders(MagicNumber);
    RefreshRates();
    DeletePendingOrders(MagicNumber);
    return(0);
  }
// في حال لا يوجد صفقات حالية أو صفقات معلقة فقم بفتح صفقة بيع أو صفقة شراء حسب رغبة المستخدم
  if (MyRealOrdersTotal(MagicNumber)==0 && MyPendingOrdersTotal(MagicNumber)==2)
  {
    if (OpenBuy)
    {
      OpenBUYOrder(FirstLots,MagicNumber);
    }
    else
    {
      OpenSELLOrder(FirstLots,MagicNumber);
    }
    return(0);
  }
// في حال تم فتح صفقة بيع أو شراء يجب وضع صفقات معلقة معاكسة لها نوعا واتجاها
  if (MyRealOrdersTotal(MagicNumber)==2 && MyPendingOrdersTotal(MagicNumber)==0)
  {
    OrderSelect(t1,SELECT_BY_TICKET,MODE_TRADES);
    slot=OrderLots()*LotsDouble;
    ssl=OrderStopLoss();
    stp=OrderTakeProfit();
 
    if (OrderType()==OP_BUY)
    {
       gT1=OrderSend(Symbol(),OP_SELLSTOP,slot,ssl,3,ssl+StopLoss*Point,ssl-TakeProfit*Point,"",MagicNumber,0,Green);
       gT2=OrderSend(Symbol(),OP_SELLSTOP,slot,ssl,3,ssl+StopLoss*Point,ssl-(TakeProfit*Point),"",MagicNumber,0,Green);
    }
    if (OrderType()==OP_SELL)
    {
       gT1=OrderSend(Symbol(),OP_BUYSTOP,slot,ssl,3,ssl-StopLoss*Point,ssl+TakeProfit*Point,"",MagicNumber,0,Green);
       gT2=OrderSend(Symbol(),OP_BUYSTOP,slot,ssl,3,ssl-StopLoss*Point,ssl+(TakeProfit*Point),"",MagicNumber,0,Green);
    }
 
  }
  return(0);
}
// وظيفة لحساب عدد الصفقات الحالية
int MyRealOrdersTotal(int Magic)
{
  int c=0;
  int total  = OrdersTotal();
  t1=-1;
  t2=-1;
 
  for (int cnt = 0 ; cnt < total ; cnt++)
  {
    OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    if (OrderMagicNumber() == Magic && OrderSymbol()==Symbol() && (OrderType()==OP_BUY || OrderType()==OP_SELL))
    {
      if (t1==-1)
      {
        t1=OrderTicket();
      }
      else
      {
        if (t2==-1)
        {
          t2=OrderTicket();
        }
      }
      c++;
    }
  }
  return(c);
}
// وظيفة لحساب عدد الصفقات المعلقة فقط
int MyPendingOrdersTotal(int Magic)
{
  int c=0;
  int total  = OrdersTotal();
 
  for (int cnt = 0 ; cnt < total ; cnt++)
  {
    OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    if (OrderMagicNumber() == Magic && OrderSymbol()==Symbol() && (OrderType()==OP_BUYSTOP || OrderType()==OP_SELLSTOP))
    {
      c++;
    }
  }
  return(c);
}
// وظيفة لحذف الصفقات المعلقة
int DeletePendingOrders(int Magic)
{
  int total  = OrdersTotal();
 
  for (int cnt = 0 ; cnt < total ; cnt++)
  {
    OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    if (OrderMagicNumber() == Magic && OrderSymbol()==Symbol() && (OrderType()==OP_BUYSTOP || OrderType()==OP_SELLSTOP))
    {
      OrderDelete(OrderTicket());
    }
  }
  return(0);
}

يتبع ...

HERO_0 · 02-01-2008, 08:32 AM

ماشاء الله تبارك الله .. سلمت يدااااك مهندس وضاح
مشروع محترم وتعليمي جداً

salam · 02-01-2008, 08:35 AM

بالفعل رائع

تحياتي

njjar · 02-01-2008, 09:36 AM

مشروع رائع بارك الله فيك

**وضاح عطار** · 02-01-2008, 11:29 AM

اقتباس:

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

ماشاء الله تبارك الله .. سلمت يدااااك مهندس وضاح
مشروع محترم وتعليمي جداً

أهلا بك أخي الحبيب هيرو

ننتظر عودتك بالسلامة

**وضاح عطار** · 02-01-2008, 11:31 AM

اقتباس:

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

بالفعل رائع

تحياتي

شكرا لك أخي سلام

وإن شاء الله تستفيد من هذا المشروع

**وضاح عطار** · 02-01-2008, 11:46 AM

اقتباس:

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

مشروع رائع بارك الله فيك

أهلا بك أخي العزيز

وشكرا لك

محمود عامر · 02-01-2008, 11:58 AM

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

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

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

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

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

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

و اسف للاطالة و لنا عودة باذن الله

**وضاح عطار** · 02-01-2008, 02:33 PM

اقتباس:

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

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

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

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

عندما يكون هدف نصف العقود ضعف هدف النصف الآخر فهذا الأمر لا يزيد من احتمال المضاعفات
بل كل ما نحصل عليه هو إما ربح مضاعف جدا أو صفر لهذه المرحلة بالذات .

أي أننا إما أن نربح جدا أو لا نربح ولا نخسر من آخر مرحلة. وفي حالة أن النتيجة هي صفر فإننا ببساطة نعيد هذه المرحلة نفسها دون الدخول في مضاعفة جديدة .

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

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

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

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

ما رأيك أنت أن تضيف هذا الخيار للاكسبيرت

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

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

هل من متطوع من فريق البرمجة يقوم بهذا التعديل

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

صدقت فإن الموضوع يحتاج لقلب قوي ورأسمال أقوى لأنك ببساطة قد تجد الإيكويتي نصف الرصيد في أحد المراحل .

و اسف للاطالة و لنا عودة باذن الله

المناقشة في الاقتباس

FX5 · 02-01-2008, 02:56 PM

بارك الله فيك أخي وضاح وزادك من فضله، وبإذن الله يكون هذا الموضوح فاتحة لانجاز مشاريع برمجية احترافية وقوية.

قبل أن أبدأ أريد أن أبين أنني غير مقتنع بتاتاً بفكرة المضاعفات مهما كانت طريقتها أو نوعها، فبرأيي أن السبيل الوحيد للنجاح في هذا السوق يكون عبر الالتزام الكامل بقواعد إدراة رأس والمال وإدارة المخاطر.

بالنسبة للإكسبرت فهو -ماشاء الله- مكتوب باقتدار واضح، وبسيطرة تامة على الأدوات البرمجية، وأكثر ما أعجبني هو الأسلوب الهيكلي المتبع في البرمجة الذي يسهل كثيراً من عملية قراءة الكود وتعديله في المستقبل.

يوجد ثلاث أخطاء منطقية بسيطة يبدو لي أنها موضوعة عن قصد لذلك سأتركها لبقية الأخوة لكي يكتشوفوها، ولكن أريد أن أبدي ملاحظة حول الدالة البرمجية المسوؤلة عن إغلاق الأوامر المعلقة، حيث يفضل دائماً أن يتم إغلاق الصفقة الأخيرة أولاً ثم التي قبلها وهكذا.

فمثلاً لو كان لدينا 4 أوامر م