通达信波波睇庄源码附图

{N 1 100 8
M 1 100 13
P 1 100 16}
{波波睇庄}
VAR1:=EMA(EMA(CLOSE,13),13);
控盘:= (VAR1-REF(VAR1,1))/REF(VAR1,1)*9000000,COLORFFCCCC,POINTDOT;
STICKLINE(控盘 0,控盘,0,2,0),COLORWHITE;
无庄控盘:控盘 0,COLORWHITE;
STICKLINE(控盘 REF(控盘,1) AND 控盘 0,控盘,0,2,1),COLORRED;
有庄控盘: 控盘 REF(控盘,1) AND 控盘 0,COLORRED;
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(控盘 REF(控盘,1) AND 控盘 0,控盘,0,2,0),COLOR00FF00;
主力出货: 控盘 REF(控盘,1) AND 控盘 0,COLOR00FF00;
STICKLINE(VAR2 50 AND COST(85) CLOSE AND 控盘 0,控盘,0,2,0),COLORFF00FF;
高度控盘: VAR2 50 AND COST(85) CLOSE AND 控盘 0,COLORFF00FF;
A10:=CROSS(控盘,0);
开始控盘:IF(A10,6,0),COLORYELLOW;
空方:=(EMA(CLOSE,9)-EMA(CLOSE,2))/2*400000;
0;多方:=(EMA(CLOSE,2)-EMA(CLOSE,9))/2*400000;
多方引路:(多方-空方),COLORRED,LINETHICK2;
大盘价格:=( INDEXC-REF(INDEXC,P))/50,COLORRED,LINETHICK2 ;
大盘成交量:=EMA(INDEXV/MA(INDEXV,N),2)*1.98,COLORBLUE ;
A:=(HHV(INDEXH,13)-INDEXC)/(HHV(INDEXH,13)-LLV(INDEXL,13))*80000;
空方力量:EMA(3*A-2*SMA(A,18,1),5),COLORFF3C00,LINETHICK2;
RSV:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*100000;
大盘MAV:=(INDEXC*2+INDEXH+INDEXL)/4*10000;
大盘SK := EMA(大盘MAV,13) - EMA(大盘MAV,34);
大盘SD := EMA(大盘SK,3);
大盘B:=(大盘SK-大盘SD);
大盘资金进场:IF(大盘B =0,大盘B,0),LINESTICK,COLOR00FFFF;
大盘资金撤走:IF(大盘B =0,大盘B,0),LINESTICK,COLOR009900;