通达信短线支撑压力源码

DRAWLINE(H>REF(H,1),HIGH,L<REF(L,1),L,0),COLORGREEN;
 DRAWLINE(L<REF(L,1),LOW,H>REF(H,1),H,0),COLORRED;
 N:=5;
 TY:=H; 

 AA:=REF(TY,N)=HHV(TY,2*N+1);
 BB:=FILTER(AA,N);
 CC:=BACKSET(BB,N+1);
 HD10:=FILTER(CC,N);
 AA1:=REF(TY,N)=LLV(TY,2*N+1);
 BB1:=FILTER(AA1,N);
 CC1:=BACKSET(BB1,N+1);
 LD10:=FILTER(CC1,N);
 A:=REF(H,BARSLAST(HD10));
 B:=REF(L,BARSLAST(LD10));

T10:=BARSLAST(HD10) AND BARSLAST(LD10) AND NOT(LD10);
 STICKLINE(T10,A,A,9,0),COLORRED,LINETHICK2;
 STICKLINE(T10,B,B,9,0),COLORGREEN,LINETHICK2;