主题：如何编写当月亏损大于15%后本月停止一切交易？

如何编写当月亏损大于15%后本月停止一切交易？

下个月恢复交易

r1:=barslast(month<>ref(month,1));
r2:=asset/ref(asset,r1)<=0.85;
VARIABLE:KUI=0;

IF HOLDING>0 AND r2  THEN
BEGIN
SELL(1,0,MARKET);
KUI:=KUI+1;
END

IF HOLDING=0 AND KUI<1  THEN BUY(1,1,MARKET);

IF TIME=151500 THEN KUI:=0;

这样更简单:

r1:=barslast(month<>ref(month,1));
r2:=asset/ref(asset,r1)>0.85;

IF HOLDING=0 AND R2  THEN BUY(1,1,MARKET);

多谢版主!

runmode:1;

setting:='设置';
beginmoney:='月初资金';
stoptrade:='停止交易';
lossmoney:=5000;

if month<>ref(month,1) then begin
 setregval(setting,beginmoney,tasset);
 setregval(setting,stoptrade,0);
end 

if getregval(setting,stoptrade,-1) = 1 then begin
 exit;
end else then begin
 if getregval(setting,beginmoney,0)-tasset>lossmoney then begin
  tsell(1,0,lmt,close,0,'',stklabel);  
  tsellshort(1,0,lmt,close,0,'',stklabel);
  setregval(setting,stoptrade,1);   
 end
end