تصميم "عظم باكتسر فوري"

هذه ابرز خصائص عظم الباكتستر الفوري,
مسألة فكرية مؤجلة:
الان دخلنا شراء
ومر ايام, هل القمة ذلك اليوم او القاعد حدثت قبل لحظة الدخول ام بعدها

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

نعد صياغة الكود على النحو التالي:

هاي يوم الدخول للشراء -- و لو يوم الدخول للبع تم تجاهلها لنسحب على اسؤا الاحتمالات دون غش او خداع:

http://www7.0zz0.com/2017/07/16/07/106973798.png

معلق:
عمود cprice -- وقلنا غير مهم, الا اذا اردنا ان نحسب على صفقة ندخلها ونتركها الى الابد دون خروج!!

الآن: نريد ان نميز الربح او الخسارة بالنقاط بلونين احمر او اخضر؟؟ لعمود PPips

http://www2.0zz0.com/2017/07/16/08/543806653.png

http://www3.0zz0.com/2017/07/16/08/834789339.png

الآن نتأكد من صحة أن شموع الخروج بعد شموع الدخول, مثلا في لصورة السابقة صفقة الكيبل بتاريخ 9 - 6 - 2017 يوجد بها خطأ (تقريبا هي الصفقة الوحيدة التي فيها خطأ وهو السعر الاعلى فقط--بقية القيم صحيحة)

السبب: اننا حتى الان برمجيا لم نفحص ان شمعة الخروج بعد شمعة الدخول--عني تخيل الزوج اليوم قطع للاسفل وغدا قطع للاعلى واليوم بعده عاد وقطع للاسفل
اسفل 25 و 25 نفس اليوم ولكن من خلال الدوال حدث فترة = -1 فعاد البرنامج الى تاريخ 1971 كانت القمة 1.7000

http://www11.0zz0.com/2017/07/16/08/129809383.png

فلابد ان يكون البرنامج خاليا من الاخطاء الفكرية التي قد تنشأ ام من خطأ شخصي او من لغة البرمجة نفسها, حتى وإن كان الكود مكتوب بشكل صحيح.
-
http://www6.0zz0.com/2017/07/16/08/653210938.png

قد تضيف اعمدة اخرى ل 1) اللوتات 2) الربح او الخسارة بالدولار الخ

يأتي:
الآن عرفنا تفاصيل كل صفقة--والصفقات مرتبة حسب الاقدم--ممكن تجعلها حسب الاحدث
1) نريد ان نرسم اي صفقة نضغط عليها
2) نريد حساب الدروداون على اسؤا احتمال بنهاية كل يوم (شمعة)

الاسبوع القادم ان شاء الله تعالى.
-

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

اسبوع مخصص للاسئلة والتصحيحات

http://www8.0zz0.com/2017/07/16/08/135248262.png

نريدها هكذا!!
http://www12.0zz0.com/2017/07/16/08/975586829.png

للتفكير: نريد شرط الدخول مبني على متوسط 7 و 21 و 63؟
تقطاع الصغرين عكسيا فوق 63 شراء
تقاطع الصغيرين عكسيا تحت 63 بيع
ماهو التعديل الطفيف على الكود اسفل--محصلة ماسبق,
والهدف للتبسيط: الاغلاق بعد يومين من الدخول-باغلاق اليوم الثاني:

كود:

---

string  SELECTOR ="POSITIONS";
int      PageNumber=1;
string  str;
string  S[] = {"EUR" ,"GBP" ,"AUD" ,"NZD" ,"USD" ,"CAD" ,"CHF" ,"JPY"};
string  pairs[28];
string  pair_0[28];
int      NoOfCandles=50;

int      XPairPositionSerial[800];
int      XPair_Entry_Candle[800];
string  XPair_Order_Symbol[800];
double  XPair_Entry_Price[800];
string  XPair_Order_Type[800];
int      XPair_Exit_Candle[800];
double  XPair_Exit_Price[800];
double  XHigh_Price[800];
double  XLow_Price[800];
     
double      Pips_On_Close[800];
double      Pips_On_Worst[800];
double      Pips_On_Best[800];





