gspt0:(HHV(H,9)+LLV(L,9))/2;
gspt1:(HHV(H,26)+LLV(L,26))/2;
gspt2:(gspt0+gspt1)/2;
gspt3:=REF(gspt2,26);
gspt4:=(HHV(H,52)+LLV(L,52))/2;
gspt5:=REF(gspt4,26);
FILLRGN(gspt3>gspt5,gspt5,gspt3,COLORRED);
FILLRGN(gspt3<=gspt5,gspt5,gspt3,COLORGREEN);
DRAWKLINE1(H,O,L,C);
CLOSE>gspt3 AND CLOSE>gspt5 AND CLOSE>gspt1 AND gspt0>gspt1 AND gspt1>gspt3 AND gspt1>gspt5,BPK;
CLOSE< gspt3 AND CLOSE< gspt5 AND CLOSE< gspt1 AND gspt0< gspt1 AND gspt1< gspt3 AND gspt1< gspt5,SPK;
CLOSE< gspt3 AND CLOSE< gspt5 ,SP;
CLOSE>gspt3 AND CLOSE>gspt5,BP;
SETSIGPRICETYPE(BPK,LIMIT_ORDER);
SETSIGPRICETYPE(SPK,LIMIT_ORDER);
SETSIGPRICETYPE(BK,LIMIT_ORDER);
SETSIGPRICETYPE(SK,LIMIT_ORDER);
SETSIGPRICETYPE(BP,LIMIT_ORDER);
SETSIGPRICETYPE(SP,LIMIT_ORDER);
AUTOFILTER;
TRADE_OTHER('AUTO');
SETMOVEOPIPRICE(LIMIT_ORDER);