真龙启动主图指标公式源码[通达信公式]

相关标签:

原理解析：
DA1赋值:如果TS>总的周期数,返回总的周期数,否则返回TS VA赋值:如果(日期对应的转换天数)<11880,返回1,否则返回无效数 DA赋值:如果到最后交易的周期>DA1,返回0,否则返回DA1 HI赋值:日期日DA日内最高价的最高值 LO赋值:日期日DA日内最低价的最低值 C1赋值:如果到最后交易的周期<=DA,返回收盘价,否则返回无效数 XAS赋值:如果日期<2442.46*500,返回1,否则返回无效数 GZ赋值:HI/LO的自然对数/15的指数*VA LH1赋值:如果C1>=(HI/GZ),返回成交量(手),否则返回0的DA日累和 LH2赋值:如果C1>=(HI/GZ的2乘幂)ANDC1<(HI/GZ),返回成交量(手),否则返回0的DA日累和 LH3赋值:如果C1>=(HI/GZ的3乘幂)ANDC1<(HI/GZ的2乘幂),返回成交量(手),否则返回0的DA日累和 LH4赋值:如果C1>=(HI/GZ的4乘幂)ANDC1<(HI/GZ的3乘幂),返回成交量(手),否则返回0的DA日累和 LH5赋值:如果C1>=(HI/GZ的5乘幂)ANDC1<(HI/GZ的4乘幂),返回成交量(手),否则返回0的DA日累和 LH6赋值:如果C1>=(HI/GZ的6乘幂)ANDC1<(HI/GZ的5乘幂),返回成交量(手),否则返回0的DA日累和 LH7赋值:如果C1>=(HI/GZ的7乘幂)ANDC1<(HI/GZ的6乘幂),返回成交量(手),否则返回0的DA日累和 LH8赋值:如果C1>=(HI/GZ的8乘幂)ANDC1<(HI/GZ的7乘幂),返回成交量(手),否则返回0的DA日累和 LH9赋值:如果C1>=(HI/GZ的9乘幂)ANDC1<LO*GZ的7乘幂,返回成交量(手),否则返回0的DA日累和 LH10赋值:如果C1>=(LO*GZ的5乘幂)ANDC1<LO*GZ的6乘幂,返回成交量(手),否则返回0的DA日累和 LH11赋值:如果C1>=(LO*GZ的4乘幂)ANDC1<LO*GZ的5乘幂,返回成交量(手),否则返回0的DA日累和 LH12赋值:如果C1>=(LO*GZ的3乘幂)ANDC1<LO*GZ的4乘幂,返回成交量(手),否则返回0的DA日累和 LH13赋值:如果C1>=(LO*GZ的2乘幂)ANDC1<LO*GZ的3乘幂,返回成交量(手),否则返回0的DA日累和 LH14赋值:如果C1>=(LO*GZ)ANDC1<LO*GZ的2乘幂,返回成交量(手),否则返回0的DA日累和*XAS LH15赋值:如果C1>=LOANDC1<LO*GZ,返回成交量(手),否则返回0的DA日累和*XAS L1赋值:日期日DA日内LH1的最高值 L2赋值:日期日DA日内LH2的最高值 L3赋值:日期日DA日内LH3的最高值 L4赋值:日期日DA日内LH4的最高值 L5赋值:日期日DA日内LH5的最高值 L6赋值:日期日DA日内LH6的最高值 L7赋值:日期日DA日内LH7的最高值 L8赋值:日期日DA日内LH8的最高值 L9赋值:日期日DA日内LH9的最高值 L10赋值:日期日DA日内LH10的最高值 L11赋值:日期日DA日内LH11的最高值 L12赋值:日期日DA日内LH12的最高值 L13赋值:日期日DA日内LH13的最高值 L14赋值:日期日DA日内LH14的最高值 L15赋值:日期日DA日内LH15的最高值 SS赋值:(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10+L11+L12+L13+L14+L15)*VA 输出M13:收盘价的13日简单移动平均 输出先知趋势线:收盘价的34日简单移动平均*VA,画红色,线宽为2 输出快线:((收盘价+最低价)/2的1日指数移动平均/3的3日累和)*VA,画红色,线宽为1 输出中线:快线的3日指数移动平均,COLOR00FFFF,线宽为1 输出慢线:中线的3日指数移动平均,COLORFF00FF,线宽为1 当满足条件收盘价>1日前的收盘价时,在最高价和最低价位置之间画柱状线,宽度为0,1不为0则画空心柱.,画红色 当满足条件收盘价>1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为3.1,0不为0则画空心柱.,COLOR000055 当满足条件收盘价>1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为2.7,0不为0则画空心柱.,COLOR000088 当满足条件收盘价>1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为2.1,0不为0则画空心柱.,COLOR0000AA 当满足条件收盘价>1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLOR0000CC 当满足条件收盘价>1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为0.9,0不为0则画空心柱.,COLOR0000FF 当满足条件收盘价>1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为0.3,0不为0则画空心柱.,COLOR0000EE 当满足条件收盘价<1日前的收盘价时,在最高价和最低价位置之间画柱状线,宽度为0,1不为0则画空心柱.,COLOR666600 当满足条件收盘价<1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为3.1,0不为0则画空心柱.,COLOR555500 当满足条件收盘价<1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为2.7,0不为0则画空心柱.,COLOR888800 当满足条件收盘价<1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为2.1,0不为0则画空心柱.,COLORAAAA00 当满足条件收盘价<1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLORBBBB00 当满足条件收盘价<1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为0.9,0不为0则画空心柱.,COLORCCCC00 当满足条件收盘价<1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为0.3,0不为0则画空心柱.,COLOREEEE00 当满足条件收盘价=1日前的收盘价时,在最高价和最低价位置之间画柱状线,宽度为0,1不为0则画空心柱.,画白色 当满足条件收盘价=1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为3.1,0不为0则画空心柱.,COLOR555555 当满足条件收盘价=1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为2.7,0不为0则画空心柱.,COLOR777777 当满足条件收盘价=1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为2.1,0不为0则画空心柱.,COLOR999999 当满足条件收盘价=1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLORBBBBBB 当满足条件收盘价=1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为0.9,0不为0则画空心柱.,COLORDDDDDD 当满足条件收盘价=1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为0.3,0不为0则画空心柱.,COLORFFFFFF AA11赋值:(收盘价-1日前的收盘价)/1日前的收盘价>=0.058 AND (收盘价-1日前的收盘价)/1日前的收盘价<0.095*XAS AA22赋值:(收盘价-1日前的收盘价)/1日前的收盘价>=0.098*VA 当满足条件AA22时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR00AAFF 当满足条件AA22时,在收盘价和开盘价位置之间画柱状线,宽度为2.1,0不为0则画空心柱.,COLOR00BBFF 当满足条件AA22时,在收盘价和开盘价位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLOR00CCFF 当满足条件AA22时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00DDFF 当满足条件AA22时,在收盘价和开盘价位置之间画柱状线,宽度为0.6,0不为0则画空心柱.,COLOR00EEFF 当满足条件AA22时,在收盘价和开盘价位置之间画柱状线,宽度为0.2,0不为0则画空心柱.,COLOR00FFFF 当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色 当满足条件收阳线时,在横轴1纵轴1位置书写文字,画红色

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

