input: N(55,1,100);
AA:=REF(H,N)=HHV(H,2*N+1);
BB:=BACKSET(AA,N+1);//未来涵数 “BACKSET”
CC:=FILTER(BB,N) AND H=HHV(H,N+1);
AA2:=REF(L,N)=LLV(L,2*N+1);
BB2:=BACKSET(AA2,N+1);
CC2:=FILTER(BB2,N) AND L=LLV(L,N+1);
AA3:=REF(H,2*N)=HHV(H,4*N+1);
BB3:=BACKSET(AA3,2*N+1);
CC3:=FILTER(BB3,2*N) AND H=HHV(H,2*N+1);
AA4:=REF(L,2*N)=LLV(L,4*N+1);
BB4:=BACKSET(AA4,2*N+1);
CC4:=FILTER(BB4,2*N) AND L=LLV(L,2*N+1);
a1:=BARSLAST(CC);
M1:ma(h,a1+1),PRECISION2,LINETHICK0,COLORYELLOW;
PARTLINE(a1>0,M1),COLORYELLOW;
a11:=ref(a1,a1+1);
M2:ma(h,a11+a1),PRECISION2,LINETHICK0,COLORCYAN;
PARTLINE(a1>0,M2),COLORCYAN;
a2:=BARSLAST(CC2);
M3:ma(l,a2+1),PRECISION2,LINETHICK0,COLORMAGENTA;
PARTLINE(a2>0,M3),PRECISION2,COLORMAGENTA;
a22:=ref(a2,a2+1);
M4:ma(l,a22+a2),PRECISION2,LINETHICK0,COLORWHITE;
PARTLINE(a2>0,M4),COLORWHITE;
a3:=BARSLAST(CC3);
M5:ma(h,a3+1),PRECISION2,LINETHICK0,COLORBLUE;
PARTLINE(a3>0,M5),COLORBLUE;
a4:=BARSLAST(CC4);
M6:ma(l,a4+1),PRECISION2,LINETHICK0,COLORGREEN;
PARTLINE(a4>0,M6),COLORGREEN;