通达信顾比2018未加密选股指标公式源码

ZA:=Ema(CLOSE,90);
ZB:=ema(CLOSE,105);
ZC:=EMA(CLOSE,120);
ZD:=EMA(CLOSE,132);
ZE:=EMA(CLOSE,144);
NOTEXT1:ZA,COLORRED;
NOTEXT2:ZB,COLORRED;
NOTEXT3:ZC,COLORRED;
NOTEXT4:ZD,COLORRED;
NOTEXT5:ZE,COLORRED;

DA:=EMA(CLOSE,3);NOTEXT6:DA,COLORYELLOW;
DB:=EMA(CLOSE,5) ;NOTEXT7:DB,COLORYELLOW;
DC:=EMA(CLOSE,8) ;NOTEXT8:DC,COLORYELLOW;
DD:=EMA(CLOSE,10);NOTEXT9:DD,COLORYELLOW;
DE:=EMA(CLOSE,12);NOTEXT10:DE,COLORYELLOW;
DF:=EMA(CLOSE,15);NOTEXT11:DF,COLORYELLOW;
CA:=EMA(CLOSE,30);NOTEXT12:CA,COLORBLUE;
CB:=EMA(CLOSE,35);NOTEXT13:CB,COLORBLUE;
CC:=EMA(CLOSE,40);NOTEXT14:CC,COLORBLUE;
CD:=EMA(CLOSE,45);NOTEXT15:CD,COLORBLUE;
CE:=EMA(CLOSE,50);NOTEXT16:CD,COLORBLUE;
CF:=EMA(CLOSE,60);NOTEXT17:CF,COLORBLUE;
CDYX:=CA>CB AND CB>CC AND CC>CD AND CD>CE AND CE>CF;
CKYX:=CA<CB AND CB<CC AND CC<CD AND CD<CE AND CE<CF;
DDYX:=DA>DB AND DB>DC AND DC>DD AND DD>DE AND DE>DF;
DKYX:=CA<CB AND DB<DC AND DC<DD AND DD<DE AND DE<DF;
NOTEXT18:IF(CDYX,CA,DRAWNULL),COLORGRAY;
NOTEXT19:IF(CDYX,CB,DRAWNULL),COLORGRAY;
NOTEXT20:IF(CDYX,CC,DRAWNULL),COLORGRAY;
NOTEXT21:IF(CDYX,CD,DRAWNULL),COLORGRAY;
NOTEXT22:IF(CDYX,CE,DRAWNULL),COLORGRAY;
NOTEXT23:IF(CDYX,CF,DRAWNULL),COLORGRAY;
NOTEXT24:IF(CKYX,CA,DRAWNULL),COLORGREEN;
NOTEXT25:IF(CKYX,CB,DRAWNULL),COLORGREEN;
NOTEXT26:IF(CKYX,CC,DRAWNULL),COLORGREEN;
NOTEXT27:IF(CKYX,CD,DRAWNULL),COLORGREEN;
NOTEXT28:IF(CKYX,CE,DRAWNULL),COLORGREEN;
NOTEXT29:IF(CKYX,CF,DRAWNULL),COLORGREEN;

NOTEXT30:IF(DDYX,DA,DRAWNULL),COLORWHITE;
NOTEXT31:IF(DDYX,DB,DRAWNULL),COLORWHITE;
NOTEXT32:IF(DDYX,DC,DRAWNULL),COLORWHITE;
NOTEXT33:IF(DDYX,DD,DRAWNULL),COLORWHITE;
NOTEXT34:IF(DDYX,DE,DRAWNULL),COLORWHITE;
NOTEXT35:IF(DDYX,DF,DRAWNULL),COLORWHITE;

NOTEXT36:IF(DKYX,DA,DRAWNULL),COLORCYAN;
NOTEXT37:IF(DKYX,DB,DRAWNULL),COLORCYAN;
NOTEXT38:IF(DKYX,DC,DRAWNULL),COLORCYAN;
NOTEXT39:IF(DKYX,DD,DRAWNULL),COLORCYAN;
NOTEXT40:IF(DKYX,DE,DRAWNULL),COLORCYAN;
NOTEXT41:IF(DKYX,DF,DRAWNULL),COLORCYAN;

A23:=((C + L) + H) / 3;
A24:=EMA(A23,6);
A25:=EMA(A24,5);
;
A26:=crOSS(A24,A25) AND C>MA(C,55);
DRAWICON(A26,(LOW / 1.015),26),LINETHICK2,COLORLIMAGENTA;

