相關標簽:

?

?

原理解析：
M1賦值:以收盤價的1日簡單移動平均計算的獲利盤比例*200 M2賦值:以收盤價的20日簡單移動平均計算的獲利盤比例*200 VAR1賦值:(收盤價-80日內最低價的最低值)/(80日內最高價的最高值-80日內最低價的最低值)*200 VAR2賦值:VAR1的3日[1日權重]移動平均 VAR3賦值:VAR2的3日[1日權重]移動平均 VAR4賦值:3*VAR2-2*VAR3 VAR5賦值:5日內最低價的最低值 VAR6賦值:5日內最高價的最高值 VAR7賦值:(收盤價-VAR5)/(VAR6-VAR5)*100的4日指數移動平均*2 VAR8賦值:0.667*1日前的VAR7+0.333*VAR7的2日指數移動平均 VAR9賦值:3*VAR7-2*VAR8 VARA賦值:收盤價的5日簡單移動平均的2乘冪+收盤價的5日簡單移動平均 VARB賦值:最低價的5日簡單移動平均的2乘冪+最低價的5日簡單移動平均 VARC賦值:最高價的5日簡單移動平均的2乘冪+最高價的5日簡單移動平均 VARD賦值:(VARA-64日內VARB的最低值)/(64日內VARC的最高值-64日內VARB的最低值)*150+65-10 VARE賦值:VARD的3日[1日權重]移動平均*1.5-100 VARF賦值:VARE的3日[1日權重]移動平均 VAR10賦值:3*VARE-2*VARF VAR11賦值:(最高價+最低價+收盤價*2)/4 VAR12賦值:VAR11的13日指數移動平均 VAR13賦值:VAR11的13日估算標準差 VAR14賦值:(VAR11-VAR12)*100/VAR13 VAR15賦值:VAR14的5日指數移動平均 VAR17賦值:VAR15的13日指數移動平均+200-100 VAR18賦值:VAR17的10日指數移動平均 VAR19賦值:3*VAR17-2*VAR18 VAR1A賦值:VAR2+VAR7+VARE+VAR17 VAR1B賦值:VAR3+VAR8+VARF+VAR18 VAR1C賦值:VAR4+VAR9+VAR10+VAR19 VAR1D賦值:(最高價+最低價+收盤價)/3 VAR20賦值:(VAR1D-VAR1D的34日簡單移動平均)/(0.015*VAR1D的34日平均絕對偏差) VAR21賦值:以成交量(手)/當前流通股本(手)為權重成交額(元)/成交量(手)/100的動態(tài)移動平均 VAR22賦值:(最高價+最低價+收盤價+VAR1D)/4 VAR23賦值:VAR22的24日指數移動平均 VAR24賦值:VAR22的24日估算標準差 VAR25賦值:(VAR22-VAR23)/VAR24*100 VAR26賦值:(VAR1D-VAR1D的24日簡單移動平均)/(0.015*VAR1D的24日平均絕對偏差) VAR27賦值:VAR25的5日指數移動平均 VAR2A賦值:((VAR27+VAR26+VAR20)/3+165)/4 VAR2B賦值:(VAR2A的15日指數移動平均的10日指數移動平均的5日指數移動平均-25)*2+VAR21 VAR2C賦值:(VAR1A+VAR1B+VAR1C*30)/32/5-15 VAR2D賦值:VAR2C的13日指數移動平均 VAR2E賦值:(VAR2A+VAR2C)/2/1.1 VAR28賦值:(收盤價-收盤價的6日簡單移動平均)/收盤價的6日簡單移動平均*100 VAR29賦值:(收盤價-收盤價的12日簡單移動平均)/收盤價的12日簡單移動平均*100 VAR30賦值:(收盤價-收盤價的24日簡單移動平均)/收盤價的24日簡單移動平均*100 VAR31賦值:1日前的收盤價 VAR32賦值:收盤價-VAR31和0的較大值的5日[1日權重]移動平均/收盤價-VAR31的絕對值的5日[1日權重]移動平均*100 VAR33賦值:(最高價+最低價+收盤價)/3 VAR34賦值:(VAR33-VAR33的14日簡單移動平均)/(0.015*VAR33的14日平均絕對偏差) VAR35賦值:(VAR28>=-15.8 AND VAR28<=-12.2 AND VAR29<=-20.8 AND VAR30<=-27.5 AND VAR32<=11.7 AND VAR34<=-145)*100 輸出基礎線:如果VAR35>0,返回100,否則返回0,COLORF00FF0 輸出多空比例:如果(M1-M2)>-0.02,返回M1-M2,否則返回-0.02,COLORF0F000 輸出超短:VAR2E的3日指數移動平均,畫紅色 輸出短線:超短的5日指數移動平均,畫白色 輸出趨勢線:(VAR2B+VAR2D)/2的2日指數移動平均 ,畫黃色 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

