主题：交易系统中移动止损得范例

VARIABLE: aspect=0; //初始化假定做多头
VARIABLE: stopprice=0;//止损价格变量
VARIABLE: stopnum = 10; //止损价差

RUNMODE:0;            //工作于逐周期模式

if barpos = 0 then
  stopprice := l - stopnum;

if aspect = 0 then
begin
 //多头处理  
 if l <= stopprice then
 begin
  //多反空
  aspect:= 1;
  stopprice := h+stopnum;
 end
 
 //处理移动的底部
 if l - stopnum > stopprice then
  stopprice := l-stopnum;
end

if aspect = 1 then
begin
 //空头处理  
 if h >= stopprice then
 begin
  //空反多
  aspect:= 0;
  stopprice := l-stopnum;
 end
 
 //处理移动的底部
 if h + stopnum < stopprice then
  stopprice := h+stopnum;
end

//画线
PARTLINE( aspect = 0, stopprice , colorrgb(255,0,0));
PARTLINE( aspect = 1, stopprice , colorrgb(0,255,0));