如何實(shí)現(xiàn)加倉？？？？

variable:n=0;

if 條件a and n=0 and 持倉判斷 then begin

    下單語句;

    n:=1;

end

if n=1 and b then n:=0;