N:=0;
M:=1;
J1:CLOSE,COLORWHITE;
J2:ZSTJJ,COLORYELLOW;
GSPT1:=SUM(CLOSE*VOL,240)/SUM(VOL,240);
GSPT2:=SUM(CLOSE*VOL,0)/SUM(VOL,0);
GSPT3:=SUM(CLOSE*VOL,240)/SUM(VOL,240);
GSPT4:=CLOSE>REF(CLOSE,1) AND CLOSE/J2>1+N/1000;
GSPT5:=CLOSE< REF(CLOSE,1) AND CLOSE/J2< 1-N/1000;
GSPT6:=CROSS(SUM(GSPT4,0),0.5);
GSPT7:=CROSS(SUM(GSPT5,0),0.5);
GSPT8:=SUM(GSPT6,0)*CROSS(COUNT(CLOSE< REF(CLOSE,1),BARSLAST(GSPT6)),0.5);
GSPT9:=SUM(GSPT7,0)*CROSS(COUNT(CLOSE>REF(CLOSE,1),BARSLAST(GSPT7)),0.5);
F1:CONST(SUM(IF(GSPT8,REF(CLOSE,1),DRAWNULL),0)),DOTLINE,COLORWHITE;
F2:CONST(SUM(IF(GSPT9,REF(CLOSE,1),DRAWNULL),0)),DOTLINE,COLORGREEN;
GSPT10:=CROSS(SUM(GSPT4 AND CLOSE>F1*(1+M/100),0),0.5);
GSPT11:=CROSS(SUM(GSPT5 AND CLOSE< F2*(1-M/100),0),0.5);
GSPT12:=SUM(GSPT10,0)*CROSS(COUNT(CLOSE< REF(CLOSE,1),BARSLAST(GSPT10)),0.5);
GSPT13:=SUM(GSPT11,0)*CROSS(COUNT(CLOSE>REF(CLOSE,1),BARSLAST(GSPT11)),0.5);
F3:CONST(SUM(IF(GSPT12,REF(CLOSE,1),DRAWNULL),0)),COLORWHITE;
F4:CONST(SUM(IF(GSPT13,REF(CLOSE,1),DRAWNULL),0)),COLORGREEN;
DRAWICON(GSPT8,REF(CLOSE*1.002,1),2);
DRAWICON(GSPT12,REF(CLOSE*1.002,1),35);
DRAWICON(GSPT9,REF(CLOSE*0.998,1),1);
DRAWICON(GSPT13,REF(CLOSE*0.998,1),34);
GSPT14:=CLOSE>REF(CLOSE,1) AND CLOSE/J2>1+5/100;
GSPT15:=CLOSE< REF(CLOSE,1) AND CLOSE/J2< 1-5/100;
GSPT16:=CROSS(SUM(GSPT14,0),0.5);
GSPT17:=CROSS(SUM(GSPT15,0),0.5);
GSPT18:=SUM(GSPT16,0)*CROSS(COUNT(CLOSE< REF(CLOSE,1),BARSLAST(GSPT16)),0.5);
GSPT19:=SUM(GSPT17,0)*CROSS(COUNT(CLOSE>REF(CLOSE,1),BARSLAST(GSPT17)),0.5);
GSPT20:=CONST(SUM(IF(GSPT18,REF(CLOSE,1),DRAWNULL),0));
GSPT21:=CONST(SUM(IF(GSPT19,REF(CLOSE,1),DRAWNULL),0));
DRAWICON(GSPT18,REF(CLOSE*1.002,1),15);
DRAWICON(GSPT19,REF(CLOSE*0.998,1),9);
