拉升:IF(CURRBARSCOUNT=1 AND REF(C,1)<REF(C,2) AND C>REF(C,1) AND MA(C,1)>REF(MA(C,1),1),CONST(REF(C,1)*1.01),DRAWNULL),COLORFF00FF;

A001:STICKLINE(CURRBARSCOUNT=1 AND C>=REF(C,1),拉升,拉升*0.9992,15,0),COLORMAGENTA;

DRAWTEXT(CURRBARSCOUNT=1 AND 拉升=CONST(REF(C,1)*1.01),L*0.99996,'      拉升線'),COLORMAGENTA;

DRAWKLINE(H,拉升,L,C);

止損:REF(HHV(H,13),1)*0.95,COLORGREEN,DOTLINE;

A002:STICKLINE(CURRBARSCOUNT=1 AND C>=REF(C,1),止損,止損*0.9996,15,0),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=1,止損*0.996,'止損線'),COLORGREEN;

AB:=EMA(((2*C+H+L)/4-LLV(LOW,30))/ 

(HHV(HIGH,30)-LLV(LOW,30))*100,8); 

BA:=EMA(AB,5); 

A1{高}:=REFDATE(REF(HHV(H,96),5),DATE); 

B1{低}:=REFDATE(REF(LLV(L,96),5),DATE); 

D{中}:=((A1)+(B1))/2; 

五:MA(C,5)LINETHICK2,COLOR00FFFF; 

二O:EMA(C,20),COLORMAGENTA; 

空倉:IF(AB-BA<0,五,DRAWNULL),LINETHICK2,COLOR00FFFF; 

持倉:IF(AB-BA>0,五,DRAWNULL),,LINETHICK2,COLORRED; 

箱頂:IF(AB>0 AND AB-BA<=0,A1,A1),LINETHICK3,COLOR00FF00; 

箱腰:IF(AB>0 AND AB-BA<=0,D,D),LINETHICK3,COLOR00FF00; 

箱低:IF(AB>0 AND AB-BA<=0,B1,B1),LINETHICK3,COLOR00FF00; 

_五:IF(CURRBARSCOUNT=6,L*0.992-0.02,DRAWNULL), 

CROSSDOT,COLORWHITE,LINETHICK3;{五日轉(zhuǎn)點(diǎn)} 

十:IF(CURRBARSCOUNT=11,L*0.992-0.02,DRAWNULL), 

CROSSDOT,COLORYELLOW,LINETHICK3;{十日轉(zhuǎn)點(diǎn)} 

二十:IF(CURRBARSCOUNT=21,L*0.992-0.02,DRAWNULL), 

CROSSDOT,COLORRED,LINETHICK3;{二十日轉(zhuǎn)點(diǎn)}; 

三十:IF(CURRBARSCOUNT=31,L*0.992-0.02,DRAWNULL), 

CROSSDOT,COLORCYAN,LINETHICK3;{三十日轉(zhuǎn)點(diǎn)}; 

六十:IF(CURRBARSCOUNT=61,L*0.992-0.02,DRAWNULL), 

CROSSDOT,COLORYELLOW,LINETHICK3;{六十日轉(zhuǎn)點(diǎn)}; 

九十:IF(CURRBARSCOUNT=91,L*0.992-0.02,DRAWNULL), 

CROSSDOT,COLORYELLOW,LINETHICK3;{九十日轉(zhuǎn)點(diǎn)}; 

高1:IF(AB>0 AND AB-BA>0,A1,DRAWNULL),LINETHICK3,COLORRED; 

中1:IF(AB>0 AND AB-BA>0,D,DRAWNULL),LINETHICK3,COLORRED; 

低1:IF(AB>0 AND AB-BA>0,B1,DRAWNULL),LINETHICK3,COLORRED;

C2:=REF(C,1);

漲停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);

STICKLINE(漲停,OPEN,CLOSE,2,0),COLORYELLOW;

STICKLINE(漲停,H,L,0,0),COLORRED;

跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);

STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;

STICKLINE(跌停,H,L,0,1),COLORGREEN;

{選股}

HHH:=CROSS(C,MA(L+(H-L)/2,25)*0.95);LLL:=CROSS(MA(L+(H-L)/2,25)*0.95,C);

CCC:=CROSS(H,MA(L+(H-L)/2,25)*1.15);DDD:=CROSS(H,MA(L+(H-L)/2,25)*1.25);

DRAWTEXT(HHH AND MA(L+(H-L)/2,75)>=REF(MA(L+(H-L)/2,75),1),L*0.98,'買吧'),COLOR6699FF;

DRAWTEXT(CCC AND MA(L+(H-L)/2,75)>=REF(MA(L+(H-L)/2,75),1),H*1.02,'賣了'),COLOR6699FF;

DRAWTEXT(DDD AND MA(L+(H-L)/2,75)>=REF(MA(L+(H-L)/2,75),1),H*1.02,'小心頂'),COLOR6699FF;

VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));

VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));

VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));

DIR1:=ABS(CLOSE-REF(CLOSE,5));

VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);

ER1:=DIR1/VIR1;

CS1:=ER1*(0.8-2/8)+2/8;

CQ1:=CS1*CS1;

DIR2:=ABS(CLOSE-REF(CLOSE,10));

VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);

ER2:=DIR2/VIR2;

CS2:=ER2*(0.8-2/24)+2/24;

CQ2:=CS2*CS2;

