相關標簽:

?

原理解析：
輸出EMA3:收盤價的3日指數移動平均,畫白色,線寬為2 輸出EMA13:收盤價的13日指數移動平均,畫黃色 輸出EMA21:收盤價的21日指數移動平均,COLORFF00FF 輸出EMA55:收盤價的55日指數移動平均,畫綠色 AR1賦值:EMA21>EMA13 AND EMA13>EMA3 AR2賦值:上次(收盤價-EMA3)/EMA3*100<-6距今天數 AR3賦值:EMA3>=2日前的EMA3 AR4賦值:統計AR2日中滿足收盤價上穿EMA3的天數=1 AR5賦值:AR1 AND AR2 AND AR3 AND AR4 AR6賦值:AR5 AND AR5的10日過濾 當滿足條件AR6時,在最低價-0.09位置書寫文字,畫黃色 BR1賦值:統計5日中滿足(收盤價-1日前的收盤價)/1日前的收盤價*100位于0和5之間的天數=5 BR2賦值:(EMA3-EMA13)+(EMA13-EMA21)的絕對值/收盤價<0.2 BR3賦值:收盤價>EMA21 AND (1日前的收盤價<1日前的EMA21 OR 2日前的收盤價<2日前的EMA21 OR 3日前的收盤價<3日前的EMA21 OR 4日前的收盤價<4日前的EMA21 OR 5日前的收盤價<5日前的EMA21) BR4賦值:BR1 AND BR2 AND BR3 當滿足條件BR4ANDFILTER(BR4,10)時,在最低價-0.09位置書寫文字,COLOR00C5FF 當滿足條件BR4ANDFILTER(BR4,10)時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,COLOR00C5FF CR1賦值:(收盤價-1日前的收盤價)/1日前的收盤價*100>0.5 CR2賦值:成交量(手)>成交量(手)的5日簡單移動平均*0.6 CR3賦值:統計3日中滿足EMA3上穿EMA21的天數=1 CR4賦值:EMA13-EMA21的絕對值/EMA21<0.03 CR5賦值:EMA21<=EMA55 AND EMA21>=1日前的EMA21 CR6賦值:CR1ANDCR2ANDCR3ANDCR4ANDCR5的2日過濾 當滿足條件CR6時,在最低價-0.09位置書寫文字,COLORF00FF0 DR1賦值:EMA3>EMA13 AND EMA13<EMA21 DR2賦值:上次收盤價上穿EMA21距今天數 DR3賦值:最高價=DR2日內最高價的最高值 DR4賦值:上次DR3距今天數 DR5賦值:統計DR4日中滿足開盤價>CANDC<1日前的收盤價ANDC>EMA21ANDBETWEEN((收盤價-EMA21)/EMA21,0,0.02)的天數=1 DR6賦值:收盤價>1日前的收盤價 DR7賦值: DR1 AND DR5 AND DR6 DR8賦值:DR7 AND DR7的10日過濾 當滿足條件DR8時,在最低價-0.09位置書寫文字,COLORD6BA63 當滿足條件DR8時,在開盤價和收盤價位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,線寬為2,COLORD6BA63 ER賦值:上次1日前的EMA21上穿EMA13距今天數 AND EMA13上穿EMA21 當滿足條件ER時,在最低價-0.09位置書寫文字,COLOR0099FF FR賦值:上次1日前的EMA13上穿EMA3距今天數 AND EMA3上穿EMA13 當滿足條件FR時,在最低價-0.09位置書寫文字,畫白色 當滿足條件FR時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,畫白色 GR1賦值:上次"乖離率的BIAS2"(6,3,24)位于0和5之間距今天數 GR2賦值:EMA3>EMA13 AND EMA13>EMA21 AND EMA3>1日前的EMA3 GR3賦值:統計GR1日中滿足"乖離率的BIAS2"(6,3,24)>10ANDH=GR1日內最高價的最高值的天數 GR4賦值:最高價=GR1日內最高價的最高值 GR5賦值:"平滑異同平均的MACD"(12,26,9)<1日前的"平滑異同平均的MACD"(12,26,9) GR6賦值:GR2 AND GR3 AND GR4 GR7賦值:GR2 AND GR3 AND GR4 AND GR5 當滿足條件GR6ANDGR7時,在最高價+0.3位置書寫文字,COLOR00FF00 當滿足條件GR6ANDGR7時,在最高價和最高價+0.09位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR00FF00 HR2賦值:EMA3>=3日前的EMA3 AND EMA13>=1日前的EMA13 AND EMA21>=1日前的EMA21 AND 收盤價上穿EMA3 AND 收盤價上穿EMA13 AND 收盤價上穿EMA21 當滿足條件HR2ANDFILTER(HR2,10)時,在最低價-0.09位置書寫文字,COLORFFC8FF 輸出MA1:收盤價的34日簡單移動平均,畫藍色 K1賦值:(收盤價+最高價+最低價)/3 D1賦值:K1的4日簡單移動平均 高賦值:3日前的80日內最高價的最高值 低賦值:3日前的80日內最低價的最低值 輸出頂點:日期日高,畫綠色,線寬為3 輸出低點:日期日低,畫紅色,線寬為2 輸出AA05:收盤價的5日簡單移動平均,線寬為3,COLOR00CCFF BB05賦值:(AA05/1日前的AA05-1)*100的反正切*180/3.1416 如果BB05>30ANDAA05>1日前的AA05,返回AA05,否則返回無效數,線寬為3,畫紅色 當滿足條件1日前的收盤價>D1ANDC<D1ANDD1>1日前的D1時,在最高價*1.02位置書寫文字,畫綠色 當滿足條件1日前的收盤價<D1ANDC>D1ANDD1<1日前的D1時,在最低價*0.98位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色