源码：

{参数数量: 4参数1: TS, 最小: 1, 最大: 9999, 缺省: 500参数2: N, 最小: 1, 最大: 95, 缺省: 95参数3: M1, 最小: 1, 最大: 5, 缺省: 5参数4: M2, 最小: 1, 最大: 10, 缺省: 10}

DA1:=IF(TS>TOTALBARSCOUNT,TOTALBARSCOUNT,TS);VA:=IF((DATETODAY(DATE))<11880,1,DRAWNULL);DA:=IF(CURRBARSCOUNT>DA1,0,DA1);HI:=REFDATE(HHV(H,DA),DATE);{最高价}LO:=REFDATE(LLV(L,DA),DATE);C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);XAS:=IF(DATE<2442.46*500,1,DRAWNULL);GZ:=EXP(LN(HI/LO)/15)*VA; {对数格值}LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA);LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA);LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA);LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA);LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA);LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA);LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA);LH9:=SUM(IF(C1>=(HI/POW(GZ,9)) AND C1<LO*POW(GZ,7),V,0),DA);LH10:=SUM(IF(C1>=(LO*POW(GZ,5)) AND C1<LO*POW(GZ,6),V,0),DA);LH11:=SUM(IF(C1>=(LO*POW(GZ,4)) AND C1<LO*POW(GZ,5),V,0),DA);LH12:=SUM(IF(C1>=(LO*POW(GZ,3)) AND C1<LO*POW(GZ,4),V,0),DA);LH13:=SUM(IF(C1>=(LO*POW(GZ,2)) AND C1<LO*POW(GZ,3),V,0),DA);LH14:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA)*XAS;LH15:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA)*XAS;L1:=REFDATE(HHV(LH1,DA),DATE);L2:=REFDATE(HHV(LH2,DA),DATE);L3:=REFDATE(HHV(LH3,DA),DATE);L4:=REFDATE(HHV(LH4,DA),DATE);L5:=REFDATE(HHV(LH5,DA),DATE);L6:=REFDATE(HHV(LH6,DA),DATE);L7:=REFDATE(HHV(LH7,DA),DATE);L8:=REFDATE(HHV(LH8,DA),DATE);L9:=REFDATE(HHV(LH9,DA),DATE);L10:=REFDATE(HHV(LH10,DA),DATE);L11:=REFDATE(HHV(LH11,DA),DATE);L12:=REFDATE(HHV(LH12,DA),DATE);L13:=REFDATE(HHV(LH13,DA),DATE);L14:=REFDATE(HHV(LH14,DA),DATE);L15:=REFDATE(HHV(LH15,DA),DATE);SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10+L11+L12+L13+L14+L15)*VA;M13:MA(CLOSE,13);先知趋势线:MA(CLOSE,34)*VA,COLORRED,LINETHICK2;快线:(SUM(EMA((CLOSE+LOW)/2,1)/3,3))*VA,COLORRED,LINETHICK1;中线:EMA(快线,3),COLOR00FFFF,LINETHICK1;慢线:EMA(中线,3),COLORFF00FF,LINETHICK1;{MA1:MA(CLOSE,5);MA2:MA(CLOSE,10);MA3:MA(CLOSE,30);MA4:MA(CLOSE,120);}STICKLINE(CLOSE> REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORRED;STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR000055;STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR000088;STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR0000AA;STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLOR0000CC;STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLOR0000FF;STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOR0000EE;STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLOR666600;STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR555500;STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR888800;STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORAAAA00;STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBB00;STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORCCCC00;STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOREEEE00;STICKLINE(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE;STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR555555;STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999;STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB;STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD;STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF;AA11:=(C-REF(C,1))/REF(C,1)>=0.058 AND (C-REF(C,1))/REF(C,1)<0.095*XAS ;AA22:=(C-REF(C,1))/REF(C,1)>=0.098*VA ;STICKLINE(AA22,C,O,3,0 ),COLOR00AAFF;STICKLINE(AA22,C,O,2.1,0 ),COLOR00BBFF;STICKLINE(AA22,C,O,1.5,0 ),COLOR00CCFF;STICKLINE(AA22,C,O,1,0 ),COLOR00DDFF;STICKLINE(AA22,C,O,0.6,0 ),COLOR00EEFF;STICKLINE(AA22,C,O,0.2,0 ),COLOR00FFFF;DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

 

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