input:N(13,1,99999,1),M1(3,2,40,1);
DRAWGBKLAST(MA(CLOSE,13)>REF(MA(CLOSE,13),1), STRIP(RGB(40,10,0),RGB(80,90,0),0));
DRAWGBKLAST(MA(CLOSE,13)<=REF(MA(CLOSE,13),1),STRIP(RGB(60,95,95),RGB(0,0,0),0));
{快速趋势线}
IF DATATYPE=8  then begin
partline(c*2-ref(c,3),c>0),MOVE3,color005555,LAYER7,linethick2;
partline(ref(c,1)*2-ref(c,4),c>0),MOVE2,color005500,LAYER7,linethick2;
partline(ref(c,2)*2-ref(c,5),c>0),MOVE1,color553355,LAYER7,linethick2;
END;
{强势K线始}
趋强:=MA(CLOSE,21);
STICKLINE(C>=趋强 AND C<O,C,O,1.2,-1),COLORDDDDDD;
STICKLINE(C>=趋强 AND C>=O,C,O,2.6,0),COLORRED;
STICKLINE(C>=趋强 AND C>=O,C,O,1.2,0),COLORRED;{强势K线结}
WRn:=100 *(C-LLV(C,N))/(HHV(C,N)-LLV(C,N));
{WRn:=100 *(C-LLV(C,N1))/(HHV(C,N1)-LLV(C,N1));}
压力:HHV(H,N),COLORFF0000,LINETHICK2;
强势:(((HHV(C,N)-LLV(C,N))*0.8)+(LLV(C,N))),COLOR808080;
趋强:(((HHV(C,N)-LLV(C,N))*0.618)+(LLV(C,N))),COLOR808080;
平衡:(((HHV(C,N))+(LLV(C,N)))/2),COLORFFFFFF;
趋弱:(((HHV(C,N)-LLV(C,N))*0.382)+(LLV(C,N))),COLOR808080;
弱势:(((HHV(C,N)-LLV(C,N))*0.2)+(LLV(C,N))),COLOR808080;
支撑:LLV(LOW,N),COLOR0080FF,LINETHICK2;
多空线:MA(CLOSE,13),COLORGREEN,LINETHICK0;
PARTLINE(MA(CLOSE,13),MA(CLOSE,13)>REF(MA(CLOSE,13),1),RGB(255,0,0),MA(CLOSE,13)<=REF(MA(CLOSE,13),1),RGB(0,255,0)),LINETHICK2;
STICKLINE((((WRn > 20) AND (WRn < 50)) AND (CLOSE < OPEN)),OPEN,CLOSE,4,0),COLORFF00FF;{变盘提示};
{附加段}
流通盘:=FINANCE2(37)/10000;
市盈率:=DYNAINFO(39);
市净率:= DYNAINFO(58);
每股收益:=FINANCE2(3);
每股净资产:=FINANCE2(4);
净资产收益率:=FINANCE2(5);
F:=COST(5 );J:=COST(95 );
M:=COST(15 );X:=COST(85 );
F1:=(J-F)/(F+J)*100;M1:=(X-M)/(X+M)*100;
集中度90:=F1;
集中度70:=M1;
获利盘:=WINNER(CLOSE)*100;
套牢盘:=100*(1-WINNER(C));
浮筹比:=(winner(c*1.1)-winner(c*0.9))/winner(hhv(h,0))*100;
DRAWTEXTABS(5,5,'集中度90:'+集中度90+' '),LINETHICK1,Color00FF00;
DRAWTEXTABS(5,20,'集中度70:'+集中度70+' '),LINETHICK1,ColorYELLOW;
DRAWTEXTABS(5,35,'获利盘:'+获利盘+'% '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS(5,50,'套牢盘:'+套牢盘+'% '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS(5,65,'浮筹比:'+浮筹比+'% '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS(5,80,'市盈率:'+市盈率+' '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS(5,95,'市净率:'+市净率+' '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS(5,110,'每股净资产:'+每股净资产+' '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS(5,125,'净资产收益率:'+净资产收益率+' '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS(110,5,'每股收益:'+每股收益+'元 '),LINETHICK1,COLORa9a9a9;
DRAWTEXTABS(110,20,'流通盘:'+流通盘+' '),LINETHICK1,Colora9a9a9;