FOREX EA 外汇智能交易专区

江百虎

买卖外汇真的是不分牛熊。。。

每一年都能够赚钱哦。。。

Paulps85

我苏看不懂这个啦~！
不过看起来觉得很不错咯
谢谢分享！

mancai

那個 multi period的超讚，不知道哪裏可以找到

mancai

原帖由 xiaoroy 于 17-1-2009 11:07 PM 发表
请问Fapturbo星期一早上可以用吗？

應該是沒有啦，因爲我的沒有跑，不知道別的broker怎樣

mancai

各位高手，小弟向各位請教一下
我本來想寫若一個價錢直升或直跌3pips或以上就下order
因爲不會寫，所以就用bar的close和open來做
如果是tick的話，請問怎樣寫？

bool OpenBuySignal()
{
   double EMA = iMA(NULL,0,60,50,3,0,0);
   double stoch_base_1 = iStochastic(NULL,1,5,3,3,MODE_SMA,0,MODE_MAIN,0);
   double stoch_sig_1 = iStochastic(NULL,1,5,3,3,MODE_SMA,0,MODE_SIGNAL,0);
   double cl = iClose(NULL,0,1);
   double op = iOpen(NULL,0,0);
         
   if (op-cl>=0.0003 && stoch_base_1>stoch_sig_1 && stoch_base_1<20)
   {
      return (true);
   }else{
      return (false);
   }   
}

bool OpenSellSignal()
{   
   double EMA = iMA(NULL,0,60,50,3,0,0);
   double stoch_base_1 = iStochastic(NULL,1,5,3,3,MODE_SMA,0,MODE_MAIN,0);
   double stoch_sig_1 = iStochastic(NULL,1,5,3,3,MODE_SMA,0,MODE_SIGNAL,0);
   double cl = iClose(NULL,0,1);
   double op = iOpen(NULL,0,0);
      
   if (cl-op>=0.0003 && stoch_base_1<stoch_sig_1 && stoch_base_1>80)
   {
      return (true);
   }else{
      return (false);
   }
}

[ 本帖最后由 mancai 于 19-1-2009 11:16 PM 编辑 ]

my_life_my_way

這是我寫的code，當bid price一次跌或升3pips或以上就會call print function。
因為在短時間里寫的，沒有做很深入的testing，你可以參考下。

1. double prev_bid = 0;
   
2. datetime prev_time = 0;
   
3. int start()
   
4.   {
   
5.    if (prev_bid == 0 || prev_time == 0){
   
6.       prev_bid = Bid;
   
7.       prev_time = TimeCurrent();
   
8.       return (0);
   
9.    }
   
10.    datetime current_time = TimeCurrent();
    
11.    double diff;
    
12.    RefreshRates();
    
13.    if (prev_time != current_time && prev_time < current_time){
    
14.       diff = MathAbs(Bid - prev_bid);
    
15.       if (diff >= 0.0003){
    
16.          Print("price moved 3 pips or more.");
    
17.       }
    
18.       prev_bid = Bid;
    
19.       prev_time = TimeCurrent();
    
20.       return (0);
    
21.    }
    
22.    return(0);
    
23.   }

复制代码

江百虎

终于可以买也可以卖了。。。

有兴趣的试试看好不好用。。。是不是真的可以赚到钱罗。。。

不过炒短线的话 EMA 就要随时的自己看情况设定了。。。



/*
EMA_Support_Resist.mq4
*/

#property copyright "Copyright ?2009, MetaQuotes Software Corp."
#property link      "http://www.metaquotes.net"

extern string TakeAction = "sell";
extern int EMA_Frame = 1;   
extern int EMA_Support_Resist = 75;
extern double StopLoss = 25;
extern double SetNewStopLoss = 0.0025;
extern double OrderLot = 1.0;

string BidPrevious = "Unknown";
string BidLatest = "Unknown";
string AskPrevious = "Unknown";
string AskLatest = "Unknown";