int OnInit()
{
  ChartSetInteger(0,CHART_FOREGROUND,0,FALSE);
  ChartSetInteger(0,CHART_COLOR_BACKGROUND,clrBlack);
  ChartSetInteger(0,CHART_COLOR_CHART_LINE,ChartGetInteger(0,CHART_COLOR_BACKGROUND));
  ChartSetInteger(0,CHART_MODE,CHART_LINE);
  ChartSetInteger(0,CHART_SHOW_GRID,0,FALSE);
  ChartSetInteger(0,CHART_SHOW_OHLC,0,FALSE);
  ChartSetInteger(0,CHART_SHOW_BID_LINE,0,FALSE);
 
  ObjectCreate( "CHART_HIDE",OBJ_LABEL,0,0,0); 
  ObjectSet(    "CHART_HIDE",OBJPROP_CORNER,0);
  ObjectSet(    "CHART_HIDE",OBJPROP_XDISTANCE,5);
  ObjectSet(    "CHART_HIDE",OBJPROP_YDISTANCE,25);
  ObjectSetText("CHART_HIDE",CharToStr(108),12,"wingdings",clrRed);
  ObjectCreate( "CHART_CANDLES",OBJ_LABEL,0,0,0); 
  ObjectSet(    "CHART_CANDLES",OBJPROP_CORNER,0);
  ObjectSet(    "CHART_CANDLES",OBJPROP_XDISTANCE,25);
  ObjectSet(    "CHART_CANDLES",OBJPROP_YDISTANCE,25);
  ObjectSetText("CHART_CANDLES",CharToStr(108),12,"wingdings",clrYellow);
  ObjectCreate( "CHART_LINE",OBJ_LABEL,0,0,0); 
  ObjectSet(    "CHART_LINE",OBJPROP_CORNER,0);
  ObjectSet(    "CHART_LINE",OBJPROP_XDISTANCE,45);
  ObjectSet(    "CHART_LINE",OBJPROP_YDISTANCE,25);
  ObjectSetText("CHART_LINE",CharToStr(108),12,"wingdings",clrWhite);
 
  EventSetTimer(1);
  str =StringSubstr(Symbol(),6,10);
///////////////////////////
  int j=-1;
  for(int i=0;i<=6;i++)
  {
      for(int k=i+1;k<=7;k++)
      {
        j++;
        pairs[j]=S[i]+S[k]+str;
        pair_0[j]=pairs[j];
      }
  }
  return(INIT_SUCCEEDED);
}
////////////////////////
void OnTimer()
{
  ChartSetInteger(0,CHART_FOREGROUND,0,BackOrForeground);
  ChartSetInteger(0,CHART_COLOR_CHART_LINE,LineColor);
  ChartSetInteger(0,CHART_MODE,ChartMode);


     
  ObjectCreate( "ACTIVATE_ALL",OBJ_LABEL,0,0,0); 
  ObjectSet(    "ACTIVATE_ALL",OBJPROP_CORNER,0);
  ObjectSet(    "ACTIVATE_ALL",OBJPROP_XDISTANCE,25);
  ObjectSet(    "ACTIVATE_ALL",OBJPROP_YDISTANCE,425);
  ObjectSetText("ACTIVATE_ALL",CharToStr(110),12,"wingdings",clrLime);
  ObjectCreate( "CANCEL_ALL",OBJ_LABEL,0,0,0); 
  ObjectSet(    "CANCEL_ALL",OBJPROP_CORNER,0);
  ObjectSet(    "CANCEL_ALL",OBJPROP_XDISTANCE,45);
  ObjectSet(    "CANCEL_ALL",OBJPROP_YDISTANCE,425);
  ObjectSetText("CANCEL_ALL",CharToStr(110),12,"wingdings",clrGray);
 
  ObjectCreate(  "REMOVE_EXPERT",OBJ_LABEL,0,0,0);
  ObjectSet(    "REMOVE_EXPERT",OBJPROP_CORNER,0);
  ObjectSet(    "REMOVE_EXPERT",OBJPROP_XDISTANCE,  195);
  ObjectSet(    "REMOVE_EXPERT",OBJPROP_YDISTANCE,  0);
  ObjectSetText( "REMOVE_EXPERT",CharToStr(255),18,"Wingdings",clrWhite);
 
  ObjectCreate( "CLEAN_CHART",OBJ_LABEL,0,0,0);
  ObjectSet(    "CLEAN_CHART",OBJPROP_CORNER,0);
  ObjectSet(    "CLEAN_CHART",OBJPROP_XDISTANCE,145);
  ObjectSet(    "CLEAN_CHART",OBJPROP_YDISTANCE,0);
  ObjectSetText("CLEAN_CHART","DEL",15,"Times New Roman",clrWhite);
 
  if(SELECTOR=="POSITIONS") color  SelClr=clrLime;
  else                            SelClr=clrGray;
  ObjectCreate( "POSITIONS",OBJ_LABEL,0,0,0); 
  ObjectSet(    "POSITIONS",OBJPROP_CORNER,0);
  ObjectSet(    "POSITIONS",OBJPROP_XDISTANCE,400);
  ObjectSet(    "POSITIONS",OBJPROP_YDISTANCE,0);
  ObjectSetText("POSITIONS",CharToStr(174),12,"wingdings",SelClr);
  if(SELECTOR=="HISTORY")          SelClr=clrLime;
  else                            SelClr=clrGray;
  ObjectCreate( "HISTORY",OBJ_LABEL,0,0,0); 
  ObjectSet(    "HISTORY",OBJPROP_CORNER,0);
  ObjectSet(    "HISTORY",OBJPROP_XDISTANCE,420);
  ObjectSet(    "HISTORY",OBJPROP_YDISTANCE,0);
  ObjectSetText("HISTORY",CharToStr(174),12,"wingdings",SelClr);

 
 
  ObjectCreate( "Object_Name",OBJ_LABEL,0,0,0);
  ObjectSet(    "Object_Name",OBJPROP_CORNER,0);
  ObjectSet(    "Object_Name",OBJPROP_XDISTANCE,245);
  ObjectSet(    "Object_Name",OBJPROP_YDISTANCE,0);
  ObjectSetText("Object_Name",Object_Name,11,"Times New Roman",clrWhite);
/////////////////////////
  int PairTotallPosition[28];
  int PairPositionSerial[28][200];
  int PairEntryCandle[28][200];
  string Pair_Order_Type[28][200]; 
  string Pair_Order_Symbol[28][200]; 
  double Pair_Entry_Price[28][200];
  int Pair_Exit_Candle[28][200];
/////////////
  int TotalPositions;
/////////////
  for(int i=0;i<=27;i++)
  {//for(i=0;i<28;i++)
      PairTotallPosition[i]=-1;
      if(pairs[i]==pair_0[i])
      {//if(pairs[i]==pair_0[i])
        for(int j=NoOfCandles;j>=1;j--)
        {//for(int j=0;j<=NoOfCandles;j++)
            double x0=iAO(pair_0[i],0,j+1);
            double x1=iAO(pair_0[i],0,j+2);
            if((x0<=0 && x1>=0) || (x0>=0 && x1<=0))
            {//if((x0<0 && x1>0) || (x0>0 && x1<0))
              TotalPositions++;
              PairTotallPosition[i]++;
              int m=PairTotallPosition[i];
              PairPositionSerial[i][m]=m;
              PairEntryCandle[i][m]=j;
              Pair_Order_Symbol[i][m]=pair_0[i];
              Pair_Entry_Price[i][m]=iOpen(pair_0[i],0,j);
              if(x0>=0 && x1<=0)
              {//if(x0>=0 && x1<=0)
                  Pair_Order_Type[i][m]="BUY";
                  for(int k=j+1;k>=1;k--)
                  {//for(k=j+1;k>=1;k--)
                    double y0=iAO(pair_0[i],0,k);
                    double y1=iAO(pair_0[i],0,k+1);
                    if(y0<=0 && y1>=0)
                    {//if(y0<=0 && y1>=0)
                        Pair_Exit_Candle[i][m]=k;
                        break;
                    }//if(y0<=0 && y1>=0)
                  }//for(k=j+1;k>=1;k--)
              }//if(x0>=0 && x1<=0)
              if(x0<=0 && x1>=0)
              {//if(x0<=0 && x1>=0)
                  Pair_Order_Type[i][m]="SELL";
                  for(k=j+1;k>=1;k--)
                  {//for(k=j+1;k>=1;k--)
                    double z0=iAO(pair_0[i],0,k);
                    double z1=iAO(pair_0[i],0,k+1);
                    if(z0>=0 && z1<=0)
                    {//if(y0<=0 && y1>=0)
                        Pair_Exit_Candle[i][m]=k;
                        break;
                    }//if(y0<=0 && y1>=0)
                  }//for(k=j+1;k>=1;k--)
              }//if(x0<=0 && x1>=0)
            }//if((x0<0 && x1>0) || (x0>0 && x1<0))
        }//for(int j=0;j<=NoOfCandles;j++)
      }//if(pairs[i]==pair_0[i])
  }//for(i=0;i<28;i++)
  int YY=-1;
  for(i=0;i<=27;i++)
  {//for(i=0;i<=27;i++)
      for(m=0;m<=PairTotallPosition[i];m++)
      {//for(j=0;j<=PairTotallPosition[i];j++)
        YY++;
        XPairPositionSerial[YY] =  PairPositionSerial[i][m];
        XPair_Entry_Candle[YY]    =  PairEntryCandle[i][m];
        XPair_Order_Symbol[YY]  =  Pair_Order_Symbol[i][m];
        XPair_Entry_Price[YY]  =  Pair_Entry_Price[i][m];
        XPair_Order_Type[YY]    =  Pair_Order_Type[i][m];
        XPair_Exit_Candle[YY]  =  Pair_Exit_Candle[i][m];
      }//for(j=0;j<=PairTotallPosition[i];j++)
  }////for(i=0;i<=27;i++)
 
  for(i=0;i<YY;i++)
  {//for(i=0;i<YY;i++)
      for(j=i+1;j<=YY;j++)
      {//for(j=i+1;j<=YY;j++)
        if(XPair_Entry_Candle[i]<XPair_Entry_Candle[j])
        {//if(XPair_Entry_Candle[i]<XPai
            int swap1=XPairPositionSerial[i];
            XPairPositionSerial[i]=XPairPositionSerial[j];
            XPairPositionSerial[j]=swap1;
            int swap2=XPair_Entry_Candle[i];
            XPair_Entry_Candle[i]=XPair_Entry_Candle[j];
            XPair_Entry_Candle[j]=swap2;
            string swap3=XPair_Order_Symbol[i];
            XPair_Order_Symbol[i]=XPair_Order_Symbol[j];
            XPair_Order_Symbol[j]=swap3;
            double swap4=XPair_Entry_Price[i];
            XPair_Entry_Price[i]=XPair_Entry_Price[j];
            XPair_Entry_Price[j]=swap4;
            string swap5=XPair_Order_Type[i];
            XPair_Order_Type[i]=XPair_Order_Type[j];
            XPair_Order_Type[j]=swap5;
            int swap6=XPair_Exit_Candle[i];
            XPair_Exit_Candle[i]=XPair_Exit_Candle[j];
            XPair_Exit_Candle[j]=swap6;
        }//if(XPair_Entry_Candle[i]<XPai
      }//for(j=i+1;j<=YY;j++)
  }//for(i=0;i<YY;i++)
 
  for(i=0;i<=YY;i++)
  {
      if(XPair_Exit_Candle[i]>=XPair_Entry_Candle[i]) XPair_Exit_Candle[i]=XPair_Entry_Candle[i]-1;
     
      XPair_Exit_Price[i]=iClose(XPair_Order_Symbol[i],0,XPair_Exit_Candle[i]);
     
      int TOTAL_PERIOD = XPair_Entry_Candle[i] - XPair_Exit_Candle[i] + 1;
      int START = XPair_Exit_Candle[i];
      if(XPair_Order_Type[i]=="BUY")
      {
        XHigh_Price[i]=iHigh(XPair_Order_Symbol[i],0,iHighest(XPair_Order_Symbol[i],0,MODE_HIGH,  TOTAL_PERIOD-1,START));
        XLow_Price[i]=iLow(  XPair_Order_Symbol[i],0,iLowest( XPair_Order_Symbol[i],0,MODE_LOW,  TOTAL_PERIOD,  START));
      }
      if(XPair_Order_Type[i]=="SELL")
      {
        XHigh_Price[i]=iHigh(XPair_Order_Symbol[i],0,iHighest(XPair_Order_Symbol[i],0,MODE_HIGH,  TOTAL_PERIOD,  START));
        XLow_Price[i]=iLow(  XPair_Order_Symbol[i],0,iLowest( XPair_Order_Symbol[i],0,MODE_LOW,  TOTAL_PERIOD-1,START));
      }
     
      if(XPair_Order_Type[i]=="BUY")
      {
        Pips_On_Close[i]  =  MathPow(10,MarketInfo(XPair_Order_Symbol[i],MODE_DIGITS)-1)*(XPair_Exit_Price[i]-XPair_Entry_Price[i]);
        Pips_On_Worst[i]  =  MathPow(10,MarketInfo(XPair_Order_Symbol[i],MODE_DIGITS)-1)*(XLow_Price[i] -    XPair_Entry_Price[i]);
        Pips_On_Best[i]  =  MathPow(10,MarketInfo(XPair_Order_Symbol[i],MODE_DIGITS)-1)*(XHigh_Price[i]  -  XPair_Entry_Price[i]);
      }
      if(XPair_Order_Type[i]=="SELL")
      {
        Pips_On_Close[i]  =  MathPow(10,MarketInfo(XPair_Order_Symbol[i],MODE_DIGITS)-1)*(XPair_Entry_Price[i] - XPair_Exit_Price[i]);
        Pips_On_Worst[i]  =  MathPow(10,MarketInfo(XPair_Order_Symbol[i],MODE_DIGITS)-1)*(XPair_Entry_Price[i] - XHigh_Price[i]);
        Pips_On_Best[i]  =  MathPow(10,MarketInfo(XPair_Order_Symbol[i],MODE_DIGITS)-1)*(XPair_Entry_Price[i] - XLow_Price[i]);
      }
     
  }
////////////// 
  double PositionsPerPage=40.0;
  int TotalPages=MathCeil(TotalPositions/PositionsPerPage)+1;
 
  for(i=1;i<=TotalPages;i++)
  {
      if(i==PageNumber) color clrPage=clrRed;
      else                    clrPage=clrWhite;
      ObjectCreate(  "Page_Number_"+i, OBJ_LABEL,0,0,0);
      ObjectSet(    "Page_Number_"+i, OBJPROP_CORNER,0);
      ObjectSet(    "Page_Number_"+i, OBJPROP_XDISTANCE,80+20*i);
      ObjectSet(    "Page_Number_"+i, OBJPROP_YDISTANCE,30);
      ObjectSetText( "Page_Number_"+i, i,9,"Tahoma",clrPage);
  }
 
  for(i=0;i<28;i++)
  {
      if(pair_0[i]==pairs[i]) color clr=clrLime;
      else                          clr=clrWhite;
      ObjectCreate(  "B_"+StringSubstr(pairs[i],0,6)+"_"+i, OBJ_LABEL,0,0,0);
      ObjectSet(    "B_"+StringSubstr(pairs[i],0,6)+"_"+i, OBJPROP_CORNER,0);
      ObjectSet(    "B_"+StringSubstr(pairs[i],0,6)+"_"+i, OBJPROP_XDISTANCE,20);
      ObjectSet(    "B_"+StringSubstr(pairs[i],0,6)+"_"+i, OBJPROP_YDISTANCE,50+i*13);
      ObjectSetText( "B_"+StringSubstr(pairs[i],0,6)+"_"+i, StringSubstr(pairs[i],0,6),9,"Tahoma",clr);
//     
      ObjectCreate(  "A_"+StringSubstr(pairs[i],0,6)+"_"+i, OBJ_LABEL,0,0,0);
      ObjectSet(    "A_"+StringSubstr(pairs[i],0,6)+"_"+i, OBJPROP_CORNER,0);
      ObjectSet(    "A_"+StringSubstr(pairs[i],0,6)+"_"+i, OBJPROP_XDISTANCE,5);
      ObjectSet(    "A_"+StringSubstr(pairs[i],0,6)+"_"+i, OBJPROP_YDISTANCE,50+i*13);
      ObjectSetText( "A_"+StringSubstr(pairs[i],0,6)+"_"+i, CharToStr(110),9,"wingdings",clr);
//     
      ObjectCreate(  "C_"+StringSubstr(pairs[i],0,6)+"_"+i, OBJ_LABEL,0,0,0);
      ObjectSet(    "C_"+StringSubstr(pairs[i],0,6)+"_"+i, OBJPROP_CORNER,0);
      ObjectSet(    "C_"+StringSubstr(pairs[i],0,6)+"_"+i, OBJPROP_XDISTANCE,75);
      ObjectSet(    "C_"+StringSubstr(pairs[i],0,6)+"_"+i, OBJPROP_YDISTANCE,50+i*13);
      if(PairTotallPosition[i]+1>=1)
      ObjectSetText( "C_"+StringSubstr(pairs[i],0,6)+"_"+i, PairTotallPosition[i]+1,9,"TAHOMA",clrWhite);
      else
      ObjectSetText( "C_"+StringSubstr(pairs[i],0,6)+"_"+i,"-",9,"TAHOMA",clrRed);
  }
      Comment(TotalPositions,"  ",YY);

 
  int yy2[]={0,50,50,50,100,50,100,50,50,50,50,50,50,50,50,50,50,50,50,50,50,50,50,50,50,50};
  int AA=100;
  int rr;
  string Heading[]={"#","p#","CE","EntryTime","CX","ExitTime","Type","Symbol","Cprice","EntryP","ExitP","HEE","LEE","PPips","BestP","WorstP"};
  for(j=0;j<=15;j++)
  {
      rr=rr+yy2[j];
      ObjectCreate(  "Heading_"+j,OBJ_LABEL,0,0,0);
      ObjectSet(    "Heading_"+j,OBJPROP_CORNER,0);
      ObjectSet(    "Heading_"+j,OBJPROP_XDISTANCE, AA+rr);
      ObjectSet(    "Heading_"+j,OBJPROP_YDISTANCE, 50);
      ObjectSetText( "Heading_"+j,Heading[j],8,"Tahoma",clrWhiteSmoke);
  }
 
 
  if(PageNumber==1) int  SPage=0;
  else                    SPage=1;
  int FF=-1;
  if(SELECTOR=="POSITIONS")
  {
      for(i=(PageNumber-1)*40-SPage ; i<(PageNumber-1)*40+40-SPage ;i++)
      {
        if(i<=YY)
        {
              if(XPair_Order_Type[i]=="BUY" && XPair_Exit_Candle[i]>0) color posCLR=clrGreen;
        else  if(XPair_Order_Type[i]=="SELL"&& XPair_Exit_Candle[i]>0)      posCLR=clrOrange;
        else  if(XPair_Order_Type[i]=="BUY" && XPair_Exit_Candle[i]==0)      posCLR=clrLime;
        else  if(XPair_Order_Type[i]=="SELL"&& XPair_Exit_Candle[i]==0)      posCLR=clrRed;
        else                                                                posCLR=clrWhite;
        FF++;
        rr=0;
        j=0;
        rr=rr+yy2[j];
        ObjectCreate(  "Serial_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Serial_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Serial_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Serial_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Serial_"+FF, i ,8,"Tahoma",posCLR);
        j++;
        rr=rr+yy2[j];
        ObjectCreate(  "Pair_Position_Serial_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Pair_Position_Serial_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Pair_Position_Serial_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Pair_Position_Serial_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Pair_Position_Serial_"+FF, XPairPositionSerial[i] ,8,"Tahoma",posCLR);
        j++;
        rr=rr+yy2[j];
        ObjectCreate(  "Entry_Candle_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Entry_Candle_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Entry_Candle_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Entry_Candle_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Entry_Candle_"+FF, XPair_Entry_Candle[i] ,8,"Tahoma",posCLR);
        j++;
        rr=rr+yy2[j];
        ObjectCreate(  "Entry_Time_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Entry_Time_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Entry_Time_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Entry_Time_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Entry_Time_"+FF, TimeToStr(iTime(XPair_Order_Symbol[i],0,XPair_Entry_Candle[i])) ,8,"Tahoma",posCLR);
        j++;
        rr=rr+yy2[j];
        ObjectCreate(  "Exit_Candle_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Exit_Candle_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Exit_Candle_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Exit_Candle_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Exit_Candle_"+FF, XPair_Exit_Candle[i] ,8,"Tahoma",posCLR);
        j++;
        rr=rr+yy2[j];
        ObjectCreate(  "Exit_Time_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Exit_Time_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Exit_Time_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Exit_Time_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Exit_Time_"+FF,TimeToStr(iTime(XPair_Order_Symbol[i],0,XPair_Exit_Candle[i])),8,"Tahoma",posCLR);
        j++;
        rr=rr+yy2[j];
        ObjectCreate(  "Order_Type_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Order_Type_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Order_Type_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Order_Type_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Order_Type_"+FF, XPair_Order_Type[i] ,8,"Tahoma",posCLR);

        j++;
        rr=rr+yy2[j];
        ObjectCreate(  "Order_Symbol_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Order_Symbol_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Order_Symbol_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Order_Symbol_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Order_Symbol_"+FF, XPair_Order_Symbol[i] ,8,"Tahoma",posCLR);
        j++;
        rr=rr+yy2[j];
        ObjectCreate(  "Current_Price_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Current_Price_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Current_Price_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Current_Price_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Current_Price_"+FF, "CP" ,8,"Tahoma",posCLR);
        j++;
        rr=rr+yy2[j];
        ObjectCreate(  "Entry_Price_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Entry_Price_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Entry_Price_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Entry_Price_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Entry_Price_"+FF, XPair_Entry_Price[i] ,8,"Tahoma",posCLR);
        j++;
        rr=rr+yy2[j];
        ObjectCreate(  "Exit_Price_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Exit_Price_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Exit_Price_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Exit_Price_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Exit_Price_"+FF, XPair_Exit_Price[i] ,8,"Tahoma",posCLR);
        j++;
        rr=rr+yy2[j];
        ObjectCreate(  "High_Price_Since_Entry_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "High_Price_Since_Entry_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "High_Price_Since_Entry_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "High_Price_Since_Entry_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "High_Price_Since_Entry_"+FF, XHigh_Price[i] ,8,"Tahoma",posCLR);
        j++;
        rr=rr+yy2[j];
        ObjectCreate(  "Low_Price_Since_Entry_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Low_Price_Since_Entry_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Low_Price_Since_Entry_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Low_Price_Since_Entry_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Low_Price_Since_Entry_"+FF, XLow_Price[i] ,8,"Tahoma",posCLR);

        j++;
        rr=rr+yy2[j];
        if(Pips_On_Close[i]>=0) color clr1=clrLime;
        else if(Pips_On_Close[i]<0)  clr1=clrRed;
        ObjectCreate(  "Profit_or_Loss_in_Pips_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Profit_or_Loss_in_Pips_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Profit_or_Loss_in_Pips_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Profit_or_Loss_in_Pips_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Profit_or_Loss_in_Pips_"+FF, Pips_On_Close[i] ,8,"Tahoma",clr1);
        j++;
        rr=rr+yy2[j];
        if(Pips_On_Best[i]>=0) color clr2=clrLime;
        else if(Pips_On_Best[i]<0)  clr2=clrRed;
        ObjectCreate(  "Best_Profit_in_Pips_Since_Entry_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Best_Profit_in_Pips_Since_Entry_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Best_Profit_in_Pips_Since_Entry_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Best_Profit_in_Pips_Since_Entry_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Best_Profit_in_Pips_Since_Entry_"+FF, Pips_On_Best[i] ,8,"Tahoma",clr2);
        j++;
        rr=rr+yy2[j];
        if(Pips_On_Worst[i]>=0) color clr3=clrLime;
        else if(Pips_On_Worst[i]<0)  clr3=clrRed;
        ObjectCreate(  "Worst_Loss_in_Pips_Since_Entry_"+FF,OBJ_LABEL,0,0,0);
        ObjectSet(    "Worst_Loss_in_Pips_Since_Entry_"+FF,OBJPROP_CORNER,0);
        ObjectSet(    "Worst_Loss_in_Pips_Since_Entry_"+FF,OBJPROP_XDISTANCE, AA+rr);
        ObjectSet(    "Worst_Loss_in_Pips_Since_Entry_"+FF,OBJPROP_YDISTANCE, 65+11*(i-((PageNumber-1)*40-SPage)));
        ObjectSetText( "Worst_Loss_in_Pips_Since_Entry_"+FF, Pips_On_Worst[i] ,8,"Tahoma",clr3);
        }
      }
  }
  else if(SELECTOR=="HISTORY")
  {
 
 
  }
 
 
}//OnTimer
//////////////////////////////////////////////
string Object_Name;
//////////////////////////////////////////////
bool              BackOrForeground=false;
ENUM_CHART_MODE  ChartMode=CHART_LINE;
color            LineColor=ChartGetInteger(0,CHART_COLOR_BACKGROUND);