?

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

源碼：

?

?

EMA3:EMA(C,3),COLORWHITE,LINETHICK2;
EMA13:EMA(C,13),COLORYELLOW;
EMA21:EMA(C,21),COLORFF00FF;
EMA55:EMA(C,55),COLORGREEN;
AR1:=EMA21>EMA13 AND EMA13>EMA3;
AR2:=BARSLAST((C-EMA3)/EMA3*100<-6);
AR3:=EMA3>=REF(EMA3,2);
AR4:=COUNT(CROSS(C,EMA3),AR2)=1;
AR5:=AR1 AND AR2 AND AR3 AND AR4;
AR6:=AR5 AND FILTER(AR5,10);
DRAWTEXT(AR6,L-0.09,'紅啟動'),COLORYELLOW;
{STICKLINE(AR6,H,L,0.5,1),COLORYELLOW;}
{STICKLINE(AR6,O,C,6,1),LINETHICK2,COLORYELLOW;}
BR1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5;
BR2:=ABS((EMA3-EMA13)+(EMA13-EMA21))/C<0.2;
BR3:=C>EMA21 AND (REF(C,1)<REF(EMA21,1) OR REF(C,2)<REF(EMA21,2) OR REF(C,3)<REF(EMA21,3) OR REF(C,4)<REF(EMA21,4) OR REF
(C,5)<REF(EMA21,5));
BR4:=BR1 AND BR2 AND BR3;
DRAWTEXT(BR4 AND FILTER(BR4,10),L-0.09,'螞轉強'),COLOR00C5FF;
STICKLINE(BR4 AND FILTER(BR4,10),H,L,0.5,1),COLOR00C5FF;
{STICKLINE(BR4 AND FILTER(BR4,10),O,C,6,1),LINETHICK2,COLOR00C5FF;}
CR1:=(C-REF(C,1))/REF(C,1)*100>0.5;
CR2:=V>MA(V,5)*0.6;
CR3:=COUNT(CROSS(EMA3,EMA21),3)=1;
CR4:=ABS(EMA13-EMA21)/EMA21<0.03;
CR5:=EMA21<=EMA55 AND EMA21>=REF(EMA21,1);
CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2);
{STICKLINE(CR6,H,L,0.5,1),COLORF00FF0;}
{STICKLINE(CR6,O,C,6,1),LINETHICK2,COLORF00FF0;}
DRAWTEXT(CR6,L-0.09,'俠拉升2'),COLORF00FF0;
DR1:=EMA3>EMA13 AND EMA13<EMA21;
DR2:=BARSLAST(CROSS(C,EMA21) );
DR3:=H=HHV(H,DR2);
DR4:=BARSLAST(DR3);
DR5:=COUNT(O>C AND C<REF(C,1) AND C>EMA21 AND BETWEEN((C-EMA21)/EMA21,0,0.02),DR4)=1;
DR6:=C>REF(C,1) ;
DR7:= DR1 AND DR5 AND DR6 ;
DR8:=DR7 AND FILTER(DR7 ,10);
DRAWTEXT(DR8,L-0.09,'黑拉升1'),COLORD6BA63;
{STICKLINE(DR8,H,L,0.5,1),COLORD6BA63;}
STICKLINE(DR8,O,C,6,1),LINETHICK2,COLORD6BA63;
ER:=BARSLAST(REF(CROSS(EMA21,EMA13),1)) AND CROSS(EMA13,EMA21);
DRAWTEXT(ER,L-0.09,'均上攻'),COLOR0099FF;
{STICKLINE(ER,H,L,0.5,1),COLOR0099FF;}
{STICKLINE(ER,O,C,6,1),LINETHICK2,COLOR0099FF;}
FR:=BARSLAST(REF(CROSS(EMA13,EMA3),1)) AND CROSS(EMA3,EMA13);
DRAWTEXT(FR,L-0.09,'梅上升中繼'),COLORWHITE;
STICKLINE(FR,H,L,0.5,1),COLORWHITE;
{STICKLINE(FR,O,C,6,1),LINETHICK2,COLORWHITE;}
GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,3,24),0,5) );
GR2:=EMA3>EMA13 AND EMA13>EMA21 AND EMA3>REF(EMA3,1);
GR3:=COUNT("BIAS.BIAS2"(6,3,24)>10 AND H=HHV(H,GR1),GR1);
GR4:=H=HHV(H,GR1);
GR5:="MACD.MACD"(12,26,9)<REF("MACD.MACD"(12,26,9),1);
GR6:=GR2 AND GR3 AND GR4;
GR7:=GR2 AND GR3 AND GR4 AND GR5;
DRAWTEXT(GR6 AND GR7,H+0.3,'見逃頂'),COLOR00FF00;
STICKLINE(GR6 AND GR7,H,H+0.09,4,0),COLOR00FF00;
HR2:=EMA3>=REF(EMA3,3) AND EMA13>=REF(EMA13,1) AND EMA21>=REF(EMA21,1) AND CROSS(C,EMA3) AND CROSS(C,EMA13) AND CROSS
(C,EMA21){ AND CROSS(C,EMA55)};
DRAWTEXT(HR2 AND FILTER(HR2,10),L-0.09,'三進場！ '),COLORFFC8FF;
{STICKLINE(HR2 AND FILTER(HR2,10),H,L,0.5,1),COLORFFC8FF;
STICKLINE(HR2 AND FILTER(HR2,10),O,C,6,1),LINETHICK2,COLORFFC8FF;};
MA1:MA(CLOSE,34),COLORBLUE;
K1:=(C+H+L)/3;
D1:=MA(K1,4);
高:=REF(HHV(H,80),3);
低:=REF(LLV(L,80),3);
頂點:REFDATE(高,DATE),COLORGREEN,LINETHICK3;
低點:REFDATE(低,DATE),COLORRED,LINETHICK2;
AA05:MA(C,5),LINETHICK3,COLOR00CCFF;
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
IF(BB05>30 AND AA05>REF(AA05,1), AA05,DRAWNULL),LINETHICK3,COLORRED;
DRAWTEXT(REF(C,1)>D1 AND C<D1 AND D1>REF(D1,1),H*1.02,'賣'),COLORGREEN;
DRAWTEXT(REF(C,1)<D1 AND C>D1 AND D1<REF(D1,1),L*0.98,'買'),COLORRED;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;


?

?

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

?