相關標簽:

?

自用指標

?

原理解析：
N3賦值:5 N4賦值:7 輸出快:統計N3日中滿足收盤價>2日前的收盤價的天數/N3*100,畫綠色 輸出慢:統計N4日中滿足收盤價>2日前的收盤價的天數/N4*100,畫紅色 輸出買入: 如果1日前的慢=慢ANDREF(快,1)>快AND快=0,返回100,否則返回0,畫紅色,線寬為1 當滿足條件買入ANDREF(買入,1)=0時,在100位置書寫文字 輸出關注: 如果慢=0AND快=0,返回60,否則返回0,畫紅色,線寬為1 當滿足條件關注ANDREF(關注,1)=0時,在60位置書寫文字,畫紅色 0,畫深灰色 100, VAR3賦值:100*(收盤價-100日內最低價的最低值)/(100日內最高價的最高值-100日內最低價的最低值)的5日指數移動平均 VAR4賦值:(收盤價-N日內收盤價的最低值)/(N日內收盤價的最高值-N日內收盤價的最低值)*100 VAR5賦值:收盤價的2日指數移動平均-收盤價的150日指數移動平均 VAR6賦值:VAR5的100日指數移動平均 VAR7賦值:2*(VAR5-VAR6) VAR8賦值:VAR7的3乘冪*0.1+VAR7的1乘冪 VAR9賦值:最低價*最高價*開盤價*收盤價的開方的開方 VARA賦值:VAR9*0.97的3日指數移動平均 VARB賦值:(最高價+最低價+收盤價)/3 VARC賦值:(VARB-VARB的14日簡單移動平均)/(0.015*VARB的14日平均絕對偏差) 黑馬線賦值:如果年份<2008ANDVAR7>0.1,返回VAR8,否則返回0*5,STICK ,線寬為3 ,COLOR0099CC VARD賦值:240日內最高價的最低值 VARE賦值:100*(收盤價-VARD)/VARD VARF賦值:成交額(元)/成交量(手) VAR10賦值:(以收盤價*1.1計算的獲利盤比例-以收盤價*0.9計算的獲利盤比例)*80的5日指數移動平均 VAR11賦值:大盤的收盤價 VAR12賦值:VAR11的5日簡單移動平均 VAR13賦值:VAR11的20日簡單移動平均 VAR14賦值:VAR11的30日簡單移動平均 VAR15賦值:VAR14>VAR12*1.08 AND VAR13>VAR12*1.055 VAR16賦值:VAR12>VAR11*1.03 AND VAR13>VAR11*1.13 VAR17賦值:VAR16 VAR18賦值:如果VAR10<6的5日過濾=1,返回1,否則返回0 發現賦值:(VAR18 AND VARE<-2.5 AND VAR3<5 AND VAR4=0)*60,STICK, VAR19賦值:VAR10<6 AND VAR17 黑馬賦值:如果VAR19的1日過濾=1,返回1,否則返回0*80,STICK ,COLORFF6666 大黑馬賦值:如果VAR19ANDVAR18*80,返回80,否則返回0,線寬為2, COLORFF9966 操盤手賦值:VAR4,畫深灰色 VAR1A賦值:黑馬線上穿2 VAR1B賦值:黑馬線上穿4 輸出莊拉: 如果(VAR1AORVAR1B)ANDVAR4<40ANDVAR3<40的5日過濾=1,返回35,否則返回0, 畫紅色 VAR1C賦值:(收盤價-收盤價的6日簡單移動平均)/收盤價的6日簡單移動平均*100 VAR1D賦值:(收盤價-收盤價的12日簡單移動平均)/收盤價的12日簡單移動平均*100 VAR1E賦值:(收盤價-收盤價的24日簡單移動平均)/收盤價的24日簡單移動平均*100 VAR1F賦值:1日前的收盤價 VAR20賦值:收盤價-VAR1F和0的較大值的5日[1日權重]移動平均/收盤價-VAR1F的絕對值的5日[1日權重]移動平均*100 VAR21賦值:(最高價+最低價+收盤價)/3 VAR22賦值:(VAR21-VAR21的14日簡單移動平均)/(0.015*VAR21的14日平均絕對偏差) 輸出VAR23:(VAR1C>=-15.8 AND VAR1C<=-12.2 AND VAR1D<=-20.8 AND VAR1E<=-27.5 AND VAR20<=11.7AND VAR22<=-145)*100 VAR24賦值:VAR4 VAR25賦值:VAR4=100 0,線寬為1,COLORFF9966 100, COLORFF9966 當滿足條件快=0時,在90位置書寫文字,畫紅色

