短上軌: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;
長(zhǎng)上軌:EMA(HIGH,90),COLORMAGENTA;
長(zhǎng)下軌:EMA(LOW,90),COLORBLUE;
NOTEXT長(zhǎng)下軌0:IF(CLOSE>長(zhǎng)下軌,長(zhǎng)下軌,NULL),COLORMAGENTA;
NOTEXT長(zhǎng)下軌1:IF(CLOSE<長(zhǎng)下軌,長(zhǎng)下軌,NULL),COLORBLUE;
NOTEXT長(zhǎng)上軌0:IF(CLOSE>長(zhǎng)上軌,長(zhǎng)上軌,NULL),COLORMAGENTA;
NOTEXT長(zhǎng)上軌1:IF(CLOSE<長(zhǎng)上軌,長(zhǎng)上軌,NULL),COLORBLUE;
STICKLINE1(CLOSE>長(zhǎng)上軌,長(zhǎng)上軌,長(zhǎng)下軌,0,0),COLORMAGENTA;
STICKLINE1(CLOSE<長(zhǎng)下軌,長(zhǎng)上軌,長(zhǎng)下軌,0,0),COLORBLUE;
長(zhǎng)軌差:長(zhǎng)上軌-長(zhǎng)下軌,NODRAW,COLORYELLOW;
?
?來源:程序化99
?
?來源: www.tumamayizhan.com
?
?參考
?
Vars
Numeric 短上軌;
Numeric 短下軌;
Numeric NOTEXT短下軌0;
Numeric NOTEXT短下軌1;
Numeric NOTEXT短上軌0;
Numeric NOTEXT短上軌1;
Numeric 短軌差;
Numeric 長(zhǎng)上軌;
Numeric 長(zhǎng)下軌;
Numeric NOTEXT長(zhǎng)下軌0;
Numeric NOTEXT長(zhǎng)下軌1;
Numeric NOTEXT長(zhǎng)上軌0;
Numeric NOTEXT長(zhǎng)上軌1;
Numeric 長(zhǎng)軌差;
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);
短軌差=短上軌-短下軌;
長(zhǎng)上軌=EMA(HIGH,90);
長(zhǎng)下軌=EMA(LOW,90);
NOTEXT長(zhǎng)下軌0=IIF(CLOSE>長(zhǎng)下軌,長(zhǎng)下軌,InvalidNumeric);
NOTEXT長(zhǎng)下軌1=IIF(CLOSE<長(zhǎng)下軌,長(zhǎng)下軌,InvalidNumeric);
NOTEXT長(zhǎng)上軌0=IIF(CLOSE>長(zhǎng)上軌,長(zhǎng)上軌,InvalidNumeric);
NOTEXT長(zhǎng)上軌1=IIF(CLOSE<長(zhǎng)上軌,長(zhǎng)上軌,InvalidNumeric);
STICKLINE1(CLOSE>長(zhǎng)上軌,長(zhǎng)上軌,長(zhǎng)下軌,0,0,MAGENTA);
STICKLINE1(CLOSE<長(zhǎng)下軌,長(zhǎng)上軌,長(zhǎng)下軌,0,0,BLUE);
長(zhǎng)軌差=長(zhǎng)上軌-長(zhǎng)下軌;
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("長(zhǎng)上軌",長(zhǎng)上軌,Magenta);
PlotLine("NOTEXT長(zhǎng)下軌0",NOTEXT長(zhǎng)下軌0,Magenta);
PlotLine("NOTEXT長(zhǎng)下軌1",NOTEXT長(zhǎng)下軌1,Blue);
PlotLine("NOTEXT長(zhǎng)上軌0",NOTEXT長(zhǎng)上軌0,Magenta);
PlotLine("NOTEXT長(zhǎng)上軌1",NOTEXT長(zhǎng)上軌1,Blue);
PlotLine("短上軌",短上軌,Red);
End