drawgbk(o>c,rgb(0,30,0),rgb(0,0,60),0,'01',0);
drawkline(h,o,l,c);
mv10:=ma(v,10);
avg_v:=(v-mv10)/mv10*100;
量差:=avg_v-ref(avg_v,1);
假阴:=c>ref(c,1) and c<o;
高开:=(o-ref(c,1))/ref(c,1)*100;
倍量:=v>ref(v,1)*1.69 and v>ref(hhv(v,20),1);
振幅:=(h-l)/ref(c,1)*100;
zf:=(c-ref(c,1))/ref(c,1)*100;
涨停:=c/ref(c,1)>1.095 ;
三元:=every(涨停,3) or every(涨停,2);
xg1:=ref(三元,1) and 倍量;
xg2:=三元 and 倍量;
xg0610:=三元 and 量差>ref(hhv(量差,20),1);
xg2265:=ref(every(涨停,2),1) and 振幅>15 and zf>0.5 and 倍量;
xg600352:=高开>=6 and 假阴 and ref(every(涨停,2),1) and 倍量;
xg3:=xg2 or xg1 or xg0610 or xg2265 or xg600352;
xgok:=filter(xg3,2);
drawicon(xgok>0,l*0.98,4);
t:barslast(xgok),nodraw;
支撑1:ref(c,t+1),nodraw;
支撑2:ref(c,t+2),nodraw;
支撑:ref(c,t),nodraw;
stickline(o,支撑1,支撑1,5,-1),color22b4ee;
stickline(o,支撑2,支撑2,5,-1),color0000ff;
stickline(o,支撑,支撑,5,-1),colorgreen;
v1:=barslast(xgok>0);v2:=ref(c,v1);
v12:=cross(c,v2);
v13:=c>v2 and ref(l,1)<v2 ;
v15:=ref(c,v1+1); v16:=ref(c,v1+2);
v11:=c>ref(c,1) and l<ref(c,1) and xgok=0 and ref(xgok,1)>0;
v14:=v12>0 or v13>0 or v11>0;
x11:=v1>0 and c/ref(c,1)>1.085 and v14>0;
x12:=v11>0 or x11>0;
买3:=filter(x12>0,2);
drawtext(买3>0,l*0.97,'3'),colorgreen;
买2:=v1>0 and c/ref(c,1)>1.01 and cross(c,v15) and v1<9;
drawtext(买2>0,l*0.95,'2'),colorgreen;
买1:=v1>0 and c/ref(c,1)>1.01 and cross(c,v16) and v1<9;
drawtext(买1>0,l*0.90,'1'),colorgreen;
z1:=barslast(cross(c,ref(c,t)));
pz:=z1>0 and count(max(c,o)>ref(c,t),z1)=z1 and z1<20 and c/ref(c,1)>1.085;
pz1:=filter(pz>0,10);
pz2:=filter(t>1 and count(max(c,o)>ref(c,t),t)=t and t<20 and c/ref(c,1)>1.085,10);
p3:=pz1 or pz2;
drawicon(p3>0,l*0.98,23);
流通市值:finance(40)/100000000,nodraw,coloryellow;
xa8:=ref(c,1)/ref(c,3)>=1.2 and o/ref(c,1)<=1.01 and l<ref(c,1) and c/ref(c,1)>1.05;
启动8:=xa8 and count(xa8,4)=1;
drawtext(启动8,l*1.06,'风'),colorgreen;
a11111:=o>c and c>ref(c,1) and o/ref(c,1)>1.03;
a21111:=ref(hhv(v,15),1);
a31111:=a11111 and v>a21111;
stickline(a31111,o,c,2.5,0),colorgreen;
n2:=14;
a17:=(vol=hhv(vol,n2));
k0:=currbarscount=const(sumbars(a17,1));
k17:=barslast(a17);
k27:=ref(max(c,o),k17);
k21:=ref(l,k17);
k3:=currbarscount=const(sumbars(a17,2));
k4:=barslast(k3);
k5:=ref(max(c,o),k4);
notext1:=if(currbarscount<const(sumbars(a17,1)),const(k27),drawnull), colorred;
notext2:=if(currbarscount<const(sumbars(a17,2)),const(k5),drawnull),colorred;
notext3:if(currbarscount<const(sumbars(a17,1)),const(k21),drawnull),colorgreen,linethick1;
{梯量3}
涨幅:=(c-ref(c,1))/ref(c,1)*100;
梯量9:=every(c>o,3) and every(c>ref(c,1),2) and every(v>ref(v,1),2) and sum(涨幅,3)<15;
梯量4:=ref(梯量9,1) and c>=ref(c,1);
drawtext(filter(梯量9,2),h,'t3'),color888888;
bk5:=barslast(currbarscount=const(barslast(filter(梯量9,2)))+1),colord355ba;
t35:ref(h,bk5),linethick1,colord355ba;
drawtext_fix(currbarscount=1,0.9,0.1,1,externstr(0,9997)); { 涨停原因}
drawtext_fix(1,0.01,0.05,0,'板块：')color0066bb;
drawtext_fix(1,0.03,0.05,0,strcat(strcat(strcat(strcat(hyblock,'_____'),gnblock),'__'),dyblock))color0066bb; {板块信息}
drawtext_fix(1,0.01,0.10,0,'同花：')colorligreen; {同花顺}
drawtext_fix(1,0.03,0.10,0,externstr(0,9886))coloryellow;
drawtext_fix(1,0.03,0.25,0,externstr(0,9601))color70db93 ;
drawtext_fix(1,0.01,0.15,0,'游资：')color0000ff;
drawtext_fix(1,0.03,0.15,0,externstr(0,9701))color0000ff; {游资协战席位};
u11:=5;
u21:=11;
u31:=9;
upper:=(1+u21/100)*ma(close,u11);
lower:=(1-u31/100)*ma(close,u11);
ene1:=(upper+lower)/2;
出轨:=cross(c,upper) and h=c colorcyan;
{竞价龙头副图}
a14:=finance(7)<120000000;
b14:=finance(7)<300000000 and finance(7)>120000000;
c14:=finance(7)<500000000 and finance(7)>300000000;
d14:=finance(7)<800000000 and finance(7)>500000000;
e19:=finance(7)<1300000000 and finance(7)>800000000;
a88:=dynainfo(14)<0.03 and dynainfo(14)>0.006 and dynainfo(17)>10 and v*200/fromopen/ref(ma(v,5),1)>3;
b:=dynainfo(9);
s19:=low>(ref(high,2)+0.001) and c>ref(c,1) and c>ma(c,20)*1.20 and v*200/fromopen/ref(ma(v,5),1)>3;
竞价龙头:=s19 or (a14 and a88=1 and b>1200) or (b14 and a88=1 and b>3000)or (c14 and a88=1 and b>5000)or (d14 and a88=1 and b>8000)or (e19 and a88=1 and b>13000) colorred;
gk1:=o>ref(c,1);
fd:=o/ref(c,1);
zt33:=c/ref(c,1)>1.09 or c/ref(c,1)>1.19;
gk2:=if(gk1>0 and fd>ref(fd,1) and ref(zt33,1)>0 and ref(gk1,1)>0,1,0);
gk3:=gk2>0 and gk1>0 and zt33>0 and count(zt33>0,4)<4;
竞换达标:=1; {原公式没有提供这行，所以测试不通过。}
墨轩寻牛:=出轨 and (竞价龙头 or gk3);
墨轩寻牛1:=出轨 and 竞换达标;
drawicon(墨轩寻牛,l*0.96,25);
drawicon(墨轩寻牛1,l*0.94,24); 
|