相關(guān)標(biāo)簽:

?

?

?

原理解析：
賦值:(收盤價(jià)*3+最高價(jià)+最低價(jià)+開盤價(jià))/6 賦值: JJ的13日指數(shù)移動(dòng)平均 - JJ的21日指數(shù)移動(dòng)平均 賦值: SK的3日指數(shù)移動(dòng)平均 賦值: SK的10日指數(shù)移動(dòng)平均 A1賦值:收盤價(jià)的7日指數(shù)移動(dòng)平均-收盤價(jià)的21日指數(shù)移動(dòng)平均 B1賦值:(0.668*1日前的A1+0.333*A1)的1日指數(shù)移動(dòng)平均 B1,COLORSTICK X1賦值:成交量(手)/成交量(手)的13日累和 X2賦值:以X1為權(quán)重收盤價(jià)的動(dòng)態(tài)移動(dòng)平均 X3賦值:(收盤價(jià)-X2)/X2*40 L2賦值:成交額(元)/(100*成交量(手))的13日簡(jiǎn)單移動(dòng)平均 CYS13賦值: (收盤價(jià)-L2)/L2*100 輸出天堂:如果A1>=B1,返回A1,否則返回B1,線寬為2,畫洋紅色 輸出地獄:如果B1-A1,返回B1,否則返回A1,畫綠色,線寬為2 輸出上帝:當(dāng)滿足條件CYS13>5時(shí),在0和-地獄位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黃色 輸出得道成仙:當(dāng)滿足條件X3>0AND天堂>0時(shí),在天堂+0.1和天堂位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫洋紅色 收盤價(jià)>收盤價(jià)的30日簡(jiǎn)單移動(dòng)平均,COLORFF80FF,線寬為2 DIFF賦值:收盤價(jià)的12日指數(shù)移動(dòng)平均 - 收盤價(jià)的26日指數(shù)移動(dòng)平均 DEA賦值:DIFF的9日指數(shù)移動(dòng)平均 RSV賦值:(收盤價(jià)-9日內(nèi)最低價(jià)的最低值)/(9日內(nèi)最高價(jià)的最高值-9日內(nèi)最低價(jià)的最低值)*100 K賦值:RSV的3日[1日權(quán)重]移動(dòng)平均 D賦值:K的3日[1日權(quán)重]移動(dòng)平均 J1賦值:DIFF J2賦值:DEA J3賦值:K J4賦值:D VL賦值:1日前的最低價(jià) VH賦值:1日前的最高價(jià) VAR1賦值:最高價(jià)-VH的絕對(duì)值的13日[1日權(quán)重]移動(dòng)平均/最高價(jià)-VH和0的較大值的13日[1日權(quán)重]移動(dòng)平均*100 VAR2賦值:最低價(jià)-VL的絕對(duì)值的13日[1日權(quán)重]移動(dòng)平均/最低價(jià)-VL和0的較大值的13日[1日權(quán)重]移動(dòng)平均*100 VAR3賦值:1日前的收盤價(jià) VAR4賦值:VAR2的13日簡(jiǎn)單移動(dòng)平均 VAR5賦值:34日內(nèi)最低價(jià)的最低值 VAR6賦值:收盤價(jià)-VAR3和0的較大值的6日[1日權(quán)重]移動(dòng)平均/收盤價(jià)-VAR3的絕對(duì)值的6日[1日權(quán)重]移動(dòng)平均*100 VAR7賦值:93上穿VAR6 VAR8賦值:如果最低價(jià)<=VAR5,返回VAR4,否則返回0的3日指數(shù)移動(dòng)平均 VAR9賦值:最高價(jià)>0日內(nèi)最低價(jià)的最低值*7 VAR10賦值:((((收盤價(jià)-54日內(nèi)最低價(jià)的最低值)/(54日內(nèi)最高價(jià)的最高值-54日內(nèi)最低價(jià)的最低值))*100)的7日[1日權(quán)重]移動(dòng)平均的5日[1日權(quán)重]移動(dòng)平均) VAR11賦值:((((收盤價(jià)-54日內(nèi)最低價(jià)的最低值)/(54日內(nèi)最高價(jià)的最高值-54日內(nèi)最低價(jià)的最低值)*100)的7日[1日權(quán)重]移動(dòng)平均) * 16.18) - (VAR10 * 10.9) 輸出得道:J1上穿J2ANDVOL>1日前的成交量(手)的5日累和的3日過濾,畫黃色,線寬為2 WR10賦值:-100*(10日內(nèi)最高價(jià)的最高值-收盤價(jià))/(10日內(nèi)最高價(jià)的最高值-10日內(nèi)最低價(jià)的最低值),畫白色,線寬為1 WR45賦值:-100*(45日內(nèi)最高價(jià)的最高值-收盤價(jià))/(45日內(nèi)最高價(jià)的最高值-45日內(nèi)最低價(jià)的最低值),COLORFFB900,線寬為1 WR99賦值:-100*(99日內(nèi)最高價(jià)的最高值-收盤價(jià))/(99日內(nèi)最高價(jià)的最高值-99日內(nèi)最低價(jià)的最低值),畫紅色,線寬為1 天賦值: 0, 線寬為2 COLOR446600 地1賦值:-95, 線寬為2 COLOR446600 輸出選股2:如果天堂上穿0,返回1,否則返回0 當(dāng)滿足條件(天堂上穿0)時(shí),在0.8位置畫1號(hào)圖標(biāo) 當(dāng)滿足條件(天堂上穿0)時(shí),在-0.5位置畫25號(hào)圖標(biāo) 當(dāng)滿足條件收陽(yáng)線時(shí),在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當(dāng)滿足條件收陽(yáng)線時(shí),在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

