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) vv and c intpart(p2*0.98*100)/100 and vol min(capital*0.05,ref(ma(vol,34),1)));
p5:=p1=1 and c min(p3,p41);
p1:=if(p4=1,1,if(p5=1,0,ref(p1,1)));
STICKLINE(p1=1 and c o,c,o,8,1),color5454ff,layer0;
STICKLINE(p1=1 and c o,c,o,6,0),colorffff54;
STICKLINE(p1=1 and c o,c,l,0.5,0),color5454ff;
STICKLINE(p1=1 and c o,h,o,0.5,0),color5454ff;
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) vv,c,'明日收盘价超过'+str(c1)+';或收盘价超过'+str(intpart(c1*0.98*100)/100)+'且成交量大于'+str(vv)+'买入');
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))+'卖出');
