UID 2 积分 2892617 威望 1396340 布 龙e币 1496277 刀 在线时间 13326 小时 注册时间 2009-12-3 最后登录 2024-12-25
EA框架模型，大部分地方做了注释
现在我学会了EA基本的东西，并且按照框架思路 建立了EA框架模型，大部分地方做了注释。希望对大家有用； 程序代码如下： //+------------------------------------------------------------------+ //| ganendexin's 模板.mq4 | //| Copyright ?2008, MetaQuotes Software Corp. | //| http://www.520fx.com //+------------------------------------------------------------------+ #property copyright "ganendexin" #property link "http://www.520fx.com" //---- input parameters extern double TakeProfit=250.0; extern double Lots=0.1; extern double TrailingStop=35.0; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { //---- //---- return(0); } //+------------------------------------------------------------------+ //| expert deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- //---- return(0); } //信号部分，下面这部分给出的是买卖信号，这个信号可以是自己编写的，也可以是用iCustom来调用的。以后需要修改的大部分是在这里面改 int Crossed (double line1 , double line2) { static int last_direction = 0; static int current_direction = 0; if(line1>line2)current_direction = 1; //up if(line1<line2)current_direction = 2; //down if(current_direction != last_direction) //changed { last_direction = current_direction; return (last_direction); } else { return (0); } } //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { //---- //程序开始前，先定义变量。 int cnt, ticket, total; //用于检查订单的个数及类型，cnt是按照索引来计算，ticket是按照ticket来计算。在算类型之前，要先OrderSelect double shortEma, longEma; //这个地方是定义买卖信号的参数的，根据实际需要来定个数和类型。 int counted_bars; //如果需要控制最低的K线个数，可用下面的 //提示获利点，这个是有的系统对最小获利点有要求的情况下使用。例如FXDD要求为10. if(TakeProfit<10) { Print("TakeProfit less than 10"); return(0); // check TakeProfit } //信号函数里面的，参数的取得 重点 shortEma = iMA(NULL,0,8,0,MODE_EMA,PRICE_CLOSE,0); longEma = iMA(NULL,0,13,0,MODE_EMA,PRICE_CLOSE,0); //把计算过的信号返回，并由这个信号来选择开仓等操作。 int isCrossed = Crossed (shortEma,longEma); //判断持仓状态， //把仓单总数赋值给一个变量，用于下一步计算仓单情况 total = OrdersTotal(); //空仓情况开始 //如果有空仓，则计算 if(total < 1) { //如果出现买的信号 if(isCrossed == 1) { //建立buy单，即多仓， ticket=OrderSend(Symbol(),OP_BUY,Lots,Ask,3,0,Ask+TakeProfit*Point, "My EA",12345,0,Green); //判断是否建仓成功，建仓成功，ticket被赋值为个数字，不是初始的0 if(ticket>0) { //检查是否已经成交，重点是检查不是挂单 注意参数 MODE_TRADES if(OrderSelect(ticket,SELECT_BY_TICKET,MODE_TRADES)) //打印出开仓价格 Print("已BUY，价格为: ",OrderOpenPrice()); } //如果建仓失败，打印出错误提示 else Print("建BUY仓失败: ",GetLastError()); //建仓失败后，立即返回，并进行一下次的计算 return(0); } //如果卖单信号出现 ,注意，此时仍然是指在空仓状态下 if(isCrossed == 2) { //建立SELL单，即空头仓， ticket=OrderSend(Symbol(),OP_SELL,Lots,Bid,3,0, Bid-TakeProfit*Point,"My EA",12345,0,Red); //如果建仓成功 if(ticket>0) { //检查是否已经成交，而不是挂单 if(OrderSelect(ticket,SELECT_BY_TICKET,MODE_TRADES)) Print("SELL order opened : ",OrderOpenPrice()); } //建仓失败，输出提示 else Print("Error opening SELL order : ",GetLastError()); //立即返回，准备下一次的计算。 return(0); } //如果买卖条件都没有满足，即if(isCrossed!=1&&isCrossed!=2)则直接返回 return(0); //空仓情结束 } //如果持仓，注意，这里省略了一个else，即if(ticket>0) else，而程序之所以不写else，是因为，当(ticket>0)时，不执行if（ticket<0）;这体现出编程者对语句的熟练和深刻理解。希望看这个程序的新手多用心体会。 //开始计算仓单总数，并对所有已持仓当进行判断 ,这里用cnt=0作为开始，是以仓当的索引值开始判断的，而不是ticket。 for(cnt=0;cnt<total;cnt++) //从索引值为0的仓单开始，直到计算完所有的仓当int total=OrdersTotal; { //选择仓当，在使用order相关的函数时，必须先运行一次OrderSelect OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES); //如果是持有的是买单 if(OrderType()<=OP_SELL && OrderSymbol()==Symbol()) //OP_SELL的值为1，OP_BUY的值为0。这里，指如果持有买、卖单，而不是挂单，并且货币兑是当前图表的货币对 { //判断持有buy单即多头单的情况 if(OrderType()==OP_BUY) // long position is opened { // 卖单信号开始 should it be closed? 如果出现了卖的信号 if(isCrossed == 2) { //平仓buy单 OrderClose(OrderTicket(),OrderLots(),Bid,3,Violet); // close position 之后立即返回，不管平仓是否成功，如果不成功，则重新回到循环里面，并重新判断索引值为0的订单，因为不管成功与否，会一直判断索引值为0的仓单，当仓单被平后，就没有索引值了。另外，这里说的是，在有卖信号下，对buy单的处理，sell单的索引不会被这个if语句里的OrderClose所执行 return(0); // exit } // check for trailing stop 如果没有出新新信号，注意（此时已经是持有buy单了）检查移动止损，并修改止损和和获利点 if(TrailingStop>0) //如果追踪止损大于0， { if(Bid-OrderOpenPrice()>Point*TrailingStop) //如果获利（现在的买价减去开仓价格）大于 追踪止损的值 { if(OrderStopLoss()<Bid-Point*TrailingStop) //如果单子的止损点比追踪止损点小 { //修改订单的止损点为追踪止损点 OrderModify(OrderTicket(),OrderOpenPrice(),Bid- Point*TrailingStop,OrderTakeProfit(),0,Green); //修改完后立刻返回 return(0); } } } // 卖单信号结束 } else // go to short position { // 买buy单信号开始 should it be closed? 注意，此时仍处于，所有仓单的检查和循环中，即操作完成后，立刻返回到仓位检查状态，并开始执行 if(isCrossed == 1) //出现买单信号 { //平仓卖单 OrderClose(OrderTicket(),OrderLots(),Ask,3,Violet); // close position //立刻返回，不管是否成功，并重新进行下一次的运算 return(0); // exit } // check for trailing stop 检查止损点 if(TrailingStop>0) //如果止损价大于0 { if((OrderOpenPrice()-Ask)>(Point*TrailingStop)) //如果获利点(开仓价格-现在的卖价）大于追踪止损价 { if((OrderStopLoss()>(Ask+Point*TrailingStop)) ||(OrderStopLoss()==0)) //如果止损点大于止损假 { //修改订单的止损价个为现在的追踪止损价格 OrderModify(OrderTicket(),OrderOpenPrice(),Ask+Point*TrailingStop, OrderTakeProfit(),0,Red); //修改后，立刻返回 return(0); } } } } } } return(0); } //+------------------------------------------------------------------+ 复制代码
论坛官方微信、群（期货热点、量化探讨、开户与绑定实盘）
期货论坛 - 版权/免责声明
1.本站发布源码(包括函数、指标、策略等)均属开放源码，用意在于让使用者学习程序化语法撰写，使用者可以任意修改语法內容并调整参数。仅限用于个人学习使用，请勿转载、滥用，严禁私自连接实盘账户交易 。
:
| 
:
| 
:期货量化学习 | 
:期货量化 | 
欧美杂志精华：
