//开多
if  h>=hh then begin
 if o<=hh and holding=0 and not(IFclose) then BEGIN 
  buy(1,ss,limitr,hh+mindiff*4);
  dzsATR:=hh-ATR;
  doubleATR:=hh+ATR*2;
  threeATR:=hh+ATR*3;
 end
 cfT:=1;
end

if h>=hhh then begin
 if  o<=hhh and holding=0 and eckcON=1 and not(IFclose) then BEGIN 
  buy(1,ss,limitr,hhh+mindiff*4);
  dzsATR:=hhh-ATR;
  doubleATR:=hhh+ATR*2;
  threeATR:=hhh+ATR*3;
 end  
 if h>hhh then cfP:=1;
end

//破3根K线最低价平仓
if holding>0 and l<3D then BEGIN
   sell(1,holding,marketr);
 dzsATR:=drawnull;
 doubleATR:=drawnull;
 threeATR:=drawnull;
 eckcON:=1;
end
 
 
 
 //ATR止损
if holding>0 then begin
 if h>doubleATR then dzsATR:=max(dzsATR,ENTERPRICE-mindiff*4);//突破2倍ATR后上移止损
 if h>threeATR  then dzsATR:=max(dzsATR,ENTERPRICE-mindiff*2);//突破3倍ATR后上移止损
end

CorL:=if(enterbars=0 or dzsATR>ref(dzsATR,1),c,l);
if  CorL<dzsATR and holding>0 then BEGIN
 sell(1,holding,marketr);
 dzsATR:=drawnull;
 doubleATR:=drawnull;
 threeATR:=drawnull;
 eckcON:=1;
end  

//脉冲大K线平仓
ccl:=openint<ref(openint,1);
if  holding>0 and ccl and mck>5 and c<>h then begin
 sell(1,holding,marketr);
 dzsATR:=drawnull;
 doubleATR:=drawnull;
 threeATR:=drawnull;
end

if  holding>0 and  mck>7 and c<>h then begin
 sell(1,holding,marketr);
 dzsATR:=drawnull;
 doubleATR:=drawnull;
 threeATR:=drawnull;
end

//日内全局变量归零处理
//if time=CLOSETIME(0) then eckcON:=0;

止损线:max(dzsatr,3d),COLORGREEN;