通达信龙头日线未加密选股指标公式源码

通达信龙头日线未加密选股指标公式源码

源码正文：

N:=9{XG51};
P:=14{XG51};
M:=26{XG51};
个股涨幅:(C-REF(C,1))/REF(C,1)*100,COLORWHITE,NODRAW{XG51};
行业涨幅:(HY_INDEXC-REF(HY_INDEXC,1))/REF(HY_INDEXC,1)*100,COLORBLUE,NODRAW{XG51};
大盘涨幅:(INDEXC-REF(INDEXC,1))/REF(INDEXC,1)*100,COLORGREEN,NODRAW{XG51};
A1:=ma(LLV(C,N)*1.1,P){XG51};
A2:=MA(HHV(C,M)*0.9,P){XG51};
DPC:=INDEXC{XG51};
A3:=MA(LLV(DPC,N)*1.1,P){XG51};
A4:=MA(HHV(DPC,M)*0.9,P){XG51};
HYC:=HY_INDEXC{XG51};
A31:=MA(LLV(HYC,N)*1.1,P){XG51};
A41:=MA(HHV(HYC,M)*0.9,P){XG51};
A5:=(A1+A2)/2{XG51};
A6:=(A3+A4)/2{XG51};
A61:=(A31+A41)/2{XG51};
A71:=C-A5-A5*(A61-EXPMema(HYC,3))/A61{XG51};
A7:=C-A5-A5*(A6-EXPMEMA(DPC,3))/A6{XG51};
能量释放强大盘:=(A7>=0)*A7,COLORWHITE,NODRAW{XG51};
能量释放强行业:=(A71>=0)*A71,COLORBLUE,NODRAW{XG51};
LTP:=C*CAPITAL/100,{XG51};
ER:=vol/LTP{XG51};
A8:=ER<2 AND C>O AND C>MA(C,7) AND
MA(C,7)>MA(C,37) AND A7>-0.9 AND VOL>MA(VOL,5){XG51};
STICKLINE((A71>=0)*A71,(A7>=0)*A7*1.4,0,2,-1)COLORBLUE{XG51};
STICKLINE((A71<0)*A71,(A7<0)*A7*1.4,0,2,-1)COLORGREEN{XG51};
STICKLINE((A7<0)*A7,0,(A7<0)*A7*1.2,3,0),COLOR779900{XG51};
STICKLINE((A7<0)*A7,0,(A7<0)*A7*1.2,2.2,0),COLOR77BB00{XG51};
STICKLINE((A7<0)*A7,0,(A7<0)*A7*1.2,1.5,0),COLOR77DD00{XG51};
STICKLINE((A7<0)*A7,0,(A7<0)*A7*1.2,0.5,0),COLOR77FF00{XG51};
STICKLINE((A7>=0)*A7,0,(A7>=0)*A7*1.2,3,0)COLOR000099{XG51};
STICKLINE((A7>=0)*A7,0,(A7>=0)*A7*1.2,2.2,0),COLOR0000BB{XG51};
STICKLINE((A7>=0)*A7,0,(A7>=0)*A7*1.2,1.5,0),COLOR0000DD{XG51};
STICKLINE((A7>=0)*A7,0,(A7>=0)*A7*1.2,0.5,0),COLOR0000FF{XG51};
DRAwrECTREL(487,5,999,999,0){XG51};
DRAWRECTREL(1,5,487,999,RGB(0,0,51)){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.85,0,STRCAT(STRCAT('【情绪共振】 ',CON2STR(DRAWNULL,0)),' ')),COLORRED{XG51};
DRAWTEXT_FIX(ISLASTBAR AND 个股涨幅>=行业涨幅,0.25,0.85,1,STRCAT(STRCAT(' 个股强 ',CON2STR(DRAWNULL,0)),' ')),COLORWHITE{XG51};
DRAWTEXT_FIX(ISLASTBAR AND 个股涨幅<行业涨幅,0.25,0.85,1,STRCAT(STRCAT(' 个股弱 ',CON2STR(DRAWNULL,0)),' ')),COLORGREEN{XG51};
DRAWTEXT_FIX(ISLASTBAR AND 大盘涨幅<=行业涨幅,0.35,0.85,1,STRCAT(STRCAT(' 行业强 ',CON2STR(DRAWNULL,0)),' ')),COLORWHITE{XG51};
DRAWTEXT_FIX(ISLASTBAR AND 大盘涨幅>行业涨幅,0.35,0.85,1,STRCAT(STRCAT(' 行业弱 ',CON2STR(DRAWNULL,0)),' ')),COLORGREEN{XG51};
DRAWTEXT_FIX(ISLASTBAR AND REF(大盘涨幅,1)<=大盘涨幅,0.45,0.85,1,STRCAT(STRCAT(' 大盘强 ',CON2STR(DRAWNULL,0)),' ')),COLORWHITE{XG51};
DRAWTEXT_FIX(ISLASTBAR AND REF(大盘涨幅,1)>大盘涨幅,0.45,0.85,1,STRCAT(STRCAT(' 大盘弱 ',CON2STR(DRAWNULL,0)),' ')),COLORGREEN{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.75,0,STRCAT(STRCAT('【量能基因】今日量',CON2STR(V/10000,2)),'万')),COLORRED{XG51};
G今量比昨量:=V/REF(V,1){XG51};
D今量比昨量:=INDEXV/REF(INDEXV,1){XG51};
H今量比昨量:=HY_INDEXV/REF(HY_INDEXV,1){XG51};
JLZL1:=STRCAT('个股比昨: ',CON2STR(G今量比昨量,2)){XG51};
JLZL2:=STRCAT(' 行业比昨: ',CON2STR(H今量比昨量,2)){XG51};
JLZL3:=STRCAT(' 大盘比昨: ',CON2STR(D今量比昨量,2)){XG51};
ZTTJ0:=STRCAT(JLZL1,JLZL2){XG51};
ZTTJ1:=STRCAT(ZTTJ0,JLZL3){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.19,0.75,0,ZTTJ1),COLORBLUE{XG51};
换手率％:=VOL/((FINANCE(7)-FINVALUE(244))/100)*100,NODRAW{XG51};
温和活跃:=IF(CAPITAL<500000,换手率％<7,IF(CAPITAL>=500000 AND CAPITAL<1000000,换手率％<5,
IF(CAPITAL>=1000000 AND CAPITAL<10000000,换手率％<3,
IF(CAPITAL>=10000000 AND CAPITAL<50000000,换手率％<1,IF(CAPITAL>=50000000,换手率％<0.5,DRAWNULL))))){XG51};
异动活跃:=IF(CAPITAL<500000,换手率％>7 AND 换手率％<=10,IF(CAPITAL>=500000 AND CAPITAL<1000000,换手率％>5 AND 换手率％<=7,
IF(CAPITAL>=1000000 AND CAPITAL<10000000,换手率％>3 AND 换手率％<=5,
IF(CAPITAL>=10000000 AND CAPITAL<50000000,换手率％>1 AND 换手率％<=3,IF(CAPITAL>=50000000,换手率％>0.5 AND 换手率％<=1,DRAWNULL))))){XG51};
非常活跃:=IF(CAPITAL<500000,换手率％>10 AND 换手率％<=14,IF(CAPITAL>=500000 AND CAPITAL<1000000,换手率％>7 AND 换手率％<=10,
IF(CAPITAL>=1000000 AND CAPITAL<10000000,换手率％>5 AND 换手率％<=7,
IF(CAPITAL>=10000000 AND CAPITAL<50000000,换手率％>3 AND 换手率％<=5,IF(CAPITAL>=50000000,换手率％>1 AND 换手率％<=3,DRAWNULL))))){XG51};
高度活跃:=IF(CAPITAL<500000,换手率％>14 AND 换手率％<=20,IF(CAPITAL>=500000 AND CAPITAL<1000000,换手率％>10 AND 换手率％<=14,
IF(CAPITAL>=1000000 AND CAPITAL<10000000,换手率％>7 AND 换手率％<=10,
IF(CAPITAL>=10000000 AND CAPITAL<50000000,换手率％>5 AND 换手率％<=7,IF(CAPITAL>=50000000,换手率％>3 AND 换手率％<=5,DRAWNULL))))){XG51};
极度活跃:=IF(CAPITAL<500000,换手率％>20,IF(CAPITAL>=500000 AND CAPITAL<1000000,换手率％>14,
IF(CAPITAL>=1000000 AND CAPITAL<10000000,换手率％>10,
IF(CAPITAL>=10000000 AND CAPITAL<50000000,换手率％>7,IF(CAPITAL>=50000000,换手率％>5,DRAWNULL))))){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.65,0,STRCAT(STRCAT('【股性活跃】真实换手',CON2STR(换手率％,2)),'%')),COLORRED{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND 温和活跃,0.20,0.65,0,'温和活跃'),COLORRED{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND 异动活跃,0.20,0.65,0,'异动活跃'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND 非常活跃,0.20,0.65,0,'非常活跃'),COLORLICYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND 高度活跃,0.20,0.65,0,'高度活跃'),COLORMAGENTA{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND 极度活跃,0.20,0.65,0,'极度活跃'),COLORWHITE{XG51};
涨停:=IF(NAMELIKE('ST') OR NAMELIKE('*ST'),(C+0.01)>ZTPRICE(REF(C,1),0.05),IF(CODELIKE('688') OR (CODELIKE('300') AND DATE>=1200824),(C+0.01)>ZTPRICE(REF(C,1),0.2),
(C+0.01)>ZTPRICE(REF(C,1),0.1))) AND C=H{XG51};
ZTCS:=COUNT(涨停,BARSSINCE(涨停)+1){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.55,0,STRCAT(STRCAT('【涨停状态】',CON2STR(DRAWNULL,0)),'')),COLORRED{XG51};
封单金额:=IF(FINANCE(3)==0,DRAWNULL,IF(GPJYVALUE(15,1,0)==2,GPJYVALUE(15,2,0),IF(GPJYVALUE(15,2,0)=0 AND 涨停,DYNAINFO(58)*DYNAINFO(20)*100/10000,0))),COLORBLUE{XG51};
涨停溢价:=封单金额/(DYNAINFO(7)*CAPITAL*100/10000)*100{XG51};
涨停溢价高:=涨停 AND 涨停溢价>20{XG51};
涨停溢价中:=涨停 AND 涨停溢价>5 AND 涨停溢价<20{XG51};
涨停溢价低:=涨停 AND 涨停溢价<5{XG51};
失控板1:=涨停 AND VOL>HHV(REF(VOL,1),2)*2.1{XG51};
失控板2:=涨停 AND (C-REF(C,2))/REF(C,2)*100>=20 {XG51};
失控板:=失控板1 AND 失控板2{XG51};
加速板:=涨停 AND NOT(失控板) AND (VOL<=REF(VOL,1)*0.7 OR VOL<=REF(VOL,2)*0.5){XG51};
分歧板:=涨停 AND NOT(失控板) AND NOT(加速板) {XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND 失控板,0.20,0.55,0,'失控板'),COLORLICYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND 分歧板,0.20,0.55,0,'分歧板'),COLORMAGENTA{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND 加速板,0.20,0.55,0,'加速板'),COLORWHITE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND 涨停溢价低,0.35,0.55,0,'涨停溢价低'),COLORLICYAN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND 涨停溢价中,0.35,0.55,0,'涨停溢价中'),COLORMAGENTA{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND 涨停溢价高,0.35,0.55,0,'涨停溢价高'),COLORWHITE{XG51};
B11:=BArslASTCOUNT(涨停){XG51};
连续板:=(B11>1 AND REFX(NOT(涨停),1)) OR (REF(涨停,1) AND 涨停 AND ISLASTBAR){XG51};
DRAWTEXT_FIX(1 AND 连续板,0.30,0.55,1,STRCAT(STRCAT('【',CON2STR(B11,0)),'天连板】')),COLORWHITE{X*G-5~1*C*N*{};

通达信量比换手率未加密选股指标公式源码

源码正文：

A1:=1{XG51};
B1:=3{XG51};
C1:=3{XG51};
D1:=6{XG51};
DYNAINFO(17)>=A1 AND DYNAINFO(17)<=B1 AND DYNAINFO(37)>C1/100 AND DYNAINFO(37)<D1/100{X_G_5-1_C_N_{};