[MT4指标]变色RSI指标
附图指标,
mt4指标类型:震荡指标
是否能用在mt4手机版上:否
是否含有未来函数:无
//+------------------------------------------------------------------+
//| Color RSI.mq4 |
//| mladen |
//| |
//+------------------------------------------------------------------+
#property copyright "mladen"
#property link ""
#property indicator_separate_window
#property indicator_buffers 3
#property indicator_minimum 0
#property indicator_maximum 100
#property indicator_color1 DimGray
#property indicator_color2 Red
#property indicator_color3 LimeGreen
#property indicator_width2 2
#property indicator_width3 2
//---- input parameters
//
//
//
//
extern int RSIPeriod = 5;
extern string note1 = "0=close;1=open;2=hi;3=low";
extern string note2 = "4=median;5=typical;6=weighted";
extern int PriceType = 0;
extern string note3 = "Chart Time Frame";
extern string note4 = "1=M1, 5=M5, 15=M15, 30=M30";
extern string note5 = "60=H1, 240=H4, 1440=D1";
extern string note6 = "10080=W1, 43200=MN1";
extern string timeFrame = "Current time frame";
extern int overBought = 80;
extern int overSold = 20;
extern bool showArrows = false;
extern bool alertsOn = false;
extern bool alertsMessage = false;
extern bool alertsSound = false;
extern bool alertsEmail = false;
//---- buffers
//
//
//
//
//
double RSIBuffer;
double Upper;
double Lower;
//
//
//
//
//
int TimeFrame;
datetime TimeArray;
int maxArrows;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
SetIndexBuffer(0,RSIBuffer);
SetIndexBuffer(1,Upper);
SetIndexBuffer(2,Lower);
SetIndexLabel(0,"RSI");
SetIndexLabel(1,NULL);
SetIndexLabel(2,NULL);
//
//
//
//
//
TimeFrame = stringToTimeFrame(timeFrame);
string shortName = "RSI ("+TimeFrameToString(TimeFrame)+","+RSIPeriod+","+PriceTypeToString(PriceType);
if (overBought < overSold) overBought = overSold;
if (overBought < 100) shortName = shortName+","+overBought;
if (overSold > 0) shortName = shortName+","+overSold;
IndicatorShortName(shortName+")");
return(0);
}
//
//
//
//
//
int deinit()
{
DeleteArrows();
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int counted_bars=IndicatorCounted();
int limit;
int i,y;
if(counted_bars<0) return(-1);
limit=Bars-counted_bars;
ArrayCopySeries(TimeArray ,MODE_TIME ,NULL,TimeFrame);
//
//
//
//
//
for(i=0,y=0; i=0; i--)
{
if (RSIBuffer > overBought) { Upper = RSIBuffer; Upper[i+1] = RSIBuffer[i+1]; }
else { Upper = EMPTY_VALUE;
if (Upper[i+2] == EMPTY_VALUE)
Upper[i+1] = EMPTY_VALUE; }
if (RSIBuffer < overSold) { Lower = RSIBuffer; Lower[i+1] = RSIBuffer[i+1]; }
else { Lower = EMPTY_VALUE;
if (Lower[i+2] == EMPTY_VALUE)
Lower[i+1] = EMPTY_VALUE; }
}
//
//
//
//
//
if (showArrows)
for (i=0; ioverBought && RSIBuffer[i+1]overSold) DrawArrow(i,"down");
}
if (alertsOn)
{
if (RSIBuffer[0]>overBought && RSIBuffer[1]overSold) doAlert(overBought+" line crossed down");
}
//
//
//
//
//
return(0);
}
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//
//
//
//
//
void DrawArrow(int i,string type)
{
maxArrows++;
ObjectCreate("RSISignal"+maxArrows,OBJ_ARROW,0,Time,0);
if (type=="up")
{
ObjectSet("RSISignal"+maxArrows,OBJPROP_PRICE1,High+(8*Point));
ObjectSet("RSISignal"+maxArrows,OBJPROP_ARROWCODE,242);
ObjectSet("RSISignal"+maxArrows,OBJPROP_COLOR,Red);
}
else
{
ObjectSet("RSISignal"+maxArrows,OBJPROP_PRICE1,Low-(6*Point));
ObjectSet("RSISignal"+maxArrows,OBJPROP_ARROWCODE,241);
ObjectSet("RSISignal"+maxArrows,OBJPROP_COLOR,LimeGreen);
}
}
void DeleteArrows()
{
while(maxArrows>0) { ObjectDelete("RSISignal"+maxArrows); maxArrows--; }
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void doAlert(string doWhat)
{
static string previousAlert="nothing";
static datetime previousTime;
string message;
if (previousAlert != doWhat || previousTime != Time[0]) {
previousAlert = doWhat;
previousTime = Time[0];
//
//
//
//
//
message = StringConcatenate(Symbol()," at ",TimeToStr(TimeLocal(),TIME_SECONDS)," RSI ",doWhat);
if (alertsMessage) Alert(message);
if (alertsSound) PlaySound("alert2.wav");
if (alertsEmail) SendMail(StringConcatenate(Symbol()," RSI crossing"),message);
}
}
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//
//
//
//
//
string PriceTypeToString(int pt)
{
string answer;
switch(pt)
{
case 0: answer = "Close" ; break;
case 1: answer = "Open" ; break;
case 2: answer = "High" ; break;
case 3: answer = "Low" ; break;
case 4: answer = "Median" ; break;
case 5: answer = "Typical" ; break;
case 6: answer = "Wighted" ; break;
default: answer = "Invalid price field requested";
Alert(answer);
}
return(answer);
}
int stringToTimeFrame(string tfs)
{
int tf=0;
tfs = StringUpperCase(tfs);
if (tfs=="M1" || tfs=="1") tf=PERIOD_M1;
if (tfs=="M5" || tfs=="5") tf=PERIOD_M5;
if (tfs=="M15"|| tfs=="15") tf=PERIOD_M15;
if (tfs=="M30"|| tfs=="30") tf=PERIOD_M30;
if (tfs=="H1" || tfs=="60") tf=PERIOD_H1;
if (tfs=="H4" || tfs=="240") tf=PERIOD_H4;
if (tfs=="D1" || tfs=="1440") tf=PERIOD_D1;
if (tfs=="W1" || tfs=="10080") tf=PERIOD_W1;
if (tfs=="MN" || tfs=="43200") tf=PERIOD_MN1;
if (tf= 0)
{
char = StringGetChar(s, lenght);
//
//
//
//
//
if((char > 96 && char < 123) || (char > 223 && char < 256))
s = StringSetChar(s, lenght, char - 32);
else
if(char > -33 && char < 0)
s = StringSetChar(s, lenght, char + 224);
//
//
//
//
//
lenght--;
}
//
//
//
//
//
return(s);
}Color%20RSI.jpg
发表于:2016-12-15 11:50只看该作者
2楼
缺钱,灌水赚通宝,谢谢分享!!
韬客社区www.talkfx.co
发表于:2017-04-05 17:58只看该作者
3楼
缺钱,灌水赚通宝,谢谢分享!!
韬客社区www.talkfx.co
发表于:2017-04-10 03:19只看该作者
4楼
加载后可先模拟再交易
韬客社区www.talkfx.co
发表于:2017-04-10 03:19只看该作者
5楼
加载后可先模拟再交易
韬客社区www.talkfx.co
发表于:2017-04-10 03:19只看该作者
6楼
加载后可先模拟再交易
韬客社区www.talkfx.co
发表于:2017-04-10 03:20只看该作者
7楼
加载后可先模拟再交易
韬客社区www.talkfx.co
发表于:2017-04-10 03:20只看该作者
8楼
加载后可先模拟再交易
韬客社区www.talkfx.co
发表于:2017-04-10 03:21只看该作者
9楼
加载后可先模拟再交易
韬客社区www.talkfx.co
发表于:2017-06-16 07:04只看该作者
10楼
666666
韬客社区www.talkfx.co
发表于:2017-08-07 05:59只看该作者
11楼
谢谢分享~~~~~~~~~~~
韬客社区www.talkfx.co