翮银天地公式指标公式源码[同花顺公式]

相关标签:

原理解析：
LASTP赋值:1日前的收盘价 WEEKVOL赋值:收盘价-LASTP和0的较大值的8日[1日权重]移动平均/收盘价-LASTP的绝对值的8日[1日权重]移动平均*100,COLOR0080FF,线宽为2 当满足条件(WEEKVOL上穿15)时,在45位置书写文字,画黄色 当满足条件(WEEKVOL上穿15)时,在40位置书写文字,画黄色 当满足条件WEEKVOL上穿15时,在50和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,画洋红色 VAR5赋值:75日内最低价的最低值 VAR6赋值:75日内最高价的最高值 VAR7赋值:(VAR6-VAR5)/100 VAR8赋值:(收盘价-VAR5)/VAR7的23日[1日权重]移动平均 VARA赋值:3*VAR8-2*VAR8的13日[1日权重]移动平均 输出趋势:-(100-VARA)+100,COLOR0099FF,线宽为2 VREADY赋值:3*(收盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100的5日[1日权重]移动平均-2*(收盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100的5日[1日权重]移动平均的3日[1日权重]移动平均 DIRECTION赋值:VREADY的3日指数移动平均 V12赋值:(DIRECTION-1日前的DIRECTION)/1日前的DIRECTION*100 当满足条件DIRECTION<=13时,在0和7位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF00FF SELL_V赋值:2*((收盘价*2+最高价+最低价)/4*10的13日指数移动平均-(收盘价*2+最高价+最低价)/4*10的34日指数移动平均-(收盘价*2+最高价+最低价)/4*10的13日指数移动平均-(收盘价*2+最高价+最低价)/4*10的34日指数移动平均的5日指数移动平均)*5.5 SELL_P赋值:3*(收盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100的5日[1日权重]移动平均-2*(收盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100的5日[1日权重]移动平均的3日[1日权重]移动平均 当满足条件如果SELL_V<=0,返回SELL_V,否则返回1ANDEMA(SELL_P,3)>90时,在0和7位置之间画柱状线,宽度为6,0不为0则画空心柱.,画绿色 P_VAR1赋值:14日内(开盘价+最高价+最低价+收盘价)/4的最高值 P_VAR2赋值:31日内(开盘价+最高价+最低价+收盘价)/4的最低值 POWER_VAR赋值:P_VAR1-P_VAR2 P_BAR3赋值:23日内(开盘价+最高价+最低价+收盘价)/4的最高值 P_BAR4赋值:96日内(开盘价+最高价+最低价+收盘价)/4的最低值 P_BARV赋值:P_BAR3-P_BAR4 POWER_R赋值:((开盘价+最高价+最低价+收盘价)/4-P_VAR2)/POWER_VAR的1日指数移动平均*100,画红色 POWER_B赋值:((开盘价+最高价+最低价+收盘价)/4-P_BAR4)/P_BARV的1日指数移动平均*100,画淡蓝色 输出POWER_LINE:(POWER_R+POWER_B)/2,画淡蓝色 TOP_VARB赋值:收盘价15%之字转向的前1个波峰位置<10 TOP_VAR赋值:如果TOP_VARB=1,返回2,否则返回0 TOP赋值:如果TOP_VAR=2,返回2,否则返回0 TOP_F赋值:如果TOP>1日前的TOP,返回50,否则返回150,画绿色,线宽为2 当满足条件TOP_F=50时,在73位置书写文字,画绿色 当满足条件TOP_F=50时,在90和55位置之间画柱状线,宽度为8,0不为0则画空心柱.,画绿色 VARA赋值:(2*收盘价+最高价+最低价)/4 VARB赋值:23日内最低价的最低值 VARC赋值:23日内最高价的最高值 VARD赋值:(VARA-VARB)/(VARC-VARB)*100的13日指数移动平均 VARE赋值:0.778*1日前的VARD+0.222*VARD的1日指数移动平均 当满足条件VARD-VARE>0时,在VARD和VARE位置之间画柱状线,宽度为8,0不为0则画空心柱.,画红色 当满足条件VARD-VARE<0时,在VARD和VARE位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR00FF0F 输出DOGE生命线:VARE的3日指数移动平均,画红色 输出逃顶临界:90,画红色 输出买:如果VARD上穿VAREANDVARD>VAREANDVARD<35,返回90,否则返回0,STICK,画淡红色 输出买买:如果VARD上穿VAREANDVARD>VAREANDVARD<25,返回70,否则返回0,STICK,画红色 输出买买买:如果VARD上穿VAREANDVARD>VAREANDVARD<15,返回50,否则返回0,STICK,画洋红色

源码：

lastp:=REF(CLOSE,1);weekvol:=SMA(MAX(CLOSE-lastp,0),8,1)/SMA(ABS(CLOSE-lastp),8,1)*100,COLOR0080FF,LINETHICK2;DRAWTEXT((CROSS(weekvol,15)),45,'捡'),coloryellow;DRAWTEXT((CROSS(weekvol,15)),40,'金'),coloryellow;STICKLINE(CROSS(weekvol,15),50,0,3,0),colormagenta;Var5:=LLV(LOW,75);Var6:=HHV(HIGH,75);Var7:=(Var6-Var5)/100;Var8:=SMA((CLOSE-Var5)/Var7,23,1);VarA:=3*Var8-2*SMA(Var8,13,1);趋势:-(100-VarA)+100,color0099ff,linethick2;VReady:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);direction:=EMA(VReady,3);V12:=(direction-REF(direction,1))/REF(direction,1)*100;STICKLINE(direction<=13,0,7,8,0),ColorFF00FF;sell_v:=2*(EMA((C*2+H+L)/4*10,13)-EMA((C*2+H+L)/4*10,34)-EMA(EMA((C*2+H+L)/4*10,13)-EMA((C*2+H+L)/4*10,34),5))*5.5;sell_p:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);STICKLINE(IF(sell_v<=0,sell_v,1)AND EMA(sell_p,3)>90,0,7,6,0),colorgreen;p_var1:=HHV((O+H+L+C)/4,14);p_var2:=LLV((O+H+L+C)/4,31);power_var:=p_var1-p_var2;p_bar3:=HHV((O+H+L+C)/4,23);p_bar4:=LLV((O+H+L+C)/4,96);p_barv:=p_bar3-p_bar4;power_r:=EMA(((O+H+L+C)/4-p_var2)/power_var,1)*100,colorred;power_b:=EMA(((O+H+L+C)/4-p_bar4)/p_barv,1)*100,colorliblue;POWer_line:(power_r+power_b)/2,colorliblue;top_varb:=PEAKBARS(3,15,1)<10;top_var:=IF(top_varb=1,2,0);top:=IF(top_var=2,2,0);top_f:=IF(top>REF(top,1),50,150),colorgreen,linethick2;DRAWTEXT(top_f=50,73,'←清'),colorgreen;STICKLINE(top_f=50,90,55,8,0),colorgreen;VARa:=(2*CLOSE+HIGH+LOW)/4;VARb:=LLV(LOW,23);VARc:=HHV(HIGH,23);VARd:=EMA((VARa-VARb)/(VARc-VARb)*100,13);VARe:=EMA(0.778*REF(VARd,1)+0.222*VARd,1);STICKLINE(VARd-VARe>0,VARd,VARe,8,0),colorred;STICKLINE(VARd-VARe<0,VARd,VARe,8,0),COLOR00FF0F;DOGE生命线:EMA(VARe,3),colorred;逃顶临界:90,colorred;买:IF(CROSS(VARd,VARe)AND VARd>VARe AND VARd<35,90,0),STICK,colorlired;买买:IF(CROSS(VARd,VARe)AND VARd>VARe AND VARd<25,70,0),STICK,colorred;买买买:IF(CROSS(VARd,VARe)AND VARd>VARe AND VARd<15,50,0),STICK,colormagenta;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' WWW.CXH99.COM '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花顺程序化交易');

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