BS主图_九毛八公式指标

variable:p1=0;

c1:=INTPART(cyc(5)*100*0.96)/100;

p2:=intpart(ref(cyc(5),1)*100)/100;

p3:=intpart(ref(cyc(5),1)*0.96*100)/100;

vv:=intpart(min(capital*0.05,ref(ma(vol,34),1))/100);

p40:=intpart(maxcyc*100)/100;

p41:=intpart(ref(MAXCYC,1)*100)/100;

p4:=p1=0 and c>p2 or (ref(vol/100,1)intpart(p2*0.98*100)/100 and vol>min(capital*0.05,ref(ma(vol,34),1)));

p5:=p1=1 and c

p1:=if(p4=1,1,if(p5=1,0,ref(p1,1)));

STICKLINE(p1=1 and c

STICKLINE(p1=0 and c>o,c,o,8,1),colorffff54;

STICKLINE(p1=0 and c>o,c,h,0.5,0),colorffff54;

STICKLINE(p1=0 and c>o,l,o,0.5,0),colorffff54;

DRAWTEXT(cross(p1,0),l*0.9,'B'),coloryellow,LINETHICK3;

DRAWTEXT(cross(1,p1),h*1.05,'S'),COLORgreen,LINETHICK3;

DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c>0.1,c,'持币');

DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)

DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)>=vv,c,'明日收盘价超过'+str(c1)+'买入');

DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)>0.1 ,c,'持股');

DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)<=0.1 ,c,'明日收盘价跌破'+str(min(c1,p40))+'卖出');