N:=20;

DRAWGBKLAST(DATE>900101,STRIP(RGB(75,75,75),RGB(0,0,0),0));

DRAWTEXTABS(10,10,STKLABEL+' '+STKNAME+' '+BKNAME),COLOR00FFFF;

STICKLINE(C>=O,C,O,8,0),COLOR000055;

STICKLINE(C>=O,C,O,6.5,0),COLOR000075;

STICKLINE(C>=O,C,O,5,0),COLOR000095;

STICKLINE(C>=O,C,O,3.5,0),COLOR0000B5;

STICKLINE(C>=O,C,O,2,0),COLOR0000D5;

STICKLINE(C>=O,H,L,0.5,0),COLOR0000F5;

STICKLINE(C<O,C,O,8,0),COLOR303000;

STICKLINE(C<O,C,O,6.5,0),COLOR404000;

STICKLINE(C<O,C,O,5,0),COLOR505000;

STICKLINE(C<O,C,O,3.5,0),COLOR606000;

STICKLINE(C<O,C,O,2,0),COLOR707000;

STICKLINE(C<O,H,L,0.5,0),COLOR808000;

總股本（億）:FINANCE2(35)/10000,COLORYELLOW,LINETHICK0;

流通（億）:FINANCE2(37)/10000,COLORFFFFFF,LINETHICK0;

均價:=(3*C+H+L+O)/6;

VAR1:=(8*均價+7*REF(均價,1)+6*REF(均價,2)+5*REF(均價,3)+4*REF(均價,4)+3*REF(均價,5)+2*REF(均價,6)+REF(均價,8))/36;

VAR2:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;

FILLRGN(VAR1,VAR2,VAR1>VAR2,(RGB(100,0,100)));

短趨:VAR1,ColorFFFFFF;

中趨:VAR2,COLORYELLOW;

PARTLINE(中趨,中趨<REF(中趨,1)),COLORGREEN;

SZ1:=REF(VAR1,1)=REF(VAR2,1) AND VAR1>VAR2 AND CLOSE>VAR1;

SZ2:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1) AND H/VAR1<1.1 AND L>VAR2 AND CLOSE>VAR1;

SZ3:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>=REF(VAR2,1) AND H/VAR1>1.1;

SZ4:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1) AND CLOSE>VAR2 AND CLOSE<VAR1;

SZ5:=(VAR1>VAR2 AND VAR2>REF(VAR2,1) AND VAR1<>REF(VAR1,1) AND CLOSE<VAR2) OR (VAR1>VAR2 AND VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1) AND CLOSE<VAR2);;

SZ6:=REF(VAR1,1)>REF(VAR2,1) AND VAR1=VAR2 AND CLOSE<VAR2;

XD1:=VAR1=VAR2 AND CLOSE<VAR2 OR (VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1) AND REF(VAR1,1)=REF(VAR2,1) AND CLOSE<VAR2);

XD2:=VAR1=VAR2 AND CLOSE>VAR1;

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

量能飽和度:=IF(SAT>1,1,SAT)*100;

IF BARSTATUS=2 AND SZ1 THEN BEGIN

DRAWTEXTABS(320,25,'調(diào)整結(jié)束短線介入'),COLORRED;

END

ELSE

IF BARSTATUS=2 AND SZ2 THEN BEGIN

DRAWTEXTABS(320,25,'上升通道走勢良好'),COLORRED;

END

ELSE

IF BARSTATUS=2 AND SZ3 THEN BEGIN

DRAWTEXTABS(320,25,'股價偏離注意調(diào)整'),COLORRED;

END

ELSE

IF BARSTATUS=2 AND SZ4 THEN BEGIN

DRAWTEXTABS(320,25,'上升通道調(diào)整洗盤'),COLORGREEN;

END

ELSE

IF BARSTATUS=2 AND SZ5 THEN BEGIN

DRAWTEXTABS(320,25,'轉(zhuǎn)向特征注意離場'),COLORGREEN;

END

ELSE

IF BARSTATUS=2 AND SZ6 THEN BEGIN

DRAWTEXTABS(320,25,'通道改變堅決離場'),COLORGREEN;

END

ELSE

IF BARSTATUS=2 AND XD1 THEN BEGIN

DRAWTEXTABS(320,25,'下跌通道只宜觀望'),COLORGREEN;

END

ELSE

IF BARSTATUS=2 AND XD2 THEN BEGIN

DRAWTEXTABS(320,25,'短期底部準備進入'),COLORYELLOW;

