|
TDXSTEP619:DRAWGBK(OPEN>CLOSE,RGB(30,30,62),RGB(0,0,0),0,1,0);
W:=CONST(HHV(HIGH,23));
D:=CONST(LLV(LOW,23));
N1:=CONST(HHVBARS(HIGH,23)+1);
N2:=CONST(LLVBARS(LOW,23)+1);
WA:=BACKSET(CURRBARSCOUNT=1,N1);
DA:=BACKSET(CURRBARSCOUNT=1,N2);
TQ1:=FILTER(WA,N1+1);
TQ2:=FILTER(DA,N2+1);
TDXSTEP620:STICKLINE(TQ1,W,D,0,(-1)),COLOR00AA00;
TDXSTEP621:STICKLINE(TQ2,W,D,0,(-1)),COLOR0000AA;
P前:=IF(N1>N2,N1,N2);
P后:=IF(N1>N2,N2,N1);
TDXSTEP622:IF(CURRBARSCOUNT<=P前,W,DRAWNULL),DOTLINE,COLORWHITE;
TDXSTEP623:IF(CURRBARSCOUNT<=P前,D,DRAWNULL),DOTLINE,COLORWHITE;
A1:=REF(HIGH,4)=HHV(HIGH,13);
B1:=FILTER(A1,4);
C1:=BACKSET(B1,5);
D1:=FILTER(C1,4);
A2:=REF(LOW,4)=LLV(LOW,13);
B2:=FILTER(A2,4);
C2:=BACKSET(B2,5);
D2:=FILTER(C2,4);
E1:=(REF(LLV(LOW,8),1)+REF(HHV(HIGH,8),1))/2;
E2:=(HIGH+LOW)/2;
H1:=D1 AND NOT(D2 AND E1>=E2) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
L1:=D2 AND NOT(D1 AND E1<E2);
H2:=D1 AND NOT(D2 AND E1>=E2);
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,2);
LD:=I1>REF(I1,1);
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,2);
HD:=I2>REF(I2,1);
R1:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
S1:=R1>REF(R1,1);
T1:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
U1:=T1>REF(T1,1);
R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2);
S2:=R2>REF(R2,1);
T2:=BACKSET(U1,REF(BARSLAST(LD),1)+2);
U2:=T2>REF(T2,1);
抛:DRAWLINE(S2,HIGH,S1,HIGH,1),COLORFF8000,LINETHICK2;
买:DRAWLINE(U2,LOW,U1,LOW,1),COLORMAGENTA,LINETHICK2;
线:MA(CLOSE,23),COLORGREEN;
TDXSTEP624:DRAWICON(S2,HIGH*1.01,24);
TDXSTEP625:DRAWICON(S1,HIGH*1.01,24);
TDXSTEP626:DRAWICON(U1,LOW*0.99,17);
TDXSTEP627:DRAWICON(U2,LOW*0.99,17);
TDXSTEP628:DRAWNUMBER(S2,HIGH*1.02,HIGH),COLORMAGENTA;
TDXSTEP629:DRAWNUMBER(S1,HIGH*1.02,HIGH),COLORMAGENTA;
TDXSTEP630:DRAWNUMBER(U1,LOW*0.98,LOW),COLORCYAN;
TDXSTEP631:DRAWNUMBER(U2,LOW*0.98,LOW),COLORCYAN;
TDXSTEP632:STICKLINE(CLOSE>=MA(CLOSE,23),CLOSE,OPEN,2,0),COLOR1D0C32;
TDXSTEP633:STICKLINE(CLOSE>=MA(CLOSE,23),CLOSE,OPEN,1.5,0),COLOR321456;
TDXSTEP634:STICKLINE(CLOSE>=MA(CLOSE,23),CLOSE,OPEN,1,0),COLOR4E2086;
TDXSTEP635:STICKLINE(CLOSE>=MA(CLOSE,23),CLOSE,OPEN,0.5,0),COLOR6D2EBC;
TDXSTEP636:STICKLINE(CLOSE>=MA(CLOSE,23),LOW,HIGH,0,0),COLOR6D2EBC;
TDXSTEP637:STICKLINE(CLOSE<MA(CLOSE,23),CLOSE,OPEN,2,0),COLOR0B2620;
TDXSTEP638:STICKLINE(CLOSE<MA(CLOSE,23),CLOSE,OPEN,1.5,0),COLOR164E41;
TDXSTEP639:STICKLINE(CLOSE<MA(CLOSE,23),CLOSE,OPEN,0.1,0),COLOR247D69;
TDXSTEP640:STICKLINE(CLOSE<MA(CLOSE,23),CLOSE,OPEN,0.5,0),COLOR2D9D84;
TDXSTEP641:STICKLINE(CLOSE<MA(CLOSE,23),LOW,HIGH,0,0),COLOR2D9D84;
TDXSTEP642:IF(线>REF(线,1),线,DRAWNULL),CIRCLEDOT,COLORYELLOW,LINETHICK2;
|
