通达信主图划线趋势压力指标

N:=14;

A6A:=REF(HIGH,6)=HHV(HIGH,2*6+1);

B6A:=FILTER(A6A,6);

C6A:=BACKSET(B6A,6+1);

D6A:=FILTER(C6A,6);

A7A:=REF(LOW,6)=LLV(LOW,2*6+1);

B7A:=FILTER(A7A,6);

C7A:=BACKSET(B7A,6+1);

D7A:=FILTER(C7A,6);

E6A:=(REF(LLV(LOW,2*6),1)+REF(HHV(HIGH,2*6),1))/2;

E7A:=(HIGH+LOW)/2;

H6A:=(D6A AND NOT(D7A AND E6A >=E7A)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;

H7A:=D6A AND NOT(D7A AND E6A >=E7A);

L6A:=D7A AND NOT(D6A AND E6A=E7A);

X6A:=REF(BARSLAST(H6A),1)+1;

F6A:=BACKSET(H6A AND COUNT(L6A,X6A) > 0,LLVBARS(IF(L6A,LOW,10000),X6A));

G6A:=F6A > REF(F6A,1);

I6A:=BACKSET(G6A,2);

LD2A:=I6A > REF(I6A,1);

L7A:=LD2A OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;

X7A:=REF(BARSLAST(L7A),1)+1;

F7A:=BACKSET(L7A AND COUNT(H7A,X7A) > 0,HHVBARS(IF(H7A,HIGH,0),X7A));

G7A:=F7A > REF(F7A,1);

I7A:=BACKSET(G7A,2);

HD2A:=I7A > REF(I7A,1);

UU3A:=BACKSET(BARSTATUS=2,BARSLAST(LD2A)+1);

VV3A:=UU3A > REF(UU3A,1);

WW3A:=BACKSET(VV3A,REF(BARSLAST(LD2A),1)+2);

VA3A:=WW3A > REF(WW3A,1);

UU4A:=BACKSET(BARSTATUS=2,BARSLAST(HD2A)+1);

VV4A:=UU4A > REF(UU4A,1);

WW4A:=BACKSET(VV4A,REF(BARSLAST(HD2A),1)+2);

VA4A:=WW4A > REF(WW4A,1);

A6B:=REF(HIGH,3)=HHV(HIGH,2*3+1);

B6B:=FILTER(A6B,3);

C6B:=BACKSET(B6B,3+1);

D6B:=FILTER(C6B,3);

A7B:=REF(LOW,3)=LLV(LOW,2*3+1);

B7B:=FILTER(A7B,3);

C7B:=BACKSET(B7B,3+1);

D7B:=FILTER(C7B,3);

E6B:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;

E7B:=(HIGH+LOW)/2;

H6B:=(D6B AND NOT(D7B AND E6B >=E7B)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;

H7B:=D6B AND NOT(D7B AND E6B >=E7B);

L6B:=D7B AND NOT(D6B AND E6B=E7B);

X6B:=REF(BARSLAST(H6B),1)+1;

F6B:=BACKSET(H6B AND COUNT(L6B,X6B) > 0,LLVBARS(IF(L6B,LOW,10000),X6B));

G6B:=F6B > REF(F6B,1);

I6B:=BACKSET(G6B,2);

LD2B:=I6B > REF(I6B,1);

L7B:=LD2B OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;

X7B:=REF(BARSLAST(L7B),1)+1;

F7B:=BACKSET(L7B AND COUNT(H7B,X7B) > 0,HHVBARS(IF(H7B,HIGH,0),X7B));

G7B:=F7B > REF(F7B,1);

I7B:=BACKSET(G7B,2);

HD2B:=I7B > REF(I7B,1);

UU3B:=BACKSET(BARSTATUS=2,BARSLAST(LD2B)+1);

VV3B:=UU3B > REF(UU3B,1);

WW3B:=BACKSET(VV3B,REF(BARSLAST(LD2B),1)+2);

VA3B:=WW3B > REF(WW3B,1);

UU4B:=BACKSET(BARSTATUS=2,BARSLAST(HD2B)+1);

VV4B:=UU4B > REF(UU4B,1);

WW4B:=BACKSET(VV4B,REF(BARSLAST(HD2B),1)+2);

VA4B:=WW4B > REF(WW4B,1);

A6E:=REF(HIGH,13)=HHV(HIGH,2*13+1);

B6E:=FILTER(A6E,13);

C6E:=BACKSET(B6E,13+1);

D6E:=FILTER(C6E,13);

A7E:=REF(LOW,13)=LLV(LOW,2*13+1);

B7E:=FILTER(A7E,13);

C7E:=BACKSET(B7E,13+1);

D7E:=FILTER(C7E,13);

E6E:=(REF(LLV(LOW,2*13),1)+REF(HHV(HIGH,2*13),1))/2;

E7E:=(HIGH+LOW)/2;

H6E:=(D6E AND NOT(D7E AND E6E >=E7E)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;

H7E:=D6E AND NOT(D7E AND E6E >=E7E);

L6E:=D7E AND NOT(D6E AND E6E=E7E);

X6E:=REF(BARSLAST(H6E),1)+1;

F6E:=BACKSET(H6E AND COUNT(L6E,X6E) > 0,LLVBARS(IF(L6E,LOW,10000),X6E));

G6E:=F6E > REF(F6E,1);

I6E:=BACKSET(G6E,2);

LD2E:=I6E > REF(I6E,1);

L7E:=LD2E OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;

X7E:=REF(BARSLAST(L7E),1)+1;

F7E:=BACKSET(L7E AND COUNT(H7E,X7E) > 0,HHVBARS(IF(H7E,HIGH,0),X7E));

G7E:=F7E > REF(F7E,1);

I7E:=BACKSET(G7E,2);

HD2E:=I7E > REF(I7E,1);

UU3E:=BACKSET(BARSTATUS=2,BARSLAST(LD2E)+1);

VV3E:=UU3E > REF(UU3E,1);

WW3E:=BACKSET(VV3E,REF(BARSLAST(LD2E),1)+2);

VA3E:=WW3E > REF(WW3E,1);

UU4E:=BACKSET(BARSTATUS=2,BARSLAST(HD2E)+1);

VV4E:=UU4E > REF(UU4E,1);

WW4E:=BACKSET(VV4E,REF(BARSLAST(HD2E),1)+2);

VA4E:=WW4E > REF(WW4E,1);

AW1:=REF(H,N)=HHV(H,2*N+1);

BW1:=FILTER(AW1,N);

CW1:=BACKSET(BW1,N+1);

DW1:=FILTER(CW1,N);

AW2:=REF(L,N)=LLV(L,2*N+1);

BW2:=FILTER(AW2,N);

CW2:=BACKSET(BW2,N+1);

DW2:=FILTER(CW2,N);

EW1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2;

EW2:=(H+L)/2;

HW1:=(DW1 AND NOT(DW2 AND EW1 >=EW2)) OR BARSTATUS=2 OR BARSCOUNT(C)=1;

LW1:=(DW2 AND NOT(DW1 AND EW1 < EW2));

HW2:=DW1 AND NOT(DW2 AND EW1 >=EW2);

XW1:=REF(BARSLAST(HW1),1)+1;

FW1:=BACKSET(HW1 AND COUNT(LW1,XW1) > 0,LLVBARS(IF(LW1,L,10000),XW1));

GW1:=FW1 > REF(FW1,1);

IW1:=BACKSET(GW1,2);

LDW:=IW1 > REF(IW1,1);

LW2:=LDW OR BARSTATUS=2 OR BARSCOUNT(C)=1;

XW2:=REF(BARSLAST(LW2),1)+1;

FW2:=BACKSET(LW2 AND COUNT(HW2,XW2) > 0,HHVBARS(IF(HW2,H,0),XW2));

GW2:=FW2 > REF(FW2,1);

IW2:=BACKSET(GW2,2);

HDW:=IW2 > REF(IW2,1);

RW1:=BACKSET(BARSTATUS=2,BARSLAST(HDW)+1);

SW1:=RW1 > REF(RW1,1);

TW1:=BACKSET(BARSTATUS=2,BARSLAST(LDW)+1);

UW1:=TW1 > REF(TW1,1);

RW2:=BACKSET(SW1,REF(BARSLAST(HDW),1)+2);

SW2:=RW2 > REF(RW2,1);

TW2:=BACKSET(UW1,REF(BARSLAST(LDW),1)+2);

UW2:=TW2 > REF(TW2,1);

RW3:=BACKSET(SW2,REF(BARSLAST(HDW),1)+2);

SW3:=RW3 > REF(RW3,1);

TW3:=BACKSET(UW2,REF(BARSLAST(LDW),1)+2);

UW3:=TW3 > REF(TW3,1);

RW4:=BACKSET(SW3,REF(BARSLAST(HDW),1)+2);

SW4:=RW4 > REF(RW4,1);

TW4:=BACKSET(UW3,REF(BARSLAST(LDW),1)+2);

UW4:=TW4 > REF(TW4,1);

RW5:=BACKSET(SW4,REF(BARSLAST(HDW),1)+2);

SW5:=RW5 > REF(RW5,1);

TW5:=BACKSET(UW4,REF(BARSLAST(LDW),1)+2);

UW5:=TW5 > REF(TW5,1);

RW6:=BACKSET(SW5,REF(BARSLAST(HDW),1)+2);

DRAWLINE(VA3A,L,VV3A,L,1),COLOR800040;

DRAWLINE(VA4A,H,VV4A,H,1),COLOR800040;

DRAWLINE(VA3B,L,VV3B,L,1),COLOR009090;

DRAWLINE(VA4B,H,VV4B,H,1),COLOR888888;

DRAWLINE(VA3E,L,VV3E,L,1),COLORRED;

DRAWLINE(VA4E,H,VV4E,H,1),COLORGREEN;