招财猫 飞狐,分析家,大智慧
{招财猫 飞狐}
input: n(4,1,255),m(13,1,255);
drawgbk(c=c,colorrgb(90,90,90),colorrgb(0,0,0),1);
aa:=ref(h,n)=hhv(h,2*n+1);
aaa:=filter(aa,n);
bb:=backset(aaa,n+1);
cc1:=filter(bb,n);
cc:=cc1 or islastbar;
aa2:=ref(l,n)=llv(l,2*n+1);
aaa2:=filter(aa2,n);
bb2:=backset(aaa2,n+1);
cc22:=filter(bb2,n);
cc2:=cc22 and not(cc1);
ea:=backset(cc,ref(barslast(cc2),1)+1);
eb:=ea>ref(ea,1);
ee:=backset(eb,2);
ff1:=ee>ref(ee,1);
ee2:=backset(ff1 and count(cc,ref(barslast(cc2),1)+2)=0,ref(barslast(cc2),1)+2);
ff2:=ee2>ref(ee2,1);
ee3:=backset(ff2 and count(cc,ref(barslast(cc2),1)+2)=0,ref(barslast(cc2),1)+2);
ff3:=ee3>ref(ee3,1);
js:=if(cc,count(cc2,ref(barslast(cc),1)+1),0);
g1:=if(js=1 and cc,barslast(ff1),0);
ga:=if(cc and ref(l,barslast(ff1))>=ref(l,barslast(ff2)),barslast(ff2),barslast(ff1));
g2:=if(js=2 and cc,ga,0);
g3:=if(js>=3 and cc,if(cc and ref(l,ga)>=ref(l,barslast(ff3)),barslast(ff3),ga),0);
gg:=g1+g2+g3;
ja:=backset(cc,gg);
jb:=ja>ref(ja,1);
jj:=backset(jb,2);
ld:=jj>ref(jj,1);
ld1:=ld or islastbar;
hea:=backset(ld1,ref(barslast(cc),1)+1);
heb:=hea>ref(hea,1);
hee:=backset(heb,2);
hff1:=hee>ref(hee,1);
hee2:=backset(hff1 and count(ld1,ref(barslast(cc),1)+2)=0,ref(barslast(cc),1)+2);
hff2:=hee2>ref(hee2,1);
hee3:=backset(hff2 and count(ld1,ref(barslast(cc),1)+2)=0,ref(barslast(cc),1)+2);
hff3:=hee3>ref(hee3,1);
hjs:=if(ld1,count(cc1,ref(barslast(ld1),1)+1),0);
hg1:=if(hjs=1 and ld1,barslast(hff1),0);
hga:=if(ld1 and ref(h,barslast(hff1))<=ref(h,barslast(hff2)),barslast(hff2),barslast(hff1));
hg2:=if(hjs=2 and ld1,hga,0);
hg3:=if(hjs>=3 and ld1,if(ld1 and ref(h,hga)<=ref(h,barslast(hff3)),barslast(hff3),hga),0);
hgg:=hg1+hg2+hg3;
hja:=backset(ld1,hgg);
hjb:=hja>ref(hja,1);
hjj:=backset(hjb,2);
hd:=hjj>ref(hjj,1);
x1:=backset(islastbar,barslast(ld)+1);
x2:=x1>ref(x1,1);
y1:=backset(islastbar,barslast(hd)+1);
y2:=y1>ref(y1,1);
z1:=if(barslast(x2)<barslast(y2),x2,y2);
z2:=if(barslast(x2)<barslast(y2),l,h);
drawline(z1,z2,islastbar,c,0),pointdot,colorff9900;
uu:=backset(islastbar,barslast(ld)+1);
vv:=uu>ref(uu,1);
ww:=backset(vv,ref(barslast(ld),1)+2);
xx:=ww>ref(ww,1);
drawline(xx,l,vv,l,1),pointdot,colorffff;
uu2:=backset(islastbar,barslast(hd)+1);
vv2:=uu2>ref(uu2,1);
ww2:=backset(vv2,ref(barslast(hd),1)+2);
xx2:=ww2>ref(ww2,1);
drawline(xx2,h,vv2,h,1),pointdot,colorffff;
drawicon(hd and xx2,h*1.002,12);
drawicon(ld and xx,l*1.002,10);
高1:ref(h,barslast(vv2)),pointdot,color99ff66;
高2:ref(h,barslast(xx2)),pointdot,colorff66ff;
低1:ref(l,barslast(vv)),pointdot,color99ff66;
低2:ref(l,barslast(xx)),pointdot,colorff66ff;
ok:=ema(o,60);
cg:=ema(c,60);
pdu:=if(ok>ref(ok,1) and cg>ref(cg,1),1,0);
pdd:=if(ok<ref(ok,1) and cg<ref(cg,1),1,0);
pdm:=if(pdu=0 and pdu=0,1,0);
z1:=ma(c,m);
zx:=ref(z1,m/2+1);
life:=(ema(c,60)+ema(c,90))/2;
var1:=(2*c+h+l)/4;
snook:=ema(var1,99)*0.91;
a1:=(c-ref(c,1))/ref(c,1)*100;
ma5:=barslast(a1>3);
ma20:=if(ma5>0,1,0);
stickline(c>zx,h,l,1,0),colorffff;
stickline(c>zx and c>=life,o,c,8,0),colorff;
stickline(c>zx and c<=snook,o,c,8,0),colorff00;
stickline(c>zx and c>snook and c<life,o,c,8,0),colorff0000;
stickline(c>zx and ma20=0,o,c,8,0),colorffff;
stickline(c>zx,o,c,2,0),colorffffff;
drawicon(cross(c,zx),l*0.99,4);
drawicon(cross(zx,c),h*1.01,5);
by20:=ma(c,5);
顶选:cross(c,zx),LINETHICK0;
招财猫:ma(c,20),colorffff;
鼠变异:if(by20>招财猫,招财猫,by20),color808080;
选股:cross(c,zx) and c>zx and ma20=0 ,LINETHICK0;
rb:=BARSCOUNT(C)=SYSPARAM(2);
rd:=BARSLAST(rb);
k2:=hhv(h,rd);
k1:=llv(l,rd);
t1:=c>zx and c>=life;
t2:=c>zx and c>snook and c<life;
t3:=c>zx and c<=snook;
t4:=c<=zx;
t5:=鼠变异>ref(鼠变异,1) and 鼠变异<>招财猫 ;
t6:=鼠变异>ref(鼠变异,1) and 鼠变异=招财猫 and pdu<>1;
t7:=鼠变异>ref(鼠变异,1) and 鼠变异=招财猫 and pdu=1;
t8:=c>zx and ma20=0 ;
eee:=t1+t2+t3+t4+t5+t6+t7+t8 ;
e:=(k2-k1)/(eee+4) ;
DRAWTEXT(C>0 and t1>0 and BARSTATUS=2,k2-e,"老鼠出洞了，"),color0000ff;
DRAWTEXT(C>0 and t1>0 and BARSTATUS=2,k2-e*2,"逮住它！"),color0000ff;
DRAWTEXT(C>0 and t2>0 and BARSTATUS=2,k2-e,"老鼠玩猫猫，"),colorff7700;
DRAWTEXT(C>0 and t2>0 and BARSTATUS=2,k2-e*2,"守着它！"),colorff7700;
DRAWTEXT(C>0 and t3>0 and BARSTATUS=2,k2-e,"老鼠露尾巴，"),color00ff00;
DRAWTEXT(C>0 and t3>0 and BARSTATUS=2,k2-e*2,"动作快！"),color00ff00;
DRAWTEXT(C>0 and t4>0 and BARSTATUS=2,k2-e,"老鼠没有了，"),color808080;
DRAWTEXT(C>0 and t4>0 and BARSTATUS=2,k2-e*2,"打个盹！"),color808080;
DRAWTEXT(C>0 and t5>0 and BARSTATUS=2,k2-e*3,"发现鼠迹！"),color00ff00;
DRAWTEXT(C>0 and t6>0 and BARSTATUS=2,k2-e*3,"瞬间鼠影！"),colorff66ff;
DRAWTEXT(C>0 and t7>0 and BARSTATUS=2,k2-e*3,"恶鼠难遁！"),color0000ff;
DRAWTEXT(C>0 and t8>0 and BARSTATUS=2,k2-e*4,"老鼠去哪里，"),color00ffff;
DRAWTEXT(C>0 and t8>0 and BARSTATUS=2,k2-e*5,"思考哦！"),color00ffff;
{招财猫 分析家}
input: n(4,1,255),m(13,1,255);
DRAWGBKLAST(C>0,STRIP(RGB(90,90,90),RGB(0,0,0),0));
aa:=ref(h,n)=hhv(h,2*n+1);
aaa:=filter(aa,n);
bb:=backset(aaa,n+1);
cc1:=filter(bb,n);
cc:=cc1 or BARSTATUS=2;
aa2:=ref(l,n)=llv(l,2*n+1);
aaa2:=filter(aa2,n);
bb2:=backset(aaa2,n+1);
cc22:=filter(bb2,n);
cc2:=cc22 and not(cc1);
ea:=backset(cc,ref(barslast(cc2),1)+1);
eb:=ea>ref(ea,1);
ee:=backset(eb,2);
ff1:=ee>ref(ee,1);
ee2:=backset(ff1 and count(cc,ref(barslast(cc2),1)+2)=0,ref(barslast(cc2),1)+2);
ff2:=ee2>ref(ee2,1);
ee3:=backset(ff2 and count(cc,ref(barslast(cc2),1)+2)=0,ref(barslast(cc2),1)+2);
ff3:=ee3>ref(ee3,1);
js:=if(cc,count(cc2,ref(barslast(cc),1)+1),0);
g1:=if(js=1 and cc,barslast(ff1),0);
ga:=if(cc and ref(l,barslast(ff1))>=ref(l,barslast(ff2)),barslast(ff2),barslast(ff1));
g2:=if(js=2 and cc,ga,0);
g3:=if(js>=3 and cc,if(cc and ref(l,ga)>=ref(l,barslast(ff3)),barslast(ff3),ga),0);
gg:=g1+g2+g3;
ja:=backset(cc,gg);
jb:=ja>ref(ja,1);
jj:=backset(jb,2);
ld:=jj>ref(jj,1);
ld1:=ld or BARSTATUS=2;
hea:=backset(ld1,ref(barslast(cc),1)+1);
heb:=hea>ref(hea,1);
hee:=backset(heb,2);
hff1:=hee>ref(hee,1);
hee2:=backset(hff1 and count(ld1,ref(barslast(cc),1)+2)=0,ref(barslast(cc),1)+2);
hff2:=hee2>ref(hee2,1);
hee3:=backset(hff2 and count(ld1,ref(barslast(cc),1)+2)=0,ref(barslast(cc),1)+2);
hff3:=hee3>ref(hee3,1);
hjs:=if(ld1,count(cc1,ref(barslast(ld1),1)+1),0);
hg1:=if(hjs=1 and ld1,barslast(hff1),0);
hga:=if(ld1 and ref(h,barslast(hff1))<=ref(h,barslast(hff2)),barslast(hff2),barslast(hff1));
hg2:=if(hjs=2 and ld1,hga,0);
hg3:=if(hjs>=3 and ld1,if(ld1 and ref(h,hga)<=ref(h,barslast(hff3)),barslast(hff3),hga),0);
hgg:=hg1+hg2+hg3;
hja:=backset(ld1,hgg);
hjb:=hja>ref(hja,1);
hjj:=backset(hjb,2);
hd:=hjj>ref(hjj,1);
x1:=backset(BARSTATUS=2,barslast(ld)+1);
x2:=x1>ref(x1,1);
y1:=backset(BARSTATUS=2,barslast(hd)+1);
y2:=y1>ref(y1,1);
z1:=if(barslast(x2)<barslast(y2),x2,y2);
z2:=if(barslast(x2)<barslast(y2),l,h);
drawline(z1,z2,BARSTATUS=2,c,0),pointdot,colorff9900;
uu:=backset(BARSTATUS=2,barslast(ld)+1);
vv:=uu>ref(uu,1);
ww:=backset(vv,ref(barslast(ld),1)+2);
xx:=ww>ref(ww,1);
drawline(xx,l,vv,l,1),color00ffff;
uu2:=backset(BARSTATUS=2,barslast(hd)+1);
vv2:=uu2>ref(uu2,1);
ww2:=backset(vv2,ref(barslast(hd),1)+2);
xx2:=ww2>ref(ww2,1);
drawline(xx2,h,vv2,h,1),color00ffff;
drawicon(hd and xx2,h*1.01,10),ALIGN1;
drawicon(ld and xx,l*1.01,9),ALIGN1;
高１:ref(h,barslast(vv2)),pointdot,color99ff66;
高２:ref(h,barslast(xx2)),pointdot,colorff66ff;
低１:ref(l,barslast(vv)),pointdot,color99ff66;
低２:ref(l,barslast(xx)),pointdot,colorff66ff;
ok:=ema(o,60);
cg:=ema(c,60);
pdu:=if(ok>ref(ok,1) and cg>ref(cg,1),1,0);
pdd:=if(ok<ref(ok,1) and cg<ref(cg,1),1,0);
pdm:=if(pdu=0 and pdu=0,1,0);
z1:=ma(c,m);
zx:=ref(z1,m/2+1);
life:=(ema(c,60)+ema(c,90))/2;
var1:=(2*c+h+l)/4;
snook:=ema(var1,99)*0.91;
a1:=(c-ref(c,1))/ref(c,1)*100;
ma5:=barslast(a1>3);
ma20:=if(ma5>0,1,0);
stickline(c>zx,h,l,1,0),color00ffff;
stickline(c>zx and c>=life,o,c,8,0),color0000ff;
stickline(c>zx and c<=snook,o,c,8,0),color00ff00;
stickline(c>zx and c>snook and c<life,o,c,8,0),colorff0000;
stickline(c>zx and ma20=0,o,c,8,0),color00ffff;
stickline(c>zx,o,c,2,0),colorffffff;
drawicon(cross(c,zx),l*0.99,4),ALIGN1;
drawicon(cross(zx,c),h*1.01,5),ALIGN1;
by20:=ma(c,5);
k1:=llv(l,barslast(DISPSTATUS=1)+1);
k2:=hhv(h,barslast(DISPSTATUS=1)+1);
顶选:cross(c,zx),LINETHICK0;
招财猫:ma(c,20),color00ffff;
鼠变异:if(by20>招财猫,招财猫,by20),color808080;
选股:cross(c,zx) and c>zx and ma20=0 ,LINETHICK0;
partline(鼠变异,鼠变异>ref(鼠变异,1) and 鼠变异=招财猫),Linethick2,colorff66ff;
partline(鼠变异,鼠变异>ref(鼠变异,1) and 鼠变异=招财猫 and pdu=1),Linethick2,color0000ff;
partline(鼠变异,鼠变异>ref(鼠变异,1) and 鼠变异<>招财猫),color00ff00;
t1:=c>zx and c>=life;
t2:=c>zx and c>snook and c<life;
t3:=c>zx and c<=snook;
t4:=c<=zx;
t5:=鼠变异>ref(鼠变异,1) and 鼠变异<>招财猫 ;
t6:=鼠变异>ref(鼠变异,1) and 鼠变异=招财猫 and pdu<>1;
t7:=鼠变异>ref(鼠变异,1) and 鼠变异=招财猫 and pdu=1;
t8:=c>zx and ma20=0 ;
eee:=t1+t2+t3+t4+t5+t6+t7+t8 ;
e:=(k2-k1)/(eee+4) ;
DRAWTEXT(C>0 and t1>0 and BARSTATUS=2,k2-e,"老鼠出洞了，"),color0000ff;
DRAWTEXT(C>0 and t1>0 and BARSTATUS=2,k2-e*2,"逮住它！"),color0000ff;
DRAWTEXT(C>0 and t2>0 and BARSTATUS=2,k2-e,"老鼠玩猫猫，"),colorff7700;
DRAWTEXT(C>0 and t2>0 and BARSTATUS=2,k2-e*2,"守着它！"),colorff7700;
DRAWTEXT(C>0 and t3>0 and BARSTATUS=2,k2-e,"老鼠露尾巴，"),color00ff00;
DRAWTEXT(C>0 and t3>0 and BARSTATUS=2,k2-e*2,"动作快！"),color00ff00;
DRAWTEXT(C>0 and t4>0 and BARSTATUS=2,k2-e,"老鼠没有了，"),color808080;
DRAWTEXT(C>0 and t4>0 and BARSTATUS=2,k2-e*2,"打个盹！"),color808080;
DRAWTEXT(C>0 and t5>0 and BARSTATUS=2,k2-e*3,"发现鼠迹！"),color00ff00;
DRAWTEXT(C>0 and t6>0 and BARSTATUS=2,k2-e*3,"瞬间鼠影！"),colorff66ff;
DRAWTEXT(C>0 and t7>0 and BARSTATUS=2,k2-e*3,"恶鼠难遁！"),color0000ff;
DRAWTEXT(C>0 and t8>0 and BARSTATUS=2,k2-e*4,"老鼠去哪里，"),color00ffff;
DRAWTEXT(C>0 and t8>0 and BARSTATUS=2,k2-e*5,"思考哦！"),color00ffff;
{大智慧}
{招财猫 副图}
{input: n(4,1,255),m(13,1,255); }
ok:=ema(o,60);
cg:=ema(c,60);
pdu:=if(ok>ref(ok,1) and cg>ref(cg,1),1,0);
pdd:=if(ok<ref(ok,1) and cg<ref(cg,1),1,0);
pdm:=if(pdu=0 and pdu=0,1,0);
z1:=ma(c,m);
zx:=ref(z1,m/2+1);
life:=(ema(c,60)+ema(c,90))/2;
var1:=(2*c+h+l)/4;
snook:=ema(var1,99)*0.91;
a1:=(c-ref(c,1))/ref(c,1)*100;
ma5:=barslast(a1>3);
ma20:=if(ma5>0,1,0);
stickline(c>zx,h,l,1,0),color00ffff;
stickline(c>zx and c>=life,o,c,8,0),color0000ff;
stickline(c>zx and c<=snook,o,c,8,0),color00ff00;
stickline(c>zx and c>snook and c<life,o,c,8,0),colorff0000;
stickline(c>zx and ma20=0,o,c,8,0),color00ffff;
stickline(c>zx,o,c,2,0),colorffffff;
DRAWTEXT(cross(c,zx),l*0.99,"▲"),color0000ff;
DRAWTEXT(cross(zx,c),h*1.01,"▼"),color00ff00;
by20:=ma(c,5);
k1:=llv(l,125);
招财猫:ma(c,20),color00ffff;
鼠变异:if(by20>招财猫,招财猫,by20),color808080;
if(鼠变异>ref(鼠变异,1) and 鼠变异=招财猫,鼠变异,k1), pointdot,linethick3,colorff66ff;
if(鼠变异>ref(鼠变异,1) and 鼠变异=招财猫 and pdu=1,鼠变异,k1), pointdot,linethick4,Color0000ff;
if(鼠变异>ref(鼠变异,1) and 鼠变异<>招财猫,鼠变异,k1), pointdot,linethick2,color00ff00;
{招财猫解盘}
{input: n(4,1,255),m(13,1,255); }
ok:=ema(o,60);
cg:=ema(c,60);
pdu:=if(ok>ref(ok,1) and cg>ref(cg,1),1,0);
pdd:=if(ok<ref(ok,1) and cg<ref(cg,1),1,0);
pdm:=if(pdu=0 and pdu=0,1,0);
z1:=ma(c,m);
zx:=ref(z1,m/2+1);
life:=(ema(c,60)+ema(c,90))/2;
var1:=(2*c+h+l)/4;
snook:=ema(var1,99)*0.91;
a1:=(c-ref(c,1))/ref(c,1)*100;
ma5:=barslast(a1>3);
ma20:=if(ma5>0,1,0);
by20:=ma(c,5);
招财猫:=ma(c,20);
鼠变异:=if(by20>招财猫,招财猫,by20);
"￥￥￥￥ 招财猫￥￥￥￥"+
IFS(c>zx and c>=life,"老鼠出洞了，逮住它！","")+
IFS(c>zx and c>snook and c<life,"老鼠玩猫猫，守着它！","")+
IFS(c>zx and c<=snook,"老鼠露尾巴，动作快！","")+
IFS(c<=zx,"老鼠没有了，打个盹！","")+
IFS(鼠变异>ref(鼠变异,1) and 鼠变异<>招财猫,"发现鼠迹！","")+
IFS(鼠变异>ref(鼠变异,1) and 鼠变异=招财猫 and pdu<>1,"瞬间鼠影！","")+
IFS(鼠变异>ref(鼠变异,1) and 鼠变异=招财猫 and pdu=1,"恶鼠难遁！","")+
IFS(c>zx and ma20=0,"老鼠去哪里，思考哦！","");股票论坛
