通达信龙凤呈祥副图/选股指标 源码

A1X:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))
/(HHV(H,55)-LLV(L,55))*100,5,1);
潘金莲:=EMA(A1X,5),LINETHICK2,COLOR6600FF;
A2X:=(潘金莲-REF(潘金莲,1))/REF(潘金莲,1)*100;
A3X:=EMA(C,5);
A4X:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
王婆牵线:=(MA(3*SMA(A4X,6,1)-2*SMA(SMA(A4X,5,1),5,1),2)),LINETHICK2,COLORYELLOW;
A5X:=(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60))*100;
机会来临:=REF(IF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,30,0),1)
,COLORF00FF0,LINETHICK2;
A1:="KD.K#DAY"(9,3,3);
A2:="KD.D#DAY"(9,3,3);
AA1:=(A1+A2)/2;
A3:="KD.K#WEEK"(9,3,3);
A4:="KD.D#WEEK"(9,3,3);
A5:="KD.K#MONTH"(9,3,3);
A6:="KD.D#MONTH"(9,3,3);
A7:="KDJ.J#WEEK"(9,3,3);
A8:="KD.K"(9,3,3);
A9:="KD.D"(9,3,3);
STICKLINE( A1>A2,2 ,2.5 ,5 ,0 ),COLORLIRED;
STICKLINE( A1<A2,2 ,3 ,5 ,0 ),COLORBLACK;
STICKLINE( A3>A4,2 ,0.5 ,5 ,0 ),COLORGRAY;
STICKLINE( C>0,0.5 ,0.5 ,5 ,0 ),COLOR555555;
STICKLINE( C>0,2 ,2,10 ,0 ),COLOR555555;
K:=A8*3/120;
D:=A9*3/120;
J:=A7*3/120;
AA2:=AA1*3/120;
DRAWBAND(A3*3/120,RGB(250,00,300),A4*3/120,RGB(00,250,300));
STICKLINE(K>D,K,D,5,1),COLORRED;
STICKLINE(K<=D,K,D,5,1),COLORLIGREEN;
OK:=REF(CLOSE,1);
鱼:=SMA(MAX(CLOSE-OK,0),7,1)/SMA(ABS(CLOSE-OK),7,1)*100;
RSI4:=SMA(鱼,7,1);
HH:=BARSLAST(鱼<=15)<5;
白绿线:=SMA(鱼,7,1);
深水鱼:=CROSS(鱼,RSI4) AND 白绿线>15 AND HH;{15}
BU:=深水鱼;
BB2:=IF(C>REF((6*H+5*REF(H,1)+4*REF(H,2)+3*REF(H,3)+2*REF(H,4)+1*REF(H,5))/(6+5+4+3+2+1)
,1),1,IF(C<REF((6*L+5*REF(L,1)+4*REF(L,2)+3*REF(L,3)+2*REF(L,4)+1*REF(L,5))/(6+5+4+3+2+1)
,1),-1,0));
DD2:=BARSLAST(NOT(BB2=0));
BF:=IF(BB2=0,REF(BB2,DD2),BB2);
鱼跃龙门:BU,NODRAW,COLORRED;
止损:C<REF(O,BARSLAST(BU>0)) AND COUNT(C<REF(O,BARSLAST(BU>0)),BARSLAST(BU>0))
=1 AND IF(MA(CLOSE,1)>IF(BF=-1,MA(HIGH,1.01),MA(LOW,1.01)) ,1,-1)>0,NODRAW, COLORGREEN;{6}
区间:=COUNT(BU,BARSLAST(BU)+1)=1 AND COUNT(止损,BARSLAST(BU>0)+1)
=0 AND COUNT(CROSS(0,IF(MA(CLOSE,1)>IF(BF=-1,MA(HIGH,1.01),MA(LOW,1.01))
,1,-1)), BARSLAST(BU>0)+1)=0,NODRAW,COLORLIMAGENTA;{COLOR696960;6}
鱼进龙门:(COUNT(BU,BARSLAST(BU)+1)=1 AND COUNT(止损,BARSLAST(BU>0)+1)
=0 AND COUNT(CROSS(0,IF(MA(CLOSE,1)>IF(BF=-1,MA(HIGH,1.01),MA(LOW,1.01)) ,1,-1)), BARSLAST(BU>0)
+1)=1 AND CROSS(0,IF(MA(CLOSE,1)>IF(BF=-1,MA(HIGH,1.01),MA(LOW,1.01)) ,1,-1)))
OR 止损,NODRAW;
STICKLINE(鱼进龙门>0,0,4,3,0),COLORYELLOW;
DRAWTEXT(鱼进龙门,3.77,'←鱼跃龙门'),COLORMAGENTA;
RSVP:=(C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*20-20;
KV:=SMA(RSVP,3,1);
DV:=SMA(KV,3,1);
JV:=3*KV-2*DV;
ZDZK1:=EMA(JV,6);
ZDZK2:=REF(ZDZK1,1);
凤:=IF(ZDZK1>=ZDZK2,ZDZK1+2,ZDZK2);
雉:=IF(ZDZK2-ZDZK1,ZDZK2,ZDZK1);
MTM:=C-REF(C,1);
龙:=30*EMA(EMA(MTM,50),50)/EMA(EMA(ABS(MTM),61),61);
凰:=MA(龙,6);
龙凤呈祥:=CROSS(凰<龙,0.13) AND 龙>凤 AND 凤>雉;
STICKLINE(龙凤呈祥,3,0,1,0),COLORWHITE;
DRAWTEXT(龙凤呈祥,3.02,' 龙凤呈祥'),COLORWHITE;
AA:=HHV(HIGH,25)-LLV(LOW,25);BB:=CLOSE-LLV(LOW,25);
CC:=AA/EMA(BB,5);
DD:=EMA(BB/AA*100,5);
EE:=CLOSE-LLV(LOW,10);
FF:=HHV(HIGH,25)-LLV(LOW,10);
王婆:=COUNT(CROSS(CC,DD),7)>0 AND REF(CC,2)<REF(CC,1) AND CC<REF(CC,1)
AND COUNT(COUNT(CROSS(CC,DD),7)>0 AND REF(CC,2)<REF(CC,1)
AND CC<REF(CC,1),5)=1 OR CROSS(EMA(EE/FF*4,4),0.3);
WVAR1V:=REF(CLOSE,1);
WVAR2V:=SMA(MAX(CLOSE-WVAR1V,0),7,1)/SMA(ABS(CLOSE-WVAR1V),7,1)*100;
X1:=FILTER(REF(WVAR2V,1)<20 AND WVAR2V>REF(WVAR2V,1),5);
BIAS1:=(C-MA(C,6))/MA(C,6)*100;
BIAS2:=(C-MA(C,12))/MA(C,12)*100;
BIAS3:=(C-MA(C,24))/MA(C,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
乖离:=MA(BIAS,3);
X2:=CROSS(BIAS,乖离) AND 乖离<-9.5;
偷偷约会:=X1 OR X2;
VAR1V:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR2V:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VAR3V:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
VAR4V:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VAR5V:=(VAR2V+2*VAR3V+3*VAR4V)/7;
VAR6V:=MA(VAR5V,1);
西门赴约:=VAR6V<=-8;
武大出摊:王婆 AND 偷偷约会 AND 西门赴约,COLORRED,NODRAW;
{STICKLINE(C>0,1.25,1.25,3,0),COLORYELLOW;{COLOR555555;}
STICKLINE(鱼跃龙门>0,0,3.8,4,0),COLORRED;{红色柱}
DRAWTEXT(鱼跃龙门,3.5,'★有鱼徘徊'),COLORYELLOW;
STICKLINE(CROSS(王婆牵线,0)AND 潘金莲<40,0,2.8,1,0),COLORGREEN;
STICKLINE(EXIST(机会来临,7) AND CROSS(A1X,潘金莲)AND 潘金莲<A5X AND 潘金莲<15,0,3,1,0)
,COLORBROWN;
DRAWTEXT(EXIST(机会来临,7) AND CROSS(A1X,潘金莲)AND 潘金莲<A5X AND 潘金莲<15,2.7,'←寂 寞 难 耐')
,COLORCYAN;
STICKLINE(武大出摊,2.08,0,4,0),COLORCYAN;{COLOR007FFF;}
DRAWTEXT(武大出摊,1.8,' ---最低买点'),COLORCYAN;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
虾将:=IF(CROSS(RSI,11),2,0),COLORWHITE,POINTDOT;
蟹兵:=STICKLINE(虾将,1.8,0,2,0),COLORWHITE;
STICKLINE(虾将,1.8,0,2,0),COLORWHITE;
DRAWTEXT(蟹兵,1.8,' ---蟹兵'),COLORYELLOW;
VAR7:=EMA(AMOUNT/VOL/100,3);
VAR8:=EMA(VAR7,88);
VAR9:=EMA(VAR7,88)*0.85;
VARA:=VAR9*0.87;
VARB:=LOW<VARA AND CLOSE>REF(CLOSE,1)*1.02;
白龙马:=STICKLINE(FILTER(VARB,6),2,0,2,0),COLORLIBLUE;
STICKLINE(FILTER(VARB,6),2,0,2,0),COLORLIBLUE;
DRAWTEXT(白龙马,1.6,' ---白龙马'),COLORWHITE;
VARF:=(2*CLOSE+HIGH+LOW)/4;
VA4:=LLV(LOW,34);
VA5:=HHV(HIGH,34);
VA6:=EMA((VARF-VA4)/(VA5-VA4)*100,6);
VA7:=EMA(0.667*REF(VA6,1)+0.333*VA6,4);
凤尾鱼:=STICKLINE(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>0.3 AND COUNT(VA6>VA7,3) AND
REF(LOW,1)=LLV(LOW,120) AND CLOSE>OPEN,1,0),1.5,0,3,0),COLORBLUE;
STICKLINE(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>0.3 AND COUNT(VA6>VA7,3) AND
REF(LOW,1)=LLV(LOW,120) AND CLOSE>OPEN,1,0),1.5,0,6,0),COLORBLUE;
DRAWTEXT(凤尾鱼,1.3,' ---定海神针'),COLORYELLOW;
DRAWTEXT(CROSS(王婆牵线,0)AND 潘金莲<40,2.3,'--凤尾鱼'),COLORWHITE;


龙凤呈祥选股公式源码：
RSVP:=(C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*20-20;
KV:=SMA(RSVP,3,1);
DV:=SMA(KV,3,1);
JV:=3*KV-2*DV;
ZDZK1:=EMA(JV,6);
ZDZK2:=REF(ZDZK1,1);
凤:=IF(ZDZK1>=ZDZK2,ZDZK1+2,ZDZK2);
雉:=IF(ZDZK2-ZDZK1,ZDZK2,ZDZK1);
MTM:=C-REF(C,1);
龙:=30*EMA(EMA(MTM,50),50)/EMA(EMA(ABS(MTM),61),61);
凰:=MA(龙,6);
龙凤呈祥:CROSS(凰<龙,0.13) AND 龙>凤 AND 凤>雉;