Code:
//////////////////////////////////////////////////////////////////////
//
//
//
//////////////////////////////////////////////////////////////////////
#property copyright "Antonuk Oleg"
#property link "antonukoleg@gmail.com"
#property indicator_chart_window
extern int scaleX=20, // Das horizontale Intervall, mit dem die Quadraten erstellt werden
scaleY=20, // Das vertikale Intervall
offsetX=35, // der horizontalen Einzug aller Quadraten
offsetY=20, // der vertikale Einzug
fontSize=20, // Die Schriftgröße
corner=0;
int period[]={1,5,15,30,60,240,1440,10080,43200};
string periodString[]={"M1","M5","M15","M30","H1","H4","D1","W1","MN1"};
string signalNameString[]={"RSI","CCI","X"};
//+------------------------------------------------------------------+
int init()
{
// Die Tabelle der Signalen
for(int x=0;x<9;x++)
for(int y=0;y<3;y++)
{
ObjectCreate("signal"+x+y,OBJ_LABEL,0,0,0,0,0);
ObjectSet("signal"+x+y,OBJPROP_CORNER,corner);
// Wir ändern den Winkel der Verankerung
ObjectSet("signal"+x+y,OBJPROP_XDISTANCE,x*scaleX+offsetX);
ObjectSet("signal"+x+y,OBJPROP_YDISTANCE,y*scaleY+offsetY);
ObjectSetText("signal"+x+y,CharToStr(110),fontSize,"Wingdings",Gold);
}
// Der Name der Timeframes
for(x=0;x<9;x++)
{
ObjectCreate("textPeriod"+x,OBJ_LABEL,0,0,0,0,0);
ObjectSet("textPeriod"+x,OBJPROP_CORNER,corner);
// Wir ändern den Winkel der Verankerung
ObjectSet("textPeriod"+x,OBJPROP_XDISTANCE,x*scaleX+offsetX);
ObjectSet("textPeriod"+x,OBJPROP_YDISTANCE,offsetY-10);
ObjectSetText("textPeriod"+x,periodString[x],8,"Tahoma",Gold);
}
// Der Name der Indikatoren
for(y=0;y<3;y++)
{
ObjectCreate("textSignal"+y,OBJ_LABEL,0,0,0,0,0);
ObjectSet("textSignal"+y,OBJPROP_CORNER,corner);
ObjectSet("textSignal"+y,OBJPROP_XDISTANCE,offsetX-25);
ObjectSet("textSignal"+y,OBJPROP_YDISTANCE,y*(scaleY)+offsetY+8);
ObjectSetText("textSignal"+y,signalNameString[y],8,"Tahoma",Gold);
}
return(0);
}
int start()
{
for(int x=0;x<9;x++)
{
if(iRSI(NULL,period[x],14,PRICE_CLOSE,x+1)> 70 && iRSI(NULL,period[x],14,PRICE_CLOSE,x)< 70)
ObjectSetText("signal"+x+"0",CharToStr(110),fontSize,"Wingdings",clrFireBrick);
else
if(iRSI(NULL,period[x],14,PRICE_CLOSE,x+1)< 30 && iRSI(NULL,period[x],14,PRICE_CLOSE,x)> 30)
ObjectSetText("signal"+x+"0",CharToStr(110),fontSize,"Wingdings",clrForestGreen);
}
return(0);
}