股海关注(副)

{ 股海归一《之波段王》}
{input: n(3,1,10),n2(6,1,10),n3(-23,-50,0),n4(75,50,100),p1(19,1,100),p2(118,1,250),n1(9,1,100); }

{drawgbk(c,colorrgb(10,160,0),colorrgb(25,15,0),1); }
STICKLINE(0 ,0,-1,15,0) ,Color00220A;
STICKLINE(10 ,10,0,15,0) ,Color00280A;
STICKLINE(20 ,20,10,15,0),Color00340A;
STICKLINE(30 ,30,20,15,0),Color00400A;
STICKLINE(40 ,40,30,15,0),Color00480A;
STICKLINE(50 ,50,40,15,0),Color00580A;
STICKLINE(60 ,60,50,15,0),Color00680A;
STICKLINE(70 ,70,60,15,0),Color00780A;
STICKLINE(80 ,80,70,15,0),Color00880A;
STICKLINE(90 ,90,80,15,0),Color00980A;
STICKLINE(100 ,100,90,15,0),Color00A00A;

var2:=(c-ref(c,1))/ref(c,1)*100;
var3:=(c-llv(l,18))/(hhv(h,18)-llv(l,18))*100;
var4:=sma(var3,9,1);
var5:=sma(var4,3,1);
j:3*var4-2*var5,Color00FFFF;
var6:=j>1*ref(j,1);
var7:=llvbars(l,50);
var8:=sum(v,var7);
var9:=hhvbars(h,50);
var10:=sum(v,var9);
var11:=(c-ref(o,var9))/ref(o,var9)*100;
var12:=var10/capital*100;
var13:=(c-ref(o,var7))/ref(o,var7)*100;
var14:=var8/capital*100;
var15:=ma(winner(c),n)*100;
var16:=ema(var4,n);
a2:ema(var4,n),colorffddcc;
a3:=ema(a2,n);
a4:=ema(a3,n);
a5:=ema(a4,n);
a6:=ema(a5,n);
a7:=ema(a6,n);
var17:=ema(a7,n);
var18:=ema(var17,n);
var19:=ema(var18,n);
aa:=ema(a5,n2);
中期大底:llv(j,aa),Linethick2,Color0000FF;
上:=if(ma(h,3)*1.05,30,0)*10-aa;
下:=if(ma(l,3)*0.96,30,0)*2/中期大底;
中:=if(ma(h,3)*1.05,30,0);
电:=j;
drawtext(cross(a4,aa) and var11<n3,aa,'●底'),colorffff00;
drawtext(cross(a2,j) and a2>n4,a2+4.22,'●峰'),Color00FFFF;
drawtext(cross(j,a2) and var6 and a2<20 and var2>9 or a2>1*ref(a2,1) and var2>4 and a2<60,a2,'●拉升'),colorffffcc;
STICKLINE(j>=a2,a2,j,6,0),color0000ff;
STICKLINE(j<=a2,j,a2,6,0),color00ff00;
压力:hhv(j,60),color00ffff;
支撑:=llv(aa,13);
stickline(j<=中期大底 and 中-ref(中,1)>0 and c>=o*0.99,1,88,3,0),color0000ff;
drawicon(j<=中期大底 and 中-ref(中,1)>0 and c>=o*0.99,88,1),Color00FF00;
drawtext(j<=中期大底 and 中-ref(中,1)>0 and c>=o*0.99,85,'-绝对底部'),Color00FF00;
stickline(filter(cross(上,中期大底) and 中-ref(中,1)>=0,3),中期大底,70,3,0),color00ff00;
drawicon(filter(cross(上,中期大底) and 中-ref(中,1)>=0,3),70,1);
drawtext(filter(cross(上,中期大底) and 中-ref(中,1)>=0,3),64,'-买了不输'),colorffffff;
stickline(cross(上,下) and c>=o,中期大底,60,2,0),colorff0000;
drawicon(cross(上,下) and c>=o,60,1),colorff00ff;
drawtext(cross(上,下) and c>=o,55,'-短线'),colorff00ff;
drawtext(j>=压力 and 压力-ref(压力,6)>25 and c<o,压力+4.22,'●头部'),Color008000;
ma1:=ma(c,p1);
ma2:=ma(c,p2);
n15high:=ref(h,15);
n1low:=ref(l,1);
ff:=(n15high-n1low)/n1low>0.15;
stickline(cross(ma(c,p1),ma(c,p2))>0 and (n15high-n1low)/n1low<0.15 and l<=ma(c,p1) and c>=ma(c,p1) and c>=o,中期大底,60,0,1),Linethick3,Color0000FF;
drawicon(cross(ma(c,p1),ma(c,p2))>0 and (n15high-n1low)/n1low<0.15 and c>=ma(c,p1) and l<=ma(c,p1) and c>=o,60,1);
drawtext(cross(ma(c,p1),ma(c,p2))>0 and (n15high-n1low)/n1low<0.15 and c>=ma(c,p1) and l<=ma(c,p1) and c>=o,60,'★＾回头望月'),colorff0000;
x:=c-ref(ma(c,20),11);
lgl:=if(ema(c,5)/ema(ema(c,9),16)<=0.85 and c/ref(c,1)>0.905 and c/ref(c,1)<1.05 and v/capital*100<5,50,0);
wr1:=-(100*(hhv(h,34)-c)/(hhv(h,34)-llv(l,34)))+100*x;
wr2:=-(100*(hhv(h,50)-c)/(hhv(h,50)-llv(l,50)))+100;
wr3:=-(100*(hhv(h,70)-c)/(hhv(h,70)-llv(l,70)))+100*x;
bias1:=((c-ma(c,34))/ma(c,34)*100+10)*5;
bias2:=((c-ma(c,50))/ma(c,50)*100+10)*5;
bias3:=((c-ma(c,70))/ma(c,70)*100+10)*5;
s1:=(wr1+wr2+wr3+bias1+bias2+bias3)/6*x;
s2:=ema(s1,3);
s3:=abs(bias1-bias3);
sx:=(s1+s3)/2;
xc1:=(-1)*(ema(100*(1-winner(c)),1)-50)+50;
ccc:=xc1+sx;
zjz:=if(lgl>0 and ccc<0,200,0)*x;
lxl:=if(sx<0 and c=llv(c,5) and c/ref(c,1)>0.905 and c/ref(c,1)<1.05 and v/capital*100<5,-50,0);
jbj:=if(ccc<0 and lxl=-50,100,0)*x;
ma3:=ma(c,3);
c0:=ref(c,2)*0.865;
c1:=ref(c,13)*0.772;
bot:=min(c0,c1);
hsl:=100*v/capital*x;
ma13:=ma(c,13)*x;
cxc:=if((c-bot)/c<3/100 and sum(hsl,5)/5<1.8,1,0);
vmc:=if(cxc>0 and (lxl<0 or lgl>0),10,0);
满仓:if(vmc>0,60,中期大底),Color0000FF;
drawtext(满仓>=60,59,'满仓'),Color0000FF;
半仓:if(zjz>0 and jbj>0 and sum(v/capital*100,5)/5<1 or cxc>0 and ref(c,1)/ref(c,2)>0.902 or (zjz>0 and jbj>0 and sum(v/capital*100,5)/5<1 or cxc>0) and (lxl<0 or lgl>0) and vmc<10,50,中期大底),colorcc99ff;
drawtext(半仓>=50,49,'半仓'),colorcc99ff;
b0:=ma(c,3);
b01:=ma(c,4);
b1:=(h+l+c)/3;
b2:=hhv(b1,15);
b3:=llv(b1,15);
b4:=b2-b3;
b5:ma((b1-b3)/b4,2)*100,Color000080;
b6:=hhv(b1,4*15);
b7:=llv(b1,4*15);
b8:=b6-b7;
b9:ma((b1-b7)/b8,2)*100,ColorFFCD00;
ba:=hhv(b1,16*15);
bb:=llv(b1,16*15);
bc:=ba-bb;
bd:ma((b1-bb)/bc,2)*100,ColorFFEEFF;
顶线:98,ColorFFFFFF;
底线:1,ColorFFFF00;
stickline(cross(b5,底线) and b0-ref(b0,1)>0 and j-ref(j,1)>0 and c>=o,中期大底,50,2,0),Color0000FF;
drawicon(cross(b5,底线) and b0-ref(b0,1)>0 and j-ref(j,1)>0 and c>=o,50,1);
drawtext(cross(b5,底线) and b0-ref(b0,1)>0 and j-ref(j,1)>0 and c>=o,45,'开花一'),colorcc99ff;
stickline(cross(b5,底线) and cross(b9,底线) and b01-ref(b01,1)>0,中期大底,64,2,0),Color0000FF;
drawicon(cross(b5,底线) and cross(b9,底线) and b01-ref(b01,1)>0,64,1);
drawtext(cross(b5,底线) and cross(b9,底线) and b01-ref(b01,1)>0,58,'开花二'),ColorFF00FF;
drawtext(cross(98,b5) and c<h/1.03,98,'↑出局'),Color00FF00;
stickline(cross(bd,1) and 中-ref(中,1)>0 and b5-ref(b5,2)>0,1,80,3,0);
drawicon(cross(bd,1) and 中-ref(中,1)>0 and b5-ref(b5,2)>0,80,1);
drawtext(cross(bd,1) and 中-ref(中,1)>0 and b5-ref(b5,2)>0,73,'开花三'),color00ffff;
stickline(cross(j,aa) and a2>=a3 and 中-ref(中,1)>0 and c>=o and a3>=a4,中期大底,60,2,0),colorffffff;
drawtext(cross(j,aa) and a2>=a3 and 中-ref(中,1)>0 and c>=o and a3>=a4,60,'●买'),Color00FFFF;
均线:=ma(c,5);
drawtext(cross(b5,a2)>0  and 均线-ref(均线,1)>0,98,'↑关注'),color0000ff;
varw2:=(c-ma(c,6))/ma(c,6)*100 and 中-ref(中,1)>0;
varw3:=(c-ma(c,12))/ma(c,12)*100 and 中-ref(中,1)>0;
varw4:=(c-ma(c,24))/ma(c,24)*100;
varw5:=(varw2+2*varw3+3*varw4)/6;
varw6:=ma(varw5,3);
股海王:=70*varw6<=-8;