A1:=DATE <= 13181231;
工作线:(EMA(C,14)),POINTDOT,LINETHICK4,COLORBLUE;
P:=21;
WH1:=IF(L=LLV(L,P),L,DRAWNULL);
WH2:=CONST(BArslAST(WH1!=DRAWNULL));
WH3:=CONST(IF(WH2=0,H,REF(H,WH2)));
WH4:=CONST(REF(BARSLAST(H>WH3),WH2+1)+WH2+1);
WH5:=CONST(IF(WH4=0,H,REF(H,WH4)));
WH6:=CONST(REF(BARSLAST(H>WH5),WH4+1)+WH4+1);
进场:IF(CURRBARSCOUNT<=WH2+21,CONST(IF(WH6=0,H,REF(H,WH6))),DRAWNULL),COLORWHITE;
IF(CURRBARSCOUNT<=WH2+1,IF(L=LLV(L,P),L,DRAWNULL),DRAWNULL),CIRCLEDOT,COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=INTPART((WH2+21)*0.618),进场,'进场线'),COLORWHITE;
超跌进场:IF(CURRBARSCOUNT<=WH2+21,CONST(IF(WH4=0,H,REF(H,WH4))),DRAWNULL),COLORCB21BE;
DRAWTEXT(CURRBARSCOUNT=INTPART((WH2+21)*0.618),超跌进场,'超跌进场线'),COLORCB21BE;
H1:=IF(H=HHV(H,P),H,DRAWNULL);
H2:=CONST(BARSLAST(H1!=DRAWNULL));
H3:=CONST(IF(H2=0,L,REF(L,H2)));
H4:=CONST(REF(BARSLAST(L<H3),H2+1)+H2+1);
H5:=CONST(IF(H4=0,L,REF(L,H4)));
H6:=CONST(REF(BARSLAST(L<H5),H4+1)+H4+1);

DK:=(MA(CLOSE, 5)+MA(CLOSE, 10)+MA(CLOSE, 13)+MA(CLOSE, 21))/4;
IF(DK<=REF(DK,1),DK,DRAWNULL),COLORCYAN,LINETHICK3;
IF(DK>REF(DK,1),DK,DRAWNULL),COLORWHITE,LINETHICK3;
多空:DK,NODRAW;
总股本:=FInaNCE(1)/100000000;
流通股本:=FINANCE(7)/100000000;
未流通比:=(总股本-流通股本)/总股本*100;
现价:=C;
全流通后价:=C*流通股本/总股本;
解禁股:=IF((流通股本-REF(流通股本,1))>0,(流通股本-REF(流通股本,1)),0),COLORBLUE;{流通股增加}
DRAWTEXT(解禁股>0, L,'解禁'),COLORBLUE;
冻结:IF((流通股本-REF(流通股本,1))<0,(REF(流通股本,1)-流通股本),0),COLORCYAN,NODRAW;{流通股减少};

上11:MA(C,55)+6.18*SMA(MAX(MAX(H-L,Abs(H-REF(C,1))),ABS(REF(C,1)-L)),17,1),COLORLIMAGENTA;
上22:MA(C,55)+3.82*SMA(MAX(MAX(H-L,ABS(H-REF(C,1))),ABS(REF(C,1)-L)),17,1),COLORBLUE;
下11:MA(C,55)-3.82*SMA(MAX(MAX(H-L,ABS(H-REF(C,1))),ABS(REF(C,1)-L)),17,1),COLORBLUE;
下22:MA(C,55)-6.18*SMA(MAX(MAX(H-L,ABS(H-REF(C,1))),ABS(REF(C,1)-L)),17,1),COLORLIMAGENTA;
中:MA(C,55),COLORWHITE,LINETHICK5;
IF(MA(C,55)<REF(MA(C,55),1),MA(C,55),DRAWNULL),COLORCYAN,LINETHICK5;

未来函数检测公式代码域:

