自动移动光标可以显示时间周期指标公式[其他软件公式]

相关标签:黄金分割主图指标源码 、 分时黄金分割主图指标 、 黄金分割股票主图公式 、 现货黄金分割主图公式 、 移动黄金分割指标源码 、 mt4移动黄金分割指标 、 自动画线黄金分割主图 、 黄金分割指标公式源码 、 股票时间周期主图公式 、 黄金分割自动画线指标 、 通达信黄金分割主图 、 同花顺黄金分割主图 、 黄金分割法主图 、 黄金通道主图指标 、 自动画线主图指标公式 、

黄金分割主图 自动移动光标可以显示时间周期源码

原理解析：
VAR1赋值:SYSPARAM(3)-SYSPARAM(2)+1 VAR2赋值:SYSPARAM(3)-BARPOS VAR3赋值:VAR1日内最高价的最高值 VAR4赋值:VAR1日内最低价的最低值 VAR5赋值:VAR2日后的VAR3 输出 //主图最高价VAR5:如果SYSPARAM(3)不等于SYSPARAM(1),返回SYSPARAM(6),否则返回VAR5,COLOR0000FF 输出VAR6:VAR2日后的VAR4,COLOR0000FF 输出 //主图最低价黄191:(VAR5-VAR6)*0.191+VAR6,COLOR0000FF,POINTDOT 输出黄382:(VAR5-VAR6)*0.382+VAR6,COLOR0000FF,POINTDOT 输出黄500:(VAR5-VAR6)*0.500+VAR6,COLOR0000FF 输出黄618:(VAR5-VAR6)*0.618+VAR6,COLOR0000FF,POINTDOT 输出黄809:(VAR5-VAR6)*0.809+VAR6,COLOR0000FF,POINTDOT 当满足条件SYSPARAM(2)=BARPOS时,在(VAR5-VAR6)*0.0381+VAR6位置书写文字,COLOR00FF00 当满足条件SYSPARAM(2)=BARPOS时,在(VAR5-VAR6)*0.191+VAR6位置书写文字,COLOR00FF00 当满足条件SYSPARAM(2)=BARPOS时,在(VAR5-VAR6)*0.382+VAR6位置书写文字,COLOR00FF00 当满足条件SYSPARAM(2)=BARPOS时,在(VAR5-VAR6)*0.500+VAR6位置书写文字,COLOR00FF00 当满足条件SYSPARAM(2)=BARPOS时,在(VAR5-VAR6)*0.618+VAR6位置书写文字,COLOR00FF00 当满足条件SYSPARAM(2)=BARPOS时,在(VAR5-VAR6)*0.809+VAR6位置书写文字,COLOR00FF00 当满足条件SYSPARAM(2)=BARPOS时,在(VAR5-VAR6)*0.981+VAR6位置书写文字,COLOR00FF00 奔銬ATA1赋值:1+SYSPARAM(1)-1 DATA21赋值:21+SYSPARAM(1)-1 DATA34赋值:34+SYSPARAM(1)-1 DATA55赋值:55+SYSPARAM(1)-1 DATA89赋值:89+SYSPARAM(1)-1 DATA144赋值:144+SYSPARAM(1)-1 VERTLINE(对DATA1(进行)四舍五入=BARPOS),COLOR0000FF,POINTDOT VERTLINE(对DATA21(进行)四舍五入=BARPOS),COLOR0000FF,POINTDOT VERTLINE(对DATA34(进行)四舍五入=BARPOS),COLOR0000FF,POINTDOT VERTLINE(对DATA55(进行)四舍五入=BARPOS),COLOR0000FF VERTLINE(对DATA89(进行)四舍五入=BARPOS),COLOR0000FF,POINTDOT VERTLINE(对DATA144(进行)四舍五入=BARPOS),COLOR0000FF,POINTDOT 当满足条件对DATA1(进行)四舍五入-3=BARPOSANDSYSPARAM(3)不等于SYSPARAM(1)时,在黄500*0.99位置书写文字,COLOR0000FF 当满足条件对DATA21(进行)四舍五入-3=BARPOSANDSYSPARAM(3)不等于SYSPARAM(1)时,在黄500*0.99位置书写文字,COLOR0000FF 当满足条件对DATA34(进行)四舍五入-3=BARPOSANDSYSPARAM(3)不等于SYSPARAM(1)时,在黄500*0.99位置书写文字,COLOR0000FF 当满足条件对DATA55(进行)四舍五入-3=BARPOSANDSYSPARAM(3)不等于SYSPARAM(1)时,在黄500*0.99位置书写文字,COLOR0000FF 当满足条件对DATA89(进行)四舍五入-3=BARPOSANDSYSPARAM(3)不等于SYSPARAM(1)时,在黄500*0.99位置书写文字,COLOR0000FF 当满足条件对DATA144(进行)四舍五入-3=BARPOSANDSYSPARAM(3)不等于SYSPARAM(1)时,在黄500*0.99位置书写文字,COLOR0000FF 当满足条件SYSPARAM(3)-3=BARPOSANDSYSPARAM(3)不等于SYSPARAM(1)时,在黄500*0.99位置书写文字,COLOR0000FF

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

