--
上分形:=0;
后一个高:=REFX(high,1); 后两个高:=REFX(high,2);
if h>REFX(h,1) and h>REFX(h,2) and h>REF(h,1) and h>REF(h,2) then 上分形:=h;
if h=REFX(h,1) and h>REFX(h,2) and h>REFX(h,3) and h>REF(h,1) and h>REF(h,2) then 上分形:=h;
if h>=REFX(h,1) and h=REFX(h,2) and h>REFX(h,3) and h>REFX(h,4) and h>REF(h,1) and h>REF(h,2) then 上分形:=h;
if h>=REFX(h,1) and h=REFX(h,2) and h=REFX(h,3) and h>REFX(h,4) and h>REFX(h,5) and h>REF(h,1) and h>REF(h,2) then 上分形:=h;
if h>=REFX(h,1) and h=REFX(h,2) and h=REFX(h,3) and h=REFX(h,4) and h>REFX(h,5) and h>REFX(h,6) and h>REF(h,1) and h>REF(h,2) then 上分形:=h;
STICKLINE(上分形=h,l,h,9
,0),COLORBLUE;