趋势线炒股三柱线副图指标公式源码[同花顺公式]

相关标签:

发一个自己用的指标，非常简单你一看就明白。红线为多，绿线为空。

原理解析：
VAR0赋值:(最高价+最低价+收盘价+开盘价)/4 VAR1赋值:(VAR0-5日内最低价的最低值)/(5日内最高价的最高值-5日内最低价的最低值)*100的13日指数移动平均 VAR2赋值:0.667*1日前的VAR1+0.333*VAR1的2日指数移动平均 输出多线: VAR1的1日指数移动平均,画红色,线宽为1 输出空线: VAR2的1日指数移动平均,画绿色,线宽为1 输出趋势线: VAR1+VAR2的30日指数移动平均/2,画黄色,线宽为1,DOTLINE 当满足条件(VAR1-VAR2)*5>=0时,在0和(VAR1-VAR2)*5*1位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR0000FF 当满足条件(VAR1-VAR2)*5>=0时,在0和(VAR1-VAR2)*5*0.8位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR0066FF 当满足条件(VAR1-VAR2)*5>=0时,在0和(VAR1-VAR2)*5*0.6位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR0099FF 当满足条件(VAR1-VAR2)*5>=0时,在0和(VAR1-VAR2)*5*0.4位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR00CCFF 当满足条件(VAR1-VAR2)*5>=0时,在0和(VAR1-VAR2)*5*0.2位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR00FFFF 当满足条件(VAR1-VAR2)*5<=0时,在0和(VAR1-VAR2)*5*1位置之间画柱状线,宽度为8,0不为0则画空心柱.,画绿色 当满足条件(VAR1-VAR2)*5<=0时,在0和(VAR1-VAR2)*5*0.8位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR33CC00 当满足条件(VAR1-VAR2)*5<=0时,在0和(VAR1-VAR2)*5*0.6位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR339900 当满足条件(VAR1-VAR2)*5<=0时,在0和(VAR1-VAR2)*5*0.4位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR337700 当满足条件(VAR1-VAR2)*5<=0时,在0和(VAR1-VAR2)*5*0.2位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR005500 输出炒股:如果多线上穿空线,返回10,否则返回0,画淡蓝色 当满足条件多线上穿趋势线时,在0位置书写文字,画白色 TIPTEXT(ISNULL(1日后的&收盘价),0,' WWW.CXH99.COM '),画红色 TIPTEXT(ISNULL(1日前的收盘价),0,'同花顺程序化交易')

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

源码：

Var0:=(H+L+C+O)/4;
Var1:=EMA((VAR0-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,13);
VAR2:=EMA(0.667*REF(Var1,1)+0.333*Var1,2);
多线: EMA(VAR1,1),colorred,linethick1;
空线: EMA(VAR2,1),colorgreen,linethick1;
趋势线: EMA(VAR1+VAR2,30)/2,coloryellow,linethick1,DOTLINE;
STICKLINE((Var1-VAR2)*5>=0,0,(Var1-VAR2)*5*1,8,0),color0000ff;
STICKLINE((Var1-VAR2)*5>=0,0,(Var1-VAR2)*5*0.8,8,0),color0066ff;
STICKLINE((Var1-VAR2)*5>=0,0,(Var1-VAR2)*5*0.6,8,0),color0099ff;
STICKLINE((Var1-VAR2)*5>=0,0,(Var1-VAR2)*5*0.4,8,0),color00ccff;
STICKLINE((Var1-VAR2)*5>=0,0,(Var1-VAR2)*5*0.2,8,0),color00ffff;
STICKLINE((Var1-VAR2)*5<=0,0,(Var1-VAR2)*5*1,8,0),colorgreen;
STICKLINE((Var1-VAR2)*5<=0,0,(Var1-VAR2)*5*0.8,8,0),COLOR33CC00;
STICKLINE((Var1-VAR2)*5<=0,0,(Var1-VAR2)*5*0.6,8,0),COLOR339900;
STICKLINE((Var1-VAR2)*5<=0,0,(Var1-VAR2)*5*0.4,8,0),COLOR337700;
STICKLINE((Var1-VAR2)*5<=0,0,(Var1-VAR2)*5*0.2,8,0),COLOR005500;
炒股:IF(CROSS(多线,空线) ,10,0),colorliblue;
DRAWTEXT(CROSS(多线,趋势线),0,'金叉'),colorwhite;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' WWW.CXH99.COM '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花顺程序化交易');

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