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); 
|