END;

AB1:=COST(0.33);

AB2:=COST(5);

AB3:=COST(15);

AB4:=COST(55);

AB5:=COST(97);

AA1:=COST(90);

AA2:=COST(70);

AA3:=COST(30);

AA4:=COST(10);

獲利:=WINNER(CLOSE)*100;

套牢:=100-WINNER(CLOSE)*100;

DRAWTEXTABS(15,25,'量能飽和度:'+NUMTOSTRN(量能飽和度,2)+'%'),COLOR00FFFF;

DRAWTEXTABS(15,40,'90成本:'+NUMTOSTRN(AA1,2)),COLOR00FFFF;

DRAWTEXTABS(15,55,'70成本:'+NUMTOSTRN(AA2,2)),COLOR00FFFF;

DRAWTEXTABS(15,70,'30成本:'+NUMTOSTRN(AA3,2)),COLOR00FFFF;

DRAWTEXTABS(15,85,'10成本:'+NUMTOSTRN(AA4,2)),COLOR00FFFF;

DRAWTEXTABS(15,100,'底出擊:'+NUMTOSTRN(AB1,2)),COLOR00FFFF;

DRAWTEXTABS(520,25,'建倉:'+NUMTOSTRN(AB2,2)),COLOR00FFFF;

DRAWTEXTABS(600,25,'快刀:'+NUMTOSTRN(AB3,2)),COLOR00FFFF;

DRAWTEXTABS(675,25,'升浪:'+NUMTOSTRN(AB4,2)),COLOR00FFFF;

DRAWTEXTABS(520,40,'獲利:'+NUMTOSTRN(獲利,2)+'%'),COLOR00FFFF;

DRAWTEXTABS(600,40,'套牢:'+NUMTOSTRN(套牢,2)+'%'),COLOR00FFFF;

DRAWTEXTABS(675,40,'預測:'+NUMTOSTRN(AB5,2)),COLOR00FFFF;

TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1;

立樁量:=FILTER(TJ1,5);

TJ2:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(HIGH,3),1,0)));

突破:=TJ2=1;

STICKLINE(CLOSE,REF(HIGH,BARSLAST(立樁量)),REF(HIGH,BARSLAST(立樁量)),6,0),COLORCYAN;

STICKLINE(CLOSE,REF(LOW,BARSLAST(立樁量)),REF(LOW,BARSLAST(立樁量)),6,0),COLORYELLOW;

TJ3:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(LOW,3),1,0)));

三天法則:=TJ3=1;

成立:=三天法則 AND 突破;

條件成立:=FILTER(成立,3);

DRAWTEXT(條件成立,L*0.99,'成立'),COLORYELLOW;

DRAWRECTREL(0,85,15,380,RGB(30,30,30)),COLORWHITE;

AAA:=量能飽和度<=10;

BBB:=量能飽和度>10 AND 量能飽和度<=20;

CCC:=量能飽和度>20 AND 量能飽和度<=30;

DDD:=量能飽和度>30 AND 量能飽和度<=50;

EEE:=量能飽和度>50 AND 量能飽和度<=70;

FFF:=量能飽和度>70 AND 量能飽和度<=80;

GGG:=量能飽和度>80 AND 量能飽和度<=90;

HHH:=量能飽和度>90;

IF BARSTATUS=2 AND AAA THEN BEGIN DRAWRECTREL(0,350,15,380,RGB(255,0,0));

END

ELSE

IF BARSTATUS=2 AND BBB THEN BEGIN DRAWRECTREL(0,320,15,380,RGB(255,0,0));

END

ELSE

IF BARSTATUS=2 AND CCC THEN BEGIN DRAWRECTREL(0,290,15,380,RGB(255,0,0));

END

ELSE

IF BARSTATUS=2 AND DDD THEN BEGIN DRAWRECTREL(0,230,15,380,RGB(255,0,0));

END

ELSE

IF BARSTATUS=2 AND EEE THEN BEGIN DRAWRECTREL(0,170,15,380,RGB(255,0,0));

END

ELSE

IF BARSTATUS=2 AND FFF THEN BEGIN DRAWRECTREL(0,140,15,380,RGB(255,0,0));

END

ELSE

IF BARSTATUS=2 AND GGG THEN BEGIN DRAWRECTREL(0,110,15,380,RGB(255,0,0));

END

ELSE

IF BARSTATUS=2 AND HHH THEN BEGIN DRAWRECTREL(0,85,15,380,RGB(255,0,0));

END;