5min USDCHF Metatrader MQL Experts Forex Trading Systems - XEATrade - Metatrader, Metastock, Tradestation, Amibroker

/*[[
	Name := 5minUSDCHF
	Author := Copyright © 2003, Company
	Link := http://www.company.com/
	Notes := 
	Lots := 1
	Stop Loss := 40
	Take Profit := 85
	Trailing Stop := 50
]]*/

defines: d(12), mm(0), risk(0.05), thr(70), thr2(60);
var: cnt(0), Current(0), tmp(0), TrStop(0), bar(0), AroonU(0), AroonD(0), AroonU1(0), AroonD1(0);
var: D1(500), Lotsi(0), sH(3);

if mm<>0 then 
	Lotsi=Round(1*Balance*risk*C/StopLoss)/10
else
	Lotsi=Lots;

AroonU=iCustom("Aroon",d,MODE_FIRST,1); AroonD=iCustom("Aroon",d,MODE_SECOND,1);
AroonU1=iCustom("Aroon",d,MODE_FIRST,2); AroonD1=iCustom("Aroon",d,MODE_SECOND,2);

if DayOfWeek<7 and TotalTrades<1 and Hour >= sH and Hour < 18 and CurTime-LastTradeTime>60
    and (H[Highest(MODE_HIGH,D1,D1)]-L[Lowest(MODE_LOW,D1,D1)])<=0.021 then
{
	if AroonU>=thr and AroonU1<thr and AroonD<=thr2 then
     {
      SetOrder(OP_BUY,Lotsi,Ask,2,Ask-StopLoss*Point,Ask+TakeProfit*Point,GREEN);
     };
   	if AroonD>=thr and AroonD1<thr and AroonU<=thr2 then
     {
      SetOrder(OP_SELL,Lotsi,Bid,2,Bid+StopLoss*Point,Bid-TakeProfit*Point,RED);
     };
};


TrStop=TrailingStop*Point;

for cnt=1 to TotalTrades
begin
   	If Ord(cnt,VAL_SYMBOL)=Symbol and Ord(cnt,VAL_TYPE)=OP_BUY then 
    {
     	tmp=H-TrStop;
     	If Ord(cnt,VAL_STOPLOSS)<tmp then
        {
            ModifyOrder(Ord(cnt,VAL_TICKET),Ord(cnt,VAL_OPENPRICE),tmp,Ord(cnt,VAL_TAKEPROFIT),Green);
            Exit;
        };
	};

   If Ord(cnt,VAL_SYMBOL)=Symbol and Ord(cnt,VAL_TYPE)=OP_SELL then    
   {
     tmp=L+TrStop;
     If Ord(cnt,VAL_STOPLOSS)>tmp then
	 {
            ModifyOrder(Ord(cnt,VAL_TICKET),Ord(cnt,VAL_OPENPRICE),tmp,Ord(cnt,VAL_TAKEPROFIT),Red);
            Exit;
     };
   };
end;

Author/Source: ?

Forex Directory | Forex Trading Systems | Privacy | Disclaimer | Contact