TS:=130;
N:=99;
M:=3;
MT:=3;
M1:=5;
M2:=7;
M3:=21;
M4:=12;
M5:=50;
DA1:=IF(TS TOTALBARSCOUNT,TOTALBARSCOUNT,TS);
DA:=IF(CURRBARSCOUNT DA1,0,DA1);
HI:=REFDATE(HHV(H,DA),DATE);
LO:=REFDATE(LLV(L,DA),DATE);
C1:=IF(CURRBARSCOUNT =DA,C,DRAWNULL);
GZ:=EXP(LN(HI/LO)/10);
LH1:=SUM(IF(C1 =(HI/GZ),V,0),DA);
LH2:=SUM(IF(C1 =(HI/POW(GZ,2)) AND C1 (HI/GZ),V,0),DA);
LH3:=SUM(IF(C1 =(HI/POW(GZ,3)) AND C1 (HI/POW(GZ,2)),V,0),DA);
LH4:=SUM(IF(C1 =(HI/POW(GZ,4)) AND C1 (HI/POW(GZ,3)),V,0),DA);
LH5:=SUM(IF(C1 =(HI/POW(GZ,5)) AND C1 (HI/POW(GZ,4)),V,0),DA);
LH6:=SUM(IF(C1 =(HI/POW(GZ,6)) AND C1 (HI/POW(GZ,5)),V,0),DA);
LH7:=SUM(IF(C1 =(HI/POW(GZ,7)) AND C1 (HI/POW(GZ,6)),V,0),DA);
LH8:=SUM(IF(C1 =(HI/POW(GZ,8)) AND C1 (HI/POW(GZ,7)),V,0),DA);
LH9:=SUM(IF(C1 =(LO*GZ) AND C1 LO*POW(GZ,2),V,0),DA);
LH10:=SUM(IF(C1 =LO AND C1 LO*GZ,V,0),DA);
L1:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0;
L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0;
L3:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0;
L4:=REFDATE(HHV(LH4,DA),DATE);
L5:=REFDATE(HHV(LH5,DA),DATE);
L6:=REFDATE(HHV(LH6,DA),DATE);
L7:=REFDATE(HHV(LH7,DA),DATE);
L8:=REFDATE(HHV(LH8,DA),DATE);
L9:=REFDATE(HHV(LH9,DA),DATE);
L10:=REFDATE(HHV(LH10,DA),DATE);
SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10);
STICKLINE(CEILING(DA*L1/SS)*3 =CURRBARSCOUNT,HI*N/100,(HI/GZ),1,
1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L2/SS)*3 =CURRBARSCOUNT,HI/POW(GZ,1)*N/10
0,HI/POW(GZ,2),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L3/SS)*3 =CURRBARSCOUNT,HI/POW(GZ,2)*N/10
0,HI/POW(GZ,3),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L4/SS)*3 =CURRBARSCOUNT,HI/POW(GZ,3)*N/10
0,HI/POW(GZ,4),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L5/SS)*3 =CURRBARSCOUNT,HI/POW(GZ,4)*N/10
0,HI/POW(GZ,5),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L6/SS)*3 =CURRBARSCOUNT,HI/POW(GZ,5)*N/10
0,HI/POW(GZ,6),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L7/SS)*3 =CURRBARSCOUNT,HI/POW(GZ,6)*N/10
0,HI/POW(GZ,7),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L8/SS)*3 =CURRBARSCOUNT,LO*POW(GZ,2),LO*P
OW(GZ,3)*N/100,1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L9/SS)*3 =CURRBARSCOUNT,LO*POW(GZ,1),LO*P
OW(GZ,2)*N/100,1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L10/SS)*3 =CURRBARSCOUNT,LO,LO*POW(GZ,1)*
N/100,1,1),COLOR454545,LINETHICK1;
DRAWKLINE(H,O,L,C);JJ:=(CLOSE+HIGH+LOW)/3;
DRAWBAND(MA(C,2),RGB(108,0,1),MA(C,7),RGB(28,134,238));
今日保护价:(REF(C,2)+REF(C,1)+O)/3 ,COLOR8080FF,NODRAW;
AA05:MA(C,3),LINETHICK3,COLOR00CCFF;
五日乖离率:=(C-AA05)/AA05*100;
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
速度 5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
加速度 5:EMA((速度 5-REF(速度 5,1)),3),NODRAW;
IF(BB05 30 AND AA05 REF(AA05,1),
AA05,DRAWNULL),LINETHICK6,COLOR5959FF;
AA10:MA(C,10),COLOR4080FF;AA20:=MA(C,20);
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
IF(BB05 0 AND AA05 REF(AA05,1),
AA05,DRAWNULL),LINETHICK3,COLORGREEN;
AA30:MA(C,30),COLOR515100,LINETHICK3;
三拾日乖离率:(C-AA30)/AA30*100,NODRAW;
VAR111:=(AA20-AA30) REF((AA20-AA30),1) AND AA20 REF(AA20,1) AND
AA30 REF(AA30,1);
VAR122:=(AA30-AA20) REF((AA30-AA20),1) AND AA20 REF(AA20,1) AND
AA30 REF(AA30,1);
BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
IF(BB30 15 AND AA30 REF(AA30,1),
AA30,DRAWNULL),LINETHICK3,COLORFF00FF;
强势狙击:=FILTER(BB30 30 AND BB10 45 AND CROSS(BB05,60),10);
加仓:=FILTER(COUNT(CROSS(BB05,30),5) =1 AND AA05 REF(AA05,1) AND
三拾日乖离率 REF(三拾日乖离率,1) AND AA10 REF(AA10,1)
AND 加速度 5 REF(加速度 5,1) AND 速度 5 REF(速度 5,1) ,10) ;
清仓:=FILTER(COUNT(CROSS(30,BB05),5) =1 AND (C AA30 OR O AA30)
AND AA05 REF(AA05,1) AND 三拾日乖离率 REF(三拾日乖离率,1) AND
AA10 REF(AA10,1),10);
DRAWTEXT(加仓 ,LOW*0.96, 加仓 ),COLORFFFFFF;
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率 REF(三拾日乖离率,1) AND
AA10 REF(AA10,1) ;
减仓:=FILTER(JC,10);
MR:=COUNT(CROSS(五日乖离率,0),3) =1 AND 三拾日乖离率 REF(三拾日乖
离率,1) AND AA05 REF(AA05,1) AND (C/REF(C,1)-1)*100 5 AND
REF(C,1) AA30;
买入:=FILTER(MR,10);
DRAWTEXT(减仓,HIGH*1.02, 减仓 ),COLORCYAN;
DRAWTEXT(买入,LOW*0.98, 买 ),COLORFFFFFF;
DRAWTEXT(清仓 ,HIGH*1.02, 清仓 ),COLORGREEN;
DRAWTEXT(强势狙击,LOW*0.98, 强势狙击 ),COLORYELLOW;
VAR1:=CLOSE REF(CLOSE,1) AND CLOSE REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VARA:=REF(VAR9,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VARB:=REF(VARA,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VARC:=REF(VARB,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VARD:=CLOSE REF(CLOSE,1) AND
CLOSE REF(CLOSE,2);VARE:=REF(VARD,1) AND CLOSE =REF(CLOSE,1)
AND CLOSE =REF(CLOSE,2);
VARF:=REF(VARE,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR10:=REF(VARF,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR11:=REF(VAR10,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR12:=REF(VAR11,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR13:=REF(VAR12,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR14:=REF(VAR13,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR15:=REF(VAR14,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR16:=REF(VAR15,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR17:=REF(VAR16,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR18:=REF(VAR17,1) AND CLOSE =REF(CLOSE,1) AND
CLOSE =REF(CLOSE,2);
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR
VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7
OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;
DRAWICON(VAR19,REF(CLOSE,1)*0.98,34);
DRAWICON(VAR1A,REF(CLOSE,1)*1.02,35);
短线:EMA(CLOSE,17),COLORWHITE,DOTLINE;
A:=(3*C+L+O+H)/6;
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A
,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*RE
F(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*RE
F(A,18)+
REF(A,20))/210;
成本:EMA(X,13),COLORFF00FF,DOTLINE;
KKA:=EMA(C,5);
KKB:=EMA(KKA,8);
KKC:=EMA(KKB,13);
成本:EMA(KKC,50), COLORGREEN,DOTLINE;
STICKLINE(C =O,C,O,3.4,0),COLOR0000AA;
STICKLINE(C =O,C,O,3.0,0),COLOR0000BB ;
STICKLINE(C =O,C,O,2.4,0),COLOR0000CC;
STICKLINE(C =O,C,O,2.0,0),COLOR0000DD ;
STICKLINE(C =O,C,O,1.6,0),COLOR0000EE;
STICKLINE(C =O,C,O,1.2,0),COLOR0000FF;
STICKLINE(C =O,C,O,0.6,0),COLOR0000FF;
STICKLINE(C =O,H,L,0,0),COLORRED;
STICKLINE(C =O,C,O,3.4,0),COLORAAAA00;
STICKLINE(C =O,C,O,3.0,0),COLORBBBB00;
STICKLINE(C =O,C,O,2.4,0),COLORCCCC00;
STICKLINE(C =O,C,O,2.0,0),COLORDDDD00;
STICKLINE(C =O,C,O,1.6,0),COLOREEEE00;
STICKLINE(C =O,C,O,1.2,0),COLORFFFF00;
STICKLINE(C =O,C,O,0.6,0),COLORFFFF00;
STICKLINE(C =O,H,L,0,0),COLORFFFF00;
DRAWRECTREL(0,500,147,999.4,IF(120,RGB(10,0,0),0));
超 B:=L2_AMO(0,2)/10000.0;
大 B:=L2_AMO(1,2)/10000.0;
中 B:=L2_AMO(2,2)/10000.0;
小 B:=L2_AMO(3,2)/10000.0;
超 S:=L2_AMO(0,3)/10000.0;
大 S:=L2_AMO(1,3)/10000.0;
中 S:=L2_AMO(2,3)/10000.0;
小 S:=L2_AMO(3,3)/10000.0;
TESTSKIP(NOT(超B OR 大B OR 中 B OR 小 B OR 超S OR 大S OR 中 S OR 小
S)!=0);
大宗进:=(超 B)+(大 B),NODRAW;
大宗出:=(超 S)+(大 S),NODRAW;
非大宗进:=(中 B)+(小 B),NODRAW;
非大宗出:=(中 S)+(小 S),NODRAW;
大宗进限制:=IF((超 B+大 B)=0,0,大宗进);
大宗出限制:=IF((超 S+大 S)=0,0,大宗出);
非大宗进限制:=IF(中 B+小 B=0,0,非大宗进);
非大宗出限制:=IF(中 S+小 S=0,0,非大宗出);
净流入:=(超 B+大 B)-(超 S+大 S),COLORRED,NODRAW;
净流入:=(中 B+小 B)-(中 S+小 S),COLORRED,NODRAW;
净流入:=(超 B+大 B+中 B+小 B)-(超 S+大 S+中 S+小 S),COLORRED,NODRAW;
大单流入:=(超 B+大 B)/(超 B+大 B+超 S+大 S)*100,NODRAW;
大单流入限制:=IF((超 B+大 B+超 S+大 S)=0,0,大单流入);
大单流出比:=(超 S+大 S)/(超 B+大 B+超 S+大 S)*100,NODRAW;
大单流出限制:=IF((超 B+大 B+超 S+大 S)=0,0,大单流出比);
总流入比:=(超 B+大 B+中 B+小 B)/(超 B+大 B+中 B+小 B+超 S+大 S+中 S+
小 S)*100,NODRAW;
总流出比:=(超 S+大 S+中 S+小 S)/(超 B+大 B+中 B+小 B+超 S+大 S+中 S+小
S)*100,NODRAW;
成交总量:=(超 B+大 B+中 B+小 B+超 S+大 S+中 S+小 S),NODRAW;
参与度:=(超 B+超 S+大 B+大 S)/成交总量*100,COLORYELLOW,NODRAW;
大单强度:=(超 B+大 B-超 S-大 S)/成交总量*100,COLORYELLOW,NODRAW;
大单强度限制:=IF(大单强度=0,-100,大单强度);
大单强度比:=IF(大单强度 =0,(大单强度限制+100)/2,100-ABS((大单强度限制
-100)/2)),NODRAW;
超单强度:=(超 B-超 S)/(超 B+超 S)*100,COLORYELLOW,NODRAW;
超单强度限制:=IF(超单强度=0,-100,超单强度);
超单强度比:=IF(超单强度 0,(超单强度限制+100)/2,IF(超单强度
0,100-ABS((超单强度限制-100)/2),0)),NODRAW;
DAZHIV:=CONST(MAX(ABS(大宗进),MAX(ABS(大宗出),MAX(ABS(非大宗
进),ABS(非大宗出))))),NODRAW;
DRAWRECTREL(0,CONST(930-(ABS(大宗
进)*250/DAZHIV)),35,950,IF(CONST(大宗
进 0),RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(37,CONST(930-(ABS(大宗
出)*250/DAZHIV)),72,950,IF(CONST(大宗
出 0),RGB(23,125,255),RGB(255,0,0)));
DRAWRECTREL(75,CONST(930-(ABS(非大宗
进)*250/DAZHIV)),110,950,IF(CONST(非大宗
进 0),RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(112,CONST(930-(ABS(非大宗
出)*250/DAZHIV)),147,950,IF(CONST(非大宗
出 0),RGB(23,125,255),RGB(255,0,0)));
DRAWRECTREL(150,CONST(940-(ABS(净流
入)*250/DAZHIV))-20,190,950,IF(CONST(净流
入 0),RGB(200,0,0),RGB(0,125,50)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0001,0.9,0,STRCAT( ,CON2STR(大宗
进/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.036,0.9,0,STRCAT( ,CON2STR(大宗
出/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.074,0.9,0,STRCAT( ,CON2STR(非大
宗进/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.111,0.9,0,STRCAT( ,CON2STR(非大
宗出/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.150,0.9,0,STRCAT( ,CON2STR(净流
入/1,0))),COLORYELLOW;
DRAWTEXT_FIX(1,0.000,0.99,0,STRCAT(STRCAT( 主力 ,CON2STR(主力净流
入,0)), 万 )),COLORMAGENTA;
DRAWTEXT_FIX(1,0.078,0.99,0,STRCAT(STRCAT( 散户 ,CON2STR(散户净流
入,0)), 万 )),COLORCYAN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.145,0.99,0, 净流
入:(万) ),COLORYELLOW;
主力买力度:=LARGEINTRDVOL*1000/VOL;
主力卖力度:=LARGEOUTTRDVOL*1000/VOL;
AAD:=CONST(MAX(ABS(主力买力度),ABS(主力卖力度)))*4,NODRAW;
DRAWRECTREL(0,515,CONST(ABS(主力买力度)*560/AAD),568,IF(CONST(主
力买力度) 0,RGB(255,0,0),RGB(0,50,0)));
DRAWRECTREL(0,570,CONST(ABS(主力卖力度)*560/AAD),623,IF(CONST(主
力卖力度) 0,RGB(0,50,0),RGB(255,0,0)));
DRAWTEXT_FIX(1,0,0.524,0,STRCAT( 主买力度: ,CON2STR(主力买力
度,0))),COLORYELLOW;
DRAWTEXT_FIX(1,0,0.576,0,STRCAT( 主卖力度: ,CON2STR(主力卖力
度,0))),COLORYELLOW;
XXX_1:=EMA(CLOSE,2)-EMA(CLOSE,89);
XXX_2:=EMA(XXX_1,30);
XXX_3:=2*(XXX_1-XXX_2)*9.8;
XXX_4:=POW(XXX_3,3)*0.1+POW(XXX_3,2);
XXX_5:=IF(XXX_3 0.015,XXX_4,0)/28;
XXX_6:=MA(CLOSE,5);
XXX_7:=MA(CLOSE,10);
XXX_8:=MA(CLOSE,20);
XXX_9:=XXX_8 XXX_7ANDXXX_8 XXX_6;
XXX_10:=XXX_9ANDCROSS(CLOSE,XXX_8)ANDCLOSE/REF(CLOSE,1) 1.02;
XXX_11:=XXX_9ANDCROSS(CLOSE,XXX_8)ANDCLOSE/REF(CLOSE,1) 1.09;
STICKLINE(XXX_11,0,60,9,0),COLORFFFF00;
STICKLINE(XXX_11,0,70,7,0),COLORD9D919;
STICKLINE(XXX_11,0,80,6,0),COLORFF0066;
STICKLINE(XXX_11,0,105,1.5,0),COLOR0099FF;
STICKLINE(XXX_11,0,105,0.6,0),COLORFF00FF;
STICKLINE(XXX_10,0,105,0.6,0),COLORFF00FF;
XXX_1:=EMA(CLOSE,2)-EMA(CLOSE,89);
XXX_2:=EMA(XXX_1,30);
XXX_3:=2*(XXX_1-XXX_2)*9.8;
XXX_4:=POW(XXX_3,3)*0.1+POW(XXX_3,2);
XXX_5:=IF(XXX_3 0.015,XXX_4,0)/28;
XXX_6:=MA(CLOSE,5);
XXX_7:=MA(CLOSE,10);
XXX_8:=MA(CLOSE,20);
XXX_9:=XXX_8 XXX_7ANDXXX_8 XXX_6;
XXX_9ANDCLOSE XXX_8ANDCLOSE/REF(CLOSE,1) 1.02;
XXX_1:=EMA(CLOSE,2)-EMA(CLOSE,89);
XXX_2:=EMA(XXX_1,30);
XXX_3:=2*(XXX_1-XXX_2)*9.8;
XXX_4:=POW(XXX_3,3)*0.1+POW(XXX_3,2);
XXX_5:=IF(XXX_3 0.015,XXX_4,0)/28;
XXX_6:=MA(CLOSE,5);
XXX_7:=MA(CLOSE,10);
XXX_8:=MA(CLOSE,20);
XXX_9:=XXX_8 XXX_7ANDXXX_8 XXX_6;
XXX_9ANDCLOSE XXX_8ANDCLOSE/REF(CLOSE,1) 1.092;