Hooya Map

Hooya Map

//+------------------------------------------------------------------+
//| map.mq4 |
//| Copyright © 2006, Nick Bilak |
//| http://metatrader.50webs.com/ beluck[at]gmail.com |
//+------------------------------------------------------------------+

#property copyright "Copyright © 2006, Nick Bilak"
#property link "http://metatrader.50webs.com/"

#property indicator_separate_window
#property indicator_buffers 6
#property indicator_color1 Yellow
#property indicator_color2 Red
#property indicator_color3 Yellow
#property indicator_color4 Red
#property indicator_color5 Yellow
#property indicator_color6 Red
#property indicator_minimum 0
#property indicator_maximum 4
//---- input parameters
extern string indicator1="___MACD___";
extern int MacdFast=5;
extern int MacdSlow=34;
extern int MacdSig=5;
extern int MacdPrice=0;
/*
PRICE_CLOSE 0 Close price.
PRICE_OPEN 1 Open price.
PRICE_HIGH 2 High price.
PRICE_LOW 3 Low price.
PRICE_MEDIAN 4 Median price, (high+low)/2.
PRICE_TYPICAL 5 Typical price, (high+low+close)/3.
PRICE_WEIGHTED 6 Weighted close price, (high+low+close+close)/4.
*/
extern string indicator2="___Stochastic___";
extern int StochK=5;
extern int StochD=3;
extern int StochS=3;
extern int StochSmooth=0;
/*
MODE_SMA 0 Simple moving average,
MODE_EMA 1 Exponential moving average,
MODE_SMMA 2 Smoothed moving average,
MODE_LWMA 3 Linear weighted moving average.
*/
extern int StochPrice=0; // 0 - Low/High or 1 - Close/Close.
extern string indicator3="___MA___";
extern int MaMethod=0; //0 - sma, 1 -ema, 2 - smma, 3 - lwma
extern int MaPrice=0;
extern int MaPeriod=21;

//---- buffers
double s0[],s1[],s2[],s3[],s4[],s5[];

int init() {
SetIndexLabel(0,"MACD cross");
SetIndexLabel(1,"MACD cross");
SetIndexLabel(2,"Stochastic cross");
SetIndexLabel(3,"Stochastic cross");
SetIndexLabel(4,"MA cross");
SetIndexLabel(5,"MA cross");
SetIndexStyle(0,DRAW_ARROW);
SetIndexStyle(1,DRAW_ARROW);
SetIndexStyle(2,DRAW_ARROW);
SetIndexStyle(3,DRAW_ARROW);
SetIndexStyle(4,DRAW_ARROW);
SetIndexStyle(5,DRAW_ARROW);
SetIndexEmptyValue(0,0);
SetIndexEmptyValue(1,0);
SetIndexEmptyValue(2,0);
SetIndexEmptyValue(3,0);
SetIndexEmptyValue(4,0);
SetIndexEmptyValue(5,0);
SetIndexArrow(0,167);
SetIndexArrow(1,167);
SetIndexArrow(2,167);
SetIndexArrow(3,167);
SetIndexArrow(4,167);
SetIndexArrow(5,167);
SetIndexBuffer(0,s0);
SetIndexBuffer(1,s1);
SetIndexBuffer(2,s2);
SetIndexBuffer(3,s3);
SetIndexBuffer(4,s4);
SetIndexBuffer(5,s5);
ArrayInitialize(s0,0);
ArrayInitialize(s1,0);
ArrayInitialize(s2,0);
ArrayInitialize(s3,0);
ArrayInitialize(s4,0);
ArrayInitialize(s5,0);
IndicatorDigits(0);

return(0);
}

int start() {

int i,j,s;
int counted_bars=IndicatorCounted();
int shift,limit;

if (counted_bars<0) return(-1); if (counted_bars>0) counted_bars--;
limit=Bars-10;
if(counted_bars>=1) limit=Bars-counted_bars-1;
if (limit<0) limit=0; double i11,i12,i21,i22,i31,i32; for (shift=limit; shift>=0; shift--) {
i11=iMACD(NULL,0,MacdFast,MacdSlow,MacdSig,MacdPrice,MODE_MAIN,shift+1);
i12=iMACD(NULL,0,MacdFast,MacdSlow,MacdSig,MacdPrice,MODE_SIGNAL,shift+1);
i21=iStochastic(NULL,0,StochK,StochD,StochS,StochSmooth,StochPrice,MODE_MAIN,shift+1);
i22=iStochastic(NULL,0,StochK,StochD,StochS,StochSmooth,StochPrice,MODE_SIGNAL,shift+1);
i31=iMA(NULL,0,MaPeriod,0,MaMethod,MaPrice,shift+1);
i32=Close[shift+1];
if (MaPrice==PRICE_OPEN) i32=Open[shift+1];
if (MaPrice==PRICE_HIGH) i32=High[shift+1];
if (MaPrice==PRICE_LOW) i32=Low[shift+1];
if (MaPrice==PRICE_MEDIAN) i32=(High[shift+1]+Low[shift+1])/2.0;
if (MaPrice==PRICE_TYPICAL) i32=(High[shift+1]+Low[shift+1]+Close[shift+1])/3.0;
if (MaPrice==PRICE_WEIGHTED) i32=(High[shift+1]+Low[shift+1]+Close[shift+1]+Open[shift+1])/4.0;
s0[shift]=0;
s1[shift]=0;
s2[shift]=0;
s3[shift]=0;
s4[shift]=0;
s5[shift]=0;
if (i11>i12) s0[shift]=1; //1
if (i11i22) s2[shift]=2; //2
if (i21i32) s5[shift]=3;
}

return(0);
}