void OnChartEvent(const int id, const long &lparam, const double &dparam,  const string &sparam)
{
  if(id==CHARTEVENT_OBJECT_CLICK)
  {
//////////////////////////
      if(StringSubstr(sparam,0,12)=="Page_Number_") PageNumber=StrToInteger(ObjectDescription(sparam));

      if(sparam=="POSITIONS") SELECTOR="POSITIONS";
      if(sparam=="HISTORY")  SELECTOR="HISTORY"  ;

      if(sparam=="CHART_HIDE")
      {
        LineColor=ChartGetInteger(0,CHART_COLOR_BACKGROUND);
        ChartMode=CHART_LINE;
        BackOrForeground=false;
      }
      if(sparam=="CHART_CANDLES")
      {
        LineColor=clrOrange;
        ChartMode=CHART_CANDLES;
        BackOrForeground=true;
      }
      if(sparam=="CHART_LINE")
      {
        LineColor=clrOrange;
        ChartMode=CHART_LINE;
        BackOrForeground=true;
      }



      Object_Name=sparam;
      if(StringSubstr(sparam,0,2)=="A_")
      {
        int I1=StrToInteger(StringSubstr(sparam,9,StringLen(sparam)-9));
        pair_0[I1]="YYYXXX";
      }
      if(StringSubstr(sparam,0,2)=="B_")
      {
        int I2=StrToInteger(StringSubstr(sparam,9,StringLen(sparam)-9));
        pair_0[I2]=pairs[I2];;
      }
     
      if(sparam=="CANCEL_ALL")
      {
        for(int k=0;k<=27;k++) pair_0[k]="YYYXXX";
      }
     
      if(sparam=="ACTIVATE_ALL")
      {
        for( k=0;k<=27;k++) pair_0[k]=pairs[k];
      }

      if(sparam=="CLEAN_CHART")    ObjectsDeleteAll();
      if(sparam=="REMOVE_EXPERT")  {ObjectsDeleteAll();ExpertRemove();}
///////////////////////////////////////// 
  }
}

