大智慧股票公式之波峰波谷

大智慧股票公式之波峰波谷

　　波峰波谷

　　Var2:=MA(CLOSE, 5);

　　Var3:=MA(CLOSE, 10);

　　Var4:=MA(CLOSE, 20);

　　Var5:=MA(CLOSE, 30);

　　Var6:=(Var2+Var3+Var4+Var5)/4;

　　Var7:=(Var6-REF(Var6, 15))/REF(Var6,15)*100;

　　Var8:=(Var6-REF(Var6, 15))/REF(Var6, 15)*100;

　　Var9:=EMA(Var7, 8);

　　反轉(zhuǎn):STICKLINE(Var9>1*REF(Var9, 1), h,l,0.5,0), COLORwhite;

　　STICKLINE(Var9>1*REF(Var9, 1), o,c,5,1), COLORwhite;

　　持股:STICKLINE(Var7>1*REF(Var7, 1), h,l,0.5,0), COLORRED;

　　STICKLINE(Var7>1*REF(Var7, 1), o,c,5,1), COLORRED;

　　持幣:STICKLINE(Var7<1*REF(Var7, 1),h,l,0.5,0 );

　　STICKLINE(Var7<1*REF(Var7, 1), o,c,5,1);

　　洗盤:STICKLINE(Var7<1*REF(Var7, 1) AND Var9>1*REF(Var9, 1),h,l,0.5,0 ), COLORF00FF0;

　　STICKLINE(Var7<1*REF(Var7, 1) AND Var9>1*REF(Var9, 1), o,c,5,1), COLORF00FF0;

　　平均價:=(HIGH+4*LOW+OPEN+CLOSE)/7;

　　均價差:= EMA(平均價,13) - EMA(平均價,34);

　　移動均價:= EMA(均價差,5);

　　差:=(均價差-移動均價)*5;

　　A:=IF(差>=1000 ,1000 ,IF(差<=平均價,平均價,差) );

　　分水嶺:=forcast(forcast(A,31),10);

　　漲↑:if(A>分水嶺,A,分水嶺),LINETHICK1,colorred;

　　跌↓:if(A<分水嶺,A,分水嶺),LINETHICK1,Color00FF00;

　　{分:forcast(forcast(A,31),10),linethick1,colorffff00;}

　　ma6:=ma(c,6);

　　ma18:=ma(c,18);

　　ma55:=ma(c,55);

　　ma125:=ma(c,125);

　　ma250:=ma(c,250);

　　TY:=C;

　　A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);

　　A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);

　　AA:=REF(C,BARSLAST(HD)); B:=REF(C,BARSLAST(LD));

　　t11:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;

　　t21:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);

　　波峰:IF(t11,AA,AA),ColorFF00FF,POINTDOT;

　　STICKLINE(t11,AA,AA,9,0),ColorFF00FF;

　　波谷:IF(t21,B,B),Color80FF00,POINTDOT;

　　STICKLINE(t21,B,B,9,0),Color80FF00;

　　買進(jìn)價:=((c-ref(ma6,1))/6+ma6)*1.004;

　　買進(jìn)條件:=cross(c,買進(jìn)價) and 買進(jìn)價>ref(買進(jìn)價,1);

　　白買進(jìn):IF(買進(jìn)條件,l,h),COLORWHITE,POINTDOT;

　　STICKLINE(買進(jìn)條件,h,l,0,1),colorwhite,linethick2;

　　STICKLINE(買進(jìn)條件,o,c,4,1),colorwhite,linethick2;

　　加碼價:=((c-ref(ma18,1))/18+ma18)*1.004;

　　加碼條件:=cross(c,加碼價) and 加碼價>ref(加碼價,1);

　　黃加碼:IF(加碼條件,l,h),coloryellow,POINTDOT;

　　STICKLINE(加碼條件,h,l,0,1),coloryellow,linethick2;

　　STICKLINE(加碼條件,o,c,4,1),coloryellow,linethick2;