相關標簽:

?

飛狐底與加速副圖指標源碼

?

?

原理解析：
VAR1賦值:((收盤價-收盤價的6日簡單移動平均)/(收盤價的6日簡單移動平均))*(100) VAR2賦值:((收盤價-收盤價的24日簡單移動平均)/(收盤價的24日簡單移動平均))*(100) VAR3賦值:((收盤價-收盤價的32日簡單移動平均)/(收盤價的32日簡單移動平均))*(100) VAR4賦值:(VAR1+VAR2+VAR3)/(3) VAR5賦值:VAR4的5日指數移動平均 輸出平滑異同平均:(VAR1的5日指數移動平均的5日指數移動平均)*(3),COLORFF00FF,COLORSTICK,線寬為2 VAR6賦值:如果(VAR4<=(-20)),返回10,否則返回0 VAR7賦值:10日內VAR6的最高值 當滿足條件(VAR6=10)時,在20和10位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR0000FF 輸出底:如果(VAR6=10),返回10,否則返回0 當滿足條件(VAR6=10)時,在最低價位置書寫文字,COLORFFFFFF VARA賦值:如果VAR7ANDCROSS(收盤價的3日簡單移動平均,收盤價的5日簡單移動平均),返回20,否則返回0 輸出K:(VAR5的5日指數移動平均)*(2),COLORFFFF00 輸出D:K的5日指數移動平均,COLOR0000FF 輸出J:(K)*(3)-(D)*(2),COLOR00FFFF VAR8賦值:(最高價+最低價+收盤價)/(3) VAR9賦值:(VAR8-VAR8的14日簡單移動平均)/((0.015)*(VAR8的14日平均絕對偏差)) VAR10賦值:(VAR8-VAR8的70日簡單移動平均)/((0.015)*(VAR8的70日平均絕對偏差)) VAR11賦值:如果(VAR9>=150)AND(VAR9<200)AND(VAR10>=150)AND(VAR10<200),返回10,否則返回0 VAR12賦值:如果(VAR9<=(-150))AND(VAR9>(-200))AND(VAR10<=(-150))AND(VAR10>(-200)),返回(-10),否則返回VAR11 VAR13賦值:((收盤價-收盤價的13日簡單移動平均)/(收盤價的13日簡單移動平均))*(100) VAR14賦值:100-VAR13的絕對值 VAR15賦值:如果(VAR14<90),返回VAR14,否則返回100 VAR16賦值:如果(VAR10>=200)AND(VAR9>=150),返回15,否則返回如果(VAR10<=(-200))AND(VAR9<=(-150)),返回(-15),否則返回VAR12+60 VAR17賦值:(VAR16>60) AND (VAR15<150) 輸出加速:如果VAR17AND(統計20日中滿足VAR17的天數=1),返回10,否則返回0 當滿足條件VAR17AND(統計20日中滿足VAR17的天數=1)時,在10位置書寫文字,COLORFFFFFF

?

?來源:程序化99（ www.kzuj.com.cn ）

源碼：

?

?

var1:=((CLOSE-MA(CLOSE,6))/(MA(CLOSE,6)))*(100);
var2:=((CLOSE-MA(CLOSE,24))/(MA(CLOSE,24)))*(100);
var3:=((CLOSE-MA(CLOSE,32))/(MA(CLOSE,32)))*(100);
var4:=(var1+var2+var3)/(3);
var5:=EMA(var4,5);
MACD:(EMA(EMA(var1,5),5))*(3),ColorFF00FF,ColorStick,Linethick2;
var6:=IF((var4<=(-20)),10,0);
var7:=HHV(var6,10);
STICKLINE((var6=10),20,10,1,0),Color0000FF;
底:if((var6=10),10,0);
DRAWTEXT((var6=10),LOW,'底'),ColorFFFFFF;
varA:=IF(var7 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);
K:(EMA(var5,5))*(2),ColorFFFF00;
D:EMA(K,5),Color0000FF;
J:(K)*(3)-(D)*(2),Color00FFFF;
var8:=(HIGH+LOW+CLOSE)/(3);
var9:=(var8-MA(var8,14))/((0.015)*(AVEDEV(var8,14)));
var10:=(var8-MA(var8,70))/((0.015)*(AVEDEV(var8,70)));
var11:=IF((var9>=150) AND (var9<200) AND (var10>=150) AND (var10<200),10,0);
var12:=IF((var9<=(-150)) AND (var9>(-200)) AND (var10<=(-150)) AND (var10>(-200)),(-10),var11);
var13:=((CLOSE-MA(CLOSE,13))/(MA(CLOSE,13)))*(100);
var14:=100-ABS(var13);
var15:=IF((var14<90),var14,100);
var16:=IF((var10>=200) AND (var9>=150),15,IF((var10<=(-200)) AND (var9<=(-150)),(-15),var12))+60;
var17:=(var16>60) AND (var15<150);
加速:if(var17 AND (COUNT(var17,20)=1),10,0);
DRAWTEXT(var17 AND (COUNT(var17,20)=1),10,'加速'),ColorFFFFFF ;{程序化交易 www.kzuj.com.cn }

?

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

?