STICKLINE(VAR2 < MA(VAR3,6),LOW,HIGH,0,1),COLORLIBLUE;

STICKLINE(VAR2 > MA(VAR3,6),LOW,HIGH,0,1),COLORRED;

STICKLINE(((OPEN>CLOSE)AND(VAR2<MA(VAR3,6))),(CLOSE-0.03),OPEN,3.05,0),COLORLIBLUE;

STICKLINE(((OPEN<CLOSE)AND(VAR2<MA(VAR3,6))),CLOSE,OPEN,3.05,1),COLORLIBLUE;

STICKLINE(((OPEN>CLOSE)AND(VAR2>MA(VAR3,6))),OPEN,(CLOSE-0.03),3.05,0),COLORRED;

STICKLINE(((OPEN<CLOSE)AND(VAR2>MA(VAR3,6))),OPEN,CLOSE,3.05,1),COLORRED;

DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.02)),7);

DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.02)),8);

PT:=REF(H,1)-REF(L,1);

CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;

AH:=CDP+PT;

AL:=CDP-PT;

NH:=CDP*2-REF(L,1);

NL:=CDP*2-REF(H,1);

強(qiáng):IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;

阻:IF(NH>強(qiáng),(強(qiáng)-CDP)*0.618+CDP,NH)NODRAW,COLORBLUE;

M:=IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL);

撐:IF(NL<M,CDP-(CDP-M)*0.618,NL)NODRAW;

底:IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL)NODRAW;

{量能飽和度}

SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));

【量能飽和】:=IF(SAT>1,1,SAT)*100,COLORYELLOW,NODRAW;

{活躍度}

LC:=REF(CLOSE,1);

RSI5:=(SMA(MAX(CLOSE-LC,0),3,1))/(SMA(ABS(CLOSE-LC),3,1))*100;

WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;

活躍度:=(RSI5-WR10),COLORFFFF00,LINETHICK1,NODRAW;

活躍度比:=IF(活躍度>=0,(活躍度+100)/2,100-ABS((活躍度-100)/2));

DRAWTEXT_FIX(C>0,0.0,0.0,0,STRCAT('所屬行業(yè)：',HYBLOCK)),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.10,0.0,0,STRCAT('所屬地區(qū)：',DYBLOCK)),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.20,0.0,0,STRCAT('主題投資：',GNBLOCK)),COLORYELLOW;

DRAWTEXT_FIX(1,0.00,0.04,0,'業(yè)績預(yù)報：')COLORYELLOW;

DRAWTEXT_FIX(1,0.06,0.04,0,EXTERNSTR(0,11))COLORYELLOW;

{DRAWTEXT_FIX(C>0,0.00,0.10,0,STRCAT('業(yè)績預(yù)報：',EXTERNSTR(0,11))),COLORYELLOW;}

{DRAWTEXT_FIX(C>0,0.0,0.15,0,STRCAT('解禁日期：',EXTERNSTR(0,8))),COLORYELLOW;}

{DRAWTEXT_FIX(C>0,0.00,0.20,0,STRCAT('千股千評：',EXTERNSTR(0,1))),COLOR00FFFF;}

{DRAWTEXT_FIX(C>0,0.00,0.25,0,STRCAT('智能診股：',EXTERNSTR(0,2))),COLOR00FFFF;};

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);

大宗進(jìn):=(超B)+(大B),NODRAW;

大宗出:=(超S)+(大S),NODRAW;

非大宗進(jìn):=(中B)+(小B),NODRAW;

非大宗出:=(中S)+(小S),NODRAW;

大宗進(jìn)限制:=IF((超B+大B)=0,0,大宗進(jìn));

大宗出限制:=IF((超S+大S)=0,0,大宗出);

非大宗進(jìn)限制:=IF(中B+小B=0,0,非大宗進(jìn));

非大宗出限制:=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;

機(jī)構(gòu)參與度:=(超B+超S+大B+大S)/成交總量*100,COLORYELLOW,NODRAW;

大單強(qiáng)度:=(超B+大B-超S-大S)/成交總量*100,COLORYELLOW,NODRAW;

大單強(qiáng)度限制:=IF(大單強(qiáng)度=0,-100,大單強(qiáng)度);

大單強(qiáng)度比:=IF(大單強(qiáng)度>=0,(大單強(qiáng)度限制+100)/2,100-ABS((大單強(qiáng)度限制-100)/2)),NODRAW;

超單強(qiáng)度:=(超B-超S)/(超B+超S)*100,COLORYELLOW,NODRAW;

超單強(qiáng)度限制:=IF(超單強(qiáng)度=0,-100,超單強(qiáng)度);

超單強(qiáng)度比:=IF(超單強(qiáng)度>0,(超單強(qiáng)度限制+100)/2,IF(超單強(qiáng)度<0,100-ABS((超單強(qiáng)度限制-100)/2),0)),NODRAW;

DAZHIV:=CONST(MAX(ABS(大宗進(jìn)),MAX(ABS(大宗出),MAX(ABS(非大宗進(jìn)),ABS(非大宗出))))),NODRAW;

DRAWRECTREL(0,CONST(930-(ABS(大宗進(jìn))*250/DAZHIV)),35,950,IF(CONST(大宗進(jìn)>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(非大宗進(jìn))*250/DAZHIV)),110,950,IF(CONST(非大宗進(jìn)>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(大宗進(jìn)/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(非大宗進(jìn)/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;