?

M1:=WINNER( MA(CLOSE,1))*200;
M2:=WINNER(MA(CLOSE,20))*200;
VAR1:=(CLOSE-LLV(LOW,80))/(HHV(HIGH,80)-LLV(LOW,80))*200;
VAR2:=SMA(VAR1,3,1);
VAR3:=SMA(VAR2,3,1);
VAR4:=3*VAR2-2*VAR3;
VAR5:=LLV(LOW,5);
VAR6:=HHV(HIGH,5);
VAR7:=EMA((CLOSE-VAR5)/(VAR6-VAR5)*100,4)*2;
VAR8:=EMA(0.667*REF(VAR7,1)+0.333*VAR7,2);
VAR9:=3*VAR7-2*VAR8;
VARA:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
VARB:=POW(MA(LOW,5),2)+MA(LOW,5);
VARC:=POW(MA(HIGH,5),2)+MA(HIGH,5);
VARD:=(VARA-LLV(VARB,64))/(HHV(VARC,64)-LLV(VARB,64))*150+65-10;
VARE:=SMA(VARD,3,1)*1.5-100;
VARF:=SMA(VARE,3,1);
VAR10:=3*VARE-2*VARF;
VAR11:=(HIGH+LOW+CLOSE*2)/4;
VAR12:=EMA(VAR11,13);
VAR13:=STD(VAR11,13);
VAR14:=(VAR11-VAR12)*100/VAR13;
VAR15:=EMA(VAR14,5);
VAR17:=EMA(VAR15,13)+200-100;
VAR18:=EMA(VAR17,10);
VAR19:=3*VAR17-2*VAR18;
VAR1A:=VAR2+VAR7+VARE+VAR17;
VAR1B:=VAR3+VAR8+VARF+VAR18;
VAR1C:=VAR4+VAR9+VAR10+VAR19;
VAR1D:=(HIGH+LOW+CLOSE)/3;
VAR20:=(VAR1D-MA(VAR1D,34))/(0.015*AVEDEV(VAR1D,34));
VAR21:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
VAR22:=(HIGH+LOW+CLOSE+VAR1D)/4;
VAR23:=EMA(VAR22,24);
VAR24:=STD(VAR22,24);
VAR25:=(VAR22-VAR23)/VAR24*100;
VAR26:=(VAR1D-MA(VAR1D,24))/(0.015*AVEDEV(VAR1D,24));
VAR27:=EMA(VAR25,5);
VAR2A:=((VAR27+VAR26+VAR20)/3+165)/4;
VAR2B:=(EMA(EMA(EMA(VAR2A,15),10),5)-25)*2+VAR21;
VAR2C:=(VAR1A+VAR1B+VAR1C*30)/32/5-15;
VAR2D:=EMA(VAR2C,13);{13}
VAR2E:=(VAR2A+VAR2C)/2/1.1;
VAR28:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VAR29:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
VAR30:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VAR31:=REF(CLOSE,1);
VAR32:=SMA(MAX(CLOSE-VAR31,0),5,1)/SMA(ABS(CLOSE-VAR31),5,1)*100;
VAR33:=(HIGH+LOW+CLOSE)/3;
VAR34:=(VAR33-MA(VAR33,14))/(0.015*AVEDEV(VAR33,14));
VAR35:=(VAR28>=-15.8 AND VAR28<=-12.2 AND VAR29<=-20.8 AND VAR30<=-27.5 AND VAR32<=11.7 AND VAR34<=-145)*100;
基礎線:IF(VAR35>0 ,100 ,0 ),COLORF00FF0;
多空比例:IF((M1-M2)>-0.02,M1-M2,-0.02),COLORF0F000;
超短:EMA(VAR2E,3),COLORRED ;
短線:EMA(超短,5),COLORWHITE;
趨勢線:EMA((VAR2B+VAR2D)/2,2) ,COLORYELLOW;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

?

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

?