//+------------------------------------------------------------------+
//|
TrendMeLeaveMe.mq4 |
//|
Copyright
?2006, Eng. Waddah Attar |
//|
waddahattar@hotmail.com |
//+------------------------------------------------------------------+
#property copyright "Copyright ?2007,Eng Waddah Attar"
#property link
"waddahattar@hotmail.com"
//----
extern string BuyStop_Trend_Info =
"_______________________";
extern string BuyStop_TrendName = "buystop";
extern int
BuyStop_TakeProfit = 50;
extern int
BuyStop_StopLoss = 30;
extern double BuyStop_Lot = 0.01;
extern int
BuyStop_StepUpper = 10;
extern int
BuyStop_StepLower = 50;
extern string SellStop_Trend_Info =
"_______________________";
extern string SellStop_TrendName = "sellstop";
extern int
SellStop_TakeProfit = 50;
extern int
SellStop_StopLoss = 30;
extern double SellStop_Lot = 0.01;
extern int
SellStop_StepUpper = 50;
extern int
SellStop_StepLower = 10;
//------
int MagicBuyStop = 1101;
int MagicSellStop = 1102;
int glbOrderType;
int glbOrderTicket;
//+------------------------------------------------------------------+
//|
|
//+------------------------------------------------------------------+
int init()
{
Comment("TrendMeLeaveMe
by Waddah Attar");
return(0);
}
//+------------------------------------------------------------------+
//|
|
//+------------------------------------------------------------------+
int deinit()
{
Comment("");
return(0);
}
//+------------------------------------------------------------------+
//|
|
//+------------------------------------------------------------------+
int start()
{
double vH, vL, vM, sl,
tp;
double
rsisjp=iRSI(NULL,0,14,PRICE_CLOSE,0);
Print("指标rsi:",rsisjp);
double
kdsjp=iStochastic(NULL,0,5,3,3,MODE_SMA,0,MODE_SIGNAL,0);
Print("指标kd:",kdsjp);
int
SellStop_Lot_Sjp=0;
int
BuyStop_Lot_Sjp=0;
if(ObjectFind(BuyStop_TrendName) == 0)
{
SetObject("High" + BuyStop_TrendName,
ObjectGet(BuyStop_TrendName,
OBJPROP_TIME1),
ObjectGet(BuyStop_TrendName, OBJPROP_PRICE1) +
BuyStop_StepUpper*Point,
ObjectGet(BuyStop_TrendName,
OBJPROP_TIME2),
ObjectGet(BuyStop_TrendName, OBJPROP_PRICE2) +
BuyStop_StepUpper*Point,
ObjectGet(BuyStop_TrendName,
OBJPROP_COLOR));
SetObject("Low" + BuyStop_TrendName,
ObjectGet(BuyStop_TrendName,
OBJPROP_TIME1),
ObjectGet(BuyStop_TrendName, OBJPROP_PRICE1) -
BuyStop_StepLower*Point,
ObjectGet(BuyStop_TrendName,
OBJPROP_TIME2),
ObjectGet(BuyStop_TrendName, OBJPROP_PRICE2) -
BuyStop_StepLower*Point,
ObjectGet(BuyStop_TrendName,
OBJPROP_COLOR));
vH =
NormalizeDouble(ObjectGetValueByShift("High"+BuyStop_TrendName,0),Digits);
vM =
NormalizeDouble(ObjectGetValueByShift(BuyStop_TrendName,0),Digits);
vL =
NormalizeDouble(ObjectGetValueByShift("Low"+BuyStop_TrendName,0),Digits);
sl = vH - BuyStop_StopLoss*Point;
tp = vH + BuyStop_TakeProfit*Point;
if(Ask <= vM && Ask >= vL
&& OrderFind(MagicBuyStop) == false)
if(OrderSend(Symbol(), OP_BUYSTOP, BuyStop_Lot,
vH, 3, sl, tp,
"", MagicBuyStop, 0, Green) < 0)
Print("Err (", GetLastError(),
") Open BuyStop Price= ", vH, " SL= ",
sl," TP= ", tp);
if(Ask <= vM && Ask >= vL
&& OrderFind(MagicBuyStop) == true
&&
glbOrderType ==
OP_BUYSTOP)
{
OrderSelect(glbOrderTicket, SELECT_BY_TICKET,
MODE_TRADES);
if(vH !=
OrderOpenPrice())
if(OrderModify(glbOrderTicket,
vH, sl, tp, 0, Green) == false)
Print("Err (", GetLastError(), ") Modify BuyStop
Price= ", vH,
" SL= ", sl, " TP= ", tp);
}
}
if(ObjectFind(SellStop_TrendName) == 0)
{
SetObject("High" + SellStop_TrendName,
ObjectGet(SellStop_TrendName,
OBJPROP_TIME1),
ObjectGet(SellStop_TrendName, OBJPROP_PRICE1) +
SellStop_StepUpper*Point,
ObjectGet(SellStop_TrendName,
OBJPROP_TIME2),
ObjectGet(SellStop_TrendName, OBJPROP_PRICE2) +
SellStop_StepUpper*Point,
ObjectGet(SellStop_TrendName,
OBJPROP_COLOR));
SetObject("Low" + SellStop_TrendName,
ObjectGet(SellStop_TrendName, OBJPROP_TIME1),
ObjectGet(SellStop_TrendName, OBJPROP_PRICE1) -
SellStop_StepLower*Point,
ObjectGet(SellStop_TrendName,
OBJPROP_TIME2),
ObjectGet(SellStop_TrendName, OBJPROP_PRICE2) -
SellStop_StepLower*Point,
ObjectGet(SellStop_TrendName,
OBJPROP_COLOR));
vH = NormalizeDouble(ObjectGetValueByShift("High"
+ SellStop_TrendName, 0), Digits);
vM =
NormalizeDouble(ObjectGetValueByShift(SellStop_TrendName, 0),
Digits);
vL = NormalizeDouble(ObjectGetValueByShift("Low"
+SellStop_TrendName, 0), Digits);
sl = vL + SellStop_StopLoss*Point;
tp = vL - SellStop_TakeProfit*Point;
//突破(趋势)损卖量
if((Bid >= vM && Bid <= vH
&& OrderFind(MagicSellStop) == false)||(Bid >= vM
&& Bid <= vH && OrderFind(MagicSellStop) == true
&&
glbOrderType ==
OP_SELLSTOP))
SellStop_Lot_Sjp=0;
if (rsisjp>50 ||
kdsjp>65)
SellStop_Lot_Sjp=SellStop_Lot;
if (rsisjp>65 ||
kdsjp>75)
SellStop_Lot_Sjp=SellStop_Lot*2;
if (rsisjp>75 ||
kdsjp>85)
SellStop_Lot_Sjp=SellStop_Lot*3;
//逆势(通道)限买量
//
BuyStop_Lot_Sjp=0;
//
if (rsisjp<30 ||
kdsjp<20)
BuyStop_Lot_Sjp=SellStop_Lot;
//
if (rsisjp<20 ||
kdsjp<10)
BuyStop_Lot_Sjp=SellStop_Lot*2;
//执行损卖
if((rsisjp>50 || kdsjp>65) && Bid
>= vM && Bid <= vH &&
OrderFind(MagicSellStop) == false)
if(OrderSend(Symbol(), OP_SELLSTOP,
SellStop_Lot_Sjp, vL, 3, sl, tp, "",
MagicSellStop, 0, Red) < 0)
Print("Err (", GetLastError(),
") Open SellStop Price= ", vL, " SL= ", sl,
" TP= ", tp);
if((rsisjp>50 || kdsjp>65) && Bid
>= vM && Bid <= vH &&
OrderFind(MagicSellStop) == true &&
glbOrderType ==
OP_SELLSTOP)
{
OrderSelect(glbOrderTicket, SELECT_BY_TICKET,
MODE_TRADES);
if(vL !=
OrderOpenPrice())
if(OrderModify(glbOrderTicket,
vL, sl, tp, 0, Red) == false)
Print("Err (", GetLastError(), ") Modify Sell
Price= ", vL, " SL= ", sl,
" TP= ", tp);
}
//执行限买
//
-------
}
return(0);
}
//+------------------------------------------------------------------+
//|
|
//+------------自定义函数OrderFind(int
Magic)------------------------------------------------------+
bool OrderFind(int Magic)
{
glbOrderType = -1;
glbOrderTicket =
-1;
int total =
OrdersTotal();
bool res = false;
for(int cnt = 0 ; cnt
< total ; cnt++)
{
OrderSelect(cnt, SELECT_BY_POS,
MODE_TRADES);
if(OrderMagicNumber() == Magic &&
OrderSymbol() == Symbol())
{
glbOrderType = OrderType();
glbOrderTicket = OrderTicket();
res =
true;
}
}
return(res);
}
//+------------------------------------------------------------------+
//|
|
//+------------------------------------------------------------------+
void SetObject(string name,datetime T1,double P1,datetime
T2,double P2,color clr)
{
if(ObjectFind(name) ==
-1)
{
ObjectCreate(name, OBJ_TREND, 0, T1, P1, T2,
P2);
ObjectSet(name, OBJPROP_COLOR, clr);
ObjectSet(name, OBJPROP_STYLE, STYLE_DOT);
}
else
{
ObjectSet(name, OBJPROP_TIME1, T1);
ObjectSet(name, OBJPROP_PRICE1, P1);
ObjectSet(name, OBJPROP_TIME2, T2);
ObjectSet(name, OBJPROP_PRICE2, P2);
ObjectSet(name, OBJPROP_COLOR, clr);
ObjectSet(name, OBJPROP_STYLE, STYLE_DOT);
}
}
//+------------------------------------------------------------------+