参考下面范例:
以多头为例:
[PEL] 复制代码 ma1:=ma(close,5);
ma2:=ma(close,30);
variable:maxprofit=0;//有仓位时最大获利
//开仓
if cross(ma1,ma2) then
begin
buy(1,1,marketr);
maxprofit:=0;
end
//平仓
sell(cross(ma2,ma1),0,marketr);
//判断当前持仓状态下的最大盈利
win:=0;
win2:=0;
if holding > 0 and enterbars > 0 then
begin
win:=(h-enterprice); //记录最大盈利
if win>maxprofit then
maxprofit:=win;
win2:=(maxprofit-win)/maxprofit*100; //最大盈利后的回调幅度
end
if holding < 0 and enterbars > 0 then
begin
win:=(enterprice-l); //记录最大盈利
if win > maxprofit then
maxprofit:=win;
win2:=(maxprofit-win)/maxprofit*100; //最大盈利后的回调幅度
end
//出现浮动亏损100点
止损:sell(avgenterprice-c>100*mindiff,0,marketr);
//出现最高盈利后,回落到盈利的60%平仓出场
止赢:sell(win2 >= 50 and maxprofit >150*mindiff,0,marketr);
|