Printable View
هل هذه الدالة صحيحة
هي تحسب عدد الاوامر سل ستوب SELL Stop
واذا كان لا ما هي الداالة الصحيحةكود PHP:// number of pending sell stop
int ordersSellStop(){
int cnt=0;
for(int i =0;i<OrdersTotal();i++){
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)){
if(OrderSymbol()==Symbol() && magic==OrderMagicNumber()||OrderMagicNumber()==magic&&OrderType() == OP_SELLSTOP){
cnt++;
}
}
}
return(cnt);
}
وشكرا لكم مسبقا
وكيف اجعل الاكسبيرت يعلق فقط صفقة واحدة الا اذا تم تفعيل المعلقة او لم يجد صفقات سل ستوب معلقة ان يقوم بتعليق واحدة ؟؟اقتباس:
المشاركة الأصلية كتبت بواسطة Learn4X
وبنفس الوقت اريده ان يقوم بالتحقق من هذا الشرط كل لحظة او(يجعل هذا الشرط متحققا على طول)
وشكرا مرة اخرى
اقتباس:
المشاركة الأصلية كتبت بواسطة Learn4X
[/PHP]كود PHP:[PHP]
int ordersSellStop()
{
int cnt=0;
for(int i =0;i<OrdersTotal();i++)
{
int type=OrderType();
OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
if(type==OP_SELLSTOP)
{
cnt++ ;
}
}
return(cnt);
}
لما اغير في اكوادك ولكن بدل من ان يقارن الماجيك نمبر ونوع العملة جعلته بسيط للتوضيح فقط لك
فقط ضعه في اسكريبت وافتح عدد من العقود المعلقة باي استوب وسيل استوب وسيل ليميت وباي ليمت وضع استدعاي للدالة في comment
وراقب النتيجة على الشارت وغير ما تريد بشيئ جديد حتى تبني ملاحظاتك وتتوصل الى شيئ جديد
لكن اعتقد ان الاكواد التي انت افقتها مأخوذه من اكسبيرت وتريد التأكد منها صحيح ؟ فان كان صحيح فلا تعتمد على تفكير غيرك حاول ان تبني برنامج بنفسك دون أخذ ولصق من أكواد الاخرين لان المبرمج لابد ان يبني برنامجة معتمدا على تفكيره
هذه دالة لتعديل هدف وستوب آخر صفقة شراء وقس عليها في البيع ، وضعت لك علامة ؟؟؟ هنا تضع مايناسب اكسبيرتك .اقتباس:
المشاركة الأصلية كتبت بواسطة توفيق
وطبعا في المتغيرات في بداية الأكسبيرت تكون وضعت المتغيرينكود PHP:void BuyOrderModify()
{
for (int i=OrdersTotal()-1; i >= 0; i--)
if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
{
if (OrderType() == OP_BUY && OrderSymbol() == Symbol() && OrderMagicNumber() == ?????)
{
double price = Ask;
if (true == false)
{
price = OrderOpenPrice();
}
bool ret = OrderModify(OrderTicket(), OrderOpenPrice(), price - BuyStoploss*?????, price + BuyTakeprofit*????, 0, White);
if (ret == false)
Print("OrderModify() error - ", ErrorDescription(GetLastError()));
}
}
}
وفي دالة ستارت تضع استدعاء دالة مودفايكود PHP:extern int BuyStoploss = 20;
extern int BuyTakeprofit = 30;
ستحتاج رسائل الأخطاء و لتشغيلها ستضيف في بداية الأكسبيرت كود تعيين الخطاءكود PHP:BuyOrderModify();
كود PHP:#include <stdlib.mqh>
#include <WinUser32.mqh>
شكرا جزيلا لكاقتباس:
المشاركة الأصلية كتبت بواسطة wadi2012
انا بالفعل اخذت الكود من اكسبيرت اخر
وحاليا اقوم بالعمل على اول اكسبيرت ابرمجه
بالنسبة لفحص شرط وجود سيل ستوب ينتظر حتى يتفعل او يغلق لكي يتم تعليق امر جديد
هل يكفي وضع شرط التحقق في دالة start لكي يبقى الشرط متحققا ام ان هناك
دالة من نوع تكراري ؟
وشكرا جزيلا لك مرة أخرى
وجزاك الله كل خير
الدالة سليمة وكان بأمكانك استخدامها للبيع والشراء بدل تثبيتها سل ستوب ، فقط ينقصك اضافة الكود الى الشروط التي انت وضعتها لتعليق الأوردر وتضعه في دالة ستارت والكود هو :اقتباس:
المشاركة الأصلية كتبت بواسطة Learn4X
وتضع باقي شروطك في مكان الأستفهام ؟؟؟؟؟كود PHP:if(ordersSellStop()<1) && ?????
اقتباس:
المشاركة الأصلية كتبت بواسطة Jmeel
شكرا جزيلا لك
بارك الله فيك
قمت بعمل دالة
تقوم بالتالي
ارجاع قيمة سعر الافتتاح للصفقة للعملة الحالية المفتوحة سواء كانت شراء او بيع
الرجاء ارشادي الى ما الخطأ فيها ؟كود PHP:double openedPosPrice(){
double openprice;
if (ordersCount(OP_BUY) > 0 || ordersCount(OP_SELL)> 0){
for(int i =0;i<OrdersTotal();i++){
OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
if(OrderSymbol()==Symbol() &&OrderType()<2){
openprice = OrderOpenPrice();
}
}
return(openprice);
}
}
وشكرا لكم
لا يوجد خطأ الداله صحيحهاقتباس:
المشاركة الأصلية كتبت بواسطة Learn4X
إستخدم الأمر coment أو print لعرض أسعار الخطوط على الشارتاقتباس:
المشاركة الأصلية كتبت بواسطة kira-h
حتى تتأكد من أن الخطأ ليس من كود إستدعاء قيم المؤشر ثم تابع باقي أجزاء الكودكود PHP:for( i=1;i<=20;i++)
{
double LineL=ObjectGet("Li"+i,OBJPROP_PRICE1);
Print(LineL);
بالنسبه لطريقة إستدعاء الخطوط فهي صحيحه لا توجد بها مشاكل لذلك غالبا الخطأ في جزء آخر من الكود
اقتباس:
المشاركة الأصلية كتبت بواسطة MR.dollar
بارك الله فيك أستاذي الكريم
للأسف لم تظهر أسعار الخطوط على الشارت
والأسعار بالباكتيست تظهر فقط لمرة واحدة وهي خاصة بالمؤشر
كل ما أريده من الاكسبيرت أن يضع أمرين BuyStop و SellStop بالخط بمجرد أن يلمسه السعر وهكذا في كل ملامسة لأي خط من خطوط المؤشر
المشكلة أنه يضع فقط بخط الوسط N أما باقي الخطوط لا يضع الأمرين
مؤشر الخطوط بالمرفقات للمراجعة :asvc:
كود لجزء من الشروط لخطوط H
ثم دالة الشراء والبيع المعلقينكود PHP:void OncePerBar()
{
if (BarTime < Time[0])
{
// we have a new bar opened
BarTime = Time[0]; // keep the new bar open time
TechnicalAnalysis();
}
}
void TechnicalAnalysis()
{
for(int i=1;i<=20;i++)
{
double LineH=ObjectGet("Hi"+i,OBJPROP_PRICE1);
Print(LineH);
if ((Open[1]<=LineH&&Close[1]>=LineH) || (Open[1]>=LineH&&Close[1]<=LineH))
{
LimitOpenOrders();
}
}
}
void LimitOpenOrders()
{
int count = 0;
for (int i=OrdersTotal()-1; i >= 0; i--)
if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
{
if (OrderSymbol() == Symbol())
if (OrderMagicNumber() == MagicNo)
{
count++;
}
}
else
{
Print("OrderSend() error - ", ErrorDescription(GetLastError()));
}
if (count < OpenOrdersLimit)
{
IfOrderDoesNotExist1();
IfOrderDoesNotExist2();
}
}
void IfOrderDoesNotExist1()
{
bool exists = false;
for (int i=OrdersTotal()-1; i >= 0; i--)
if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
{
if (OrderType() == OP_SELL && OrderSymbol() == Symbol() && OrderMagicNumber() != MagicNo)
{
exists = true;
}
}
else
{
Print("OrderSelect() error - ", ErrorDescription(GetLastError()));
}
if (exists == false)
{
SellOrderH();
}
}
void IfOrderDoesNotExist2()
{
bool exists = false;
for (int i=OrdersTotal()-1; i >= 0; i--)
if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
{
if (OrderType() == OP_BUY && OrderSymbol() == Symbol() && OrderMagicNumber() != MagicNo)
{
exists = true;
}
}
else
{
Print("OrderSelect() error - ", ErrorDescription(GetLastError()));
}
if (exists == false)
{
BuyOrderH();
}
}
أيضا هل الدالة صحيحة لاستخراج الربح الاجمالي والخسارة الاجمالية بالنقاط للصفقات المفعلة ؟؟؟كود PHP:void BuyOrderH()
{
for( int i=1;i<=20;i++)
{
double LineH=ObjectGet("Hi"+i,OBJPROP_PRICE1);
Print(LineH);
double price = (NormalizeDouble(LineH, NDigits) + (SellStep*PipValue*Point));
double SL = price - Stoploss*PipValue*Point;
if (Stoploss == 0) SL = 0;
double TP = price + Takeprofit*PipValue*Point;
if (Takeprofit == 0) TP = 0;
int Tries;
int ticket = -1;
if (ECNBroker)
{
ticket = OrderSend(Symbol(), OP_BUYSTOP, Lots, price, Slippage, 0, 0, "Kira-h", MagicNo, 0, Blue);
if(ticket>-1 && Tries<10)
{
OrderSelect(ticket, SELECT_BY_TICKET);
OrderModify(ticket, OrderOpenPrice(), SL, TP, 0, Blue);
Tries++;Sleep(1000);
}
}
else
ticket = OrderSend(Symbol(), OP_BUYSTOP, Lots, price, Slippage, SL, TP, "Kira-h", MagicNo, 0, Blue);
}
}
void SellOrderH()
{
for( int i=1;i<=20;i++)
{
double LineH=ObjectGet("Hi"+i,OBJPROP_PRICE1);
Print(LineH);
double price = (NormalizeDouble(LineH, NDigits) - (SellStep*PipValue*Point));
double SL = price + Stoploss*PipValue*Point;
if (Stoploss == 0) SL = 0;
double TP = price - Takeprofit*PipValue*Point;
if (Takeprofit == 0) TP = 0;
int Tries;
int ticket = -1;
if (ECNBroker)
{
ticket = OrderSend(Symbol(), OP_SELLSTOP, Lots, price, Slippage, 0, 0, "Kira-h", MagicNo, 0, Red);
if(ticket>-1 && Tries<10)
{
OrderSelect(ticket, SELECT_BY_TICKET);
OrderModify(ticket, OrderOpenPrice(), SL, TP, 0, Blue);
Tries++;Sleep(1000);
}
}
else
ticket = OrderSend(Symbol(), OP_SELLSTOP, Lots, Bid, Slippage, SL, TP, "Kira-h", MagicNo, 0, Red);
}
}
كود PHP:extern int TotalProfitPips=30;
extern int TotalLossPips=99999;
بانتظارك أستاذي الغالي :eh_s(7):كود PHP:void CheckPipsProfit()
{
double TT,W;
for(int i=OrdersTotal()-1; i >= 0; i--)
{
OrderSelect(i, SELECT_BY_POS,MODE_TRADES);
{
if(OrderType()==OP_BUY)
{
W=((MarketInfo(OrderSymbol(),MODE_BID)-OrderOpenPrice())/MarketInfo(OrderSymbol(),MODE_POINT));
if (Point==0.00001 || Point==0.001) W=((MarketInfo(OrderSymbol(),MODE_BID)-OrderOpenPrice())/MarketInfo(OrderSymbol(),MODE_POINT))/10;
TT=TT+W;
}
else if(OrderType()==OP_SELL)
{
W=((OrderOpenPrice()-MarketInfo(OrderSymbol(),MODE_ASK))/MarketInfo(OrderSymbol(),MODE_POINT));
if (Point==0.00001 || Point==0.001) W=((OrderOpenPrice()-MarketInfo(OrderSymbol(),MODE_ASK))/MarketInfo(OrderSymbol(),MODE_POINT))/10;
TT=TT+W;
}
}
}
Comment("Profit= ",TT);
while(OrdersTotal()>0 && ((TT>=TotalProfitPips) || (TT<=(TotalLossPips*(-1)))))
{
for(i=OrdersTotal()-1; i >= 0; i--)
{
OrderSelect(i, SELECT_BY_POS,MODE_TRADES);
if (OrderType()==OP_BUY) OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(),MODE_BID),Slippage);
else if (OrderType()==OP_SELL) OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(),MODE_ASK),Slippage);
else OrderDelete(OrderTicket());
}
}
}
السلام عليكم ورحمة الله
كنت حابب اعرف الكود البرمجي اللازم لعمل اكسبرت من اختراق عدد 2 مؤشر بولينجر كالتالي :
أن يكون السعر قد اخترق مؤشر البولينجر الأول الخط الأعلي له
عند ملامسة السعر للخط الأعلي لمؤشر البولينجر الثاني والذي يكون دائما أعلى المؤشر الأول علشان Deviation أكبر منه لان الأول 2 والثاني 3 الدخول بيع شرط أن يكون مؤشر cci اعلىمن 100
عند ملامسة السعر للخط السفلي لمؤشر البولينجر الثاني والذي يكون دائما أسفل المؤشر الأول علشان Deviation أكبر منه لان الأول 2 والثاني 3 الدخول شراء شرط مؤشر cci أقل من - 100
عدم فتح أي صفقات لنفس العملة طالما توجد صفقات فعالة
يا ريت من الأخوة المبرمجين المساعدده في كيفية التعامل مع المؤشرات وتفعيل صفقات البيع والشراء من خلال اختراق أو ملامسة أحد هذه الخطوط للمؤشراء سواء أكانت مؤشرات داخل الميتاتريدر أو مؤشر خارجي يرسم خطوط
جزاكم الله خيرا
السلام عليكم
كيف ازيل الكود الذى يجعل الاكسبيرت يتعرف على نوع المنصه اذا كانت خماسية او رباعية بحيث استطيع كتابه هدف اقل من النقطة الواحدة
مثلا انا كتبت فى الاكسبيرت ان الهدف نقطة فو الاكسبيرت لايتعرف على نوع المنصة ستحسب على منصة رباعية بنقطة اما على الخماسية واحد من عشره من النقطة وهذا هو ما اريد
والسؤال مره اخرى هو كيف ازيل او اين يوجد او ما هو الكود الذى يجعل الاكسبيرت يتعرف على نوع المنصة اذا كانت رباعية او خماسية
وشكرا
الاكسبيرت الذى تطلبه موجود بالفعل اعلمنى اذا اردته فارفقه لكاقتباس:
المشاركة الأصلية كتبت بواسطة waleedgadelmola
يا ريت يا أخي فضلا ليس أمرااقتباس:
المشاركة الأصلية كتبت بواسطة العوامى