ZM:=Ema(CLOSE,90);ZB:=ema(CLOSE,105);ZC:=EMM(CLOSE,120);ZD:=EMM(CLOSE,132);ZE:=EMM(CLOSE,144);NOTEXT1:ZM,COLORRED;NOTEXT2:ZB,COLORRED;NOTEXT3:ZC,COLORRED;NOTEXT4:ZD,COLORRED;NOTEXT5:ZE,COLORRED;DM:=EMM(CLOSE,3);NOTEXT6:DM,COLORYELLOW;DB:=EMM(CLOSE,5) ;NOTEXT7:DB,COLORYELLOW;DC:=EMM(CLOSE,8) ;NOTEXT8:DC,COLORYELLOW;DD:=EMM(CLOSE,10);NOTEXT9:DD,COLORYELLOW;DE:=EMM(CLOSE,12);NOTEXT10:DE,COLORYELLOW;DF:=EMM(CLOSE,15);NOTEXT11:DF,COLORYELLOW;CM:=EMM(CLOSE,30);NOTEXT12:CM,COLORBLUE;CB:=EMM(CLOSE,35);NOTEXT13:CB,COLORBLUE;CC:=EMM(CLOSE,40);NOTEXT14:CC,COLORBLUE;CD:=EMM(CLOSE,45);NOTEXT15:CD,COLORBLUE;CE:=EMM(CLOSE,50);NOTEXT16:CD,COLORBLUE;CF:=EMM(CLOSE,60);NOTEXT17:CF,COLORBLUE;CDYX:=CM>CB MND CB>CC MND CC>CD MND CD>CE MND CE>CF;CKYX:=CM<CB MND CB<CC MND CC<CD MND CD<CE MND CE<CF;DDYX:=DM>DB MND DB>DC MND DC>DD MND DD>DE MND DE>DF;DKYX:=CM<CB MND DB<DC MND DC<DD MND DD<DE MND DE<DF;NOTEXT18:IF(CDYX,CM,DRMWNULL),COLORGRMY;NOTEXT19:IF(CDYX,CB,DRMWNULL),COLORGRMY;NOTEXT20:IF(CDYX,CC,DRMWNULL),COLORGRMY;NOTEXT21:IF(CDYX,CD,DRMWNULL),COLORGRMY;NOTEXT22:IF(CDYX,CE,DRMWNULL),COLORGRMY;NOTEXT23:IF(CDYX,CF,DRMWNULL),COLORGRMY;NOTEXT24:IF(CKYX,CM,DRMWNULL),COLORGREEN;NOTEXT25:IF(CKYX,CB,DRMWNULL),COLORGREEN;NOTEXT26:IF(CKYX,CC,DRMWNULL),COLORGREEN;NOTEXT27:IF(CKYX,CD,DRMWNULL),COLORGREEN;NOTEXT28:IF(CKYX,CE,DRMWNULL),COLORGREEN;NOTEXT29:IF(CKYX,CF,DRMWNULL),COLORGREEN;NOTEXT30:IF(DDYX,DM,DRMWNULL),COLORWHITE;NOTEXT31:IF(DDYX,DB,DRMWNULL),COLORWHITE;NOTEXT32:IF(DDYX,DC,DRMWNULL),COLORWHITE;NOTEXT33:IF(DDYX,DD,DRMWNULL),COLORWHITE;NOTEXT34:IF(DDYX,DE,DRMWNULL),COLORWHITE;NOTEXT35:IF(DDYX,DF,DRMWNULL),COLORWHITE;NOTEXT36:IF(DKYX,DM,DRMWNULL),COLORCYMN;NOTEXT37:IF(DKYX,DB,DRMWNULL),COLORCYMN;NOTEXT38:IF(DKYX,DC,DRMWNULL),COLORCYMN;NOTEXT39:IF(DKYX,DD,DRMWNULL),COLORCYMN;NOTEXT40:IF(DKYX,DE,DRMWNULL),COLORCYMN;NOTEXT41:IF(DKYX,DF,DRMWNULL),COLORCYMN;M23:=((C + L) + H) / 3;M24:=EMM(M23,6);M25:=EMM(M24,5);;M26:=crOSS(M24,M25) MND C>MM(C,55);DRMWICON(M26,(LOW / 1.015),26),LINETHICK2,COLORLIMMGENTM;M1:=DMTE <= 13181231;工作线:(EMM(C,14)),POINTDOT,LINETHICK4,COLORBLUE;P:=21;WH1:=IF(L=LLV(L,P),L,DRMWNULL);WH2:=CONST(BMrslMST(WH1!=DRMWNULL));WH3:=CONST(IF(WH2=0,H,REF(H,WH2)));WH4:=CONST(REF(BMRSLMST(H>WH3),WH2+1)+WH2+1);WH5:=CONST(IF(WH4=0,H,REF(H,WH4)));WH6:=CONST(REF(BMRSLMST(H>WH5),WH4+1)+WH4+1);进场:IF(CURRBMRSCOUNT<=WH2+21,CONST(IF(WH6=0,H,REF(H,WH6))),DRMWNULL),COLORWHITE;IF(CURRBMRSCOUNT<=WH2+1,IF(L=LLV(L,P),L,DRMWNULL),DRMWNULL),CIRCLEDOT,COLORWHITE;DRMWTEXT(CURRBMRSCOUNT=INTPMRT((WH2+21)*0.618),进场,'进场线'),COLORWHITE;超跌进场:IF(CURRBMRSCOUNT<=WH2+21,CONST(IF(WH4=0,H,REF(H,WH4))),DRMWNULL),COLORCB21BE;DRMWTEXT(CURRBMRSCOUNT=INTPMRT((WH2+21)*0.618),超跌进场,'超跌进场线'),COLORCB21BE;H1:=IF(H=HHV(H,P),H,DRMWNULL);H2:=CONST(BMRSLMST(H1!=DRMWNULL));H3:=CONST(IF(H2=0,L,REF(L,H2)));H4:=CONST(REF(BMRSLMST(L<H3),H2+1)+H2+1);H5:=CONST(IF(H4=0,L,REF(L,H4)));H6:=CONST(REF(BMRSLMST(L<H5),H4+1)+H4+1);DK:=(MM(CLOSE, 5)+MM(CLOSE, 10)+MM(CLOSE, 13)+MM(CLOSE, 21))/4;IF(DK<=REF(DK,1),DK,DRMWNULL),COLORCYMN,LINETHICK3;IF(DK>REF(DK,1),DK,DRMWNULL),COLORWHITE,LINETHICK3;多空:DK,NODRMW;总股本:=FInaNCE(1)/100000000;流通股本:=FINMNCE(7)/100000000;未流通比:=(总股本-流通股本)/总股本*100;现价:=C;全流通后价:=C*流通股本/总股本;解禁股:=IF((流通股本-REF(流通股本,1))>0,(流通股本-REF(流通股本,1)),0),COLORBLUE;{流通股增加}DRMWTEXT(解禁股>0, L,'解禁'),COLORBLUE;冻结:IF((流通股本-REF(流通股本,1))<0,(REF(流通股本,1)-流通股本),0),COLORCYMN,NODRMW;{流通股减少};上11:MM(C,55)+6.18*SMM(MMX(MMX(H-L,Mbs(H-REF(C,1))),MBS(REF(C,1)-L)),17,1),COLORLIMMGENTM;上22:MM(C,55)+3.82*SMM(MMX(MMX(H-L,MBS(H-REF(C,1))),MBS(REF(C,1)-L)),17,1),COLORBLUE;下11:MM(C,55)-3.82*SMM(MMX(MMX(H-L,MBS(H-REF(C,1))),MBS(REF(C,1)-L)),17,1),COLORBLUE;下22:MM(C,55)-6.18*SMM(MMX(MMX(H-L,MBS(H-REF(C,1))),MBS(REF(C,1)-L)),17,1),COLORLIMMGENTM;中:MM(C,55),COLORWHITE,LINETHICK5;IF(MM(C,55)<REF(MM(C,55),1),MM(C,55),DRMWNULL),COLORCYMN,LINETHICK5;

