//+------------------------------------------------------------------+ //| Traders Dynamic Index.mq4 | //| Copyright © 2006, Dean Malone | //| www.compassfx.com | //+------------------------------------------------------------------+ //+------------------------------------------------------------------+ //| | //| Traders Dynamic Index | //| | //| This hybrid indicator is developed to assist traders in their | //| ability to decipher and monitor market conditions related to | //| trend direction, market strength, and market volatility. | //| | //| Even though comprehensive, the T.D.I. is easy to read and use. | //| | //| Green line = RSI Price line | //| Red line = Trade Signal line | //| Blue lines = Volatility Band | //| Yellow line = Market Base Line | //| | //| Trend Direction - Immediate and Overall | //| Immediate = Green over Red...price action is moving up. | //| Red over Green...price action is moving down. | //| | //| Overall = Yellow line trends up and down generally between the | //| lines 32 & 68. Watch for Yellow line to bounces off | //| these lines for market reversal. Trade long when | //| price is above the Yellow line, and trade short when | //| price is below. | //| | //| Market Strength & Volatility - Immediate and Overall | //| Immediate = Green Line - Strong = Steep slope up or down. | //| Weak = Moderate to Flat slope. | //| | //| Overall = Blue Lines - When expanding, market is strong and | //| trending. When constricting, market is weak and | //| in a range. When the Blue lines are extremely tight | //| in a narrow range, expect an economic announcement | //| or other market condition to spike the market. | //| | //| | //| Entry conditions | //| Scalping - Long = Green over Red, Short = Red over Green | //| Active - Long = Green over Red & Yellow lines | //| Short = Red over Green & Yellow lines | //| Moderate - Long = Green over Red, Yellow, & 50 lines | //| Short= Red over Green, Green below Yellow & 50 line| //| | //| Exit conditions* | //| Long = Green crosses below Red | //| Short = Green crosses above Red | //| * If Green crosses either Blue lines, consider exiting when | //| when the Green line crosses back over the Blue line. | //| | //| | //| IMPORTANT: The default settings are well tested and proven. | //| But, you can change the settings to fit your | //| trading style. | //| | //| Price & Line Type settings: | //| RSI Price settings | //| 0 = Close price [DEFAULT] | //| 1 = Open price. | //| 2 = High price. | //| 3 = Low price. | //| 4 = Median price, (high+low)/2. | //| 5 = Typical price, (high+low+close)/3. | //| 6 = Weighted close price, (high+low+close+close)/4. | //| | //| RSI Price Line & Signal Line Type settings | //| 0 = Simple moving average [DEFAULT] | //| 1 = Exponential moving average | //| 2 = Smoothed moving average | //| 3 = Linear weighted moving average | //| | //| Good trading, | //| | //| Dean | //+------------------------------------------------------------------+ #property indicator_separate_window #property indicator_buffers 7 //---- #property indicator_color1 Black #property indicator_color2 MediumBlue #property indicator_color3 Yellow #property indicator_color4 MediumBlue #property indicator_color5 Green #property indicator_color6 Red #property indicator_color7 Aqua #property indicator_style7 2 //#property indicator_maximum 85 //#property indicator_minimum 15 extern bool Show_VISUAL_Alerts=true; extern bool SoundON=true; extern int SHIFT_Sideway=0; extern int SHIFT_Up_Down=0; extern int RSI_Period=13; //8-25 extern int RSI_Price=0; //0-6 extern int Volatility_Band=34; //20-40 extern int RSI_Price_Line=2; extern int RSI_Price_Type=0; //0-3 extern int Trade_Signal_Line=7; extern bool SHOW_Trade_Signal_Line2=true; extern int Trade_Signal_Line2=18; extern int Trade_Signal_Type=0; //0-3 //---- #define UPPERLINE "UPPERLINE" #define MEDLINE "MEDLINE" #define LOWERLINE "LOWERLINE" //---- double RSIBuf[],UpZone[],MdZone[],DnZone[],MaBuf[],MbBuf[],McBuf[]; double alertTag; //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ int init() { IndicatorShortName("Traders Dynamic Index Visual"); SetIndexBuffer(0,RSIBuf); SetIndexBuffer(1,UpZone); SetIndexBuffer(2,MdZone); SetIndexBuffer(3,DnZone); SetIndexBuffer(4,MaBuf); SetIndexBuffer(5,MbBuf); //---- if(SHOW_Trade_Signal_Line2==true){SHOW_Trade_Signal_Line2=DRAW_LINE; } else {SHOW_Trade_Signal_Line2=DRAW_NONE; } SetIndexStyle(6,SHOW_Trade_Signal_Line2); SetIndexBuffer(6,McBuf); // SetIndexStyle(0,DRAW_NONE); SetIndexStyle(1,DRAW_LINE); SetIndexStyle(2,DRAW_LINE,0,2); SetIndexStyle(3,DRAW_LINE); SetIndexStyle(4,DRAW_LINE,0,2); SetIndexStyle(5,DRAW_LINE,0,1); // SetIndexLabel(0,NULL); SetIndexLabel(1,"VB High"); SetIndexLabel(2,"Market Base Line"); SetIndexLabel(3,"VB Low"); SetIndexLabel(4,"RSI Price Line"); SetIndexLabel(5,"Trade Signal Line"); SetIndexLabel(6,"Trade Signal2 Line"); /* SetLevelValue(0,50); SetLevelValue(1,68); SetLevelValue(2,32); SetLevelStyle(STYLE_DOT,1,DarkSlateGray);*/ return(0); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ int deinit() { ObjectsDeleteAll(0,OBJ_TREND); ObjectDelete("TDI_SIG");ObjectDelete("TDI_SIG1");ObjectDelete("TDI_SIG2"); ObjectDelete("TDI_SIG3");ObjectDelete("TDI_SIG4");ObjectDelete("TDI_SIG5"); ObjectDelete("TDI_SIG6");ObjectDelete("TDI_SIG7");ObjectDelete("TDI_SIG8"); ObjectDelete("TDI_SIG9"); //---- return(0); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ int start() { CreateLEVEL(); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ void Createline(string objName,double start,double end,color clr) { ObjectCreate(objName,OBJ_TREND,WindowFind("Traders Dynamic Index Visual"),0,start,Time[0],end); ObjectSet(objName,OBJPROP_COLOR,clr); ObjectSet(objName,OBJPROP_STYLE,2); ObjectSet(objName,OBJPROP_RAY,false); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ void DeleteCreateline() { ObjectDelete(UPPERLINE);ObjectDelete(LOWERLINE);ObjectDelete(MEDLINE); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ void CreateLEVEL() { DeleteCreateline(); Createline(UPPERLINE,68,68,C'70,70,70'); Createline(LOWERLINE,50,50,C'00,70,00'); Createline(MEDLINE,32,32,C'70,70,70'); //---- double MA,RSI[]; ArrayResize(RSI,Volatility_Band); int counted_bars=IndicatorCounted(); if(counted_bars<0) return(-1); if(counted_bars>0) counted_bars--; int limit=Bars-counted_bars; if(counted_bars==0) limit-=1+Volatility_Band; for(int i=limit; i>=0; i--) { RSIBuf[i]=(iRSI(NULL,0,RSI_Period,RSI_Price,i)); MA=0; for(int x=i; x=0;i--) { MaBuf[i]=(iMAOnArray(RSIBuf,0,RSI_Price_Line,0,RSI_Price_Type,i)); MbBuf[i]=(iMAOnArray(RSIBuf,0,Trade_Signal_Line,0,Trade_Signal_Type,i)); McBuf[i]=(iMAOnArray(RSIBuf,0,Trade_Signal_Line2,0,Trade_Signal_Type,i)); //---- string Signal="",Signal2="",Signal2A="",Signal3="",Signal4="",Signal5=""; color TDI_col,TDI_col2,TDI_col3,TDI_col4; if(Show_VISUAL_Alerts==true) { static double crossPrice; int crossDirection;crossDirection=0; //signals if((MaBuf[0]>MbBuf[0])&&(MbBuf[0]32)&&(MaBuf[0]<68)){Signal="?";TDI_col=SeaGreen;} if((MaBuf[0]>MbBuf[0])&&(MbBuf[0]32)&&(MaBuf[0]<68)){Signal2A="Weak Buy";TDI_col2=SeaGreen;} if((MaBuf[0]>MbBuf[0])&&(MbBuf[0]32)&&(MaBuf[0]<68)){Signal2=" @ "+DoubleToStr(crossPrice,Digits)+"";TDI_col2=SeaGreen;} if((MaBuf[0]>MbBuf[0])&&(MbBuf[0]32)&&(MaBuf[0]<68)){crossPrice=Bid;crossDirection =2;} // if((MaBuf[0] MdZone[0])&&(MaBuf[0]> MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){Signal="?";TDI_col=Orange;} if((MaBuf[0] MdZone[0])&&(MaBuf[0]> MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){Signal2A="Weak Sell";TDI_col2=Orange;} if((MaBuf[0] MdZone[0])&&(MaBuf[0]> MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){Signal2=" @ "+DoubleToStr(crossPrice,Digits)+"";TDI_col2=Orange;} if((MaBuf[0] MdZone[0])&&(MaBuf[0]> MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){crossPrice=Bid;crossDirection =1;} // if((MaBuf[0]>MbBuf[0])&&(MbBuf[0]> MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){Signal="?";TDI_col=Lime;} if((MaBuf[0]>MbBuf[0])&&(MbBuf[0]> MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){Signal2A="Strong Buy";TDI_col2=Lime;} if((MaBuf[0]>MbBuf[0])&&(MbBuf[0]> MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){Signal2=" @ "+DoubleToStr(crossPrice,Digits)+"";TDI_col2=Lime;} if((MaBuf[0]>MbBuf[0])&&(MbBuf[0]> MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){crossPrice=Bid;crossDirection =2;} if((SoundON==true && MaBuf[0]>MbBuf[0]) && (MbBuf[0]>MdZone[0]) && (MaBuf[0]>32) && (MaBuf[0]<68 && alertTag!=Time[0])) { Alert("Strong buy on ",Symbol()," ",Period());alertTag=Time[0]; } // if((MaBuf[0]>MbBuf[0])&&(MaBuf[0]> MdZone[0])&&(MbBuf[0]< MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){Signal2A="Medium Buy";TDI_col2=Green;} if((MaBuf[0]>MbBuf[0])&&(MaBuf[0]> MdZone[0])&&(MbBuf[0]< MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){Signal2=" @ "+DoubleToStr(crossPrice,Digits)+"";TDI_col2=Green;} if((MaBuf[0]>MbBuf[0])&&(MaBuf[0]> MdZone[0])&&(MbBuf[0]< MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){Signal5="?";TDI_col2=Green;} if((MaBuf[0]>MbBuf[0])&&(MaBuf[0]> MdZone[0])&&(MbBuf[0]< MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){crossPrice=Bid;crossDirection =2;} // if((MaBuf[0]32)&&(MaBuf[0]<68)){Signal="?";TDI_col=Red;} if((MaBuf[0]32)&&(MaBuf[0]<68)){Signal2A="Strong Sell";TDI_col2=Red;} if((MaBuf[0]32)&&(MaBuf[0]<68)){Signal2=" @ "+DoubleToStr(crossPrice,Digits)+"";TDI_col2=Red;} if((MaBuf[0]32)&&(MaBuf[0]<68)){crossPrice=Bid;crossDirection =1;} if((SoundON==true && MaBuf[0]32) && (MaBuf[0]<68 && alertTag!=Time[0])) { Alert("Strong sell on ",Symbol()," ",Period());alertTag=Time[0]; } // if((MaBuf[0] MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){Signal2A="Medium Sell";TDI_col2=Tomato;} if((MaBuf[0] MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){Signal2=" @ "+DoubleToStr(crossPrice,Digits)+"";TDI_col2=Tomato;} if((MaBuf[0] MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){Signal5="?";TDI_col2=Tomato;} if((MaBuf[0] MdZone[0])&&(MaBuf[0]>32)&&(MaBuf[0]<68)){crossPrice=Bid;crossDirection =1;} // reversals if(MaBuf[0]>=68){Signal="?";TDI_col=Red;} if(MaBuf[0]>=68){crossPrice=Bid;crossDirection =2;} if(MaBuf[0]>=68){Signal2A="Caution !";TDI_col2=Red;} if(MaBuf[0]>=68){Signal2=" @ "+DoubleToStr(crossPrice,Digits)+"";TDI_col2=Red;} if(MaBuf[0]<=32){Signal="?";TDI_col=Red;} if(MaBuf[0]<=32){crossPrice=Bid;crossDirection =1;} if(MaBuf[0]<=32){Signal2A="Caution !";TDI_col2=Red;} if(MaBuf[0]<=32){Signal2=" @ "+DoubleToStr(crossPrice,Digits)+"";TDI_col2=Red;} //trend if(MbBuf[0]>MdZone[0]){Signal3="?";TDI_col3=Lime;} if((MbBuf[0]MdZone[0])){Signal3="?";TDI_col3=Orange;} if(MbBuf[0]MdZone[0]) && (MaBuf[0]