//+------------------------------------------------------------------+ //| Traders Dynamic Index VISUAL ALERTS.mq4 | //+------------------------------------------------------------------+ //+------------------------------------------------------------------+ //| 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 White #property indicator_style2 STYLE_DASH #property indicator_color3 Yellow #property indicator_style3 STYLE_DASHDOT #property indicator_color4 White #property indicator_style4 STYLE_DASH #property indicator_color5 LimeGreen #property indicator_width5 3 #property indicator_color6 Red #property indicator_width6 3 #property indicator_color7 Aqua #property indicator_style7 STYLE_DOT //#property indicator_maximum 85 //#property indicator_minimum 15 extern bool Show_VISUAL_Alerts = true; extern int SHIFT_Sideway = 0; extern int SHIFT_Up_Down = 0; extern double gamma = 0.85; 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[]; 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); SetIndexStyle(3,DRAW_LINE); SetIndexStyle(4,DRAW_LINE); SetIndexStyle(5,DRAW_LINE); 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"); 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(); int limit = Bars-counted_bars-1; for(int i=limit; i>=0; i--) { RSIBuf[i] = (iCustom(NULL,0,"LaguerreRSI",gamma,0,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((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((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]