JJ :=(C*3+H+L+O)/6;SK := EMA(JJ,13) - EMA(JJ,21);SD := EMA(SK,3);SP := EMA(SK,10);A1:=EMA(C,7)-EMA(C,21);B1:=EMA((0.668*REF(A1,1)+0.333*A1),1);B1,COLORSTICK;X1:=V/SUM(V,13);X2:=DMA(C,X1);X3:=(C-X2)/X2*40;L2:=MA(AMOUNT/(100*V),13);CYS13:= (C-L2)/L2*100;天堂:IF(A1>=B1,A1,B1),LINETHICK2,COLORMAGENTA;地獄:IF(B1-A1,B1,A1),COLORGREEN,LINETHICK2;上帝:STICKLINE(CYS13>5,0,-地獄,2,0 ),COLORYELLOW;得道成仙:STICKLINE(X3>0 AND 天堂>0,天堂+0.1,天堂,1,0),COLORMAGENTA;C>MA(C,30),COLORFF80FF,LINETHICK2;DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);DEA:=EMA(DIFF,9);RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J1:=DIFF;J2:=DEA;J3:=K;J4:=D;VL:=REF(LOW,1); VH:=REF(H,1);VAR1:=SMA(ABS(H-VH),13,1)/SMA(MAX(H-VH,0),13,1)*100;VAR2:=SMA(ABS(L-VL),13,1)/SMA(MAX(L-VL,0),13,1)*100;VAR3:=REF(CLOSE,1);VAR4:=MA(VAR2,13);VAR5:=LLV(L,34);VAR6:=SMA(MAX(CLOSE-VAR3,0),6,1)/SMA(ABS(CLOSE-VAR3),6,1)*100;VAR7:=CROSS(93,VAR6);VAR8:=EMA(IF(L<=VAR5,VAR4,0),3);VAR9:=H>LLV(L,0)*7;VAR10:=(SMA(SMA((((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54))) * 100),7,1),5,1));VAR11:=((SMA(((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54)) * 100),7,1)) * 16.18) - (VAR10 * 10.9);得道:FILTER(CROSS(J1,J2) AND VOL>REF(SUM(VOL,5),1),3),COLORYELLOW,LINETHICK2;WR10:=-100*(HHV(HIGH,10)-CLOSE)/(HHV(HIGH,10)-LLV(LOW,10)),COLORWHITE,LINETHICK1;WR45:=-100*(HHV(HIGH,45)-CLOSE)/(HHV(HIGH,45)-LLV(LOW,45)),COLORFFB900,LINETHICK1;WR99:=-100*(HHV(HIGH,99)-CLOSE)/(HHV(HIGH,99)-LLV (LOW,99)),COLORRED,LINETHICK1;天:= 0, LINETHICK2 COLOR446600;地1:=-95, LINETHICK2 COLOR446600;選股2:IF(CROSS(天堂,0),1,0);DRAWICON((CROSS(天堂,0) ),0.8,1);DRAWICON((CROSS(天堂,0) ),-0.5,25);
DRAWTEXT_FIX(C>O,0.01,0.9,0,' m.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?