请教关于平仓过后立刻开仓的办法　[金字塔]

我想写一个程序，让它在平仓过后立刻开仓，但是怎么写都不对，请问是怎么一回事啊？

M1:=STKINDI( '', '新日内模块1.nn',0 ,2 ,0 );
M2:=STKINDI( '', '新日内模块2.nn',0 ,3 ,0 );
TAM:=STKINDI('','时间限制.TT',0,1,0);
xx:=0;
yy:=ref(xx,1);

if ((m1=1 and m2=1 and holding=0) or xx=2) then
BUY(1,10%,THISCLOSE);//开多
else
if ((m1=0 and m2=0 and holding=0) or xx=1) then
BUYSHORT(1,10% ,THISCLOSE);//开空
else  then begin

if(M1=0 and HOLDING>0) then begin
SELL(M1=0 and HOLDING>0, HOLDING,THISCLOSE);//平多
xx:=1;
end;

if(m1=1 and holding<0) then begin
SELLSHORT(m1=1 and holding<0 ,HOLDING,THISCLOSE );//平空
xx:=2;
end;

end;

反手系统要这样写

if  平空开多条件 then begin

sellshort;

buy;

end

if 平多开空条件 then begin

sell;

buyshort;

end