|
|

楼主 |
发表于 2010-2-28 18:40
|
显示全部楼层
再捏吧捏吧
主图:
{摸摸主图}
a00:ma(close,22);
a01:(a00+2*std(close,22));
a02:(a00-2*std(close,22));
a03:=((ema(high,3)+ema(low,4))+ema(close,3)*2)/4;
a04:=ref(a03,1);
a05:=((close+high)+low)/3;
stickline((a03>a04),a04,high,0.1,0),colorred;
stickline((a03>a04),a05,a04,8,0),colorred;
stickline((a03<A04),A03,LOW,0.1,0),COLORBLUE;
stickline((a03<A04),A05,A04,8,0),COLORBLUE;
a0a:=a03;
a0b:=ref(a03,1);
drawicon((((a04a05),10)) and (low<A00)),LOW*0.990,9);
drawicon(((a04>a05) and ref((a04<=a05),10)),high*1.009,5);
drawnumber(((close>0) and islastbar),a0a,a0a,2);
diff:=ema(close,12)-ema(close,26);
dea:=ema(diff,9);
macd:=2*(diff-dea);
a1:=barslast(ref(cross(diff,dea),1));
b1:=ref(close,a1+1)>close and ref(diff,a1+1)<DIFF and cross(diff,dea);
drawicon(filter(b1>0,5),low*0.98,7);
drawtext(filter(b1>0,5),low*0.98,'m底'),colorgreen;{macd底背离}
a2:=barslast(ref(cross("kdj.k"(9,3,3),"kdj.d"(9,3,3)),1));
b2:=ref(close,a2+1)>close and ref("kdj.k"(9,3,3),a2+1)<"kdj.k"(9,3,3) and cross("kdj.k"(9,3,3),"kdj.d"(9,3,3));
drawicon(filter(b2>0,5),low*0.99,10);
drawtext(filter(b2>0,5),low*0.99,'k底'),coloryellow;{kdj底背离}
a3:=barslast(ref(cross("rsi.rsi1"(6,12,24),"rsi.rsi2"(6,12,24)),1));
b3:=ref(close,a3+1)>close and ref("rsi.rsi1"(6,12,24),a3+1)<"rsi.rsi1"(6,12,24) and cross("rsi.rsi1"(6,12,24),"rsi.rsi2"(6,12,24));
drawicon(filter(b3>0,5),low*0.98,10);
drawtext(filter(b3>0,5),low*0.98,'r底'),colorffcc66;{rsi底背离}
q1: slope(ema(close,2),10)*15+close;
q2: ema(slope(close,10)*15+close,3);
c1:=barslast(ref(cross(dea,diff),1));
d1:=ref(close,c1+1)diff and cross(dea,diff);
drawicon(filter(d1>0,5),high*1.01,9);
drawtext(filter(d1>0,5),high*1.01,'m顶'),color0066ff;{macd顶背离}
c2:=barslast(ref(cross("kdj.d"(9,3,3),"kdj.k"(9,3,3)),1));
d2:=ref(close,c2+1)"kdj.k"(9,3,3) and cross("kdj.d"(9,3,3),"kdj.k"(9,3,3));
drawicon(filter(d2>0,5),high*1.02,11);
drawtext(filter(d2>0,5),high*1.02,'k顶'),colorred;{kdj顶背离}
c3:=barslast(ref(cross("rsi.rsi2"(6,12,24),"rsi.rsi1"(6,12,24)),1));
d3:=ref(close,c3+1)"rsi.rsi1"(6,12,24) and cross("rsi.rsi2"(6,12,24),"rsi.rsi1"(6,12,24));
drawicon(filter(d3>0,5),high*1.03,8),;
drawtext(filter(d3>0,5),high*1.03,'r顶'),colorff00ff;{rsi顶背离}
var27:=ref(close,1);
var28:=sma(max(close-var27,0),6,1)/sma(abs(close-var27),6,1)*100;
drawicon(if(cross(76,var28),1,0),high*1.01,11);
ll:=ref(close,1);
mm:=((sma(max(close-ll,0),7,1))/(sma(abs(close-ll),7,1)))*(100);
ft2:=if(ref(mm,1)>83 and mm<82,-1,0),color99cc99;
drawtext(filter(ft2=-1,3),high*1.03,'←卖'),colorwhite;
幅图
{WC选股}
a00:=ma(close,22);
a01:=(a00+2*std(close,22));
a02:=(a00-2*std(close,22));
q1:=slope(ema(close,2),10)*15+close;
q2:=ema(slope(close,10)*15+close,3);
ab:=zig(3,10);ag:=ma(ab,2);ad:=(cross(ab,ag));
cm:=100*winner(C);pjhl:=ema(100*winner(C),2);chx:=cross(cm,pjhl);
wp:=winner(C)*100; wh:=v/capital*(100);
wl:=count(wp>90 ,10 ) and wp<25 and wh<5;wlxg:=cross(0.5,wl);
wc:=wlxg or chx;//因为使用了未来,就叫厕所吧!
wcxg:=ad and wc and indexc>ma(indexc,4);//加它也行,信号本来就少,算了吧
varr1:=if(close<REF(CLOSE,1),VOL capital,0);varr2:="cost(10)*0.49;
cq:=abs(ema(varr1,13.3)-18)/winner(close)*if((close-ma(close,6))/ma(close,6)<-0.04,1,0);
hm:=ema(close,7)-ema(close,21); jd:=ema(hm,21); var1:=close/ref(llv(low,35),5)<1;
mf:=cross(0.5,if(troughbars(3,15,1)=0 and high>low+0.01,1,-1)*500);
em:=cross(0.5,(cross(0.5,mf=cq)));
xg:(cross(q1,q2) and close<A01 and em;
行不行,下周看:600807单调白皮,胡了#*22*# #*22*#
|
|
|