未来函数检查　[文华财经]

短上轨:EMA(HIGH,24),COLORRED;
短下轨:EMA(LOW,24),COLORGREEN;
NOTEXT短下轨0:IF(CLOSE>短下轨,短下轨,NULL),COLORRED;
NOTEXT短下轨1:IF(CLOSE<短下轨,短下轨,NULL),COLORGREEN;
NOTEXT短上轨0:IF(CLOSE>短上轨,短上轨,NULL),COLORRED;
NOTEXT短上轨1:IF(CLOSE<短上轨,短上轨,NULL),COLORGREEN;
STICKLINE1(CLOSE>短上轨,短上轨,短下轨,0,0),COLORRED;
STICKLINE1(CLOSE<短下轨,短上轨,短下轨,0,0),COLORGREEN;
短轨差:短上轨-短下轨,NODRAW,COLORYELLOW;
长上轨:EMA(HIGH,90),COLORMAGENTA;
长下轨:EMA(LOW,90),COLORBLUE;
NOTEXT长下轨0:IF(CLOSE>长下轨,长下轨,NULL),COLORMAGENTA;
NOTEXT长下轨1:IF(CLOSE<长下轨,长下轨,NULL),COLORBLUE;
NOTEXT长上轨0:IF(CLOSE>长上轨,长上轨,NULL),COLORMAGENTA;
NOTEXT长上轨1:IF(CLOSE<长上轨,长上轨,NULL),COLORBLUE;
STICKLINE1(CLOSE>长上轨,长上轨,长下轨,0,0),COLORMAGENTA;
STICKLINE1(CLOSE<长下轨,长上轨,长下轨,0,0),COLORBLUE;
长轨差:长上轨-长下轨,NODRAW,COLORYELLOW;

 来源:程序化99

 来源: WWW.CXH99.COM

 参考

Vars
Numeric 短上轨;
Numeric 短下轨;
Numeric NOTEXT短下轨0;
Numeric NOTEXT短下轨1;
Numeric NOTEXT短上轨0;
Numeric NOTEXT短上轨1;
Numeric 短轨差;
Numeric 长上轨;
Numeric 长下轨;
Numeric NOTEXT长下轨0;
Numeric NOTEXT长下轨1;
Numeric NOTEXT长上轨0;
Numeric NOTEXT长上轨1;
Numeric 长轨差;
Begin
短上轨=EMA(HIGH,24);
短下轨=EMA(LOW,24);
NOTEXT短下轨0=IIF(CLOSE>短下轨,短下轨,InvalidNumeric);
NOTEXT短下轨1=IIF(CLOSE<短下轨,短下轨,InvalidNumeric);
NOTEXT短上轨0=IIF(CLOSE>短上轨,短上轨,InvalidNumeric);
NOTEXT短上轨1=IIF(CLOSE<短上轨,短上轨,InvalidNumeric);
STICKLINE1(CLOSE>短上轨,短上轨,短下轨,0,0,RED);
STICKLINE1(CLOSE<短下轨,短上轨,短下轨,0,0,GREEN);
短轨差=短上轨-短下轨;
长上轨=EMA(HIGH,90);
长下轨=EMA(LOW,90);
NOTEXT长下轨0=IIF(CLOSE>长下轨,长下轨,InvalidNumeric);
NOTEXT长下轨1=IIF(CLOSE<长下轨,长下轨,InvalidNumeric);
NOTEXT长上轨0=IIF(CLOSE>长上轨,长上轨,InvalidNumeric);
NOTEXT长上轨1=IIF(CLOSE<长上轨,长上轨,InvalidNumeric);
STICKLINE1(CLOSE>长上轨,长上轨,长下轨,0,0,MAGENTA);
STICKLINE1(CLOSE<长下轨,长上轨,长下轨,0,0,BLUE);
长轨差=长上轨-长下轨;
PlotLine("短上轨",短上轨,Red);
PlotLine("短下轨",短下轨,Green);
PlotLine("NOTEXT短下轨0",NOTEXT短下轨0,Red);
PlotLine("NOTEXT短下轨1",NOTEXT短下轨1,Green);
PlotLine("NOTEXT短上轨0",NOTEXT短上轨0,Red);
PlotLine("NOTEXT短上轨1",NOTEXT短上轨1,Green);
PlotLine("短轨差",短轨差,Yellow,NoDraw);
PlotLine("长上轨",长上轨,Magenta);
PlotLine("NOTEXT长下轨0",NOTEXT长下轨0,Magenta);
PlotLine("NOTEXT长下轨1",NOTEXT长下轨1,Blue);
PlotLine("NOTEXT长上轨0",NOTEXT长上轨0,Magenta);
PlotLine("NOTEXT长上轨1",NOTEXT长上轨1,Blue);
PlotLine("短上轨",短上轨,Red);
End