大智慧主力扫盘分时选股指标公式源码

大智慧主力扫盘分时选股指标公式源码

源码正文：

M:=2{XG51};
价:=C{XG51};
大盘:=ema(INDEXC,500)/Ema(C,500){XG51};
大盘参考线:INDEXC/大盘,ColorFFFF00{XG51};
VAR20:=(3*CLOSE+LOW+OPEN+HIGH)/6{XG51};
VAR21:=(20*VAR20+19*REF(VAR20,1)+18*REF(VAR20,2)+17*REF(VAR20,3)+16*REF(VAR20,4)+15*REF(VAR20,5)+14*REF(VAR20,6)+13*REF(VAR20,7)+12*REF(VAR20,8)+11*REF(VAR20,9)+10*REF(VAR20,10)+9*REF(VAR20,11)+8* REF(VAR20,12)+7*REF(VAR20,13)+6*REF(VAR20,14)+5*REF(VAR20,15)+4*REF(VAR20,16)+3*REF(VAR20,17)+2*REF(VAR20,18)+REF(VAR20,21))/210{XG51};
VAR22:=EMA(VAR21,15){XG51};
VAR23:=HHV(CLOSE,90){XG51};
VAR24:=LLV(CLOSE,90){XG51};
VAR25:=VAR23-VAR24{XG51};
VAR26:=EMA((CLOSE-VAR24)/VAR25-0.5,14){XG51};
ZLSP:=VAR26*20{XG51};
VAR27:=REF(HHV(CLOSE,66),2){XG51};
VAR28:=crOSS(CLOSE,VAR27) and (HHV(CLOSE,110)/LLV(CLOSE,110)-1)*100<45 and ZLSP<5.666{XG51};
VAR29:=LLV(ZLSP,35)<-8.9 and CROSS(ZLSP,-7.815) and ZLSP<-1.2{XG51};
VAR30:=10*FILTER(VAR29,41){XG51};
VAR31:=15*FILTER(VAR28,41)>10{XG51};
主力扫盘:VAR31,linethick0{XG51};
DRAWTEXT(VAR31,价*1.001,'主力扫盘'),COLORBLUE{XG51};
板块指数:IF(INBLOCK('工程建筑'),"991002$CLOSE",
IF(INBLOCK('电力'),"991003$CLOSE",
IF(INBLOCK('计算机'),"991004$CLOSE",
IF(INBLOCK('电子信息'),"991006$CLOSE",
IF(INBLOCK('房地产'),"991007$CLOSE",
IF(INBLOCK('纺织服装'),"991008$CLOSE",
IF(INBLOCK('钢铁'),"991009$CLOSE",
IF(INBLOCK('供水供气'),"991010$CLOSE",
IF(INBLOCK('化工化纤'),"991011$CLOSE",
IF(INBLOCK('电器'),"991014$CLOSE",
IF(INBLOCK('交通设施'),"991016$CLOSE",
IF(INBLOCK('银行类'),"991017$CLOSE",
IF(INBLOCK('旅游酒店'),"991018$CLOSE",
IF(INBLOCK('煤炭石油'),"991019$CLOSE",
IF(INBLOCK('酿酒食品'),"991020$CLOSE",
IF(INBLOCK('农林牧渔'),"991021$CLOSE",
IF(INBLOCK('商业连锁'),"991023$CLOSE",
IF(INBLOCK('建材'),"991024$CLOSE",
IF(INBLOCK('其他行业'),"991025$CLOSE",
IF(INBLOCK('交通工具'),"991026$CLOSE",
IF(INBLOCK('机械'),"991027$CLOSE",
IF(INBLOCK('医药'),"991028$CLOSE",
IF(INBLOCK('外贸'),"991031$CLOSE",
IF(INBLOCK('教育传媒'),"991032$CLOSE",
IF(INBLOCK('仪电仪表'),"991033$CLOSE",
IF(INBLOCK('有色金属'),"991034$CLOSE",
IF(INBLOCK('造纸印刷'),"991035$CLOSE",
IF(INBLOCK('券商'),"991036$CLOSE",
IF(INBLOCK('电力设备'),"991037$CLOSE",
IF(INBLOCK('通信'),"991135$CLOSE",
IF(INBLOCK('运输物流'),"991136$CLOSE",
IF(INBLOCK('海峡西岸'),"993596$CLOSE",
IF(INBLOCK('保险'),"991255$CLOSE",0)
)))))))))))))))))))))))))))))))),PRECIS0,COLOR00FF00,LINETHICK0{XG51};
BBC:=EMA(板块指数,1000)/EMA(C,2500);
BKC:=板块指数/BBC;
POLYLINE(M=0 OR M=1,BKC),COLOR00FF00,LAYER0{XG51};
DDC:=EMA(INDEXC,1000)/EMA(C,2500);
DPC:=INDEXC/DDC;
POLYLINE(M=0 OR M=2,DPC),COLORLIMAGENTA,LAYER0{XG51};
POLYLINE(C,C),LINETHICK2,COLORBLacK{XG51};
板块:=IFS(INBLOCK('工程建筑'),'工程建筑',
IFS(INBLOCK('电力'),'电力',
IFS(INBLOCK('计算机'),'计算机',
IFS(INBLOCK('电子信息'),'电子信息',
IFS(INBLOCK('房地产'),'房地产',
IFS(INBLOCK('纺织服装'),'纺织服装',
IFS(INBLOCK('钢铁'),'钢铁',
IFS(INBLOCK('供水供气'),'供水供气',
IFS(INBLOCK('化工化纤'),'化工化纤',
IFS(INBLOCK('电器'),'电器',
IFS(INBLOCK('交通设施'),'交通设施',
IFS(INBLOCK('银行类'),'银行类',
IFS(INBLOCK('旅游酒店'),'旅游酒店',
IFS(INBLOCK('煤炭石油'),'煤炭石油',
IFS(INBLOCK('酿酒食品'),'酿酒食品',
IFS(INBLOCK('农林牧渔'),'农林牧渔',
IFS(INBLOCK('商业连锁'),'商业连锁',
IFS(INBLOCK('建材'),'建材',
IFS(INBLOCK('其他行业'),'其他行业',
IFS(INBLOCK('交通工具'),'交通工具',
IFS(INBLOCK('机械'),'机械',
IFS(INBLOCK('医药'),'医药',
IFS(INBLOCK('外贸'),'外贸',
IFS(INBLOCK('教育传媒'),'教育传媒',
IFS(INBLOCK('仪电仪表'),'仪电仪表',
IFS(INBLOCK('有色金属'),'有色金属',
IFS(INBLOCK('造纸印刷'),'造纸印刷',
IFS(INBLOCK('券商'),'券商',
IFS(INBLOCK('电力设备'),'电力设备',
IFS(INBLOCK('通信'),'通信',
IFS(INBLOCK('运输物流'),'运输物流',
IFS(INBLOCK('海峡西岸'),'海峡西岸',
IFS(INBLOCK('保险'),'保险','')
)))))))))))))))))))))))))))))))){XG51};
DRAWTEXTAbs(3,5,'所属: '+板块){XG51};
VAR1:=EMA(EMA(C,13),13){XG51};
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000{XG51};
无庄控盘:=控盘<0{XG51};
有庄控盘:=控盘>REF(控盘,1) AND 控盘>0{XG51};
VAR2:=100*WINNER(C*0.95){XG51};
主力出货:=控盘<REF(控盘,1) AND 控盘>0{XG51};
高度控盘:= VAR2>50 AND COst(85)<C AND 控盘>0{XG51};
A10:=CROSS(控盘,0){XG51};
控盘B:=FILTER(IF(A10,1,0),5){XG51};
JJ:=DYNAINFO(11){XG51};
P:=55;S:=8;M1:=3{XG51};
能量:=(EMA(C,S)-EMA(C,P))*10{XG51};
空头:=EMA(能量,M1){XG51};
BTJ1:=(C-JJ)/JJ<-0.005{XG51};
BTJ11:=(C-JJ)/JJ<-0.03{XG51};
BTJ12:=ref(LAST(JJ>=REF(JJ,1)),1)>=4 AND (C-JJ)/JJ<0.005{XG51};
STJ1:=(C-JJ)/JJ>0.005{XG51};
STJ01:=控盘<REF(控盘,1)  AND 控盘>0.5{XG51};
STJ02:=控盘>0{XG51};
BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2{XG51};
BTJ22:=控盘>REF(控盘,1) AND 控盘<0 {XG51};
BTJ3:=CROSS(能量,空头) AND  能量<-0.3{XG51};
BTJ32:=CROSS(能量,空头) AND  能量<-0.1{XG51};
STJ31:=CROSS(空头,能量){XG51};
STJ32:=CROSS(空头,能量) AND  能量>1.618{XG51};
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13){XG51};
BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13){XG51};
BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13){XG51};
有庄:=BTJ811{XG51};
DRAWTEXT(BTJ811,价,'有庄'),COLORWHITE,LINETHICK2{XG51};
MA1:MA(CLOSE,5){XG51};
MA2:MA(CLOSE,10){XG51};
MA3:MA(CLOSE,30){XG51};
STICKLINE(C>=O,C,O,9,1),COLORWHITE{XG51};
STICKLINE(C>=O,L,O,0.1,0),COLORWHITE{XG51};
STICKLINE(C>=O,C,H,0.1,0),COLORWHITE{XG51};
STICKLINE(C<O,C,O,9,0),COLORFFFF00{XG51};
STICKLINE(C<O,H,L,0.1,0),COLORFFFF00{X^G?5~1^C^N^{};