老王吧 发表于 2016-4-22 10:10:50

3c_JRSX_H



//+SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
//|                                                    3c_JRSX_H.mq4 |
//|          JRSX: Copyright © 2005,            Weld, Jurik Research |
//|                                          http://weld.torguem.net |
//|   MQL4+3color: Copyright © 2005,                Nikolay Kositsin |
//|                                 Khabarovsk, violet@mail.kht.ru |   
//+SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
#property copyright "Copyright © 2005, Weld, Jurik Research"
#property link      " http://weld.torguem.net"
#property indicator_separate_window
#property indicator_buffers3
#property indicator_color1Blue
#property indicator_color2Magenta
#property indicator_color3Gray
#property indicator_level10.5
#property indicator_level2 -0.5
#property indicator_level30.0
#property indicator_maximum1
#property indicator_minimum -1
//---- input parameters
extern int       Lengh = 14;
extern int   CountBars = 300;
//---- buffers
double JRSX_Up[];
double JRSX_Down[];
double JRSX_St[];
//----
int    shift,r,w,k,counted_bars,T0,T1,Tnew;
//----
double v4,v8,v10,v14,v18,v20,v0C,v1C,v8A,minuse;   
double F28,F30,F38,F40,F48,F50,F58,F60,F68,F70,F78,F80,JRSX;
double f0,f28,f30,f38,f40,f48,f50,f58,f60,f68,f70,f78,f80,Kg,Hg;
//+SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
//| Custom indicator initialization function                         |
//+SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
int init()
{
//---- indicators
   SetIndexStyle(0,DRAW_HISTOGRAM, STYLE_SOLID);
   SetIndexStyle(1,DRAW_HISTOGRAM, STYLE_SOLID);
   SetIndexStyle(2,DRAW_HISTOGRAM, STYLE_SOLID);
//----   
   SetIndexBuffer(0,JRSX_Up);
   SetIndexBuffer(1,JRSX_Down);
   SetIndexBuffer(2,JRSX_St);
//----
   IndicatorShortName("RSX("+Lengh+")");
//----   
   SetIndexDrawBegin(0,Bars-CountBars);
   SetIndexDrawBegin(1,Bars-CountBars);
   SetIndexDrawBegin(2,Bars-CountBars);
   IndicatorDigits(MarketInfo(Symbol(),MODE_DIGITS));
//----
   if (Lengh-1>=5) w=Lengh-1; else w=5; Kg=3/(Lengh+2.0); Hg=1.0-Kg;
//----
return(0);
}
//+SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
//| Custom indicator initialization function                         |
//+SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
int start()
{
counted_bars=IndicatorCounted();
if (counted_bars<0) return(-1);
if (counted_bars>Lengh) shift=Bars-counted_bars-1;
else shift=Bars-Lengh-1;

Tnew=Time;

//+--- aîññòàíîaëåíèå ïåeåìåííûõ +=====================+
if((Tnew!=T0)&&(shift<Bars-Lengh-1))
{
if (Tnew==T1)
{
f28=F28; f30=F30; f38=F38; f40=F40; f48=F48; f50=F50;
f58=F58; f60=F60; f68=F68; f70=F70; f78=F78; f80=F80;
} else return(-1);
}
//+--- +===============================================+

if (Lengh-1>=5)w=Lengh-1;else w=5; Kg=3/(Lengh+2.0); Hg=1.0-Kg;

while (shift>=0)
{
//+-------------------+
if (r==0){r=1; k=0;}
else
{
//++++++++++++++++++++
if (r>=w) r=w+1; else r=r+1;

v8 = Close-Close; v8A=MathAbs(v8);
//---- aû÷èñëåíèå V14 ------
f28 = Hg* f28 + Kg*v8;
f30 = Kg* f28 + Hg* f30;
v0C = 1.5 * f28 - 0.5 * f30;
f38 = Hg* f38 + Kg* v0C;
f40 = Kg* f38 + Hg* f40;
v10 = 1.5 * f38 - 0.5 * f40;
f48 = Hg* f48 + Kg* v10;
f50 = Kg* f48 + Hg* f50;
v14 = 1.5 * f48 - 0.5 * f50;
//---- aû÷èñëåíèå V20 ------
f58 = Hg* f58 + Kg* v8A;
f60 = Kg* f58 + Hg* f60;
v18 = 1.5 * f58 - 0.5 * f60;
f68 = Hg* f68 + Kg* v18;
f70 = Kg* f68 + Hg* f70;
v1C = 1.5 * f68 - 0.5 * f70;
f78 = Hg* f78 + Kg* v1C;
f80 = Kg* f78 + Hg* f80;
v20 = 1.5 * f78 - 0.5 * f80;
//-------wwwwwwwwww---------
if ((r <= w) && (v8!= 0)) k = 1;
if ((r == w) && (k == 0)) r = 0;
}//++++++++++++++++++++
if ((r>w)&&(v20>0.0000000001)){v4=(v14/v20+1.0)*50.0;if(v4>100.0)v4=100.0;if(v4<0.0)v4=0.0;}else v4=50.0;

JRSX=(v4/50)-1;

//+--- Ñîõeàíåíèå ïåeåìåííûõ +========================+
if (shift==1)
{
T1=Time;T0=Time;
F28=f28; F30=f30; F38=f38; F40=f40; F48=f48; F50=f50;
F58=f58; F60=f60; F68=f68; F70=f70; F78=f78; F80=f80;
}
//+---+===============================================+

//---- +SSSSSSSSSSSSSSSSSSS Three Colour code +SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
minuse = JRSX - JRSX_Up-JRSX_Down-JRSX_St;
JRSX_Up=0.0;JRSX_Down=0.0;JRSX_St=0.0;
if (minuse>0.0)JRSX_Up=JRSX;else{if (minuse<0.0)JRSX_Down=JRSX;else JRSX_St=JRSX;}   
//---- +SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+

shift--;
}
//+-------------------+
return(0);
}



EXCGK 发表于 2017-5-23 13:15:08

3c_JRSX_H3c_JRSX_H

hatching 发表于 2019-11-29 13:55:16

{:1_172:}{:1_172:}

恋你一世温柔 发表于 2020-6-13 10:06:06

相当不错,感谢无私分享精神!

nphzqnco 发表于 2020-6-18 18:35:58

有竞争才有进步嘛

wufrd 发表于 2020-7-18 21:25:33

谢谢楼主分享

avril 发表于 2020-8-16 16:30:03

谢谢楼主分享

bbgc 发表于 2020-8-22 13:31:01

学习了,不错

lby85 发表于 2021-7-5 23:19:45

{:1_181:}

金葫芦 发表于 2021-7-7 13:56:28

支持下
页: [1] 2
查看完整版本: 3c_JRSX_H