日挣百点，100 pips a day韬客论坛 - EA指标外汇书籍分享

前往

页共 40 条

查看:4507

回复:39

注册时间2004-12-17

[MT4-EA]日挣百点，100 pips a day

楼主发表于：2014-01-01 17:45

只看该作者

倒序浏览

1楼电梯直达

信不信由你我？我看明白代码再告诉你哈//+------------------------------------------------------------------+ //| 100 pips a day.mq4 | //| Copyright 2005, MetaQuotes Software Corp. | //| http://www.metaquotes.net | //+------------------------------------------------------------------+ #property copyright "Copyright 2005, MetaQuotes Software Corp." #property link "http://www.metaquotes.net" extern int timeframe = 5; extern double stopLoss = 1000; extern double lTakeProfit = 1000; extern double sTakeProfit = 1000; extern double lTrailingStop = 100; extern double sTrailingStop = 100; extern color clOpenBuy = Blue; extern color clCloseBuy = Aqua; extern color clOpenSell = Red; extern color clCloseSell = Violet; extern color clModiBuy = Blue; extern color clModiSell = Red; extern string Name_Expert = "100pips"; extern int Slippage = 2; extern bool UseSound = true; extern string NameFileSound = "shotgun.wav"; extern double Lots = 0.1; extern int slippage=3; double lshist; double lshistb4,lshistb4b4; int init(){return(0);} int deinit(){return(0);} int start(){ if(Bars<100) {Print("bars less than 100");return(0);} if(lTakeProfit<10){Print("TakeProfit less than 10");return(0);} if(sTakeProfit<10){Print("TakeProfit less than 10");return(0);} if(timeframe==0) {timeframe=Period();} double diClose0=iClose(Symbol(),timeframe,0); double diMA1=iMA(Symbol(),timeframe,7,0,MODE_SMA,PRICE_OPEN,0); double diClose2=iClose(Symbol(),timeframe,0); double diMA3=iMA(Symbol(),timeframe,6,0,MODE_SMA,PRICE_OPEN,0); lshist=iCustom(NULL,0,"lswpr_angleexp",0,1); lshistb4=iCustom(NULL,0,"lswpr_angleexp",0,2); lshistb4b4=iCustom(NULL,0,"lswpr_angleexp",0,3); CloseAllOrders(); if(AccountFreeMargin()<(1000*Lots)){ Print("We have no money. Free Margin = ", AccountFreeMargin()); return(0); } if(!ExistPositions()) { // diClose0=iClose(Symbol(),timeframe,0); // diMA1=iMA(Symbol(),timeframe,7,0,MODE_SMA,PRICE_OPEN,0); // diClose2=iClose(Symbol(),timeframe,0); // diMA3=iMA(Symbol(),timeframe,6,0,MODE_SMA,PRICE_OPEN,0); // lshist=iCustom(NULL,0,"lswpr_angleexp",0,0); // lshistb4=iCustom(NULL,0,"lswpr_angleexp",0,1); // if((diClose0lshistb4)) { if((lshist> lshistb4)) { OpenBuy(); return(0); } // if ((diClose2>diMA3&& lshisttrailingStop*Point) { if(OrderStopLoss()trailingStop*Point) { if(OrderStopLoss()>Ask+trailingStop*Point || OrderStopLoss()==0) { ModifyStopLoss(Ask+trailingStop*Point);}}}}}} void ModifyStopLoss(double ldStopLoss) { bool fm; fm = OrderModify(OrderTicket(),OrderOpenPrice(),ldStopLoss,OrderTakeProfit(),0,0); if (fm && UseSound) PlaySound(NameFileSound); } void OpenBuy() { double ldLot, ldStop, ldTake; string lsComm; ldLot = GetSizeLot(); ldStop = Ask-Point*stopLoss; ldTake = NormalizeDouble(GetTakeProfitBuy(),Digits); lsComm = GetCommentForOrder(); OrderSend(Symbol(),OP_BUY,ldLot,NormalizeDouble(Ask,Digits),Slippage,ldStop,ldTake,lsComm,0,0,clOpenBuy); if (UseSound) PlaySound(NameFileSound); } void OpenSell() { double ldLot, ldStop, ldTake; string lsComm; ldLot = GetSizeLot(); ldStop = Bid+Point*stopLoss; ldTake = NormalizeDouble(GetTakeProfitSell(),Digits); lsComm = GetCommentForOrder(); OrderSend(Symbol(),OP_SELL,ldLot,NormalizeDouble(Bid,Digits),Slippage,ldStop,ldTake,lsComm,0,0,clOpenSell); if (UseSound) PlaySound(NameFileSound); } string GetCommentForOrder() { return(Name_Expert); } double GetSizeLot() { return(Lots); } double GetTakeProfitBuy() { return(Ask+lTakeProfit*Point); } double GetTakeProfitSell() { return(Bid-sTakeProfit*Point); } void CloseAllOrders() { for( int cnt=OrdersTotal();cnt>=0;cnt--) { OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol()==Symbol() )//&& OrderMagicNumber()==MagicNumber) { if (OrderType()==OP_BUY) { if ((lshist< lshistb4 && lshistb4lshistb4 && lshistb4>lshistb4b4)) { { OrderClose(OrderTicket(),OrderLots(),Ask,slippage,Yellow); }} return(0); } } }