VARIABLE:aa=0;
VARIABLE:bb=0;
if holding=0 then aa:=0;
if holding=0 then bb:=0;
h20:ref(hhv(h,20),1);
l20:ref(llv(l,20),1);
ma2:ma(c,30);
A:=cross(c,h20);
A1:=cross(l20,c);
B:=cross(c,ma2);
B1:=cross(ma2,c);
if aa=1 and holding>0 and A1 then sell(1,holding,limitr,c);
if bb=1 and holding>0 and B1 then sell(1,holding,limitr,c);
if A and holding=0 then
begin
buy(1,1,limitr,c);
IF A and holding>0 THEN aa:=1;
end
if B and holding=0 then
begin
buy(1,1,limitr,c);
IF B and holding>0 THEN bb:=1;
end