VARIABLE:kg:=0;
if TODAYBAR=1 then kg:=1;
kc1:l<a and l>b and cross(h,a);
kc2:l<b and l>c1 and cross(h,c1);
kc3:l<c1 and l>c1-0.5*atr and cross(h,c);
no_kc:l<c1-0.5*atr;
if no_kc then kg:=-1;
if kc1 and kg=1 then
begin
buy(1,1,market);
kg:=-1;
END
if kc2 and kg=1 then
begin
buy(1,1,market);
kg:=-1;
END
if kc3 and kg=1 then
begin
buy(1,1,market);
kg:=-1;
END