2011, MetaQuotes Software Corp. | //| http://www.metaquotes.net | //+------------------------------------------------------------------+ #property copyright "Copyright 2011, MetaQuotes Software Corp." #property link "http://www.metaquotes.net" #property indicator_separate_window #property indicator_minimum 0 #property indicator_maximum 100 #property indicator_level1 3 #property indicator_level2 96 #property indicator_level3 34 #property indicator_levelcolor DarkOliveGreen #property indicator_buffers 4 extern int K = 100; extern int D = 1; extern int S = 1; extern string FirstSymbol = ""; extern string SecondSymbol = "XXXXXX"; extern string ThirdSymbol = "XXXXXX"; extern color DeltaColor = Black; extern color FirstColor = DodgerBlue; extern color SecondColor = Black; extern color ThirdColor = Green; extern color DiffColor = Yellow; extern string SEP1 = "--------ALERTAS-------"; extern bool AlertOn = true; extern bool MovilOn = true; extern bool AudioOn = true; extern bool EmailOn = false; extern int Alert_Signal = 0; extern int DifAlertAtorAbove = 98; extern int DifAlertAtorBelow = 2; extern int SimbolAlertAtorAbove = 98; extern int SimbolAlertAtorBelow = 2; extern bool InvertFirstSymbol = false; extern bool InvertSecondSymbol = false; extern bool InvertThirdSymbol = false; extern bool Show_DeltaPip = true; double buffer1[], buffer2[],buffer3[],buffer4[]; string m=""; int win; string Text1,Text2,Text3; datetime alertoncea=0, alertoncee=0,alertonceb=0, alertoncec=0,once=0; bool emailonce = false,movilonce = true,audioonce = true,alertonce = true; double a_above=1, e_above=1; string s[31],first,second; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { IndicatorShortName("Stochastic Pares"); //---- indicators SetIndexBuffer(0,buffer1); SetIndexStyle(0,DRAW_LINE,STYLE_SOLID,2,FirstColor); SetIndexLabel(0,FirstSymbol); SetIndexBuffer(1,buffer2); SetIndexStyle(1,DRAW_LINE,STYLE_SOLID,2,SecondColor); SetIndexLabel(1,SecondSymbol); SetIndexBuffer(3,buffer4); SetIndexStyle(3,DRAW_LINE,STYLE_SOLID,2,ThirdColor); SetIndexLabel(3,ThirdSymbol); SetIndexBuffer(2,buffer3); SetIndexStyle(2,DRAW_LINE,STYLE_SOLID,2,DiffColor); SetIndexLabel(2,"Difference"); IndicatorDigits(2); //---- return(0); } //+------------------------------------------------------------------+ //| Custom indicator deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- string name,char4; int obj = ObjectsTotal(); for ( int n=obj;n > 0 ;n--) { name = ObjectName(n); char4 = StringSubstr(name,0,4); if ( char4 == "Diff" ) ObjectDelete(name); } //---- return(0); } //+------------------------------------------------------------------+ //| Custom indicator iteration function | //+------------------------------------------------------------------+ int start() { int i,counted_bars=IndicatorCounted(); if(counted_bars>0) counted_bars--; int limit=Bars-counted_bars; for(i=limit; i>=0; i--) { if ( InvertFirstSymbol) buffer1[i] = 100-iStochastic(FirstSymbol,0,K,D,S,0,0,0,i); else buffer1[i] = iStochastic(FirstSymbol,0,K,D,S,0,0,0,i); if ( InvertSecondSymbol ) buffer2[i] = 100-iStochastic(SecondSymbol,0,K,D,S,0,0,0,i); else buffer2[i] = iStochastic(SecondSymbol,0,K,D,S,0,0,0,i); if ( InvertThirdSymbol ) buffer4[i] = 100-iStochastic(ThirdSymbol,0,K,D,S,0,0,0,i); else buffer4[i] = iStochastic(ThirdSymbol,0,K,D,S,0,0,0,i); buffer3[i] = MathAbs((buffer1[i]+buffer2[i]+buffer4[i])/3); } if ( buffer3[1] < DifAlertAtorAbove ) { alertonce = false; movilonce = false; audioonce = false; } if ( buffer3[1] >= DifAlertAtorAbove ) { alertonce = true; movilonce = true; audioonce = true; SendNotification(FirstSymbol+"% - "+SecondSymbol+"% is > "+DifAlertAtorAbove+" "+TimeToStr(Time[1],TIME_DATE|TIME_MINUTES)); Alert(FirstSymbol+"% - "+SecondSymbol+"% is > "+DifAlertAtorAbove+" "+TimeToStr(Time[1],TIME_DATE|TIME_MINUTES));} if ( buffer3[1] > DifAlertAtorBelow ) { alertonce = false; movilonce = false; audioonce = false; } if ( buffer3[1] <= DifAlertAtorBelow ) { alertonce = true; movilonce = true; audioonce = true; SendNotification(FirstSymbol+"% - "+SecondSymbol+"% is > "+DifAlertAtorBelow+" "+TimeToStr(Time[1],TIME_DATE|TIME_MINUTES)); Alert(FirstSymbol+"% - "+SecondSymbol+"% is > "+DifAlertAtorBelow+" "+TimeToStr(Time[1],TIME_DATE|TIME_MINUTES));} if ( buffer3[1] < SimbolAlertAtorAbove) { alertonce = false; movilonce = false; audioonce = false; } if ( buffer3[1] >= SimbolAlertAtorAbove) { alertonce = true; movilonce = true; audioonce = true; SendNotification(FirstSymbol+"% - "+SecondSymbol+"% is > "+SimbolAlertAtorAbove+" "+TimeToStr(Time[1],TIME_DATE|TIME_MINUTES)); Alert(FirstSymbol+"% - "+SecondSymbol+"% is > "+SimbolAlertAtorAbove+" "+TimeToStr(Time[1],TIME_DATE|TIME_MINUTES)); } if ( buffer3[1] > SimbolAlertAtorBelow) { alertonce = false; movilonce = false; audioonce = false; } if ( buffer3[1] <= SimbolAlertAtorBelow) { alertonce = true; movilonce = true; audioonce = true; SendNotification(FirstSymbol+"% - "+SecondSymbol+"% is > "+SimbolAlertAtorBelow+" "+TimeToStr(Time[1],TIME_DATE|TIME_MINUTES)); Alert(FirstSymbol+"% - "+SecondSymbol+"% is > "+SimbolAlertAtorBelow+" "+TimeToStr(Time[1],TIME_DATE|TIME_MINUTES));} //---- //---- return(0); } //+------------------------------------------------------------------+ ( if (buffer3[1] >= SimbolAlertbelow ) SendNotification(FirstSymbol+"% - "+SecondSymbol+"% is > "+SimbolAlertAtorBelow+" "+TimeToStr(Time[1],TIME_DATE|TIME_MINUTES)); Alert(FirstSymbol+"% - "+SecondSymbol+"% is > "+SimbolAlertAtorBelow+" "+TimeToStr(Time[1],TIME_DATE|TIME_MINUTES));} //---- //---- return(0); } //+------------------------------------------------------------------+
