股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 返璞归真系列(四)主力控盘叠加CCI【源码 附图 无未来】


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2024-3-8 18:22:45
返璞归真系列(四)主力控盘叠加CCI【源码 附图 无未来】介绍

返璞归真系列(四)主力控盘叠加CCI【源码 附图 无未来】

先上原码:
{主力控盘叠加CCI源码}
NOTEXT1:-100,COLORGRAY,DOTLINE;
NOTEXT2:100,COLORGRAY,DOTLINE;
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:(TYP-MA(TYP,5))/(0.015*AVEDEV(TYP,5))LINETHICK1,COLORYELLOW;
{STICKLINE(CCI1>100,CCI1,100,4,0),COLOR00CC66;
STICKLINE(CCI1<-100,CCI1,-100,4,0),COLORCC00EE;
CCI:CCI1,LINETHICK1,COLORYELLOW;}
VAR1:=EMA(EMA(CLOSE,3),1);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
A10:=CROSS(控盘,0);
VAR2:=100*WINNER(CLOSE*0.95);
高度控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLOR0000FF,NODRAW;
有庄控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW;
无庄控盘:IF(控盘<0,控盘,0),COLORFF6600,NODRAW;
开始控盘:IF(A10,5,0),LINETHICK3,COLORYELLOW,NODRAW;
主力出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLOR00FF00,NODRAW;
个股:=EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3),COLORBROWN,NODRAW;
短线反弹:IF(CROSS(个股,9),80,0),STICK,LINETHICK3,COLORLIBLUE;
DRAWTEXT(CROSS(个股,9),75,'●反弹'),COLORLIBLUE;
STICKLINE(控盘<0,控盘,0,3.5,0),COLORFF3300;
STICKLINE(控盘<0,控盘,0,2.5,0),COLORFF6600;
STICKLINE(控盘<0,控盘,0,1.5,0),COLORFF8800;
STICKLINE(控盘<0,控盘,0,0.5,0),COLORFFAA00;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR000033;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR000066;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR000099;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,0.5,0),COLOR0000CC;
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘*0.8,0,3.0,0),COLORFF0066;
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘*0.8,0,2.0,0),COLORFF0099;
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘*0.8,0,1.5,0),COLORFF00BB;
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘*0.8,0,0.5,0),COLORFF00FF;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR005500;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR008800;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR00BB00;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,0.5,0),COLOR00EE00;
STICKLINE(A10,控盘,0,3.5,0),COLOR0066FF;
STICKLINE(A10,控盘,0,2.5,0),COLOR0099FF;
STICKLINE(A10,控盘,0,1.0,0),COLOR00CCFF;
STICKLINE(A10,控盘,0,0.5,0),COLOR00FFFF;





 



gd23280

回复

举报

QQ|

GMT+8, 2024-10-13 02:16

快速回复 返回顶部 返回列表