通达信庆中秋1源码

以下是通达信庆中秋1源码

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;