/*-----------------------------+
| |
| Shared by www.Aptrafx.com |
| |
+------------------------------*/
//+-----------------------+
//| MA/MACD/CCI Expert |
//+-----------------------+
extern double Lots = 1;
extern double TakeProfit = 120;
extern double StopLoss = 200;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//|------------------------------------------------------------------|
int init()
{
return(0);
}
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
bool rising=false;
bool falling=false;
double slA=0, slB=0;
double tpA=0, tpB=0;
double p=Point();
double MACDM, MACDS;
double MAH, MAL;
double CCIP1;
int cnt=0;
// Error checking
if(AccountFreeMargin()<(1000*Lots)) {Print("-----NO MONEY"); return(0);}
if(Bars<100) {Print("-----NO BARS "); return(0);}
// only one order per symbol
// don't do anything till TP or SL takes the order out
for(cnt=0;cnt<OrdersTotal();cnt++)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
if(OrderSymbol()==Symbol())
{
return(0);
}
}
// calculate TP and SL for (B)id and (A)sk
tpA=Ask+(p*TakeProfit);
slA=Ask-(p*StopLoss);
tpB=Bid-(p*TakeProfit);
slB=Bid+(p*StopLoss);
// but set to zero if user doesn't want any
if (TakeProfit<=0) {tpA=0; tpB=0;}
if (StopLoss<=0) {slA=0; slB=0;}
MAL=iMA(NULL,0,34,0,MODE_EMA,PRICE_LOW, 1);
MAH=iMA(NULL,0,34,0,MODE_EMA,PRICE_HIGH,1);
MACDM=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN, 1);
MACDS=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1);
CCIP1=iCCI(NULL,0,20,PRICE_CLOSE,1);
// is it rising or falling
if (High[1]>MAH && Low[1]>MAH && MACDS>0 && CCIP1>100) { rising=true;}
if (High[1]<MAL && Low[1]<MAL && MACDS<0 && CCIP1<-100) { falling=true;}
// Open new order based on direction of cross
if (rising) OrderSend(Symbol(),OP_BUY,Lots,Ask,3,slA,tpA,"ZZZSMCR02",11123,0,White);
if (falling) OrderSend(Symbol(),OP_SELL,Lots,Bid,3,slB,tpB,"ZZZSMCR02",11321,0,Red);
return(0);
}
Sample
Analysis
Market Information Used:
Series array that contains the highest prices of each bar
Series array that contains the lowest prices of each bar
Indicator Curves created:
Indicators Used:
Moving average indicator
MACD Histogram
Commodity channel index
Custom Indicators Used:
Order Management characteristics:
Checks for the total of open orders
It automatically opens orders when conditions are reached
Other Features: