相關標簽:主升浪指標源碼無未來 、 指標源碼 無未來 、 枯木逢春副圖公式源碼 、 副圖指標無未來不漂移 、 大盤副圖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.kzuj.com.cn ）

源碼：

?

?

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.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?