?

?來源:程序化99（ www.weiqiv.net.cn ）

源碼：

?

N3:=5;N4:=7;
快:COUNT(CLOSE>REF(CLOSE,2),N3)/N3*100,COLORGREEN;
慢:COUNT(CLOSE>REF(CLOSE,2),N4)/N4*100,COLORRED;
買入: IF(REF(慢,1)=慢 and REF(快,1)>快 and 快=0,100,0),COLORRED,linethick1;
DRAWTEXT( 買入 AND REF(買入 ,1)=0,100,'明');
關注: IF(慢=0 and 快=0,60,0),COLORRED,linethick1;
DRAWTEXT( 關注 AND REF(關注 ,1)=0,60,'關注'),COLORRED;
0,COLORGRAY;
100,;
Var3:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5);
Var4:=(CLOSE-LLV(CLOSE,N))/(HHV(CLOSE,N)-LLV(CLOSE,N))*100;
Var5:=EMA(CLOSE,2)-EMA(CLOSE,150);
Var6:=EMA(Var5,100);
Var7:=2*(Var5-Var6);
Var8:=POW(Var7,3)*0.1+POW(Var7,1);
Var9:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
VarA:=EMA(Var9*0.97,3);
VarB:=(HIGH+LOW+CLOSE)/3;
VarC:=(VarB-MA(VarB,14))/(0.015*AVEDEV(VarB,14));
黑馬線:=IF(YEAR<2008 AND Var7>0.1,Var8,0)*5,STICK ,LINETHICK3 ,COLOR0099CC;
VarD:=LLV(HIGH,240);
VarE:=100*(CLOSE-VarD)/VarD;
VarF:=AMOUNT/VOL;
Var10:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,5);
Var11:=INDEXC;
Var12:=MA(Var11,5);
Var13:=MA(Var11,20);
Var14:=MA(Var11,30);
Var15:=Var14>Var12*1.08 AND Var13>Var12*1.055;
Var16:=Var12>Var11*1.03 AND Var13>Var11*1.13;
Var17:=Var16;
Var18:=IF(FILTER(Var10<6,5)=1,1,0);
發現:=(Var18 AND VarE<-2.5 AND Var3<5 AND Var4=0)*60,STICK, ;
Var19:=Var10<6 AND Var17;
黑馬:=IF(FILTER(Var19,1)=1,1,0)*80,STICK ,COLORFF6666;
大黑馬:=if( Var19 AND Var18*80,80,0),LINETHICK2, COLORFF9966;
操盤手:=Var4,COLORGRAY;
Var1A:=CROSS(黑馬線,2);
Var1B:=CROSS(黑馬線,4);
莊拉: IF(FILTER((Var1A OR Var1B) AND Var4<40 AND Var3<40,5)=1,35,0), COLORRED;
Var1C:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
Var1D:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
Var1E:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
Var1F:=REF(CLOSE,1);
Var20:=SMA(MAX(CLOSE-Var1F,0),5,1)/SMA(ABS(CLOSE-Var1F),5,1)*100;
Var21:=(HIGH+LOW+CLOSE)/3;
Var22:=(Var21-MA(Var21,14))/(0.015*AVEDEV(Var21,14));
Var23:(Var1C>=-15.8 AND Var1C<=-12.2 AND Var1D<=-20.8 AND Var1E<=-27.5 AND Var20<=11.7
AND Var22<=-145)*100;
Var24:=Var4;
Var25:=Var4=100;

0,LINETHICK1,COLORFF9966;
100, COLORFF9966;

DRAWTEXT(快=0 ,90,'進'),COLORRED;

?

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

?