gspt1:=MAX(C,O)<REF(MAX(C,O),1) AND H>=REF(MAX(C,O),1) AND REF(H>MAX(C,O),1);
gspt2:=MAX(C,O)>REF(MAX(C,O),1) AND MAX(C,O)<=REF(H,1) AND H>MAX(C,O);
gspt3:=gspt1 OR gspt2;
gspt4:=MAX(C,O)<REF(MAX(C,O),2) AND H>=REF(MAX(C,O),2);
gspt5:=MAX(C,O)>REF(MAX(C,O),2) AND MAX(C,O)<=REF(H,2) AND H>MAX(C,O);
gspt6:=(gspt4 OT gspt5) AND gspt3;
gspt7:=BARSLAST(REF(gspt3,1) AND gspt6);
gspt8:=BACKSET(gspt7=0,3);
gspt9:=BARSLAST(CROSS(gspt8=1,0.5));
gspt10:=REF(HHV(H,gspt9+1),gspt7);
gspt11:=H<gspt10 AND (HHV(H,gspt9+1)-LLV(L,gspt9+1))/LLV(L,gspt9+1)*100<5;
gspt16:=FILTERX(gspt11=1,gspt9+1);
gspt18:=BARSLAST(gspt16);
箱顶:DRAWLINE(gspt9=0,REFX(HHV(H,gspt9+1),BARSNEXT(gspt18=0)),gspt18=0 AND EVERY(gspt11=1,gspt7+1) AND gspt9>2,HHV(H,gspt9+1),0),COLORYELLOW;
箱底:DRAWLINE(gspt9=0,REFX(LLV(L,gspt9+1),BARSNEXT(gspt18=0)),gspt18=0 AND EVERY(gspt11=1,gspt7+1)AND gspt9>2,LLV(L,gspt9+1),0),COLORYELLOW;
STICKLINE(gspt9=0,箱顶,箱底,0,0),COLORYELLOW;
STICKLINE(gspt18=0,箱顶,箱底,0,0),COLORYELLOW;
DRAWTEXT(gspt7=0,箱顶*1.02,'箱体'),COLORYELLOW;
