如何加入移動點數停利停損

出場條件除了原本的設定外，如何加入點數的移動停利停損

讓程式判斷除了出場條件成立外必須出場，進場後下跌一定點數或最高點回測一定點數也必須出場

__________________________________________________

var: shortaverage(0);

var: midaverage(0);

var: midlongaverage(0);

var: long_condition(false); { 進場買進作多 }

var: exit_long_condition(false); { 多單出場 }

value1 = average(GetField("收盤價","5"), 5);

value2 = average(GetField("收盤價","5"), 10);

value3 = average(GetField("收盤價","5"), 20);

shortaverage   = Average(close,5);

midaverage     = Average(close,10);

midlongaverage = Average(close,20);

long_condition =  close          > midlongaverage   and

              shortaverage   > midaverage       and

  value1 > value1[1]                and

              value2 > value2[1];

exit_long_condition = close    < midlongaverage and  

                      close[1] > Average(close, 20) and

                      volume   > Average(volume, 20) * 1.5 ;

if Position = 0 and long_condition then begin

SetPosition(1, MARKET); { 以市價買進 }

end;

if Position = 1 and exit_long_condition then begin

SetPosition(0, MARKET); { 以市價賣出 }

end;