机构散户系数异动副图指标源码[通达信公式]

相关标签:

原理解析：
VAR1赋值:如果(收阳线),返回((收盘价-开盘价)*成交量(手)),否则返回如果(收阴线),返回((收盘价-开盘价)*成交量(手)),否则返回0 VAR2赋值:如果(收盘价>1日前的收盘价),返回((收盘价-1日前的收盘价)*成交量(手)),否则返回如果(收盘价<1日前的收盘价),返回((收盘价-1日前的收盘价)*成交量(手)),否则返回0 VAR3赋值:如果(开盘价>1日前的收盘价),返回((开盘价-1日前的收盘价)*成交量(手)),否则返回如果(开盘价<1日前的收盘价),返回((开盘价-1日前的收盘价)*成交量(手)),否则返回0 VAR4赋值:如果(收阴线),返回((开盘价-收盘价)*成交量(手)),否则返回如果(收阳线),返回((开盘价-收盘价)*成交量(手)),否则返回0 VAR5赋值:如果(收盘价<1日前的收盘价),返回((1日前的收盘价-收盘价)*成交量(手)),否则返回如果(收盘价>1日前的收盘价),返回((1日前的收盘价-收盘价)*成交量(手)),否则返回0 VAR6赋值:如果(开盘价<1日前的收盘价),返回((1日前的收盘价-开盘价)*成交量(手)),否则返回如果(开盘价>1日前的收盘价),返回((1日前的收盘价-开盘价)*成交量(手)),否则返回0 VAR7赋值:(收阳线) VAR8赋值:(收盘价 > 1日前的收盘价) VAR9赋值:(开盘价 > 1日前的收盘价) VARA赋值:((VAR7 OR VAR8) OR VAR9) 输出机构:(((((VAR1+VAR2)+VAR3)/3)/当前流通股本(手))的5日累和 * 1000) 输出散户:(((((VAR4+VAR5)+VAR6)/3)/当前流通股本(手))的10日累和 * 1000) 输出系数:(((((((统计12日中满足VAR8的天数/12)+(统计12日中满足VAR7的天数/12))+(统计12日中满足VAR9的天数/12))/3)*机构的5日简单移动平均)*2)*1.1)的2日指数移动平均,画红色 输出平衡:0,POINTDOT,画绿色 当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色

源码：

VAR1:=IF((CLOSE > OPEN),((CLOSE - OPEN) * VOL),IF((CLOSE < OPEN),((CLOSE - OPEN) * VOL),0));
VAR2:=IF((CLOSE > REF(CLOSE,1)),((CLOSE - REF(CLOSE,1)) * VOL),IF((CLOSE < REF(CLOSE,1)),((CLOSE - REF(CLOSE,1)) * VOL),0));
VAR3:=IF((OPEN > REF(CLOSE,1)),((OPEN - REF(CLOSE,1)) * VOL),IF((OPEN < REF(CLOSE,1)),((OPEN - REF(CLOSE,1)) * VOL),0));
VAR4:=IF((CLOSE < OPEN),((OPEN - CLOSE) * VOL),IF((CLOSE > OPEN),((OPEN - CLOSE) * VOL),0));
VAR5:=IF((CLOSE < REF(CLOSE,1)),((REF(CLOSE,1) - CLOSE) * VOL),IF((CLOSE > REF(CLOSE,1)),((REF(CLOSE,1) - CLOSE) * VOL),0));
VAR6:=IF((OPEN < REF(CLOSE,1)),((REF(CLOSE,1)-OPEN) * VOL),IF((OPEN > REF(CLOSE,1)),((REF(CLOSE,1) - OPEN) * VOL),0));
VAR7:=(CLOSE > OPEN);
VAR8:=(CLOSE > REF(CLOSE,1));
VAR9:=(OPEN > REF(CLOSE,1));
VARA:=((VAR7 OR VAR8) OR VAR9);
机构:(SUM(((((VAR1 + VAR2) + VAR3) / 3) / CAPITAL),5) * 1000);
散户:(SUM(((((VAR4 + VAR5) + VAR6) / 3) / CAPITAL),10) * 1000);
系数:EMA((((((((COUNT(VAR8,12) / 12) + (COUNT(VAR7,12) / 12)) + (COUNT(VAR9,12) / 12)) / 3) * MA(机构,5)) * 2) *1.1),2),COLORRED;
平衡:0,POINTDOT,COLORGREEN;
DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

 

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