主题：请教关于代码改写

下面是“多头开仓均价盈利大于100点时，以盈利100点的位置为低点，100+N点为高点，这段距离回落一半止盈
”的代码。

如果改成“由开盘价上行大于100点时，以上行100点的位置为低点，100+N点为高点，这段距离回落一半止盈
”，应该怎么写呢，改了几次好像都有问题

variable:maxprofit=0;//有仓位时最大获利

if 条件 and holding=0  then
 begin
 buy();
 maxprofit:=0;
 end

win:=0;
win2:=0;

if holding > 0 and enterbars > 0 then
begin
 win:=(high-enterprice); //记录最大盈利
 if win > maxprofit then
  maxprofit:=win; 
 win2:=maxprofit-win; //最大盈利后的回调幅度
end

//多头止盈

if maxprofit>=100 and holding>0 then
SELL(win2<100+0.5*(maxprofit-100),1,market);