红买緑卖副图指标公式源码[通达信公式]

相关标签:

原理解析：
80,画红色 20 VAR1赋值:9日内最高价的最高值-9日内最低价的最低值 VAR2赋值:9日内最高价的最高值-收盘价 VAR3赋值:收盘价-9日内最低价的最低值 VAR4赋值:VAR2/VAR1*100-70 VAR5赋值:(收盘价-60日内最低价的最低值)/(60日内最高价的最高值-60日内最低价的最低值) VAR6赋值:(2*收盘价+最高价+最低价)/4 VAR7赋值:VAR3/VAR1*100的3日[1日权重]移动平均 VAR8赋值:34日内最低价的最低值 VAR9赋值:VAR7的3日[1日权重]移动平均-VAR4的9日[1日权重]移动平均 VAR10赋值:如果VAR9>100,返回VAR9-100,否则返回0 VAR11赋值:34日内最高价的最高值 VAR12赋值:(VAR6-VAR8)/(VAR11-VAR8)*100的13日指数移动平均 VAR13赋值:0.667*1日前的VAR12+0.333*VAR12的2日指数移动平均 VAR13,画红色 当满足条件VAR12-VAR13>0时,在VAR12和VAR13位置之间画柱状线,宽度为8,0不为0则画空心柱.,画红色 当满足条件VAR12-VAR13<0时,在VAR12和VAR13位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR00FF0F 差值赋值:(VAR12-VAR13)*5,POINTDOT,COLOR33CC00 当满足条件差值>=0时,在0和差值*1位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR0000FF 当满足条件差值>=0时,在0和差值*0.8位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR0066FF 当满足条件差值>=0时,在0和差值*0.6位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR0099FF 当满足条件差值>=0时,在0和差值*0.4位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR00CCFF 当满足条件差值>=0时,在0和差值*0.2位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR00FFFF 当满足条件差值<=0时,在0和差值*1位置之间画柱状线,宽度为4,0不为0则画空心柱.,画绿色 当满足条件差值<=0时,在0和差值*0.8位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR33CC00 当满足条件差值<=0时,在0和差值*0.6位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR339900 当满足条件差值<=0时,在0和差值*0.4位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR337700 当满足条件差值<=0时,在0和差值*0.2位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR005500

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

源码：

80,COLORRED;20;
VAR1:=HHV(HIGH,9)-LLV(LOW,9);
VAR2:=HHV(HIGH,9)-CLOSE;
VAR3:=CLOSE-LLV(LOW,9);
VAR4:=VAR2/VAR1*100-70;
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60));
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR7:=SMA(VAR3/VAR1*100,3,1);
VAR8:=LLV(LOW,34);
VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
VAR10:=IF(VAR9>100,VAR9-100,0);
VAR11:=HHV(HIGH,34);
VAR12:=EMA((VAR6-VAR8)/(VAR11-VAR8)*100,13);
VAR13:=EMA(0.667*REF(VAR12,1)+0.333*VAR12,2);
VAR13,COLORRED;
STICKLINE(VAR12-VAR13>0,VAR12,VAR13,8,0),COLORRED;
STICKLINE(VAR12-VAR13<0,VAR12,VAR13,8,0),COLOR00FF0F;
差值:=(VAR12-VAR13)*5,POINTDOT,COLOR33CC00;
STICKLINE(差值>=0,0,差值*1,4,0),COLOR0000FF;
STICKLINE(差值>=0,0,差值*0.8,4,0),COLOR0066FF;
STICKLINE(差值>=0,0,差值*0.6,4,0),COLOR0099FF;
STICKLINE(差值>=0,0,差值*0.4,4,0),COLOR00CCFF;
STICKLINE(差值>=0,0,差值*0.2,4,0),COLOR00FFFF;
STICKLINE(差值<=0,0,差值*1,4,0),COLORGREEN;
STICKLINE(差值<=0,0,差值*0.8,4,0),COLOR33CC00;
STICKLINE(差值<=0,0,差值*0.6,4,0),COLOR339900;
STICKLINE(差值<=0,0,差值*0.4,4,0),COLOR337700;
STICKLINE(差值<=0,0,差值*0.2,4,0),COLOR005500;

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