通达信获利盘比例指标(源码)

0;
获利盘比例:WINNER(CLOSE)*100,LINETHICK0;
获利盘比例差:获利盘比例-REF(获利盘比例,1);
WINN:=获利盘比例差*2;
STICKLINE(WINN>0,WINN,0,3.5,0),COLOR000088;
STICKLINE(WINN>0,WINN,0,3,0),COLOR0000AA;
STICKLINE(WINN>0,WINN,0,2.5,0),COLOR0000BB;
STICKLINE(WINN>0,WINN,0,2,0),COLOR0000CC;
STICKLINE(WINN>0,WINN,0,1.5,0),COLOR0000EE;
STICKLINE(WINN>0,WINN,0,1,0),COLOR0000FF;
STICKLINE(WINN<0,WINN,0,3.5,0),COLOR008800;
STICKLINE(WINN<0,WINN,0,3,0),COLOR00AA00;
STICKLINE(WINN<0,WINN,0,2.5,0),COLOR00BB00;
STICKLINE(WINN<0,WINN,0,2,0),COLOR00CC00;
STICKLINE(WINN<0,WINN,0,1.5,0),COLOR00DD00;
STICKLINE(WINN<0,WINN,0,1,0),COLOR00FF00;
RSV:=SUM(获利盘比例差,3);
K:=SMA(RSV,5,1);
D:=SMA(K,9,1);
VAR1:3*K-2*D;
LLJX:=VAR1;
0,POINTDOT,COLORWHITE;
B1:SUM(LLJX,1),COLORCYAN,LINETHICK2;
B2:SUM(LLJX,2),COLORCYAN;
B3:SUM(LLJX,3),COLORCYAN;
B4:SUM(LLJX,4),COLORCYAN;
B5:SUM(LLJX,5),COLORCYAN;
B6:SUM(LLJX,6),COLORCYAN;
B7:SUM(LLJX,7),COLORCYAN;
B8:SUM(LLJX,8),COLORCYAN;
B9:SUM(LLJX,9),COLORCYAN;
B10:SUM(LLJX,10),COLORCYAN,LINETHICK3;
IF(B1>REF(B1,1),B1,DRAWNULL),COLOR0000FF,LINETHICK2;
IF(B2>REF(B2,1),B2,DRAWNULL),COLOR0000FF,LINETHICK1;
IF(B3>REF(B3,1),B3,DRAWNULL),COLOR0000FF,LINETHICK1;
IF(B4>REF(B4,1),B4,DRAWNULL),COLOR0000FF,LINETHICK1;
IF(B5>REF(B5,1),B5,DRAWNULL),COLOR0000FF,LINETHICK1;
IF(B6>REF(B6,1),B6,DRAWNULL),COLOR0000FF,LINETHICK1;
IF(B7>REF(B7,1),B7,DRAWNULL),COLOR0000FF,LINETHICK1;
IF(B8>REF(B8,1),B8,DRAWNULL),COLOR0000FF,LINETHICK1;
IF(B9>REF(B9,1),B9,DRAWNULL),COLOR0000FF,LINETHICK1;
IF(B10>REF(B10,1),B10,DRAWNULL),COLOR0000FF,LINETHICK3;
AA:=FILTER(CROSS(REF(B10,1),B10),5);
DRAWTEXT(AA,B10,'★见顶 '),COLORWHITE;
ASDF:=STRCAT(STRCAT('■现实获利盘比例: ',CON2STR(WINNER(CLOSE)*100,2)),'％');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,ASDF),COLOR00FFFF;