int init()  // expert initialization function   
{
   Print("init";
   return(0);
}

int deinit()   // expert deinitialization function   
{
   Print("deinit";
   return(0);
}

int OrdersCount()
{
   int totalOrders  = OrdersTotal();
   int count =0;
   for(int cnt = 0 ; cnt < totalOrders ; cnt++)
   {
      OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
      if (OrderSymbol() == Symbol())
      count++;
   }
   return (count);
}

int start() // expert start function   
{

   Print("------------- EMA_Support_Resist Start Here -------------";

   int totalOrders;

   totalOrders = OrdersCount();

   double EMA_Support_Resist_Value = iMA(NULL,EMA_Frame,EMA_Support_Resist,0,1,0,0);

   Print("Action = ", TakeAction, "  Frame = ", EMA_Frame, "  EMA = ", EMA_Support_Resist, "  StopLoss = ", StopLoss, "  SetNewStopLoss = ", SetNewStopLoss, "  Lot = ", OrderLot);

   if(Bid - EMA_Support_Resist_Value >= 0 && Bid - EMA_Support_Resist_Value <= 0.0005)
   {
         PlaySound("news.wav";
   }else{
      if(Bid - EMA_Support_Resist_Value >= -0.0005 && Bid - EMA_Support_Resist_Value <= -0.0001)
      {
         PlaySound("stops.wav";
      }
   }

   // Buy Transaction start here *******************************************

   if(TakeAction == "buy"
   {

      double BidSRDiffrence = Bid - EMA_Support_Resist_Value;

      if(BidPrevious == "Unknown"
      {
         if(BidSRDiffrence >= 0.0001){
            BidLatest = "Upper";
         }else{
            BidLatest = "Lower";
         }  
         BidPrevious = "Known";   
      }else{   
         BidPrevious = BidLatest;
         if(BidSRDiffrence >= 0.0001){
            BidLatest = "Upper";
         }else{
            BidLatest = "Lower";
         }  
      }

      Print("Buy EMA diffrence = ", BidSRDiffrence, "  Orders = ", totalOrders, "  Buy Previous = ", BidPrevious, "  Buy Latest = ", BidLatest);

      int ticketBuy;
      if(BidSRDiffrence >= 0.0001 && totalOrders < 1 && BidPrevious == "Lower"
      {
         ticketBuy=OrderSend(Symbol(),OP_BUY,OrderLot,Ask,3,Ask-StopLoss*Point,0,"My order #2",16384,0,Green);
         PlaySound("ok.wav";
         if(ticketBuy<0)
         {
            Print("OrderSend failed with error # ",GetLastError());
            return(0);
         }
      }

      if(totalOrders > 0)  
      {
         double ProfitLossBuy = Bid - OrderOpenPrice();
         Print("Order Ticket = ", OrderTicket(), "  Open Price = ", OrderOpenPrice(), "  StopLoss = ", OrderStopLoss(), "  Buy Profit = ", ProfitLossBuy);
         if(Bid - OrderOpenPrice()>= SetNewStopLoss)
         {
            double StopLossNewValueBuy = EMA_Support_Resist_Value - 0.0005;
            if(StopLossNewValueBuy - OrderStopLoss() >= 0.0005)
            {
               OrderModify(OrderTicket(),OrderOpenPrice(),StopLossNewValueBuy,OrderTakeProfit(),0,Blue);
               Print("New Stoploss Buy = ", StopLossNewValueBuy);
            }
            return(0);
         }
      }
   }  // Buy End

   // Sell Transaction start here*******************************************

   if(TakeAction == "sell"   
   {

      double AskSRDiffrence = Bid - EMA_Support_Resist_Value;

      if(AskPrevious == "Unknown"
      {
         if(AskSRDiffrence >= 0){
            AskLatest = "Upper";
         }else{
            AskLatest = "Lower";
         }  
         AskPrevious = "Known";   
      }else{   
         AskPrevious = AskLatest;
         if(AskSRDiffrence >= 0){
            AskLatest = "Upper";
         }else{
            AskLatest = "Lower";
         }  
      }

      Print("Sell EMA diffrence = ", AskSRDiffrence, "  Orders = ", totalOrders, "  Sell Previous = ", AskPrevious, "  Sell Latest = ", AskLatest);

      int ticketSell;
      if(AskSRDiffrence <= -0.0001 && totalOrders < 1 && AskPrevious == "Upper"
      {
         ticketSell=OrderSend(Symbol(),OP_SELL,OrderLot,Bid,3,Bid+StopLoss*Point,0,"My order #2",16384,0,Green);
         PlaySound("ok.wav";
         if(ticketSell<0)
         {
            Print("OrderSend failed with error # ",GetLastError());
            return(0);
         }
      }

      if(totalOrders > 0)
      {
         double ProfitLossSell = OrderOpenPrice() - Ask;
         Print("Order Ticket = ", OrderTicket(), "  Open Price = ", OrderOpenPrice(), "  StopLoss = ", OrderStopLoss(), "  Sell Profit = ", ProfitLossSell);
         if(OrderOpenPrice() - Bid >= SetNewStopLoss)
         {
            double StopLossNewValueSell = EMA_Support_Resist_Value + 0.0005;
            if(OrderStopLoss() - StopLossNewValueSell >= 0.0005)
            {
               OrderModify(OrderTicket(),OrderOpenPrice(),StopLossNewValueSell,OrderTakeProfit(),0,Blue);
               Print("New Stoploss Sell = ", StopLossNewValueSell);
            }
            return(0);
         }
      }
   }  // Sell End

   return(0);

}

kai78

不懂,,, 江大大...要怎样放来用

fxwell

早上fapturbo输到半死！！

callmedante

原帖由 mancai 于 19-1-2009 08:08 PM 发表


那個 multi period的超讚，不知道哪裏可以找到

http://www.forexfactory.com/showthread.php?p=1686837&highlight=sysv1#post1686837
第一個帖就是勒, 類 似得東西

forexStudent

原帖由 fxwell 于 20-1-2009 12:50 PM 发表
早上fapturbo输到半死！！

对啊！！！今天真的狂跌！！！，输了USD4，760.61nett ！！！！！

fxwell

原帖由 forexStudent 于 20-1-2009 03:49 PM 发表

对啊！！！今天真的狂跌！！！，输了USD4，760.61nett ！！！！！

可是它的网站仅然是赢！！:@:@此有此理

my_life_my_way

你玩哪幾個pair?虧的是什么pair?
我現在只玩EG，今早小賺。
不同的broker成績會不同，就算是同樣的broker，成績也會不一樣。

不鸣则已

原帖由 forexStudent 于 20-1-2009 03:49 PM 发表

对啊！！！今天真的狂跌！！！，输了USD4，760.61nett ！！！！！

你怎样玩法？够力！！！

lss5471

请问你一直以来都是玩eg罢了吗?

不鸣则已

原帖由 my_life_my_way 于 20-1-2009 06:54 PM 发表
你玩哪幾個pair?虧的是什么pair?
我現在只玩EG，今早小賺。
不同的broker成績會不同，就算是同樣的broker，成績也會不一樣。

为什么会不一样？什么pair你通常用？

my_life_my_way

不是，之前也有玩EChf，不過因為EChf的spread很高，會導致trade虧了。
所以現在暫時只攻EG。

my_life_my_way

fapturbo現在只用EG。

不鸣则已

原帖由 my_life_my_way 于 20-1-2009 07:12 PM 发表
fapturbo現在只用EG。

fapturbo要另外开的吗？不可以用interbank fx？
你给它自己走没有顾？

my_life_my_way

fapturbo是EA，而interbank是broker。
也不能說沒顧，每天早上看成績是賺或虧