三点定亁坤主图

//aad:=BACKSET(tjd,peakBARS(m,n,2));

  //ad:=aad<REFX(aad,1);

  //bbd:=BACKSET(tjd,peakBARS(m,n,1));

  //bd:=bbd<REFX(bbd,1);

  //v2:=if(bd,1,0);

  //abd:LINEVALUE(ad,h,bd,h,0,0),linethick0;

  //kkad:=refx(abd,1)-abd;

  //DRAWSL(vv=abd and ad,h,kkad,la,0),colorgreen,linethick2;

  //ccd:=sum(abd>vv and ref(abd,1)<ref(vv,1),BARSLAST(bd))=1 and peakBARS(m,n,1)=0 and peak(m,n,2)>=ref(abd,peakBARS(m,n,2));

  //cd:=ccd>ref(ccd,1);

  //bcd:=LINEVALUE(bd,h,cd,h,0,0),linethick0;

  //kkbd:=refx(bcd,1)-bcd;

  //DRAWSL(vv=abd and v2,h,kkbd,lb,0),COLORblue,linethick2;

  //DRAWSL(cd,h,0,lc,0),COLORWHITE,linethick2;

  //DRAWTEXT(vv=abd and ad,h*1.05,'A'),COLORWHITE;

  //DRAWTEXT(vv=abd and v2,h*1.05,'B'),COLORWHITE;

  //DRAWTEXT(cd,h*1.05,'C'),COLORWHITE;

  //上升下降通道 

hh:=hhv(h,0);

  hhh:=h; 

  aa:=BARSLAST(h=hh[datacount]);

  ba:=datacount-aa; 

  ja:=1; 

  tm1:=999999; 

  for i1=ba[datacount]+1 to datacount do begin   k1:=(hh[datacount]-hhh[i1])/ja;  

  if k1<tm1  then begin    tm1:=k1;  

  ts1:=ja;  

  end;  

  ja:=ja+1; 

    end; 

//A1:LINEVALUE(h=hh[datacount] and      aa=0,h,BARPOS=datacount-

 aa[datacount]+ts1,h,0,0),colorffff54; 

  cha:=hhv(abs(l-a1),aa); //A2:a1-cha[datacount],colorffff54;

  //AI:a1-cha[datacount]/2,colorffff54,LINEDASH;  

  ll:=llv(l,0); lll:=l; 

  a3:=BARSLAST(l=ll[datacount]); 

  b3:=datacount-a3; j3:=1;

  tm3:=999999; for i3=b3[datacount]+1 to datacount do begin k3:=(lll[i3]-ll[datacount])/j3;

  if k3<tm3  then begin  tm3:=k3;

  ts3:=j3; end; j3:=j3+1;

  end; 

  //B1:LINEVALUE(l=ll[datacount] and a3=0,l,BARPOS=datacount-a3[datacount]+ts3,l,0,0),color5454ff;

  chb:=hhv(abs(h-b1),a3); //b2:b1+chb[datacount],color5454ff; //bi:b1+chb[datacount]/2,color5454ff,LINEDASH;

  zdj:low; 

{公式网分享：http://www.gszx.com.cn/html/feihuzhibiaogongshi/gs348587.html}