通达信绝密买点主图选股指标公式源码

通达信绝密买点主图选股指标公式源码

源码正文：

A81:=ema(C,3),COLORRED{XG51};
A82:=Ema(C,5),COLORBLUE{XG51};
A83:=EMA(C,7),COLORLIMAGENTA{XG51};
A84:=EMA(C,12),COLORCYAN{XG51};
A85:=EMA(C,20),COLORWHITE{XG51};
A86:=EMA(C,50),COLORYELLOW,LINETHICK2{XG51};
SS8:=crOSS(A81,A85)  AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018 {XG51};
SSS8:=CROSS(A81,A85)  AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018{XG51};
DRAWICON(SS8 ,L-0.30,5){XG51};
DRAWTEXT(SS8,L-0.38,'↖绝密买点'),COLORBLUE{XG51};
ZYX1:="dmi.pdi"(12,6){XG51};
ZYX2:="DMI.mdi"(12,6){XG51};
ZYX3:=ZYX1>65 AND ZYX1>REF(ZYX1,1){XG51};
ZYX4:=LLV(ZYX1,0){XG51};
ZYX5:=BArslAst(ZYX4=ZYX1){XG51};
ZYX6:=(0-REF(ZYX2,4))/(ZYX4-REF(ZYX2,ZYX5))>2{XG51};
ZYX7:=ZYX1>REF(ZYX1,1){XG51};
ZYX8:=vol>2*MA(VOL,30){XG51};
ZYX9:="DMI.ADX"(12,6){XG51};
ZYXA:="DMI.ADXR"(12,6){XG51};
ZYXB:=CLOSE>MA(CLOSE,30) AND CLOSE<MA(CLOSE,30)*1.04{XG51};
ZYXC:=MA(CLOSE,30)>REF(MA(CLOSE,30),1){XG51};
ZYXD:=BARSLAST(CROSS(MA(CLOSE,5),MA(CLOSE,10)))<BARSLAST(CROSS(MA(CLOSE,10),MA(CLOSE,5))){XG51};
ZYXF:=TROUGHBARS(3,15,1)<4{XG51};
ZYX10:=EMA(CLOSE,30)>REF(EMA(CLOSE,30),2){XG51};
ZYX11:=IF(ZYXF=1,50,0){XG51};
ZYX12:=CROSS(ZYX2,ZYX1) AND CROSS(ZYXA,ZYX9){XG51};
ZYX13:=CROSS(ZYX2,ZYX1) AND CROSS(ZYX9,ZYXA){XG51};
ZYX14:=ZYXB AND ZYXC AND ZYXD AND ZYX10 AND ZYX6 AND ZYX7 AND ZYX8*50{XG51};
ZYX15:=BARSLAST(CROSS(ZYX2,ZYX1)=1){XG51};
ZYX16:=BARSLAST(CROSS(ZYX1,ZYX2)=1){XG51};
ZYX17:=HHV(ZYX1,ZYX16){XG51};
ZYX18:=BARSLAST(ZYX1=ZYX17){XG51};
ZYX19:=ZYX3 OR ZYX12 OR ZYX13*100{XG51};
ZYX1A:=ZYX13*100{XG51};
DRAWICON(FILTER(ZYXF=1,3),L*0.96,23){XG51};
DRAWTEXT(FILTER(ZYXF=1,3),L*0.94,'↖铁底'),COLORCYAN{XG51};
HH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORYELLOW,LINETHICK1{XG51};
LL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORYELLOW,LINETHICK1{XG51};
GO0B:=(xma(XMA(H,60),60)-XMA(XMA(L,60),60))*3+XMA(XMA(H,60),60){XG51};
DO0B:=XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3{XG51};
STICKLINE(1=1,GO0B,DO0B,5,0),COLOR222222{XG51};
D90H:=EMA(HH,90),COLORWHITE,LINETHICK1{XG51};
D90L:=EMA(LL,90),COLORWHITE,LINETHICK1{XG51};
D90:(D90H+D90L)/2{XG51};
DGH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORYELLOW,LINETHICK1;DDL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORYELLOW,LINETHICK1{XG51};
D90C:=D90H-D90L{XG51};
G0:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))+XMA(XMA(H,25),25){XG51};
D0:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25)){XG51};
GO0:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3+XMA(XMA(H,60),60){XG51};
DO0:=XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3{XG51};
DTD:=(D0+G0)/2>=(D90H+D90L)/2{XG51};
KTD:=(D0+G0)/2<(D90H+D90L)/2{XG51};
YM:EMA(SLOPE((CLOSE+HIGH+LOW)/3,24)*20+(CLOSE+HIGH+LOW)/3,48),COLORRED,LINETHICK1;  
YM1:EMA(YM,5),COLORRED,LINETHICK1{XG51};
YM2:EMA(YM1,5),COLORRED,LINETHICK1{XG51};
YM3:EMA(YM2,5),COLORRED,LINETHICK1{XG51};
D1:EMA(D90,10),COLORRED,LINETHICK1{XG51};
D2:EMA(D1,10),COLORRED,LINETHICK1{XG51};
IF(DTD=1,YM,DRAWNULL),LINETHICK1,COLORWHITE{XG51};
IF(DTD=1,YM1,DRAWNULL),LINETHICK1,COLORWHITE{XG51};
IF(DTD=1,YM2,DRAWNULL),LINETHICK1,COLORWHITE{XG51};
IF(DTD=1,YM3,DRAWNULL),LINETHICK1,COLORWHITE{XG51};
IF(KTD=1,YM,DRAWNULL),LINETHICK1,COLORCYAN{XG51};
IF(KTD=1,YM1,DRAWNULL),LINETHICK1,COLORCYAN{XG51};
IF(KTD=1,YM2,DRAWNULL),LINETHICK1,COLORCYAN{XG51};
IF(KTD=1,YM3,DRAWNULL),LINETHICK1,COLORCYAN{XG51};
IF(D90>D1,D90,DRAWNULL),LINETHICK1,COLORWHITE{XG51};
IF(D90>D1,D1,DRAWNULL),LINETHICK1,COLORWHITE{XG51};
IF(D90>D1,D2,DRAWNULL),LINETHICK1,COLORWHITE{XG51};
DX:DRAWLINE(HIGH>=HHV(HIGH,20),HIGH,LOW<=LLV(LOW,20),HHV(HIGH,4),1),POINTDOT,COLORLIMAGENTA{XG51};
KX:DRAWLINE(LOW<=LLV(LOW,20),LOW,HIGH>=HHV(HIGH,20),LLV(LOW,4),1),POINTDOT,COLORRED{XG51};
STICKLINE(CURRBARSCOUNT=1,G0,G0,100,5),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=1,D0,D0,100,5),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=1,GO0,GO0,100,5),COLORLIMAGENTA{XG51};
STICKLINE(CURRBARSCOUNT=1,DO0,DO0,100,5),COLORLIMAGENTA{XG51};
DRAWTEXT(ISLASTBAR,G0,'卖'),COLORBLUE{XG51};
DRAWTEXT(ISLASTBAR,D0,'买'),COLORBLUE{XG51};
DRAWTEXT(ISLASTBAR,GO0,'顶'),COLORLIMAGENTA{XG51};
DRAWTEXT(ISLASTBAR,DO0,'底'),COLORLIMAGENTA{XG51};
CC:=((HIGH+LOW+CLOSE)/3-EMA((HIGH+LOW+CLOSE)/3,5))/(0.015*AVEDEV((HIGH+LOW+CLOSE)/3,5)){XG51};
STICKLINE(CC>=0,LOW,HIGH,0.0,0),COLORWHITE;
STICKLINE(CC>=0,CLOSE,OPEN,3,1),COLORWHITE{XG51};
STICKLINE(CC<0,LOW,HIGH,0.0,0),COLORCYAN;
STICKLINE(CC<0,CLOSE,OPEN,3,1),COLORCYAN{XG51};
大单动向:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7){XG51};
涨跌动因:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0){XG51};
大单差分:=IF(TRADENUM>0,(LARGETRDINNUM-LARGETRDOUTNUM)/TRADENUM*100,0){XG51};
DDZ1:=大单差分*7{XG51};
DDZ2:=大单差分*3{XG51};
主力活跃度:=LARGEINTRDVOL-LARGEOUTTRDVOL{XG51};
主力净流入:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*AMO/V/10000{XG51};
买入力度:=LARGEINTRDVOL*100/VOL{XG51};
卖出力度:=LARGEOUTTRDVOL*100/VOL{XG51};
超B:=L2_AMO(0,2)/10000.0{XG51};
大B:=L2_AMO(1,2)/10000.0{XG51};
中B:=L2_AMO(2,2)/10000.0{XG51};
小B:=L2_AMO(3,2)/10000.0{XG51};
超S:=L2_AMO(0,3)/10000.0{XG51};
大S:=L2_AMO(1,3)/10000.0{XG51};
中S:=L2_AMO(2,3)/10000.0{XG51};
小S:=L2_AMO(3,3)/10000.0{XG51};
资金流向:=(超B+大B+中B+小B)-(超S+大S+中S+小S){XG51};
主力:=(超B+大B+中B)-(超S+大S+中S){XG51};
机构:=(超B+大B)-(超S+大S){XG51};
私募:=(大B+中B)-(大S+中S){XG51};
散户:=(中B+小B)-(中S+小S){XG51};
大单:=(大B)-(大S){XG51};
中单:=(中B)-(中S){XG51};
资金启动:=大单>0 AND 私募>0 AND 机构>0 AND 主力>0 AND 资金流向>0 AND 大单动向>0 AND 涨跌动因>0 AND DDZ1>0 AND DDZ2>0 AND 主力活跃度>0 AND 主力净流入>0 AND 买入力度>卖出力度{XG51};
STICKLINE(资金启动=1,LOW,HIGH,0,0),COLORWHITE;
STICKLINE(资金启动=1,CLOSE,OPEN,3,0),COLORWHITE{XG51};
STICKLINE(L<D0 AND DTD=1 AND YM>YM1,L,D0,3,0),COLORLIMAGENTA{X*G_5=1*C*N*{};