标题：亏损加仓，连亏1次加1手，连亏2次加2手，连亏3次加3手

亏损加仓，连亏1次加1手，连亏2次加2手，连亏3次加3手……怎么编写亏损加仓代码？谢谢。

VARIABLE:m:=0;
buy(cross(c,ma(c,5)),1,market);

if cross(ma(c,5),c) and holding>0 then
begin
sell(1,1,marketr);
if numprofit(1)<0 then  //亏损的判断一定要放在平仓条件下进行处理
m:=m+1;
加仓:buy(1,m,market);