千载难逢副图指标公式源码[通达信公式]

相关标签:主升浪指标源码无未来 、 指标源码 无未来 、 枯木逢春副图公式源码 、 副图指标无未来不漂移 、 大盘副图k线指标源码 、 副图指标源码 、 新庄指标源码及副图 、 底部指标源码及副图 、 伏击涨停副图指标源码 、 预警指标源码及副图 、 macd共振副图指标源码 、 六指金叉指标副图源码 、 主力主图指标公式源码 、 超宏主图指标公式源码 、 macd主图指标源码公式 、

千载难逢副图指标 无未来 源码

原理解析：
VAR1赋值:1日前的收盘价 VAR2赋值:收盘价-VAR1和0的较大值的18日[1日权重]移动平均/收盘价-VAR1的绝对值的13日[1日权重]移动平均*100 VAR3赋值:收盘价-VAR1和0的较大值的24日[1日权重]移动平均/收盘价-VAR1的绝对值的20日[1日权重]移动平均*100 VAR4赋值:上次VAR3<48距今天数<=3 AND VAR2上穿VAR3 VAR5赋值:(收盘价-收盘价的48日简单移动平均)/收盘价的20日简单移动平均*100<-12.5 VAR6赋值:5日内最低价的最低值 VAR7赋值:10日内最高价的最高值 输出VAR8:(收盘价-VAR6)/(VAR7-VAR6)*100的4日指数移动平均 输出VAR9:0.667*1日前的VAR8+0.333*VAR8的2日指数移动平均 输出低吸:如果0-(-1)*VAR4ANDVAR5ANDCROSS(VAR8,VAR9)ANDVAR8<=25,返回60,否则返回0 当满足条件低吸>0时,在60位置书写文字,COLORFFFFFF VARC赋值:1日前的收盘价 VARD赋值:收盘价-VARC和0的较大值的7日[1日权重]移动平均/收盘价-VARC的绝对值的7日[1日权重]移动平均*100 VARE赋值:收盘价-VARC和0的较大值的13日[1日权重]移动平均/收盘价-VARC的绝对值的13日[1日权重]移动平均*100 VARF赋值:上次VARE<43距今天数<=3 AND VARD上穿VARE VAR10赋值:(收盘价-收盘价的43日简单移动平均)/收盘价的20日简单移动平均*100<-12.5 VAR11赋值:5日内最低价的最低值 VAR12赋值:10日内最高价的最高值 输出VAR13:(收盘价-VAR11)/(VAR12-VAR11)*100的4日指数移动平均 输出VAR14:0.667*1日前的VAR13+0.333*VAR13的2日指数移动平均 输出枯木逢春:如果0-(-1)*VARFANDVAR10ANDVAR13上穿VAR14ANDVAR13<=25,返回50,否则返回0COLORFF9900 当满足条件枯木逢春>0时,在50位置书写文字,COLORFF9900 VAR17赋值:1日前的收盘价 VAR18赋值:收盘价-VAR17和0的较大值的7日[1日权重]移动平均/收盘价-VAR17的绝对值的7日[1日权重]移动平均*100 VAR19赋值:收盘价-VAR17和0的较大值的13日[1日权重]移动平均/收盘价-VAR17的绝对值的13日[1日权重]移动平均*100 VAR1A赋值:上次VAR19<33距今天数<=3 AND VAR18上穿VAR19 VAR1B赋值:(收盘价-收盘价的33日简单移动平均)/收盘价的20日简单移动平均*100<-12.5 VAR1C赋值:5日内最低价的最低值 VAR1D赋值:10日内最高价的最高值 VAR1E赋值:(收盘价-VAR1C)/(VAR1D-VAR1C)*100的4日指数移动平均 VAR1F赋值:0.667*1日前的VAR1E+0.333*VAR1E的2日指数移动平均 输出难得一遇:如果0-(-1)*VAR1AANDVAR1BANDCROSS(VAR1E,VAR1F)ANDVAR1E<=25,返回40,否则返回0画红色 当满足条件难得一遇>0时,在40位置书写文字,画红色 VAR22赋值:1日前的收盘价 VAR23赋值:收盘价-VAR22和0的较大值的7日[1日权重]移动平均/收盘价-VAR22的绝对值的7日[1日权重]移动平均*100 VAR24赋值:收盘价-VAR22和0的较大值的13日[1日权重]移动平均/收盘价-VAR22的绝对值的13日[1日权重]移动平均*100 VAR25赋值:上次VAR24<23距今天数<=3 AND VAR23上穿VAR24 VAR26赋值:(收盘价-收盘价的23日简单移动平均)/收盘价的20日简单移动平均*100<-12.5 VAR27赋值:5日内最低价的最低值 VAR28赋值:10日内最高价的最高值 输出VAR29:(收盘价-VAR27)/(VAR28-VAR27)*100的4日指数移动平均 输出VAR2A:0.667*1日前的VAR29+0.333*VAR29的2日指数移动平均 输出千载难逢:如果0-(-1)*VAR25ANDVAR26ANDCROSS(VAR29,VAR2A)ANDVAR29<=25,返回30,否则返回0COLOR009900 当满足条件千载难逢>0时,在30位置书写文字,COLOR009900 当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色 当满足条件收阳线时,在横轴1纵轴1位置书写文字,画红色

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

