通达信锁定筹码+机构控盘（源码副图贴图）指标公式源码

通达信锁定筹码+机构控盘（源码副图贴图）指标公式源码通达信公式

2017-11-18 来源：原创编辑：翔博软件

公式源码: 锁定筹码 A:=1.1*C; B:=0.9*C; B1:=100*(WINNER(A)-WINNER(B)); 锁定筹码 :=100-B1; DIF:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA:=EMA(DIF,9); 今卖:=IF(CROSS(90,锁定筹

公式源码:

锁定筹码

A:=1.1*C;
B:=0.9*C;
B1:=100*(WINNER(A)-WINNER(B));
锁定筹码 :=100-B1;

DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
今卖:=IF(CROSS(90,锁定筹码)AND DIF>DEA,60,0);
筹码锁定区:STICKLINE(锁定筹码>65 AND DIF>DEA,锁定筹码,0,2,0)COLORYELLOW;

STICKLINE(锁定筹码>65 AND DIF>DEA AND CROSS(90,锁定筹码),锁定筹码,0,2,0)COLORMAGENTA;

DRAWTEXT(锁定筹码>65 AND DIF>DEA AND CROSS(90,锁定筹码),锁定筹码*1.25,'风险'),COLORMAGENTA;
DRAWTEXT(锁定筹码>65 AND DIF>DEA AND CROSS(90,锁定筹码),锁定筹码*1.50,'注意'),COLORMAGENTA;

{机构控盘度}
VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLORWHITE;
A10:=CROSS(控盘,0);
无庄控盘:IF(控盘<0,控盘,0),COLORWHITE,NODRAW;
开始控盘:IF(A10,5,0),LINETHICK1,COLORYELLOW;
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;