---

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

اقتباس:

---

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

نريدها هكذا!!
http://www12.0zz0.com/2017/07/16/08/975586829.png

---

تكمبل نواقص:
للتوضيح:
50 صفقة على صفحتين--40 صفقة لكل صفحة
وبالتالي الصفحة الاولى الصفات من #0 الى رقم #39
والصفحة الثانية الصفقات من #39 الى الصفقة #50 (المجموع 12 صفقة)
كان العرض بصورته السابقة سيعرض 40 صفقة في ص2 -- اذا لم يوجد قيم يضع اصفار او يحتفظ بقيم سابقة قد ننشأ بمجرد تغيير الفريم!

نريد مع اي تغيير للفترة او الفريم لايضع اي شيء اضافي اكثر من عدد الصفقات كما هو

سر الحل: ايضا في المتغير FF مع شرط اضافي ان لايعرض صفقات تتجاوز YY

-
-
-

سر الحل: ايضا في المتغير FF مع شرط اضافي ان لايعرض صفقات تتجاوز YY
-
-
فـ FF تعد من 0 وحتى 39 لو كانت الصفحة تحتمل 40 صفقة
بينما لو ذهبنا للصفحة-2 وكان متبقي 12 صفقة للعرض, نريد ان نضع شرط داخل لووب العرض يقول--توقف اذا رقم الصفقة i تجاوز عدد الصفقات الكلي YY
ثم ابدأ من قيمة FF+1 واحذف بقية الصفوف حتى الصف الاخير--تحسبا لوجود قيم سابقة او وضع قيم صفرية

