通达信拈天绝技主图指标 源码 贴图

DRAWTEXT_FIX(1,0.06,0,0,DYBLOCK),COLORRED;
DRAWTEXT_FIX(1,0.12,0,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.005,0.05,0,'所属概念:'),COLORFF86FF;
DRAWTEXT_FIX(1,0.06,0.05,0,GNBLOCK);
DRAWTEXT_FIX(1,0.005,0.1,0,'所属风格:'),COLORGREEN;
DRAWTEXT_FIX(1,0.06,0.1,0,FGBLOCK),COLORGREEN;
MA5:MA(CLOSE,5),COLOR00FFFF;
JJ:=(CLOSE+HIGH+LOW)/3;
多空线:EMA(JJ,10),COLORRED,LINETHICK3;
IF(多空线<REF(多空线,1),多空线,DRAWNULL),COLOR08FF16,LINETHICK3;
{公式网WWW.GPXIAZAI.COM}
MA20:MA(CLOSE,20),COLORFFFF80,LINETHICK1;
MA120:MA(CLOSE,120),COLORFF00FF;
GQ := LOW>REF(HIGH,1);
DQR := DATE-1000000;
SV := -1;
EV := IF(WEEKDAY=1,3,2);
YGS := FINVALUE(285);
YGX := FINVALUE(286);
YGZ := (YGS+YGX)/2;
YGR := FINVALUE(313);
YGRC := (DQR-YGR>SV) AND (DQR-YGR<EV);
YGDC := (YGZ>0) AND GQ AND YGRC;
BJLR := FINVALUE(287);
KBRQ := FINVALUE(315);
KBRQC := (DQR-KBRQ>SV) AND (DQR-KBRQ<EV);
KBDC := (BJLR>0) AND GQ AND KBRQC;
CBJLR := FINVALUE(95);
EPSRATE := FINVALUE(184);
CBRQ := FINVALUE(314);
CBRQC := (DQR-CBRQ>SV) AND (DQR-CBRQ<EV);
CBDC := CBJLR > 0 AND EPSRATE > 0 AND GQ AND CBRQC;
ZJRQDC := YGDC OR KBDC OR CBDC;
ZDRQ1 := 1;
YGS1 := FINONE(285,0,ZDRQ1);
YGX1 := FINONE(286,0,ZDRQ1);
YGZ1 := (YGS1+YGX1)/2;
YGRQ1 := FINONE(313,0,ZDRQ1);
YGRQC1 := (DQR-YGRQ1>SV) AND (DQR-YGRQ1<EV);
YGDC1 := (YGZ1>0) AND GQ AND YGRQC1;
KBJL1 := FINONE(287,0,ZDRQ1);
KBRQ1 := FINONE(315,0,ZDRQ1);
KBRQC1 := (DQR-KBRQ1>SV) AND (DQR-KBRQ1<EV);
KBDC1 := (KBJL1>0) AND GQ AND KBRQC1;
CBJL1 := FINONE(95,0,ZDRQ1);
指EPSRATE1 := FINONE(184,0,ZDRQ1);
CBRQ1 := FINONE(314,0,ZDRQ1);
CBRQC1 := (DQR-CBRQ1>SV) AND (DQR-CBRQ1<EV);
CBDC1 := CBJL1 > 0 AND 指EPSRATE1 > 0 AND GQ AND CBRQC1;
ZDRQDC1 := YGDC1 OR KBDC1 OR CBDC1;
ZDRQ2 := 2;
YGS2 := FINONE(285,0,ZDRQ2);
YGX2 := FINONE(286,0,ZDRQ2);
YGZ2 := (YGS2+YGX2)/2;
YGRQ2 := FINONE(313,0,ZDRQ2);
YGRQC2 := (DQR-YGRQ2>SV) AND (DQR-YGRQ2<EV);
YGDC2 := (YGZ2>0) AND GQ AND YGRQC2;
KBJL2 := FINONE(287,0,ZDRQ2);
KBRQ2 := FINONE(315,0,ZDRQ2);
KBRQC2 := (DQR-KBRQ2>SV) AND (DQR-KBRQ2<EV);
KBDC2 := (KBJL2>0) AND GQ AND KBRQC2;
CBJL2 := FINONE(95,0,ZDRQ2);
指EPSRATE2 := FINONE(184,0,ZDRQ2);
CBRQ2 := FINONE(314,0,ZDRQ2);
CBRQC2 := (DQR-CBRQ2>SV) AND (DQR-CBRQ2<EV);
CBDC2 := CBJL2 > 0 AND 指EPSRATE2 > 0 AND GQ AND CBRQC2;
ZDRQDC2 := YGDC2 OR KBDC2 OR CBDC2;
ZDRQ3 := 3;
YGS3 := FINONE(285,0,ZDRQ3);
YGX3 := FINONE(286,0,ZDRQ3);
YGZ3 := (YGS3+YGX3)/2;
YGRQ3 := FINONE(313,0,ZDRQ3);
YGRQC3 := (DQR-YGRQ3>SV) AND (DQR-YGRQ3<EV);
YGDC3 := (YGZ3>0) AND GQ AND YGRQC3;
KBJL3 := FINONE(287,0,ZDRQ3);
KBRQ3 := FINONE(315,0,ZDRQ3);
KBRQC3 := (DQR-KBRQ3>SV) AND (DQR-KBRQ3<EV);
KBDC3 := (KBJL3>0) AND GQ AND KBRQC3;
CBJL3 := FINONE(95,0,ZDRQ3);
指EPSRATE3 := FINONE(184,0,ZDRQ3);
CBRQ3 := FINONE(314,0,ZDRQ3);
CBRQC3 := (DQR-CBRQ3>SV) AND (DQR-CBRQ3<EV);
CBDC3 := CBJL3 > 0 AND 指EPSRATE3 > 0 AND GQ AND CBRQC3;
ZDRQDC3 := YGDC3 OR KBDC3 OR CBDC3;
ZDRQ4 := 4;
YGS4 := FINONE(285,0,ZDRQ4);
YGX4 := FINONE(286,0,ZDRQ4);
YGZ4 := (YGS4+YGX4)/2;
YGRQ4 := FINONE(313,0,ZDRQ4);
YGRQC4 := (DQR-YGRQ4>SV) AND (DQR-YGRQ4<EV);
YGDC4 := (YGZ4>0) AND GQ AND YGRQC4;
KBJL4 := FINONE(287,0,ZDRQ4);
KBRQ4 := FINONE(315,0,ZDRQ4);
KBRQC4 := (DQR-KBRQ4>SV) AND (DQR-KBRQ4<EV);
KBDC4 := (KBJL4>0) AND GQ AND KBRQC4;
CBJL4 := FINONE(95,0,ZDRQ4);
指EPSRATE4 := FINONE(184,0,ZDRQ4);
CBRQ4 := FINONE(314,0,ZDRQ4);
CBRQC4 := (DQR-CBRQ4>SV) AND (DQR-CBRQ4<EV);
CBDC4 := CBJL4 > 0 AND 指EPSRATE4 > 0 AND GQ AND CBRQC4;
ZDRQDC4 := YGDC4 OR KBDC4 OR CBDC4;
TKQK :=ZJRQDC OR ZDRQDC1 OR ZDRQDC2 OR ZDRQDC3 OR ZDRQDC4;
DRAWICON(BARSSINCEN(TKQK,5)=0 ,L,11);
{公式网WWW.GPXIAZAI.COM}
PSY:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
PSYMA:=MA(PSY,5);

