飞狐顶底画线\高低点画线随光标移动主图指标

飞狐顶底画线\高低点画线随光标移动主图指标

{顶底画线}

n:=21;
TY:=C;
A1:=REF(TY,N)=HHV(TY,2*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
HD:=FILTER(C1,N);
A2:=REF(TY,N)=LLV(TY,2*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
LD:=FILTER(C2,N);
A:=REF(C,BARSLAST(HD));
B:=REF(C,BARSLAST(LD));
t1:=BARSLAST(HD) and BARSLAST(LD) AND NOT(LD);
STICKLINE(t1,A,A,9,0),ColorFF00FF,LINETHICK2;
STICKLINE(t1,B,B,9,0),Color00FF00,LINETHICK2;

{高低点画线--随光标移动}

HC:=HHV(C,30);
LL:=LLV(L,30);
PARTLINE(BARPOS>=SYSPARAM(1)-30,HC[SYSPARAM(1)]);
DRAWNUMBER(BARPOS=SYSPARAM(1)-2,HC[SYSPARAM(1)],HC[SYSPARAM(1)],2),COLORAFFF,PXUP20;
PARTLINE(BARPOS>=SYSPARAM(1)-30,LL[SYSPARAM(1)]);
DRAWNUMBER(BARPOS=SYSPARAM(1)-2,LL[SYSPARAM(1)],LL[SYSPARAM(1)],2),COLORFF00,PXUP20;