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

?

?

原理解析：
輸出A6:收盤價(jià)的5日指數(shù)移動(dòng)平均,畫綠色 輸出A10:收盤價(jià)的10日指數(shù)移動(dòng)平均,畫綠色 輸出RJ:(收盤價(jià)+開盤價(jià))*1/2 當(dāng)滿足條件A6>3日前的A6時(shí),在A6和1日前的A6位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.,畫紅色 當(dāng)滿足條件A6<3日前的A6時(shí),在A6和1日前的A6位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.,畫綠色 如果收盤價(jià)>A6,返回A6,否則返回?zé)o效數(shù),畫白色,線寬為2 如果收盤價(jià)>A10,返回A10,否則返回?zé)o效數(shù),畫紅色,線寬為2 JJJ賦值:如果總量>0.01,返回0.01*總金額/總量,否則返回前收盤價(jià) DDD賦值:(最高價(jià)<0.01 最低價(jià)<0.01) JJJT賦值:如果DDD,返回1,否則返回(JJJ<(最高價(jià)+0.01)并且JJJ>(最低價(jià)-0.01)) 輸出CYC1:如果JJJT,返回0.01*成交額(元)的6日指數(shù)移動(dòng)平均/成交量(手)的6日指數(shù)移動(dòng)平均,否則返回(最高價(jià)+最低價(jià)+收盤價(jià))/3的6日指數(shù)移動(dòng)平均,畫綠色 輸出CYC2:如果JJJT,返回0.01*成交額(元)的8日指數(shù)移動(dòng)平均/成交量(手)的8日指數(shù)移動(dòng)平均,否則返回(最高價(jià)+最低價(jià)+收盤價(jià))/3的8日指數(shù)移動(dòng)平均,畫綠色 輸出CYC3:如果JJJT,返回0.01*成交額(元)的34日指數(shù)移動(dòng)平均/成交量(手)的34日指數(shù)移動(dòng)平均,否則返回(最高價(jià)+最低價(jià)+收盤價(jià))/3的34日指數(shù)移動(dòng)平均 輸出CYC∞:如果JJJT,返回以100*成交量(手)/流通股本(股)為權(quán)重成交額(元)/(100*成交量(手))的動(dòng)態(tài)移動(dòng)平均,否則返回(最高價(jià)+最低價(jià)+收盤價(jià))/3的120日指數(shù)移動(dòng)平均 如果CYC1>1日前的CYC1ORC>CYC1,返回CYC1,否則返回?zé)o效數(shù),畫白色,線寬為2 如果收盤價(jià)>CYC2,返回CYC2,否則返回?zé)o效數(shù),畫紅色,線寬為2 B賦值:CYC1>1日前的CYC1ANDCYC2>1日前的CYC2ANDCYC3>1日前的CYC3ANDCYC∞>1日前的CYC∞ANDC>CYC∞ANDRJ>1日前的RJANDA6>1日前的A6上穿0.2 牛起身賦值: 收盤價(jià)上穿CYC∞ AND CYC∞>1日前的CYC∞ AND CYC1>1日前的CYC1 AND CYC2>1日前的CYC2 AND CYC3>1日前的CYC3 當(dāng)滿足條件B時(shí),在最低價(jià)-(最高價(jià)-最低價(jià))*0.6位置書寫文字 當(dāng)滿足條件牛起身時(shí),在最低價(jià)-(最高價(jià)-最低價(jià))*0.96位置書寫文字

?

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

源碼：

?

?

A6:EMA(CLOSE,5),COLORGREEN;
A10:EMA(CLOSE,10),COLORGREEN;
RJ:(C+O)*1/2;
STICKLINE(A6>REF(A6,3),A6,REF(A6,1),1,1),COLORRED;
STICKLINE(A6<REF(A6,3),A6,REF(A6,1),1,1),COLORGREEN;
IF(C>A6,A6,DRAWNULL),COLORWHITE,LINETHICK2;
IF(C>A10,A10,DRAWNULL),COLORRED,LINETHICK2;
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));
CYC1:IF(JJJT,0.01*EXPMA(AMOUNT,6)/EXPMA(VOL,6),EMA((HIGH+LOW+CLOSE)/3,6)),COLORGREEN;
CYC2:IF(JJJT,0.01*EXPMA(AMOUNT,8)/EXPMA(VOL,8),EMA((HIGH+LOW+CLOSE)/3,8)),COLORGREEN;
CYC3:IF(JJJT,0.01*EXPMA(AMOUNT,34)/EXPMA(VOL,34),EMA((HIGH+LOW+CLOSE)/3,34));
CYC∞:IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));
IF(CYC1>REF(CYC1,1) OR C>CYC1,CYC1,DRAWNULL),COLORWHITE,LINETHICK2;
IF(C>CYC2,CYC2,DRAWNULL),COLORRED,LINETHICK2;
B:=CROSS(CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1)AND CYC∞>REF(CYC∞,1) AND C>CYC∞ AND RJ>REF(RJ,1) AND A6>REF(A6,1),0.2);
牛起身:= CROSS(C,CYC∞) AND CYC∞>REF(CYC∞,1) AND CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1);
DRAWTEXT(B,LOW-(H-L)*0.6,'上/');
DRAWTEXT(牛起身,LOW-(H-L)*0.96,'牛起身');

點(diǎn)擊看大圖

?

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

?