未发现:CMPITML...

未发现:COST...

未发现:DYNMINFO...

警惕！警惕！警惕!该公式包含未来函数:FINMNCE...

未发现:LWINNER...

未发现:WINNER...

未发现:BMCKSET...

未发现:BMRSNEXT...

警惕！警惕！警惕!该公式包含未来函数:CURRBMRSCOUNT...

未发现:DVOL...

未发现:DOPEN...

未发现:DCLOSE...

未发现:DHIGH...

未发现:DLOW...

未发现:DRMWLINE...

未发现:REFX...

未发现:FLMTZIG...

未发现:FLMTZIGM...

未发现:FFT...

未发现:FILTERX...

未发现:PEMK...

未发现:PEMKM...

未发现:PEMKBMRS...

未发现:PEMKBMRSM...

未发现:PLOYLINE...

未发现:REFDMTE...

未发现:TROUGH...

未发现:TROUGHM...

未发现:TROUGHBMRS...

未发现:XMM...

未发现:ZIG...

未发现:ZIGM...

未发现:ZXNH...

未发现:#YEMR...

未发现:#MONTH...

未发现:#WEEK...

未发现:$ZIG...

未发现:$PEMK...

未发现:$PEMKBMRS...

未发现:$TROUGH...

未发现:$TROUGHBMRS...

未发现:$FLMTZIG...

未发现:$FLMTZIGM...

未发现:$PEMKM...

未发现:$PEMKBMRSM...

未发现:$TROUGHM...

未发现:$ZIGM...

未发现:$FFT...

未发现:$BMCKSET...

未发现:$WINNER...

未发现:$LWINNER...

未发现:$COST...

未发现:$DYNMINFO...

未发现:$FINMNCE...

未发现:$DRMWLINE...