tdx顶级自动画线公式可以叠加任何通达信主图

tdx顶级自动画线公式可以叠加任何通达信主图源码-----

A1:=REF(H,8)=HHV(H,2*8+1);

B1:=FILTER(A1,8);

C1:=BACKSET(B1,8+1);

D1:=FILTER(C1,8);{高点}

R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);

S11:=R11>REF(R11,1);

DRAWLINE(D1,H,S11,H,1),COLORBLUE;

A2:=REF(L,8)=LLV(L,2*8+1);

B2:=FILTER(A2,8);

C2:=BACKSET(B2,8+1);

D2:=FILTER(C2,8);{低点}

T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1); U11:=T11>REF(T11,1);

DRAWLINE(D2,L,U11,L,1),COLORBLUE;

M:=INTPART(3*8/5);

A12:=REF(H,M)=HHV(H,2*M+1);

B12:=FILTER(A12,M);

C12:=BACKSET(B12,M+1);

D12:=FILTER(C12,M);{高点}

R112:=BACKSET(ISLASTBAR,BARSLAST(D12)+1); S112:=R112>REF(R112,1);

DRAWLINE(D12,H,S112,H,1),COLORRED;

A22:=REF(L,M)=LLV(L,2*M+1);

B22:=FILTER(A22,M);

C22:=BACKSET(B22,M+1);

D22:=FILTER(C22,M);{低点}

T112:=BACKSET(ISLASTBAR,BARSLAST(D22)+1); U112:=T112>REF(T112,1);

DRAWLINE(D22,L,U112,L,1),COLORRED;

V AR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);

V AR2222:=CROSS(V AR1111,0.9);

V AR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);

V AR4444:=CROSS(V AR3333,0.9);

压力:= REF(HIGH,BARSLAST(V AR2222));

STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2222)),RE F(HIGH,BARSLAST(V AR2222)),0.5,1),COLOREA91B5,LIN ETHICK3;

支撑:= REF(LOW,BARSLAST(V AR4444));

STICKLINE(CLOSE,REF(LOW,BARSLAST(V AR4444)),REF (LOW,BARSLAST(V AR4444)),0.5,1),COLOR00B4FF,LINET HICK3;

下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);

RRRSV:=SMA(下档线,3,1);

KKK:=SMA(RRRSV,3,1);

DDD:=((3 * RRRSV) - (2 * KKK));

JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) -

LLV(LOW,55))) * 100);

RSV24:=SMA(JJ12,3,1);

K24:=SMA(RSV24,3,1);

D24:=((3 * RSV24) - (2 * K24));

压力

2:=IF(CROSS(D24,DDD),HIGH,REF(HIGH,BARSLAST(CRO SS(D24,DDD)))),COLORFFFFFF;

压力位:=IF(ISLASTBAR,压力2,DRAWNULL);

STICKLINE(ISLASTBAR ,压力位,压力

位,120,0),LINETHICK4,COLORFFFFFF;

底部:=LLV(HIGH,30),COLOR00FF00;

底部位:=IF(ISLASTBAR,底部,DRAWNULL);

STICKLINE(ISLASTBAR ,底部位,底部

位,100,0),LINETHICK4,COLOR00FF00;