T1:=REF(TKQK,2) AND REF(L,1)>REF(H,3) AND L>REF(H,3);
R1:=BARSLAST(T1);
T2:=COUNT(T1,R1+1)>0 AND COUNT(L<=REF(H,R1+3),R1)=0 AND L<REF(L,R1+2)*1.05;
T3:=REF(TKQK,2) AND REF(L,1)>REF(H,2) AND L>REF(H,2);
R2:=BARSLAST(T3);
T4:=COUNT(T3,R2+1)>0 AND COUNT(L<=REF(H,R2+2),R2)=0 AND L<REF(L,R2+1)*1.03;
T5:=COUNT(T3,R2+1)>0 AND COUNT(L<=REF(H,R2+3),R2)=0 AND L<REF(L,R2+2)*1.05;
T6:=(T2 AND R1>=0 AND R1<125) OR ((T4 OR T5) AND R2>=0 AND R2<125);
T:=PSY<=50 AND C>多空线 AND (多空线>REF(多空线,1) OR MA20>REF(MA20,1)) AND C>O;
DRAWICON(T AND T6,L*0.985,9);
T7:=REF(TKQK,4) AND REF(L,3)>REF((H+L)/2,4) AND REF(L,2)>REF((H+L)/2,4) AND REF(L,1)>REF((H+L)/2,4) AND L>REF((H+L)/2,4);
R3:=BARSLAST(T7);
T8:=COUNT(T7,R3+3)>0 AND COUNT(L<REF((H+L)/2,R3+4),R3)=0 AND L<REF(H,R3+4) AND R3>0 AND R3<10;
DRAWICON(T AND T8,L*0.99,42);