怎样编制外汇EA自动交易系统

 以下是一些简单的源码，供参考学习。

//+——————————————————————+ //| Designed by OKwh， China | //| Copyright 2007， OKwh Dxdcn | //| | //+——————————————————————+

#property copyright “Copyright 2007 ， Dxd， China.” #property link ““ #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 double TrailingStop =25；

//跟踪止赢点数设置 extern int maxOpen = 3； //最多开仓次数限制 extern int maxLots = 5； //最多单仓持仓量限制 extern int bb = 0； //非零就允许跟踪止赢 extern double MATrendPeriod=26；

//使用26均线 开仓条件参数 本例子 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 做例子

{ double MacdCurrent， MacdPrevious， SignalCurrent； double SignalPrevious， MaCurrent， MaPrevious； MacdCurrent=iMACD(NULL，0，12，26，9，PRICE_CLOSE，MODE_MAIN，0)；

MacdPrevious=iMACD(NULL，0，12，26，9，PRICE_CLOSE，MODE_MAIN，1)； SignalCurrent=iMACD(NULL，0，12，26，9，PRICE_CLOSE，MODE_SIGNAL，0)；

SignalPrevious=iMACD(NULL，0，12，26，9，PRICE_CLOSE，MODE_SIGNAL，1)； MaCurrent=iMA(NULL，0，MATrendPeriod，0，MODE_EMA，PRICE_CLOSE，0)；

MaPrevious=iMA(NULL，0，MATrendPeriod，0，MODE_EMA，PRICE_CLOSE，1)； if(MacdCurrent<0 && MacdCurrent>SignalCurrent && MacdPreviousMaPrevious) return (1)；

// 买 Ma在上升，Macd在0线上，并且两线上交叉 if(MacdCurrent>0 && MacdCurrentSignalPrevious && MaCurrent