源码：

VAR1:=REF(CLOSE,1);
VAR2:=SMA(MAX(CLOSE-VAR1,0),18,1)/SMA(ABS(CLOSE-VAR1),13,1)*100;
VAR3:=SMA(MAX(CLOSE-VAR1,0),24,1)/SMA(ABS(CLOSE-VAR1),20,1)*100;
VAR4:=BARSLAST(VAR3<48)<=3 AND CROSS(VAR2,VAR3);
VAR5:=(CLOSE-MA(CLOSE,48))/MA(CLOSE,20)*100<-12.5;
VAR6:=LLV(LOW,5);
VAR7:=HHV(HIGH,10);
VAR8:EMA((CLOSE-VAR6)/(VAR7-VAR6)*100,4);
VAR9:EMA(0.667*REF(VAR8,1)+0.333*VAR8,2);
低吸:IF(0-(-1)*VAR4 AND VAR5 AND CROSS(VAR8,VAR9) AND VAR8<=25,60,0);
DRAWTEXT(低吸>0,60,'低吸'),COLORFFFFFF ;
VARC:=REF(CLOSE,1);
VARD:=SMA(MAX(CLOSE-VARC,0),7,1)/SMA(ABS(CLOSE-VARC),7,1)*100;
VARE:=SMA(MAX(CLOSE-VARC,0),13,1)/SMA(ABS(CLOSE-VARC),13,1)*100;
VARF:=BARSLAST(VARE<43)<=3 AND CROSS(VARD,VARE);
VAR10:=(CLOSE-MA(CLOSE,43))/MA(CLOSE,20)*100<-12.5;
VAR11:=LLV(LOW,5);
VAR12:=HHV(HIGH,10);
VAR13:EMA((CLOSE-VAR11)/(VAR12-VAR11)*100,4);
VAR14:EMA(0.667*REF(VAR13,1)+0.333*VAR13,2);
枯木逢春:IF(0-(-1)*VARF AND VAR10 AND CROSS(VAR13,VAR14) AND VAR13<=25,50,0)COLORFF9900;
DRAWTEXT(枯木逢春>0,50,'枯木逢春'),COLORFF9900;
VAR17:=REF(CLOSE,1);
VAR18:=SMA(MAX(CLOSE-VAR17,0),7,1)/SMA(ABS(CLOSE-VAR17),7,1)*100;
VAR19:=SMA(MAX(CLOSE-VAR17,0),13,1)/SMA(ABS(CLOSE-VAR17),13,1)*100;
VAR1A:=BARSLAST(VAR19<33)<=3 AND CROSS(VAR18,VAR19);
VAR1B:=(CLOSE-MA(CLOSE,33))/MA(CLOSE,20)*100<-12.5;
VAR1C:=LLV(LOW,5);
VAR1D:=HHV(HIGH,10);
VAR1E:=EMA((CLOSE-VAR1C)/(VAR1D-VAR1C)*100,4);
VAR1F:=EMA(0.667*REF(VAR1E,1)+0.333*VAR1E,2);
难得一遇:IF(0-(-1)*VAR1A AND VAR1B AND CROSS(VAR1E,VAR1F) AND VAR1E<=25,40,0)COLORRED;
DRAWTEXT(难得一遇>0,40,'难得一遇'),COLORRED;
VAR22:=REF(CLOSE,1);
VAR23:=SMA(MAX(CLOSE-VAR22,0),7,1)/SMA(ABS(CLOSE-VAR22),7,1)*100;
VAR24:=SMA(MAX(CLOSE-VAR22,0),13,1)/SMA(ABS(CLOSE-VAR22),13,1)*100;
VAR25:=BARSLAST(VAR24<23)<=3 AND CROSS(VAR23,VAR24);
VAR26:=(CLOSE-MA(CLOSE,23))/MA(CLOSE,20)*100<-12.5;
VAR27:=LLV(LOW,5);
VAR28:=HHV(HIGH,10);
VAR29:EMA((CLOSE-VAR27)/(VAR28-VAR27)*100,4);
VAR2A:EMA(0.667*REF(VAR29,1)+0.333*VAR29,2);
千载难逢:IF(0-(-1)*VAR25 AND VAR26 AND CROSS(VAR29,VAR2A) AND VAR29<=25,30,0)COLOR009900;
DRAWTEXT(千载难逢>0,30,'千载难逢'),COLOR009900;
DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

 

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