通达信无庄控盘未加密选股指标公式源码

源码正文：

VAR1:=ema(Ema(CLOSE,13),13){XG51};
控盘:= (VAR1-REF(VAR1,1))/REF(VAR1,1)*1000,COLORFFCCCC,POINTDOT{XG51};
stICKLINE(控盘<0,控盘,0,2,0),COLORRED{XG51};
无庄控盘:控盘<0,COLORRED{XG51};
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,2,1),COLORWHITE{XG51};
有庄控盘: 控盘>REF(控盘,1) AND 控盘>0,COLORWHITE{XG51};
VAR2:=100*WINNER(CLOSE*0.95){XG51};
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,2,0),COLOR00FF00{XG51};
主力出货: 控盘<REF(控盘,1) AND 控盘>0,COLOR00FF00{XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,2,0),COLORFF00FF{XG51};
高度控盘: VAR2>50 AND COST(85)<CLOSE AND 控盘>0,COLORFF00FF{XG51};
A10:=crOSS(控盘,0){XG51};
开始控盘:IF(A10,6,0),COLORBLUE{XG51};
控盘天数:BArslASTCOUNT(有庄控盘 OR 高度控盘 ),LINETHICK0,COLORRED{XG51};
出货天数:BARSLASTCOUNT(主力出货),LINETHICK0,COLORRED{XG51};
WY1001:=(2*CLOSE+HIGH+LOW)/4{XG51};
WY1002:=EMA(WY1001,4){XG51};
WY1003:=EMA(WY1002,4){XG51};
WY1004:=EMA(WY1003,4){XG51};
X:=(WY1004-REF(WY1004,1))/REF(WY1004,1)*2000{XG51};
X1:=IF(X<REF(X,1),X,DRAWNULL),COLORRED,LINETHICK2{XG51};
XO:=MA(X,2),COLOR9932CD{XG51};
SI:=REF(X,1){XG51};
dif1:=EMA(DCLOSE,12)-EMA(DCLOSE,26){XG51};
DEA1:=EMA(DIF1,9){X_G~5!1_C_N_{};

源码正文：

ma1:MA(C,1),COLORRED,LINETHICK2{XG51};
MA2:MA(C,250),COLORBLUE,LINETHICK1{XG51};
MA3:MA(C,5),COLORWHITE,LINETHICK2{XG51};
MAK:=MA(C,3){XG51};
MM:=ATAN((MAK/REF(MAK,1)-1)*100)*180/3.14159,COLORstICK{XG51};
MA5:=MA(C,5){XG51};
KK:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.14159,COLORSTICK{XG51};
准备:=crOSS(KK,0)*80,POINTDOT,COLOR00FF00,LINETHICK3{XG51};
马:=(KK/REF(KK,1)>=2 AND KK>0 AND C>0 AND (H=HHV(H,10) OR C=HHV(C,10)))*80,STICK,COLORRED,LINETHICK3{XG51};
登高:=(COUNT(KK>REF(KK,1),3)>=2 AND KK>40 AND KK<75)*30,COLORBLUE,LINETHICK2{XG51};
漫步:=(COUNT(KK<REF(KK,1) AND KK>0,2)=2)*-20,COLOR00FF00,LINETHICK2{XG51};
骑马:=(MA(C,30)>REF(MA(C,30),1) AND KK/REF(KK,1)>=2 AND KK>0 AND COUNT(KK<REF(KK,1),4)>=1
AND CROSS(KK,45) AND (H=HHV(H,10) OR C=HHV(C,10)))*100,COLORRED,LINETHICK2{XG51};
小心:=((MM+KK)>120)*-20,POINTDOT,COLORWHITE,LINETHICK3{XG51};
悬崖:=(CROSS(0,KK) AND COUNT(MA(C,5)>MA(C,10),13)>=10)*-50,POINTDOT,COLORFF6600,LINETHICK3{XG51};
DD:=(C-REF(C,1))/REF(C,1)*100<=-4{XG51};
花香:=(COUNT(DD,7) AND KK<0 AND KK>REF(KK,1))*KK,STICK,COLORFF00FF,LINETHICK2{XG51};
超跌:=((MM+KK)<-120 AND HHV(H,3)/LLV(L,3)>=1.18)*-20,POINTDOT,COLOR00FF00,LINETHICK3{XG51};
DRAWTEXT(超跌<0,L-0.05, '■'),COLOR00FF00{XG51};
STICKLINE(准备=80,h,l,0,1),COLOR00FF00,linethick2{XG51};
STICKLINE(准备=80,o,c,4,1),COLOR00FF00,linethick2{XG51};
STICKLINE(马=80,h,l,0,1),COLORRED,linethick2{XG51};
STICKLINE(马=80,o,c,4,1),COLORRED,linethick2{XG51};
DRAWTEXT(骑马=100 ,L-0.02 , '●'),COLORRED{XG51};
DRAWTEXT(骑马=100,L*0.95, '买'),COLORRED{XG51};
DRAWTEXT(登高=30 ,MA1 , '⊙'),COLORBLUE{XG51};
DRAWTEXT(漫步=-20 ,MA1 , '┉'),COLOR00FF00{XG51};
DRAWTEXT(小心=-20,L-0.02, '·'),COLORWHITE{XG51};
DRAWTEXT((MM+KK)>150,MA1, '≯'),COLORFF6600{XG51};
DRAWTEXT(悬崖=-50,L-0.02, '●'),COLORFF6600{XG51};
DRAWTEXT(花香<0 ,L-0.02 , '='),COLORFF00FF{XG51};
ZbsJ:=BArslAST(准备=80){XG51};
IF(NOT(准备=80),REF(L,ZBSJ),REF(L,ZBSJ)),COLOR00FF00,POINTDOT{X_G~5_1_C_N_{};