合并K线主图+{绝好的指标副图源码有未来}

2011-02-15 13:58:00来源:本站整理浏览:1387

合并K线

绝好的指标副图用有未来数据
VAR1:=IF(DATE>=1990601,0,1);
VAR2:=TROUGHBARS(3,15,1)<10;
VAR3:=PEAKBARS(3,15,1)<10;
VAR4:=IF(VAR2=1,50,0);
VAR5:=IF(VAR3=1,50,0);
底: IF(VAR4=50,1350,0),STICK,LINETHICK1;
顶: IF(VAR5=50,1750,0),STICK,LINETHICK1;

XR:=1; XK:=5;
HH:=HHV(HIGH,XK);
LL:=LLV(LOW ,XK);
OO:=IF(XK<=1,OPEN,REF(OPEN,XK-1));
CC:=CLOSE;
XH:=CONST(IF(ISLASTBAR,IF(XR<=1,HH,REF(HH,XR-1)),DRAWNULL));
XL:=CONST(IF(ISLASTBAR,IF(XR<=1,LL,REF(LL,XR-1)),DRAWNULL));
XO:=CONST(IF(ISLASTBAR,IF(XR<=1,OO,REF(OO,XR-1)),DRAWNULL));
XC:=CONST(IF(ISLASTBAR,IF(XR<=1,CC,REF(CC,XR-1)),DRAWNULL));
STICKLINE(CURRBARSCOUNT=XR+FLOOR(XK/2) ,XH,XL,XK*4+1 ,0),COLOR333333;
STICKLINE(CURRBARSCOUNT=XR+FLOOR(XK/2) AND XC>XO,XH,XL,XK*1+0.5,0),COLOR000055;
STICKLINE(CURRBARSCOUNT=XR+FLOOR(XK/2) AND XC<XO,XH,XL,XK*1+0.5,0),COLOR551100;
STICKLINE(CURRBARSCOUNT=XR+FLOOR(XK/2) AND XC>XO,XO,XC,XK*4+0.5,0),COLOR000055;
STICKLINE(CURRBARSCOUNT=XR+FLOOR(XK/2) AND XC<XO,XO,XC,XK*4+0.5,0),COLOR551100;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
MA5:MA(C,5);