相關標簽:

?

同花順神奇均線戰法副圖指標源碼

?

?

原理解析：
輸出EMA13:收盤價的13日指數移動平均,畫白色,線寬為2 輸出EMA34:收盤價的34日指數移動平均,畫黃色 輸出EMA55:收盤價的55日指數移動平均,COLORFF00FF 輸出EMA120:收盤價的120日指數移動平均,COLORFFCC66 AR1賦值:EMA55>EMA34 AND EMA34>EMA13 AR2賦值:上次(收盤價-EMA13)/EMA13*100<-6距今天數 AR3賦值:EMA13>=2日前的EMA13 AR4賦值:統計AR2日中滿足收盤價上穿EMA13的天數=1 AR5賦值:AR1 AND AR2 AND AR3 AND AR4 AR6賦值:AR5 AND AR5的10日過濾 當滿足條件AR6時,在最低價-0.09位置書寫文字,畫黃色 當滿足條件AR6時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,畫黃色 當滿足條件AR6時,在開盤價和收盤價位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,線寬為2,畫黃色 BR1賦值:統計5日中滿足(收盤價-1日前的收盤價)/1日前的收盤價*100位于0和5之間的天數=5 BR2賦值:(EMA13-EMA34)+(EMA34-EMA55)的絕對值/收盤價<0.2 BR3賦值:收盤價>EMA55 AND (1日前的收盤價<1日前的EMA55 OR 2日前的收盤價<2日前的EMA55 OR 3日前的收盤價<3日前的EMA55 OR 4日前的收盤價<4日前的EMA55 ORREF(收盤價,5)<5日前的EMA55) BR4賦值:BR1 AND BR2 AND BR3 當滿足條件BR4ANDFILTER(BR4,10)時,在最低價-0.09位置書寫文字,COLOR00C5FF 當滿足條件BR4ANDFILTER(BR4,10)時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,COLOR00C5FF 當滿足條件BR4ANDFILTER(BR4,10)時,在開盤價和收盤價位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,線寬為2,COLOR00C5FF CR1賦值:(收盤價-1日前的收盤價)/1日前的收盤價*100>0.5 CR2賦值:成交量(手)>成交量(手)的5日簡單移動平均*0.6 CR3賦值:統計3日中滿足EMA13上穿EMA55的天數=1 CR4賦值:EMA34-EMA55的絕對值/EMA55<0.03 CR5賦值:EMA55<=EMA120 AND EMA55>=1日前的EMA55 CR6賦值:CR1ANDCR2ANDCR3ANDCR4ANDCR5的2日過濾 當滿足條件CR6時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,COLORF00FF0 當滿足條件CR6時,在開盤價和收盤價位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,線寬為2,COLORF00FF0 當滿足條件CR6時,在最低價-0.09位置書寫文字,COLORF00FF0 DR1賦值:EMA13>EMA34 AND EMA34<EMA55 DR2賦值:上次收盤價上穿EMA55距今天數 DR3賦值:最高價=DR2日內最高價的最高值 DR4賦值:上次DR3距今天數 DR5賦值:統計DR4日中滿足開盤價>CANDC<1日前的收盤價ANDC>EMA55ANDBETWEEN((收盤價-EMA55)/EMA55,0,0.02)的天數=1 DR6賦值:收盤價>1日前的收盤價 DR7賦值: DR1 AND DR5 AND DR6 DR8賦值:DR7 AND DR7的10日過濾 當滿足條件DR8時,在最低價-0.09位置書寫文字,COLORD6BA63 當滿足條件DR8時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,COLORD6BA63 當滿足條件DR8時,在開盤價和收盤價位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,線寬為2,COLORD6BA63 ER賦值:上次1日前的EMA55上穿EMA34距今天數 AND EMA34上穿EMA55 當滿足條件ER時,在最低價-0.09位置書寫文字,COLOR0099FF 當滿足條件ER時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,COLOR0099FF 當滿足條件ER時,在開盤價和收盤價位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,線寬為2,COLOR0099FF FR賦值:上次1日前的EMA34上穿EMA13距今天數 AND EMA13上穿EMA34 當滿足條件FR時,在最低價-0.09位置書寫文字,畫白色 當滿足條件FR時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,畫白色 當滿足條件FR時,在開盤價和收盤價位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,線寬為2,畫白色 GR1賦值:上次"乖離率的BIAS2"(6,13,24)位于0和5之間距今天數 GR2賦值:EMA13>EMA34 AND EMA34>EMA55 AND EMA13>1日前的EMA13 GR3賦值:統計GR1日中滿足"乖離率的BIAS2"(6,13,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.13位置書寫文字,COLOR00FF00 當滿足條件GR6ANDGR7時,在最高價和最高價+0.09位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR00FF00 HR2賦值:EMA13>=3日前的EMA13 AND EMA34>=1日前的EMA34 AND EMA55>=1日前的EMA55 AND 收盤價上穿EMA13 ANDCROSS(收盤價,EMA34) AND 收盤價上穿EMA55 當滿足條件HR2ANDFILTER(HR2,10)時,在最低價-0.09位置書寫文字,COLORFFC8FF 當滿足條件HR2ANDFILTER(HR2,10)時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,COLORFFC8FF 當滿足條件HR2ANDFILTER(HR2,10)時,在開盤價和收盤價位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,線寬為2,COLORFFC8FF TIPTEXT(ISNULL(1日后的&收盤價),0,' m.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

?

?

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

源碼：

?

ema13:EMA(C,13),colorwhite,linethick2;ema34:EMA(C,34),coloryellow;
ema55:EMA(C,55),colorff00ff;ema120:EMA(C,120),colorffcc66;
ar1:=ema55>ema34 AND ema34>ema13;ar2:=BARSLAST((C-ema13)/ema13*100<-6);
ar3:=ema13>=REF(ema13,2);ar4:=COUNT(CROSS(C,ema13),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((ema13-ema34)+(ema34-ema55))/C<0.2;
br3:=C>ema55 AND (REF(C,1)<REF(ema55,1) OR REF(C,2)<REF(ema55,2) OR REF(C,3)<REF(ema55,3) OR REF(C,4)<REF(ema55,4) OR
REF(C,5)<REF(ema55,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(ema13,ema55),3)=1;
cr4:=ABS(ema34-ema55)/ema55<0.03;cr5:=ema55<=ema120 AND ema55>=REF(ema55,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,'紅衣俠女'),colorf00ff0;
dr1:=ema13>ema34 AND ema34<ema55;dr2:=BARSLAST(CROSS(C,ema55) );
dr3:=H=HHV(H,dr2);dr4:=BARSLAST(dr3);
dr5:=COUNT(O>C AND C<REF(C,1) AND C>ema55 AND BETWEEN((C-ema55)/ema55,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,'黑客點擊'),colord6ba63;STICKLINE(dr8,H,L,0.5,1),colord6ba63;
STICKLINE(dr8,O,C,6,1),linethick2,colord6ba63;
er:=BARSLAST(REF(CROSS(ema55,ema34),1)) AND CROSS(ema34,ema55);
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(ema34,ema13),1)) AND CROSS(ema13,ema34);
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,13,24),0,5) );
gr2:=ema13>ema34 AND ema34>ema55 AND ema13>REF(ema13,1);
gr3:=COUNT("bias.bias2"(6,13,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.13,'見好就收!'),color00ff00;
STICKLINE(gr6 AND gr7,H,H+0.09,4,0),color00ff00;
hr2:=ema13>=REF(ema13,3) AND ema34>=REF(ema34,1) AND ema55>=REF(ema55,1) AND CROSS(C,ema13) AND
CROSS(C,ema34) 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;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' m.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?