- //+------------------------------------------------------------------+
- //| Designed by OKwh, China |
- //| Copyright 2007, OKwh Dxdcn |
- //| http://blog.sina.com.cn/FXTrade |
- //+------------------------------------------------------------------+
- #property copyright "Copyright 2007 , Dxd, China."
- #property link "http://blog.sina.com.cn/FXTrade , http://www.mql4.com/users/DxdCn"
- #define MAGICMA 200610011231
- //+------------------------------------------------------------------+
- //| 注意没有指标文件那些property |
- //+------------------------------------------------------------------+
- extern int whichmethod = 1; //1~4 种下单方式 1 仅开仓, 2 有止损无止赢, 3 有止赢无止损, 4 有止赢也有止损
- extern double TakeProfit = 100; //止赢点数
- extern double StopLoss = 20; //止损点数
- extern double MaximumRisk = 0.3; //资金控制,控制下单量
- extern int TP =100;
- extern int maxOpen = 3; //最多开仓次数限制
- extern double maxLots = 0.1; //最多单仓持仓量限制
- extern int bb = 0; //非零就允许跟踪止赢
- int i, p2, xxx,p1, res;
- double Lots;
- datetime lasttime; //时间控制, 仅当一个时间周期完成才检查条件
- int init() //初始化
- {
- Lots = 1;
- lasttime = NULL;
- return(0);
- }
- int deinit() { return(0); } //反初始化
- //主程序
- int start()
- {
- CheckForOpen(); //开仓 平仓 条件检查 和操作
- if (bb>0) CTP(); //跟踪止赢
- return(0);
- }
- //+------下面是各子程序--------------------------------------------+
- double LotsOptimized() //确定下单量,开仓调用 资金控制
- {
- double lot=Lots;
- int orders=HistoryTotal(); // history orders total
- int losses=0; // number of losses orders without a break
- //MarketInfo(Symbol(),MODE_MINLOT); 相关信息
- //MarketInfo(Symbol(),MODE_MAXLOT);
- //MarketInfo(Symbol(),MODE_LOTSTEP);
- lot=NormalizeDouble(MaximumRisk * AccountBalance()/AccountLeverage(),1); //开仓量计算
- if(lot<0.1) lot=0.1;
- if(lot>maxLots) lot=maxLots;
- return(lot);
- }
-
- //平仓持有的买单
- void CloseBuy()
- {
- if (OrdersTotal( ) > 0 )
- {
- for(i=OrdersTotal()-1;i>=0;i--)
- {
- if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false) break;
- if(OrderType()==OP_BUY)
- {
- OrderClose(OrderTicket(),OrderLots(),Bid,3,White);
- Sleep(5000);
- }
- }
- }
- }
- //平仓持有的卖单
- void CloseSell()
- {
- if (OrdersTotal( ) > 0 )
- {
- for(i=OrdersTotal()-1;i>=0;i--)
- {
- if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false) break;
- if(OrderType()==OP_SELL)
- {
- OrderClose(OrderTicket(),OrderLots(),Ask,3,White);
- Sleep(5000);
- }
- }
- }
- }
- //判断是否买或卖或平仓
- int buyorsell() //在这个函数计算设置你的交易信号 这里使用MACD 和MA 做例子
- {
-
- if()
- return (1); // 买
- if()
- return (-1); // 卖
- return (0); //不交易 }
- }
- int nowbuyorsell = 0;
- void CheckForOpen()
- {
- if (Time[0] == lasttime ) return; //每时间周期检查一次 时间控制
- lasttime = Time[0];
- nowbuyorsell = buyorsell(); //获取买卖信号
- if (nowbuyorsell == 1) //买 先结束已卖的
- CloseSell();
- if (nowbuyorsell == -1) //卖 先结束已买的
- CloseBuy();
- if (OrdersTotal( ) >= maxOpen) return ;
- //如果已持有开仓次数达到最大,不做
- if (nowbuyorsell==0) return; //不交易
- TradeOK(); //去下单交易
- }
- void TradeOK() //去下单交易
- {
- int error ;
- if (nowbuyorsell == 1) //买
- {
- switch (whichmethod)
- {
- case 1: res=OrderSend(Symbol(),OP_BUY,LotsOptimized(),Ask,3,0,0,"",MAGICMA,0,Blue);break;
- case 2: res=OrderSend(Symbol(),OP_BUY,LotsOptimized(),Ask,3,Ask-StopLoss*Point,0,"",MAGICMA,0,Blue); break;
- case 3: res=OrderSend(Symbol(),OP_BUY,LotsOptimized(),Ask,3,0,Ask+TakeProfit*Point,"",MAGICMA,0,Blue);break;
- case 4: res=OrderSend(Symbol(),OP_BUY,LotsOptimized(),Ask,3,Ask-StopLoss*Point,Ask+TakeProfit*Point,"",MAGICMA,0,Blue);break;
- default : res=OrderSend(Symbol(),OP_BUY,LotsOptimized(),Ask,3,0,0,"",MAGICMA,0,Blue);break;
- }
- if (res <=0)
- {
- error=GetLastError();
- if(error==134)Print("Received 134 Error after OrderSend() !! "); // not enough money
- if(error==135) RefreshRates(); // prices have changed
- }
- Sleep(5000);
- return ;
- }
- if (nowbuyorsell == -1) //卖
- {
- switch (whichmethod)
- {
- case 1: res=OrderSend(Symbol(),OP_SELL,LotsOptimized(),Bid,3,0,0,"",MAGICMA,0,Red); break;
- case 2: res=OrderSend(Symbol(),OP_SELL,LotsOptimized(),Bid,3,Bid+StopLoss*Point,0,"",MAGICMA,0,Red); break;
- case 3: res=OrderSend(Symbol(),OP_SELL,LotsOptimized(),Bid,3,0,Bid-TakeProfit*Point,"",MAGICMA,0,Red); break;
- case 4: res=OrderSend(Symbol(),OP_SELL,LotsOptimized(),Bid,3,Bid+StopLoss*Point,Bid-TakeProfit*Point,"",MAGICMA,0,Red); break;
- default : res=OrderSend(Symbol(),OP_SELL,LotsOptimized(),Bid,3,0,0,"",MAGICMA,0,Red); break;
- }
- if (res <=0)
- {
- error=GetLastError();
- if(error==134) Print("Received 134 Error after OrderSend() !! "); // not enough money
- if(error==135) RefreshRates(); // prices have changed
- }
- Sleep(5000);
- return ;
- }
- }
- void CTP() //跟踪止赢
- {
- bool bs = false;
- int yz;
- for (int i = 0; i < OrdersTotal(); i++)
- {
- if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false) break;
- if (OrderType() == OP_BUY)
- {
- yz=(Bid - OrderOpenPrice())/Point/TP;
- {
- if(yz>0 && OrderStopLoss()<OrderOpenPrice()+(yz-1)*TP*Point)
-
- bs=OrderModify(OrderTicket(), OrderOpenPrice(),OrderOpenPrice()+(yz-1)*TP*Point , OrderTakeProfit(),0, Green);
- }
- }
-
- else if (OrderType() == OP_SELL)
- {
- yz=(OrderOpenPrice()- Ask)/Point/TP;
- {
- if(yz>0 && OrderStopLoss()>OrderOpenPrice()-(yz-1)*TP*Point)
- bs=OrderModify(OrderTicket(), OrderOpenPrice(),OrderOpenPrice()-(yz-1)*TP*Point , OrderTakeProfit(),0, Green); }
- }
- }
- }
复制代码 |