通达信控盘监测副图指标公式源码
看图便知，简单易懂，底部逃顶信号给出各种操作方向
VAR1:=EMA(EMA(CLOSE,5),5);
控盘:(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000,NODRAW;
STICKLINE(控盘<0,控盘,0,1,0),COLORYELLOW;
A10:=CROSS(控盘,0);
散户:IF(控盘<0,控盘,0),COLORYELLOW,NODRAW;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2,COLORSTICK;
力度:=MACD/REF(MACD,1);
大盘热点正:= MACD>0 AND MACD/REF(MACD,1)>1.15 AND C/REF(C,1)>1.005;
大盘热点负:= MACD<0 AND REF(MACD,1)/MACD>1.15 AND C/REF(C,1)>1.005;
负到正0:=MACD>0 AND REF(MACD<0,1) AND C/REF(C,1)>1.003 ;
大盘热点:=IF(大盘热点正 OR 大盘热点负 OR 负到正0 ,1,0);
开始控盘:=A10 AND 大盘热点,NODRAW;
STICKLINE(开始控盘,0,6,0,0),COLORFF00FF,COLORRED;
DRAWICON(开始控盘,6,18)NODRAW;
DRAWICON(开始控盘,7,15),COLORMAGENTA;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED;
有庄:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORFF00FF;
控盘高:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW;
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLOR00FF00;
出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLOR00FF00,NODRAW;
控盘监测:MA(控盘,3),COLORWHITE;
拉伸波:(C-L)/L*100,NODRAW;
调头波:(C-H)/H*100,NODRAW;
总量:=VOL,NODRAW;
ZZ:=IF(REF(C,1)>REF(O,1) AND O>REF(C,1)*1.014 AND C<O*1.02,1,3);
V5:=MA(V,5);
V12:=MA(V,12);
V34:=MA(V,34);
C6:=MA(C,6);
吸货量:=CROSS(C,C6) AND V>V5*1.2 AND V>V12*1.2 AND ZZ>2 AND C>H*0.975,NODRAW;
出货量:=CROSS(C6,C) AND V>V5*1.2 AND V>V12*1.2,NODRAW;
天量:=VOL>MA(VOL,5)*2 AND V>V34*3 AND C<REF(C,1)*1.05,NODRAW;
地量:=VOL<MA(VOL,5)/2 AND V<V12/2 AND H>L,NODRAW;
DRAWTEXT(吸货量,-2,'吸'),COLORRED;
DRAWTEXT(出货量,控盘*1.01,'出'),COLORGREEN;
DRAWTEXT(天量,控盘*0.995,'天'),COLORYELLOW;
DRAWTEXT(地量,2,'地'),COLORWHITE;
换手:=VOL*10000/FINANCE(7),NODRAW,COLORGREEN;
MA3:=MA(C,3);
MA5:=MA(C,5);
MA13:=MA(C,13);
MA21:=MA(C,21);
MA34:=MA(C,34);
MA55:=MA(C,55);
MA89:=MA(C,89);
MA144:=MA(C,144);
MA233:=MA(C,233);
TMP1:=IF(C>MA5,1,0);
TMP2:=IF(C>MA13,1,0);
TMP3:=IF(C>MA21,1,0);
TMP4:=IF(C>MA34,1,0);
TMP5:=IF(C>MA55,1,0);
TMP6:=IF(C>MA89,1,0);
TMP7:=IF(C>MA144,1,0);
TMP8:=IF(C>MA233,1,0);
个股强弱:=TMP1+TMP2+TMP3+TMP4+TMP5+TMP6+TMP7+TMP8+1,LINETHICK0;
前1天:=REF(个股强弱,1);
前2天:=REF(个股强弱,2);
前3天:=REF(个股强弱,3);
底线价:=MA((H+L+O+C)/4,5)*0.93,DOTLINE,COLORLIGREEN;
顶线价:=MA((H+L+O+C)/4,5)*1.07,DOTLINE,COLORLIGREEN;
市场获利:=WINNER(C)*100,NODRAW;
GOODGUPIAO:SMA(MAX(CLOSE-C,0),7,1)/SMA(ABS(CLOSE-C),7,1)*100,NODRAW;
抛物线:=SAR(5,34,110),NODRAW;
空:=IF(抛物线>C,抛物线,DRAWNULL),COLORWHITE,DOTLINE;
多:=IF(抛物线<C,抛物线,DRAWNULL),COLORMAGENTA,DOTLINE;
正离:=(H/多-1)*100,NODRAW;
负离:=(空/L-1)*100,NODRAW;
正离底:=(L/多-1)*100,NODRAW;
抛物线2:=SAR(5,3,15),NODRAW;
空2:=IF(抛物线2>C,抛物线2,DRAWNULL),COLORWHITE;
多2:=IF(抛物线2<C,抛物线2,DRAWNULL),COLORLIMAGENTA;
长波正离:=(H/多2-1)*100,NODRAW;
长波负离:=(空2/L-1)*100,NODRAW;
长波正离底:=(L/多2-1)*100,NODRAW;
顶5:=L<REF(L,1) AND REF(L,1)>REF(L,2) AND H<REF(H,1) AND REF(H,1)>REF(H,2) AND REF(H,1)>H AND C<MA5 AND REF(C>多,1) AND REF(HHV(H,7),2)<REF(H,1) AND C<REF(C,1) ;
顶3:=L<REF(L,1) AND REF(L,1)>REF(L,2) AND H<REF(H,1) AND REF(H,1)>REF(H,2) AND REF(H,1)>H AND C<MA3 AND REF(C>多,1) AND REF(HHV(H,7),2)<REF(H,1) AND C<REF(C,1) ;
顶:=L<REF(L,1) AND REF(L,1)>REF(L,2) AND H<=REF(H,1) AND REF(H,1)>REF(H,2) AND REF(H,1)>H AND REF(C>多,1) AND REF(HHV(H,7),2)<=REF(H,1) AND C<REF(C,1);
大顶:=IF(顶5=1 AND 顶3=1 AND 顶=1,顶5,DRAWNULL);
DRAWTEXT(大顶,控盘+1,'大顶'), COLORGREEN;
次顶:=IF(顶5=0 AND 顶3=1 AND 顶=1,顶3,DRAWNULL);
DRAWTEXT(次顶,控盘+1,'顶3'), COLORGREEN;
小顶:=IF(顶5=0 AND 顶3=0 AND 顶=1,顶,DRAWNULL);
DRAWTEXT(小顶,控盘+1,'顶'), COLORGREEN;
特殊顶:=L<REF(L,1) AND REF(L,1)>REF(L,2) AND REF(L,2)>REF(L,3) AND H<REF(H,2) AND REF(H,1)<REF(H,2) AND REF(HHV(H,7),3)<REF(H,2) AND C<REF(C,1);
DRAWTEXT(特殊顶,控盘+1,'特殊顶'),COLORRED; ;
特殊顶2:=L<REF(L,2) AND REF(L,2)>REF(L,3) AND REF(L,1)<REF(L,2) AND REF(H,1)>H AND REF(H,1)>REF(H,2) AND REF(H,2)>REF(H,3) AND REF(HHV(H,7),2)<REF(H,1) AND C<REF(C,1);
DRAWTEXT(特殊顶2,控盘+1,'特殊顶2'),COLORRED; ;
特殊顶3:=L<REF(L,1) AND REF(L,1)>REF(L,2) AND REF(L,2)>REF(L,3) AND REF(L,3)>REF(L,4) AND L<REF(L,2) AND H<REF(H,3) AND REF(H,1)<REF(H,3) AND REF(H,2)<REF(H,3) AND REF(H,3)>REF(H,4) AND REF(HHV(H,7),4)<REF(H,3) AND C<REF(C,1);
DRAWTEXT(特殊顶3,控盘+1,'特殊顶3'),COLORRED; ;
底5:=L>REF(L,1) AND REF(L,1)<REF(L,2) AND H>REF(H,1) AND REF(H,1)<REF(H,2) AND REF(H,1)<H AND C>MA5 AND REF(C<空,1) AND REF(LLV(L,7),2)>REF(L,1) AND C>REF(C,1) AND C>REF(O,1);
底3:=L>REF(L,1) AND REF(L,1)<REF(L,2) AND H>REF(H,1) AND REF(H,1)<REF(H,2) AND REF(H,1)<H AND C>MA3 AND REF(C<空,1) AND REF(LLV(L,7),2)>REF(L,1) AND C>REF(C,1) AND C>REF(O,1);
底:=L>REF(L,1) AND REF(L,1)<REF(L,2) AND H>REF(H,1) AND REF(H,1)<REF(H,2) AND REF(H,1)<H AND REF(C<空,1) AND REF(LLV(L,7),2)>REF(L,1) AND C>REF(C,1) AND C>REF(O,1);
大底:=IF(底5=1 AND 底3=1 AND 底=1,底5,DRAWNULL);
DRAWTEXT(大底,控盘-1,'大底'), COLORMAGENTA;
次底:=IF(底5=0 AND 底3=1 AND 底=1,底3,DRAWNULL);
DRAWTEXT(次底,控盘-1,'底3'), COLORMAGENTA;
小底:=IF(底5=0 AND 底3=0 AND 底=1,底,DRAWNULL);
DRAWTEXT(小底,控盘-1,'底'), COLORMAGENTA;
特殊底:=L>REF(L,1) AND REF(L,1)>REF(L,2) AND REF(L,2)<REF(L,3) AND H>REF(H,1) AND REF(H,1)<REF(H,2) AND REF(LLV(L,7),3)>REF(L,2);
DRAWTEXT(特殊底,控盘-1,'特殊底'),COLORYELLOW; ;
行业换手:CALCSTOCKINDEX(HYZSCODE,'换手引用',1),NODRAW;