هدية للاخ العزيز احمد عزام ثم لكم جميعا
يحفظ كخبير ويطبق على اي تشارت
خاص بالعملات الثمان والعشرين الاشهر
[PHP]
string pairs[] = { "EURGBP",
"EURAUD","GBPAUD",
"EURNZD","GBPNZD","AUDNZD",
"EURUSD","GBPUSD","AUDUSD","NZDUSD",
"EURCAD","GBPCAD","AUDCAD","NZDCAD","USDCAD",
"EURCHF","GBPCHF","AUDCHF","NZDCHF","USDCHF","CADC HF",
"EURJPY","GBPJPY","AUDJPY","NZDJPY","USDJPY","CADJ PY","CHFJPY"};
int xD=20;
int yD=15;
int xO=30;
int yO=10;
double spread[]={1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000,
1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000,
1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000};
double min[]={1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000,
1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000,
1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000};
double max[]={1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000,
1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000,
1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000};
double spreadmin[]={1000, 1000, 1000, 1000, 1000, 1000, 1000, 1000,
1000, 1000, 1000, 1000, 1000, 1000, 1000, 1000,
1000, 1000, 1000, 1000, 1000, 1000, 1000, 1000,
1000, 1000, 1000, 1000};
double spreadmax[]={1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000,
1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000,
1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000, 1.00000};
double x;
string y;
string yy[]={"", "", "", "", "", "", "", "", "", "","", "", "", "", "", "", "", "", "", "","", "", "", "", "", "", "", ""};
int start()
{ int N=ArraySize(pairs);
for(int i=0;i<N;i++)
{
spread[i]=MarketInfo(pairs[i],MODE_SPREAD);
}
for(i=0;i<N;i++)
{
min[i]=MarketInfo(pairs[i],MODE_SPREAD);
if(spreadmin[i]>min[i])
spreadmin[i]=min[i];
}
for( i=0;i<N;i++)
{
max[i]=MarketInfo(pairs[i],MODE_SPREAD);
if(spreadmax[i]<max[i])
spreadmax[i]=max[i];
}
for( i=0;i<N;i++)
for(int j=i+1;j<N;j++)
{//Alert(spread[j]," ",spread[i]);
if(spreadmin[j]<spreadmin[i]){
x=spread[i];
spread[i]=spread[j];
spread[j]=x;
y=pairs[i];
pairs[i]=pairs[j];
pairs[j]=y;
x=spreadmin[i];
spreadmin[i]=spreadmin[j];
spreadmin[j]=x;
x=spreadmax[i];
spreadmax[i]=spreadmax[j];
spreadmax[j]=x;
}
}
for(i=0;i<=N;i++)
{
if(i==0){
ObjectCreate("aa",OBJ_LABEL,0,0,0);
ObjectSet("aa",OBJPROP_CORNER,0);
ObjectSet("aa",OBJPROP_XDISTANCE,xO);
ObjectSet("aa",OBJPROP_YDISTANCE,i*yD+yO);
ObjectSetText("aa","Symbol Spread Min Max Mohammed Safar AlOtaibi",12,"Times New Roman",Violet); }
else{
ObjectCreate("a"+i,OBJ_LABEL,0,0,0);
ObjectSet("a"+i,OBJPROP_CORNER,0);
ObjectSet("a"+i,OBJPROP_XDISTANCE,xO);
ObjectSet("a"+i,OBJPROP_YDISTANCE,i*yD+yO);
ObjectSetText("a"+i,pairs[i-1],12,"Times New Roman",Yellow);
ObjectCreate("b"+i,OBJ_LABEL,0,0,0);
ObjectSet("b"+i,OBJPROP_CORNER,0);
ObjectSet("b"+i,OBJPROP_XDISTANCE,xO+85);
ObjectSet("b"+i,OBJPROP_YDISTANCE,i*yD+yO);
ObjectSetText("b"+i,DoubleToStr(spread[i-1]/10,1),12,"Times New Roman",White);
ObjectCreate("c"+i,OBJ_LABEL,0,0,0);
ObjectSet("c"+i,OBJPROP_CORNER,0);
ObjectSet("c"+i,OBJPROP_XDISTANCE,xO+135);
ObjectSet("c"+i,OBJPROP_YDISTANCE,i*yD+yO);
ObjectSetText("c"+i,DoubleToStr(spreadmin[i-1]/10,1),12,"Times New Roman",Lime);
ObjectCreate("d"+i,OBJ_LABEL,0,0,0);
ObjectSet("d"+i,OBJPROP_CORNER,0);
ObjectSet("d"+i,OBJPROP_XDISTANCE,xO+175);
ObjectSet("d"+i,OBJPROP_YDISTANCE,i*yD+yO);
ObjectSetText("d"+i,DoubleToStr(spreadmax[i-1]/10,1),12,"Times New Roman",Red); }
}
return(0);
}
[/PHP]