魔鬼K线副图指标公式源码[通达信公式]

相关标签:

原理解析：
VAR1赋值:1日前的开盘价 VAR2赋值:开盘价-VAR1和0的较大值的6日[1日权重]移动平均/开盘价-VAR1的绝对值的6日[1日权重]移动平均*100 VAR3赋值:1日前的收盘价 VAR4赋值:收盘价-VAR3和0的较大值的6日[1日权重]移动平均/收盘价-VAR3的绝对值的6日[1日权重]移动平均*100 VAR5赋值:1日前的最高价 VAR6赋值:最高价-VAR5和0的较大值的6日[1日权重]移动平均/最高价-VAR5的绝对值的6日[1日权重]移动平均*100 VAR7赋值:1日前的最低价 VAR8赋值:最低价-VAR7和0的较大值的6日[1日权重]移动平均/最低价-VAR7的绝对值的6日[1日权重]移动平均*100 当满足条件VAR4<VAR2时,在VAR2和VAR4位置之间画柱状线,宽度为5,0不为0则画空心柱.,画绿色 , 当满足条件VAR4>VAR2时,在VAR2和VAR4位置之间画柱状线,宽度为5,0不为0则画空心柱.,画红色 , 当满足条件VAR4>VAR2ANDVAR6>VAR8ANDVAR8>VAR4时,在VAR4和VAR6位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画红色 , 当满足条件VAR4>VAR2ANDVAR6>VAR8ANDVAR8<VAR4时,在VAR4和VAR6位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画红色 , 当满足条件VAR4>VAR2ANDVAR6<VAR8ANDVAR6>VAR4时,在VAR4和VAR8位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画红色 , 当满足条件VAR4>VAR2ANDVAR6>VAR8ANDVAR6<VAR2时,在VAR2和VAR8位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画红色 , 当满足条件VAR4>VAR2ANDVAR6>VAR8ANDVAR6>VAR2时,在VAR2和VAR8位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画红色 , 当满足条件VAR4>VAR2ANDVAR6<VAR8ANDVAR8<VAR2时,在VAR2和VAR6位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画红色 , 当满足条件VAR4>VAR2ANDVAR6<VAR8ANDVAR8>VAR2时,在VAR2和VAR6位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画红色 , 当满足条件VAR4<VAR2ANDVAR6>VAR8ANDVAR6<VAR4时,在VAR4和VAR8位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画绿色 , 当满足条件VAR4<VAR2ANDVAR6<VAR8ANDVAR8<VAR4时,在VAR4和VAR6位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画绿色 , 当满足条件VAR4<VAR2ANDVAR6<VAR8ANDVAR6>VAR4时,在VAR4和VAR8位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画绿色 , 当满足条件VAR4<VAR2ANDVAR6>VAR8ANDVAR6<VAR4时,在VAR2和VAR8位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画绿色 , 当满足条件VAR4<VAR2ANDVAR6>VAR8ANDVAR6>VAR4时,在VAR2和VAR8位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画绿色 , 当满足条件VAR4<VAR2ANDVAR6<VAR8ANDVAR8<VAR2时,在VAR2和VAR6位置之间画柱状线,宽度为0.5,1不为0则画空心柱., 画绿色 , 当满足条件VAR4<VAR2ANDVAR6<VAR8ANDVAR8>VAR2时,在VAR2和VAR6位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画绿色 , 当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色 当满足条件收阳线时,在横轴1纵轴1位置书写文字,画红色

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

源码：

VAR1:=REF(OPEN,1);
VAR2:=SMA(MAX(OPEN-VAR1,0),6,1)/SMA(ABS(OPEN-VAR1),6,1)*100;
VAR3:=REF(CLOSE,1);
VAR4:=SMA(MAX(CLOSE-VAR3,0),6,1)/SMA(ABS(CLOSE-VAR3),6,1)*100;
VAR5:=REF(HIGH,1);
VAR6:=SMA(MAX(HIGH-VAR5,0),6,1)/SMA(ABS(HIGH-VAR5),6,1)*100;
VAR7:=REF(LOW,1);
VAR8:=SMA(MAX(LOW-VAR7,0),6,1)/SMA(ABS(LOW-VAR7),6,1)*100;STICKLINE(VAR4<VAR2,VAR2,VAR4,5,0),COLORGREEN , ;
STICKLINE(VAR4>VAR2,VAR2,VAR4,5,0),COLORRED , ;
STICKLINE(VAR4>VAR2 AND VAR6>VAR8 AND VAR8>VAR4,VAR4,VAR6,0.5,1),COLORRED , ;
STICKLINE(VAR4>VAR2 AND VAR6>VAR8 AND VAR8<VAR4,VAR4,VAR6,0.5,1),COLORRED ,;
STICKLINE(VAR4>VAR2 AND VAR6<VAR8 AND VAR6>VAR4,VAR4,VAR8,0.5,1),COLORRED , ;
STICKLINE(VAR4>VAR2 AND VAR6>VAR8 AND VAR6<VAR2,VAR2,VAR8,0.5,1),COLORRED , ;
STICKLINE(VAR4>VAR2 AND VAR6>VAR8 AND VAR6>VAR2,VAR2,VAR8,0.5,1),COLORRED , ;
STICKLINE(VAR4>VAR2 AND VAR6<VAR8 AND VAR8<VAR2,VAR2,VAR6,0.5,1),COLORRED , ;
STICKLINE(VAR4>VAR2 AND VAR6<VAR8 AND VAR8>VAR2,VAR2,VAR6,0.5,1),COLORRED , ;
STICKLINE(VAR4<VAR2 AND VAR6>VAR8 AND VAR6<VAR4,VAR4,VAR8,0.5,1),COLORGREEN , ;
STICKLINE(VAR4<VAR2 AND VAR6<VAR8 AND VAR8<VAR4,VAR4,VAR6,0.5,1),COLORGREEN , ;
STICKLINE(VAR4<VAR2 AND VAR6<VAR8 AND VAR6>VAR4,VAR4,VAR8,0.5,1),COLORGREEN , ;
STICKLINE(VAR4<VAR2 AND VAR6>VAR8 AND VAR6<VAR4,VAR2,VAR8,0.5,1),COLORGREEN ,;
STICKLINE(VAR4<VAR2 AND VAR6>VAR8 AND VAR6>VAR4,VAR2,VAR8,0.5,1),COLORGREEN , ;
STICKLINE(VAR4<VAR2 AND VAR6<VAR8 AND VAR8<VAR2,VAR2,VAR6,0.5,1), COLORGREEN , ;
STICKLINE(VAR4<VAR2 AND VAR6<VAR8 AND VAR8>VAR2,VAR2,VAR6,0.5,1),COLORGREEN , ;DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

 

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