http://www2.0zz0.com/2017/07/16/23/634797443.png

والوضع الطبيعي لـ FF هو العد من 0 وحتى 39
ولكن عند انتهاء الصفقات في الصفحة الاخيرة سيتكون قيمتها اقل من 39 ولنقل توقفت عند 21

اذن صفوف الصفقات من 22 وحتى 39 تحذف (نحذف الاشياء في الصفحة الاخيرة)

لووب يبدأ من FF+1 وحتى 39
http://www12.0zz0.com/2017/07/16/23/814862607.png

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

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

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

غير اشارة اصغر من الى اشارة اكبر من؟

-
-

http://www4.0zz0.com/2017/07/16/23/872715832.png

-
-


تخلصنا من هذه الفكرة ايضا--بالإمكان أن يشمل البرنامج كلا الحالتين التصاعدية والتنازلية,
من خلال شيئين--نضغط على احدهما للعرض التنازلي وعلى الاخر للعرض التصاعدي flip-flop

لاتنسى اغنية سابقة: ارسم في OnTimer وادعس في OnChartEvent
الاخيرة روح الاولى جسد
الاخيرة تبعث الحياة في الاولى!
دائما هي هكذا

على شادي: انت قلت ان اهم شيء معرفة شمعة الدخول وشمعة الخروج -- ليش الزيطة والزمبليطة للمتغير Pair_Entry_Price بـ بُعدين ثم بُعد ثم خلاط!!
ليش مانعامله معاملة متغير سعر الخروج-نؤجله للأخير!!
فيلسوف البادية--برافوا عليك!! فتك!
فطالما شمعة الدخول واسم الزوج للصفقة معروفة ممكن نؤجلة مع XPair_Exit_Price بحيث نستخدم XPair_Entry_Price دوان الحاجة اساسا ل Pair_Entry_Price