cdp5
PT := REF(H,1)-REF(L,1),NODRAW;
CDP REF(O,1)+REF(H,1)+REF(L,1)+REF(CLOSE,1)*2)/5,LINETHICK1,COLORMAGENTA,NODRAW;
上限 :CDP + PT/2,COLORRED,NODRAW;
下限 :CDP - PT/2,COLORGREEN,NODRAW;
ZZ H+L+O+C*2)/5,COLORYELLOW,NODRAW;
HHH:=CONST(HHV(H,100));
LLL:=CONST(LLV(L,100));
HH:=HHH-LLL;
TJ2:= CURRBARSCOUNT=58;
JJ:=(H+L+C*2)/4;
VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1);
LJL:=FILTER(TJ1,5);
TJ12:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(HIGH,3),1,0)));
TP:=TJ12=1;
TJ3:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(LOW,3),1,0)));
STFZ:=TJ3=1;
CL:=STFZ AND TP;
TJCL:=FILTER(CL,3);
STICKLINE(LJL,OPEN,CLOSE,1,0),COLORYELLOW;
{Q:=(H+L+C*2)/4;
DRAWKLINE(Q,Q,Q,Q);};
M1:=5;
X:=(REF(O,1)+REF(H,1)+REF(L,1)+REF(CLOSE,1)*2)/5;
X1:=(H+L+O+C*2)/5;
LLJX:=EMA(X,M1);
B1:EMA(X,7),LINETHICK2,COLORCYAN;
B2:EMA(X,13),COLORCYAN;
B3:EMA(X,21),COLORCYAN;
B4:EMA(X,34),COLORCYAN;
B5:EMA(X,55),COLORCYAN;
B6:EMA(X,89),LINETHICK2,COLORCYAN;
A1:IF(B1>REF(B1,1),B1,DRAWNULL),LINETHICK2,COLORRED;
A2:IF(B2>REF(B2,1),B2,DRAWNULL),COLORRED;
A3:IF(B3>REF(B3,1),B3,DRAWNULL),COLORRED;
A4:IF(B4>REF(B4,1),B4,DRAWNULL),COLORRED;
A5:IF(B5>REF(B5,1),B5,DRAWNULL),COLORRED;
A6:IF(B6>REF(B6,1),B6,DRAWNULL),LINETHICK2,COLORRED;
STICKLINE(C>=O,C,O,2,1),COLORRED;
STICKLINE(C>=O,L,O,0,1),COLORRED;
STICKLINE(C>=O,H,C,0,0),COLORRED;
STICKLINE(C<O,C,O,2,0),COLORFFFF00;
STICKLINE(C<O,H,L,0,0),COLORFFFF00;
STICKLINE(C<O,C,O,2,0),COLORFFFF00;
STICKLINE(C<O,C,O,2,0),COLORFFFF00;
STICKLINE((C-REF(C,1))/REF(C,1)<-0.036,O,C,0.9,0),COLORLIMAGENTA;
STICKLINE((C-REF(C,1))/REF(C,1)>0.036,O,C,0.9,0),COLORYELLOW;
STICKLINE((C-REF(C,1))/REF(C,1)<-0.036,X1,X1,2,1),LINETHICK4,COLORWHITE;
STICKLINE((C-REF(C,1))/REF(C,1)>0.036,X1,X1,2,1),LINETHICK4,COLORMAGENTA;
RC1:=REF(C,1);
涨停率10:=10-1/RC1;{178448-WEN98编写}
涨停率5:=5-1/RC1;
比前涨率:=(C-RC1+0.004)*100/RC1;
比前跌率:=(RC1-C-0.004)*100/RC1;
ST:=NAMELIKE('ST') OR NAMELIKE('*ST');
涨停:= IF(ST, (比前涨率>=涨停率5), (比前涨率>=涨停率10));
跌停:= IF(ST, (比前跌率>=涨停率5), (比前跌率>=涨停率10));
盘中涨停:=(H-RC1+0.004)*100/RC1>=IF(ST, 涨停率5,涨停率10);
盘中跌停:=(RC1-L-0.004)*100/RC1>=IF(ST, 涨停率5,涨停率10);
STICKLINE(盘中涨停,H,MAX(C,O),0,0),COLORMAGENTA;{涨停后回落}
STICKLINE(盘中跌停,L,MIN(C,O),0,0),COLORLICYAN;{跌停后回升}
STICKLINE(涨停,O,C,0.2,0),COLORMAGENTA;
STICKLINE(跌停,O,C,0.2,0),COLORGREEN;
{跳空}
STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;
STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;
重心 REF(O,1)+REF(H,1)+REF(L,1)+REF(CLOSE,1)*2)/5,LINETHICK2,COLORWHITE;
乖离B1
X:=(REF(O,1)+REF(H,1)+REF(L,1)+REF(CLOSE,1)*2)/5;
X1:=(H+L+O+C*2)/5;
B:=EMA(X,7),LINETHICK2,COLORCYAN;
B2:0,LINETHICK2;
最低价 L-B)/B*100;
收盘价 C-B)/B*100;
CDP C-X)/X*100; |