分时图里看控盘－－[通达信公式]

相关标签:

原理解析：
VAR1赋值:收盘价的13日指数移动平均的13日指数移动平均 控盘赋值:(VAR1-1日前的VAR1)/1日前的VAR1*1000 当满足条件控盘<0时,在控盘和0位置之间画柱状线,宽度为1,1不为0则画空心柱.,COLOR00FF00 当满足条件控盘>1日前的控盘AND控盘<0时,在控盘和0位置之间画柱状线,宽度为1,1不为0则画空心柱.,COLORFF00FF 无庄控盘赋值:控盘<0 当满足条件控盘>1日前的控盘AND控盘>0时,在控盘和0位置之间画柱状线,宽度为1,1不为0则画空心柱.,COLOR0000FF 有庄控盘赋值:控盘>1日前的控盘 AND 控盘>0 VAR2赋值:100*以收盘价*0.95计算的获利盘比例 当满足条件控盘<1日前的控盘AND控盘>0时,在控盘和0位置之间画柱状线,宽度为1,1不为0则画空心柱.,COLORFFFF00 主力出货赋值:控盘<1日前的控盘 AND 控盘>0 当满足条件VAR2>50ANDCOST(85)<CLOSEAND控盘>0时,在控盘和0位置之间画柱状线,宽度为1,1不为0则画空心柱.,COLOR00FFFF 输出高度控盘: VAR2>50 AND 获利盘为85%的成本分布<收盘价 AND 控盘>0,COLOR00FFFF,线宽为2 A10赋值:控盘上穿0 控盘B赋值:如果A10,返回1,否则返回0的5日过滤 JJ赋值:均价 P赋值:55 S赋值:8 M1赋值:3 财赋值:(收盘价的S日指数移动平均-收盘价的P日指数移动平均)*10,画红色,线宽为2 神赋值:财的M1日指数移动平均,画绿色,线宽为1 画带状线 BTJ1赋值:(收盘价-JJ)/JJ<-0.005 BTJ11赋值:(收盘价-JJ)/JJ<-0.03 BTJ12赋值:从前5日到前1日持续JJ>=1日前的JJ AND (收盘价-JJ)/JJ<0.005 STJ1赋值:(收盘价-JJ)/JJ>0.005 STJ01赋值:控盘<1日前的控盘 AND 控盘>0.5 STJ02赋值:控盘>0 BTJ2赋值:控盘>1日前的控盘 AND 控盘<-0.2 BTJ22赋值:控盘>1日前的控盘 AND 控盘<0 BTJ3赋值:财上穿神 AND 财<-0.3 BTJ32赋值:财上穿神 AND 财<-0.1 STJ31赋值:神上穿财 STJ32赋值:神上穿财 AND 财>1.618 BTJ81赋值:BTJ1ANDBTJ2ANDBTJ3的13日过滤 BTJ811赋值:BTJ11ANDBTJ2ANDBTJ3的13日过滤 BTJ82赋值:BTJ12ANDBTJ22ANDBTJ32的13日过滤 当满足条件BTJ82时,在神位置画23号图标 当满足条件BTJ81ANDTIME>10时,在神位置画27号图标 当满足条件BTJ811ANDTIME>10时,在神位置画26号图标 当满足条件BTJ81时,在神位置书写文字,COLORFF00FF 当满足条件BTJ811时,在神*1.2位置书写文字,COLOR0000FF STJ81赋值:STJ1ANDSTJ01ANDSTJ31的13日过滤 当满足条件STJ81时,在神位置画19号图标 STJ82赋值:STJ02ANDSTJ32的13日过滤 当满足条件STJ82时,在神位置画15号图标 STJ83赋值:STJ81 AND STJ82 当满足条件STJ83时,在神位置书写文字,COLOR00FF00

 来源:程序化99（ WWW.CXH99.COM ）

源码：

{控盘原码}
VAR1:=EMA(EMA(CLOSE,13),13);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,1),COLOR00FF00;
STICKLINE(控盘>REF(控盘,1) AND 控盘<0,控盘,0,1,1),COLORFF00FF;
无庄控盘:=控盘<0;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLOR0000FF;
有庄控盘:=控盘>REF(控盘,1) AND 控盘>0;
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLORFFFF00;
主力出货:=控盘<REF(控盘,1) AND 控盘>0;
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,1),COLOR00FFFF;
高度控盘: VAR2>50 AND COST(85)<CLOSE AND 控盘>0,COLOR00FFFF,LINETHICK2;
A10:=CROSS(控盘,0);
控盘B:=FILTER(IF(A10,1,0),5);
{分时价格原码}
JJ:=DYNAINFO(11);
{波段买卖原码}
P:=55;S:=8;M1:=3;
财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,COLORRED,LINETHICK2;
神:=EMA(财,M1),COLORGREEN,LINETHICK1;
DRAWBAND(财,RGB(255,0,0),神,RGB(0,100,50));
{股价与均线偏离买卖条件}
BTJ1:=(C-JJ)/JJ<-0.005;
BTJ11:=(C-JJ)/JJ<-0.03;
BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005;
STJ1:=(C-JJ)/JJ>0.005;
{控盘买卖条件}
STJ01:=控盘<REF(控盘,1) AND 控盘>0.5;
STJ02:=控盘>0;BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;
BTJ22:=控盘>REF(控盘,1) AND 控盘<0 ;
{波段买卖条件}
BTJ3:=CROSS(财,神) AND 财<-0.3;
BTJ32:=CROSS(财,神) AND 财<-0.1;
STJ31:=CROSS(神,财);
STJ32:=CROSS(神,财) AND 财>1.618;
{以下为信号};
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);
BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);
BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13);
DRAWICON(BTJ82,神,23);{追买};
DRAWICON(BTJ81 AND TIME>10,神,27);{买底};
DRAWICON(BTJ811 AND TIME>10,神,26);{必买};
DRAWTEXT(BTJ81,神,'买底'),COLORFF00FF;
DRAWTEXT(BTJ811,神*1.2,'必买'),COLOR0000FF;
STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13);
DRAWICON(STJ81,神,19);
STJ82:=FILTER(STJ02 AND STJ32 ,13);
DRAWICON(STJ82,神,15);
STJ83:=STJ81 AND STJ82;
DRAWTEXT(STJ83,神,'必卖'),COLOR00FF00;

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】