标题：[求助]今日亏损超过总资金的3%退出程序怎么编写？

请问： 图表交易，日内策略，可能多次开仓，平仓。当亏损超过总资金的3%时就退出程序，今日不再执行任何操作，怎么编写？

r1:=barslast(date<>ref(date,1));

r2:=ref(asset,r1)/asset>1.03;

if r2 then

begin

sell(holding>0,0,limitr,c);

sellshort(holding<0,0,limitr,c);

end

 

谢谢！