以下是同花顺控盘程度指标公式
趋线1:EMA(100*(C-LLV(LOW,50))/(HHV(H,50)-LLV(LOW,50)),510),colorwhite,LINETHICK3;
ZGBS:=MA(C,120);
VAR3GBS:=(MA(C,25)-ZGBS)/ZGBS;
VAR4GBS:=MA((CLOSE-LLV(LOW,50))/(HHV(HIGH,50)-LLV(LOW,50))*100,45);
波段进场:IF(CLOSE>ZGBS AND REF(VAR4GBS,1)REF(VAR4GBS,1) AND REF(VAR4GBS,1)<REF(VAR4GBS,2),80,50),colorwhite;
反弹进场:IF(REF(VAR4GBS,1)REF(VAR4GBS,1) AND REF(VAR4GBS,1)<REF(VAR4GBS,2) AND VAR3GBS<-0.3,80,50),colormagenta;
超跌进场:IF(CROSS(VAR4GBS,5) AND VAR3GBS<-0.4,80,50),colorred;
STICKLINE(C>=MA(C,10),VAR4GBS,REF(VAR4GBS,1),4,0),colorred;
STICKLINE(C<MA(C,10),VAR4GBS,REF(VAR4GBS,1),4,0),colorgreen;
顶部1: 80,colorgreen,LINETHICK1;
底1: 20,colorred,LINETHICK1;
B1:=(HHV(H,390)-C)/(HHV(H,390)-LLV(LOW,390))*100-5;
B2:=SMA(B1,800,1)+100;
B3:=(C-LLV(L,390))/(HHV(H,390)-LLV(L,390))*150;
B4:=SMA(B3,100,1);
B5:=SMA(B4,100,1)+100;
B6:=B5-B2;
控盘程度:(IF(B6>3,B6-3,0))*1,coloryellow;
中线:50,colormagenta,LINETHICK2;
警戒线: 85,colorblue,LINETHICK3;
卖出线: 100,colorgreen,LINETHICK3;
趋势: 3*SMA((CLOSE-LLV(LOW,90))/(HHV(HIGH,90)-LLV(LOW,90))*100,45,1)-2*SMA(SMA((CLOSE-LLV(LOW,90))/(HHV(HIGH,90)-LLV(LOW,90))*100,45,1),45,1),colorred,LINETHICK3;
抄底: 10,LINETHICK2,colorwhite;
底线: 0,LINETHICK1,colorwhite;
买入警戒: IF(REF(VAR4GBS,1)<=10 AND 趋势<=5,40,0),colormagenta,LINETHICK4;
买入警戒1: IF(趋势<=0 AND REF(VAR4GBS,1)<15,60,0),colorred,LINETHICK2;
卖出警戒2: IF(趋势>=95,55,100),colorblue,LINETHICK3;
卖出警戒5: IF(REF(VAR4GBS,1)>=85 AND 趋势>=95 ,30,100),colorgreen,LINETHICK5;
STICKLINE(控盘程度,0,控盘程度,0,0),coloryellow;
STICKLINE(控盘程度 AND 趋线1<50 AND REF(VAR4GBS,1)15 AND REF(VAR4GBS,1)50,0,50,2,0),colorgreen;
STICKLINE(控盘程度 AND 趋线1<50 AND REF(VAR4GBS,1)15 AND REF(VAR4GBS,1)<控盘程度 AND 控盘程度<50,0,控盘程度,2,0),colorgreen;
STICKLINE(控盘程度 AND 趋线1<50 AND REF(VAR4GBS,1)<趋线1 AND REF(VAR4GBS,1)<15,0,控盘程度,3,0),colorred;
STICKLINE(控盘程度 AND 趋线1趋线1 AND 50<控盘程度,0,50,0,0),colorred;
STICKLINE(控盘程度 AND 控盘程度>50 AND 趋线1>50 AND REF(VAR4GBS,1)>趋线1 AND REF(VAR4GBS,1)>控盘程度,0,50,5,0),colorred;
STICKLINE(控盘程度 AND 控盘程度>50 AND 趋线1>50 AND REF(VAR4GBS,1)>趋线1 AND REF(VAR4GBS,1)<控盘程度,0,50,3,0),colorred;
STICKLINE(控盘程度 AND 控盘程度>50 AND 趋线1>50 AND REF(VAR4GBS,1)<趋线1 AND REF(VAR4GBS,1)<控盘程度 AND REF(VAR4GBS,1)15,0,50,0,0),colorblue;
STICKLINE(控盘程度 AND 控盘程度>50 AND 趋线1>50 AND REF(VAR4GBS,1)<趋线1 AND REF(VAR4GBS,1)<控盘程度 AND REF(VAR4GBS,1)<50 AND REF(VAR4GBS,1)<15,0,50,3,0),colorred;
STICKLINE(控盘程度 AND 控盘程度>50 AND 趋线1>50 AND REF(VAR4GBS,1)<趋线1 AND REF(VAR4GBS,1)50,0,50,0,0),colormagenta;
STICKLINE(控盘程度 AND 控盘程度>50 AND 趋线1>50 AND REF(VAR4GBS,1)控盘程度,0,50,0,0),colorred;
STICKLINE(控盘程度 AND 趋线1>50 AND 控盘程度<50 AND REF(VAR4GBS,1)<趋线1 AND REF(VAR4GBS,1)<50,0,控盘程度,0,0),colorblue;
STICKLINE(控盘程度 AND 趋线1>50 AND 控盘程度<50 AND REF(VAR4GBS,1)50,0,控盘程度,0,0),colorwhite;
STICKLINE(控盘程度 AND 趋线1>50 AND 控盘程度趋线1,0,控盘程度,0,0),colorred;
VAR1BS:=(HIGH+LOW+CLOSE)/3,colorred;
VAR2B:=(VAR1BS-MA(VAR1BS,20))/(0.015*AVEDEV(VAR1BS,20));
VAR3B:=(VAR1BS-MA(VAR1BS,110))/(0.015*AVEDEV(VAR1BS,110));
VAR4B:=IF(VAR2B>=180 AND VAR2B=180 AND VAR3B<230 AND 控盘程度80,-50,0),LINETHICK1,colorblue;
VAR4B1:=IF(VAR2B>=180 AND VAR2B=180 AND VAR3B<230 AND 趋线180,-50,0),LINETHICK1,colorblue;
VAR5B:=IF(VAR2B-230 AND VAR3B-230 AND 控盘程度<50,100,0);
VAR5B1:=IF(VAR2B-230 AND VAR3B-230 AND 趋线1<50,100,0);
天线:IF(BARSCOUNT(CLOSE)=229 AND VAR2B>=229 AND 趋线180,-100,VAR4B)+100),LINETHICK2,colorgreen;
天线1:IF(BARSCOUNT(CLOSE)=229 AND VAR2B>=229 AND 控盘程度80,-100,VAR4B)+100),LINETHICK2,colorgreen;
DRAWTEXT(CROSS(50,趋线1),90,\’转弱转弱\’),colorgreen;
DRAWTEXT(CROSS(趋线1,50) AND 趋势<80,75,\’转强转强\’),colorwhite;
DRAWTEXT(CROSS(趋势,REF(VAR4GBS,1)) AND 趋线1>50 AND 趋势50,50,\’放心买入点\’),colorred;
DRAWTEXT(趋线1>50 AND 趋势>50 AND 趋势>趋线1 AND 控盘程度>50,趋线1+7,\’牛\’),colorred;
DRAWTEXT(CROSS(80,REF(VAR4GBS,1)) AND 控盘程度<50,80,\’做空点\’),colorwhite;
DRAWTEXT(CROSS(REF(VAR4GBS,1),趋线1) AND 趋线1>50 AND REF(VAR4GBS,1)<趋势,趋势+10,\’放心买点\’),colorred;
DRAWTEXT(CROSS(REF(VAR4GBS,1),趋线1) AND 趋势>REF(VAR4GBS,1) AND 趋势50,趋势+15,\’满仓买点\’),colorwhite;
DRAWTEXT(CROSS(REF(VAR4GBS,1),趋势) AND 趋线180,趋势,\’卖点\’),colorgreen;
DRAWTEXT(CROSS(REF(VAR4GBS,1),趋线1) AND 趋线1<50 AND 趋势20 AND 控盘程度<50,趋势+10,\’反弹高点跑\’),colormagenta;
DRAWTEXT(CROSS(REF(VAR4GBS,1),20) AND 趋势>0,30,\’抄底买点\’),colorwhite;
DRAWTEXT(CROSS(趋势,13) AND REF(VAR4GBS,1)>20,30,\’建仓买点\’),colorwhite;