源码：

Var1:=SYSPARAM(3)-SYSPARAM(2)+1;
Var2:=SYSPARAM(3)-BARPOS;
Var3:=HHV(HIGH,Var1);
Var4:=LLV(LOW,VaR1);
Var5:=REFX(Var3,Var2); //主图最高价
Var5:IF(SYSPARAM(3)<>SYSPARAM(1),SYSPARAM(6),Var5),COLOR0000FF;
Var6:REFX(Var4,Var2),COLOR0000FF; //主图最低价
黄191:(Var5-Var6)*0.191+Var6,COLOR0000FF,POINTDOT;
黄382:(Var5-Var6)*0.382+Var6,COLOR0000FF,POINTDOT;
黄500:(Var5-Var6)*0.500+Var6,COLOR0000FF;
黄618:(Var5-Var6)*0.618+Var6,COLOR0000FF,POINTDOT;
黄809:(Var5-Var6)*0.809+Var6,COLOR0000FF,POINTDOT;
DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.0381+Var6,'最低价('+NUMTOSTR(Var6,2)+')'),COLOR00FF00;
DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.191+Var6,'黄金0.191('+NUMTOSTR(黄191,2)+')'),COLOR00FF00;
DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.382+Var6,'黄金0.382('+NUMTOSTR(黄382,2)+')'),COLOR00FF00;
DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.500+Var6,'黄金分割中轴('+NUMTOSTR(黄500,2)+')'),COLOR00FF00;
DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.618+Var6,'黄金0.618('+NUMTOSTR(黄618,2)+')'),COLOR00FF00;
DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.809+Var6,'黄金0.809('+NUMTOSTR(黄809,2)+')'),COLOR00FF00;
DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.981+Var6,'最高价('+NUMTOSTR(Var5,2)+')'),COLOR00FF00;
//黄金分割线──时间
data1:=1+SYSPARAM(1)-1;
data21:=21+SYSPARAM(1)-1;
data34:=34+SYSPARAM(1)-1;
data55:=55+SYSPARAM(1)-1;
data89:=89+SYSPARAM(1)-1;
data144:=144+SYSPARAM(1)-1;
VERTLINE(ROUND(data1)=BARPOS),COLOR0000FF,POINTDOT;
VERTLINE(ROUND(data21)=BARPOS),COLOR0000FF,POINTDOT;
VERTLINE(ROUND(data34)=BARPOS),COLOR0000FF,POINTDOT;
VERTLINE(ROUND(data55)=BARPOS),COLOR0000FF;
VERTLINE(ROUND(data89)=BARPOS),COLOR0000FF,POINTDOT;
VERTLINE(ROUND(data144)=BARPOS),COLOR0000FF,POINTDOT;
DRAWTEXT(ROUND(data1)-3=BARPOS AND SYSPARAM(3)<>SYSPARAM(1),黄500*0.99,'1'),COLOR0000FF;
DRAWTEXT(ROUND(data21)-3=BARPOS AND SYSPARAM(3)<>SYSPARAM(1),黄500*0.99,'21'),COLOR0000FF;
DRAWTEXT(ROUND(data34)-3=BARPOS AND SYSPARAM(3)<>SYSPARAM(1),黄500*0.99,'34'),COLOR0000FF;
DRAWTEXT(ROUND(data55)-3=BARPOS AND SYSPARAM(3)<>SYSPARAM(1),黄500*0.99,'55'),COLOR0000FF;
DRAWTEXT(ROUND(data89)-3=BARPOS AND SYSPARAM(3)<>SYSPARAM(1),黄500*0.99,'89'),COLOR0000FF;
DRAWTEXT(ROUND(data144)-3=BARPOS AND SYSPARAM(3)<>SYSPARAM(1),黄500*0.99,'144'),COLOR0000FF;
DRAWTEXT(SYSPARAM(3)-3=BARPOS AND SYSPARAM(3)<>SYSPARAM(1),黄500*0.99,NUMTOSTR(SYSPARAM(3)-SYSPARAM(1)+1,0)),COLOR0000FF;{程序化交易 www.cxh99.com }

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