杨天 2008-10-3 23:36
135经典战法
ema13:ema(c,13),colorff44ff,linethick2;
ema34:ema(c,34),color00ff00;
ema55:ema(c,55),COLOR008888;
ma(ema13,3),color00ff00;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0);
DRAWTEXT(FILTER(买=1,5),ema13,'▲'),COLORRED;
DRAWTEXT(FILTER(卖=1,5),ema13,'▼'),COLOR00FF00;
STICKLINE(ma(c,1)>ma(c,30),CLOSE,OPEN,6,1),COLOR3333FF;
STICKLINE(ma(c,1)>ma(c,30),HIGH,LOW,0.8,1),COLOR3333FF;
STICKLINE(ma(c,30)>ma(c,1),CLOSE,OPEN,6,1),COLORffff00;
STICKLINE(ma(c,30)>ma(c,1),HIGH,LOW,0.8,1),COLORffff00;
VAR1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));
买盘:=IF((CLOSE > OPEN),(VAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(VAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2)));
卖盘:=IF((CLOSE > OPEN),(0 - (VAR1 * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (VAR1 * (HIGH - LOW))),(0 - (VOL / 2))));
买卖差:=(买盘 + 卖盘);
JX1:=BARSSINCE(买盘);
JY1:=IF(((121 > JX1) AND (JX1 > 0)),JX1,120);
JY2:=IF(((4 > JX1) AND (JX1 > 0)),JX1,3);
VAR30:=MA(VOL,JY2);
神比:=(买盘 / VAR30);
鬼比:=(卖盘 / VAR30);
VAR2:=(HIGH - LOW);
VAR3:=ABS((OPEN - CLOSE));
VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN));
VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);
VAR6:=((VAR3 / VAR2) * VOL);
VAR7:=((VAR4 / VAR2) * VOL);
VAR8:=((VAR5 / VAR2) * VOL);
VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));
VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100);
VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))); VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30)));
VARD:=REF(CLOSE,1);
VAR40:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),VAR6,买盘) + 买盘) / 2);
VAR41:=((IF(((VAR7 > VAR6) AND (VAR7 > VAR8)),VAR7,买盘) + 买盘) / 2);
VAR42:=((IF(((VAR8 > VAR6) AND (VAR8 > VAR7)),VAR8,买盘) + 买盘) / 2);
VAR50:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),VAR6,卖盘) + 卖盘) / 2);
ma6:=ma(c,13);
ema(c,5),colorwhite;
ema120:=ema(c,120),colorffcc22;
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);
股道短:=MA(C,13);
股道中:=MA(C,34);
股道长:=MA(C,55);
短交长:=CROSS(股道短,股道长);
中交长:=CROSS(股道中,股道长);
空头排列:=股道短<股道中 AND 股道短<股道长 AND 股道中<股道长;
走平上行:=股道短>=REF(股道短,1);
drawtext(短交长 OR 中交长,l-0.04,'底马'),coloryellow;
多头排列:=股道短>股道中 AND 股道短>股道长 AND 股道中>股道长;
drawtext(O<股道短 AND C>股道短 AND 多头排列,l-0.04,'满园春色'),colorff44ff;
drawtext(O<股道短 AND O<股道中 AND O<股道长 AND C>股道短 AND
C>股道中 AND C>股道长,l-0.08,'买推'),colorff44ff;
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.08,'底蚁'),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.08,'买衣'),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.08,'回黑'),coloryellow;
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.08,'多均'),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.04,'升梅'),colorff44ff;
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.08,'顶逃!'),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.08,'买推'),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;
EMA17:=EMA(C,17),COLORRED,LINETHICK2;
DRAWTEXT(BR4 AND FILTER(BR4,10),L-0.08,'底蚁'),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;}
{STICKLINE(CR6,H,L,0.5,1),COLORF00FF0;
STICKLINE(CR6,O,C,6,1),LINETHICK2,COLORF00FF0;}
DRAWTEXT(CR6,L-0.08,'买衣'),COLORF00FF0;
DRAWTEXT(DR8,L-0.08,'回黑'),coloryellow;
{STICKLINE(DR8,H,L,0.5,1),COLORD6BA63;
STICKLINE(DR8,O,C,6,1),LINETHICK2,COLORD6BA63;}
DRAWTEXT(ER,L-0.08,'多均'),COLOR0099FF;
{STICKLINE(ER,H,L,0.5,1),COLOR0099FF;
STICKLINE(ER,O,C,6,1),LINETHICK2,COLOR0099FF;}
DRAWTEXT(FR,L-0.04,'升梅'),colorff44ff;
{STICKLINE(FR,H,L,0.5,1),COLORWHITE;
STICKLINE(FR,O,C,6,1),LINETHICK2,COLORWHITE;}
DRAWTEXT(GR6 AND GR7,H+0.13,'*!'),COLOR00FF00;
STICKLINE(GR6 AND GR7,H,H+0.09,4,0),COLOR00FF00;
DRAWTEXT(HR2 AND FILTER(HR2,10),L-0.08,'买推'),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;
MA11:=MA(CLOSE,10),COLORRED;
MA33:=MA(CLOSE,30),COLORYELLOW;
MA55:=MA(CLOSE,55),COLORBLUE;
年线:=MA(CLOSE,250),COLORGREEN;
Y:=(MA(C,11)-MA(C,55))/MA(C,11)*100;
{135均线战法}
YY1:=C>MA(C,11) AND OPEN<MA(C,11);{买阳}
YY3:=C>MA(C,33) AND OPEN<MA(C,33);
YY5:=C>MA(C,55) AND OPEN<MA(C,55);
DRAWTEXT(YY1 AND YY5 AND YY3,LOW-0.03,'买阳'),COLORRED;
SJ1:=ABS(MA(CLOSE,11)-MA(CLOSE,33))<C*0.01;{１１线３３线５５线接近}
SJ2:=ABS(MA(CLOSE,33)-MA(CLOSE,55))<C*0.01;
SJ3:=CROSS(MA(CLOSE,11),MA(CLOSE,55));{11线上穿５５线}
DRAWTEXT(SJ1 AND SJ2 AND SJ3,HIGH+0.08,'升军'),COLORRED;
RY1:=C/OPEN>1.04;{阳线４％}
RY2:=REF(OPEN,1)/REF(CLOSE,1)>1.04;{阴线４％}
RY3:=ABS(OPEN-REF(C,1))<C*0.02 AND ABS(C-REF(OPEN,1))<C*0.02;{两线相等}
DRAWTEXT(RY1 AND RY2 AND RY3 ,LOW,'底壁'),COLORYELLOW;
HK1:=CROSS(MA(C,11),MA(C,55));{11线上穿５５线}
HK2:=C<O;{当日收阴}
HK3:=ABS(L-MA(C,11))<C*0.03 OR ABS(C-MA(C,11))<C*0.04;{收盘价或最低价在１１线}
HK:=HK1 AND HK2 AND HK3;
DRAWTEXT(HK,LOW,'回黑'),coloryellow;
JG1:=ABS(MA(C,11)-MA(C,33))<C*0.02 AND ABS(MA(C,11)-MA(C,55))<C*0.02;
JG2:=O>MA(C,11) OR O=MA(C,11);
JG3:=C/OPEN>1.03 ; {阳线３％}
JG:=JG1 AND JG2 AND JG3;
DRAWTEXT(JG,LOW-0.08,'买竿'),COLORYELLOW;
HY1:=CROSS(MA(C,11),MA(C,55));{11线上穿５５线}
HY2:=OPEN<C AND C/OPEN>1.02; {阳线３％}
HY3:=ABS(OPEN-MA(C,11))<C*0.05;{开盘在１１线附近}
HY:=HY1 AND HY2 AND HY3;
DRAWTEXT(HY,LOW,'买衣'),COLORRED;
JW1:=C<OPEN AND REF(C,1)<REF(OPEN,1);
JW2:=OPEN<REF(C,1) AND C>REF(L,1);
JW3:=O<MA(C,11) AND O<MA(C,33) AND O<MA(C,55);
JW:=JW1 AND JW2 AND JW3;
DRAWTEXT(JW,LOW-0.08,'底屋'),COLORYELLOW;
TS1:=CROSS(MA(C,11),MA(C,33));{11线上穿33线}
TS2:=MA(C,11)<MA(C,55);
TS:=TS1 AND TS2;
DRAWTEXT(TS,LOW-0.08,'底石'),COLORF00FF0;
MK1:=MA(C,11)>MA(C,55) AND MA(C,33)>MA(C,55); MK:=TS1 AND MK1;
DRAWTEXT(MK,L-0.04,'升梅'),colorff44ff;
YZ1:=C/O>1.02 AND H/C>1.02 AND O/L<1.02;{收阳有上影}
YZ2:=REF(C,1)>REF(O,1) AND O>MA(C,11);{昨收阳 今大于均线}
YZ:=YZ1 AND YZ2 AND Y>10;
DRAWTEXT(YZ,HIGH+0.08,'顶枝'),color00ff00;
DS1:=OPEN/C>1.04 AND O/REF(C,1)>1.03;{高开收阴}
DS2:=V*100/FINANCE(7)>0.08 AND Y>8;{换手高涨幅大}
DS:=DS1 AND DS2;
DRAWTEXT(DS,HIGH+0.08,'顶楼'),color00ff00;
YJ1:=H/O>1.04;
YJ2:=ABS(C-O)<C*0.03;
YJ3:=C/MA(C,11)>1.1;
YJ:=YJ1 AND YJ2 AND DS2 AND YJ3 AND YZ2;
DRAWTEXT(YJ,HIGH+0.08,'顶喉'),color00ff00;
MA13:=MA(C,13);
MA34:=MA(C,34);
HX1:=O<MA(C,13) AND C>MA(C,13);
HX2:=MA(C,34)<MA(C,55);{必须空头排列}
HX3:=MA(C,13)<MA(C,34);
HX4:=MA13>=REF(MA13,1);
HX5:=V>MA(V,5)*1.01 AND V>MA(V,10)*1.01;{系数0.5~3可调整}
HX:=HX1 AND HX2 AND HX3 AND HX4 AND HX5;
DRAWTEXT(HX,L,'红杏出墙'),coloryellow;
MA21:=MA(C,21);
[[i] 本帖最后由 杨天 于 2008-10-4 10:23 编辑 [/i]]
杨天 2008-10-3 23:40
接135经典战法
因上传字符限制,请与上楼指标粘贴后为一指标使用.
MG1:=O<MA(C,21) AND C>MA(C,21);
MG2:=MA(C,34)<MA(C,55);{必须空头排列}
MG3:=MA(C,21)<MA(C,34);
MG4:=MA21>=REF(MA21,1);{21日均线走平或上翘}
MG5:=V>MA(V,5)*1.01 AND V>MA(V,10)*1.01;{系数0.5~2可调整}
MG:=MG1 AND MG2 AND MG3 AND MG4 AND MG5;
DRAWTEXT(MG,L,'魔鬼月线'),COLORYELLOW;
SQ1:=O<MA(C,34) AND C>MA(C,34);
SQ2:=MA(C,13)<MA(C,34);{必须空头排列}
SQ3:=MA(C,34)<MA(C,55);
SQ4:=MA34>=REF(MA34,1);{34日均线走平或上翘}
SQ5:=V>MA(V,5)*1.01 AND V>MA(V,10)*1.01;{系数0.5~2可调整}
SQ:=SQ1 AND SQ2 AND SQ3 AND SQ4 AND SQ5;
DRAWTEXT(SQ,L,'神奇周期'),COLORWHITE;
dTS1:=CROSS(MA(C,13),MA(C,34));
dTS2:=MA(C,13)<MA(C,55);
dTS3:=MA(C,34)<MA(C,55);
dTS4:=MA34>=REF(MA34,2);{*注意：要过滤下跌时的骗线}
dTS5:=(C-MA34)/MA34<=0.15;
dTS:=dTS1 AND dTS2 AND dTS3 AND dTS4 AND dTS5;
DRAWTEXT(dTS,L,'投石问路'),coloryellow;
hHK1:=CROSS(MA(C,13),MA(C,55));{13线上穿55线}
hHK2:=C<O AND C>MA13 AND C>MA55;{当日收阴}
hHK3:=(C-MA13)/MA13<=0.05 AND (L-MA13)/MA13<=0.04;{收盘价和最低价在13线上附近}
hHK4:=LLV(V,2);
hHK:=hHK1 AND hHK2 AND hHK3 AND hHK4;
DRAWTEXT(hHK,L,'黑客点击'),coloryellow;
hHY1:=CROSS(MA(C,13),MA(C,55));{13线上穿55线}
hHY2:=C>O AND C>MA13 AND C>MA55; {收阳线}
hHY3:=(C-MA13)/MA13<=0.05 AND (L-MA13)/MA13<=0.04;{收盘价和最低价在13线上附近}
hHY4:=HHV(V,2);
hHY:=hHY1 AND hHY2 AND hHY3 AND hHY4;
DRAWTEXT(hHY,L,'红衣侠女'),COLORF00FF0;
hJG1:=ABS(MA(C,13)-MA(C,34))<C*0.02;{13线34线55线接近}
hJG2:=ABS(MA(C,34)-MA(C,55))<C*0.02;
hJG3:=C>=O*1.03;{阳线3％}
hJG4:=O>MA13 OR O>MA34 OR O>MA55;
hJG5:=C>REF(H,5);
hJG6:=(C-MA34)/MA34<=0.15;{控制价高}
hJG7:=V>MA(V,5) AND MA(V,10);
hJG:=hJG1 AND hJG2 AND hJG3 AND hJG4 AND hJG5 AND hJG6 AND hJG7;
DRAWTEXT(hJG,L,'揭竿而起'),colorff44ff;
hMK1:=CROSS(MA(C,13),MA(C,34));
hMK2:=MA(C,34)>MA(C,55);
hMK3:=(C-MA13)/MA13<=0.15;{控制股价偏高}
hMK4:=V>MA(V,5) AND MA(V,10);
hMK:=hMK1 AND hMK2 AND hMK3 AND hMK4;
DRAWTEXT(hMK,L,'梅开二度'),coloryellow;
gYY1:=O<MA(C,13) AND C>MA(C,13);{一阳穿三线!}
gYY2:=O<MA(C,34) AND C>MA(C,34);
gYY3:=O<MA(C,55) AND C>MA(C,55);
gYY4:=C/O>=1.05;
gYY5:=V>HHV(H,10);
gYY6:=MA13>=REF(MA13,1);
gYY:=gYY1 AND gYY2 AND gYY3 AND gYY4 AND gYY5 AND gYY6;
DRAWTEXT(gYY,L,'一阳穿三线'),colorff00ff;
sYY1:=O>MA(C,13) AND C<MA(C,13);{一阳穿三线!}
sYY2:=O>MA(C,34) AND C<MA(C,34);
sYY3:=O>MA(C,55) AND C<MA(C,55);
sYY4:=O/C>=1.05;
sYY5:=V<HHV(H,10);
sYY6:=REF(MA13,1)>=MA13;
sYY:=sYY1 AND sYY2 AND sYY3 AND sYY4 AND sYY5 AND sYY6;
DRAWTEXT(sYY,L,'一阴穿三线'),colorff00ff;
加码价:=((c-ref(ma13,1))/18+ma13)*1.004;
加码条件:=cross(c,加码价) and 加码价>ref(加码价,1);
黄K加码:IF(加码条件,l,h),coloryellow,POINTDOT;
STICKLINE(加码条件,h,l,0,1),coloryellow,linethick2;
STICKLINE(加码条件,o,c,4,1),coloryellow,linethick2;
买进价:=((c-ref(ma13,1))/6+ma13)*1.004;
买进条件:=cross(c,买进价) and 买进价>ref(买进价,1);
白K买进:IF(买进条件,l,h),COLORWHITE,POINTDOT;
STICKLINE(买进条件,h,l,0,1),colorwhite,linethick2;
STICKLINE(买进条件,o,c,4,1),colorwhite,linethick2;
STICKLINE((((ma(c,1)>ma(c,30) and VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),CLOSE,OPEN,6,0),COLORWHITE;
STICKLINE((((ma(c,1)>ma(c,30) and VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),HIGH,LOW,0.8,0),COLORWHITE;
STICKLINE((((买卖差 < 0 and ma(c,1)<ma(c,30) and VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),CLOSE,OPEN,6,0),color00ff00;
STICKLINE((((买卖差 < 0 and ma(c,1)<ma(c,30) and VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),HIGH,LOW,0.8,0),color00ff00;
BIAS1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
BIAS2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
BIAS3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
乖离:=MA(BIAS,3);
STICKLINE(乖离<-12 AND 乖离>=-18,CLOSE,OPEN,6,0) , COLORRED;
STICKLINE(乖离<-12 AND 乖离>=-18,HIGH,LOW,0.8,0) , COLORRED;
STICKLINE(乖离<-18,CLOSE,OPEN,6,0),COLORFF35FF;
STICKLINE(乖离<-18,HIGH,LOW,0.8,0),COLORFF35FF;
