通达信主力持仓控盘未加密选股指标公式源码

通达信主力持仓控盘未加密选股指标公式源码

源码正文：

主力持仓:ema(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORmaGENTA,LINETHICK2{XG51};
强弱分界: 80,COLORBLUE{XG51};
主力筹码集中度:WINNER(C)*100,COLORWHITE,LINETHICK1{XG51};
散筹筹码集中度:(WINNER(C*1.1)-WINNER(C*0.9))*100,COLORCYAN,LINETHICK1{XG51};
获利盘%:WINNER(CLOSE)*100,NODRAW,COLOR00FFFF{XG51};
A1:=REF(CLOSE,2){XG51};
A2:=SMA(MAX(CLOSE-A1,0),7,1)/SMA(Abs(CLOSE-A1),7,1)*100{XG51};
A4:=REF(LOW,1){XG51};
A5:=SMA(ABS(LOW-A4),3,1)/SMA(MAX(LOW-A4,0),3,1)*100{XG51};
A6:=EMA(IF(CLOSE*1.3,A5*10,A5/10),3){XG51};
A7:=LLV(LOW,29){XG51};
A8:=HHV(A6,37){XG51};
A9:=IF(MA(CLOSE,90),1,0){XG51};
A10:=EMA(IF(LOW<=A7,(A6+A8*2)/2,0),3)/1688*A9{XG51};
A11:=IF(A10>100,100,A10){XG51};
stICKLINE(A11,0,A11,4,1),COLORF00FF0{XG51};
吸筹:A11,COLORLIGREEN{XG51};
突破:=REF(EMA(C,13),1)COLORLIMAGENTA,NODRAW{XG51};
A1X:=(EMA(C,13)-突破)/突破*100,NODRAW{XG51};
拉升:IF(A1X>=0,REF(EMA(C,13),BArslAST(crOSS(A1X,0))+1),DRAWNULL)COLORBLUE,NODRAW{XG51};
警惕变盘:IF(A1X<0,REF(EMA(C,13),BARSLAST(CROSS(0,A1X))+1),DRAWNULL)COLORRED,NODRAW{XG51};
持币:IF(A1X<0,突破,DRAWNULL)COLORCYAN,NODRAW{XG51};
DRAWTEXT(拉升 AND ISLASTBAR,60,' 拉升'),COLORWHITE{XG51};
DRAWTEXT(警惕变盘 AND ISLASTBAR,60,' 警惕变盘'),COLORBLUE{XG51};
DRAWTEXT(获利盘%>=98 AND ISLASTBAR,80,' 获利就走'),COLORBLUE{XG51};
DRAWTEXT(吸筹>=18 AND ISLASTBAR,80,' 适当加仓'),COLORBLUE{XG51};
CCT:=DYNAINFO(8){XG51};
AAA:= FILTER(CCT=0,350) {XG51};
DRAWTEXT(AAA,10,'★此股今日未开盘,不能分析'),COLORFF00FF{XG51};
VAR1:=SMA(EMA(((C+L)/2-LLV(L,13))/(HHV((H+C)/2,13)-LLV(L,13))*100,3),7,1)-(13){XG51};
RSV:=((HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100)-70{XG51};
RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
FATK:=SMA(RSV1,5,1){XG51};
趋势线:SMA(FATK,5,1)COLORBLUE,NODRAW{XG51};
买卖线:(7*SMA((CLOSE- LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1)-3*SMA(SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1),2,1)),NODRAW,LINETHICK2,COLORWHITE{XG51};
B13:DRAWICON((zig(3,3)>REF(ZIG(3,3),1)) AND (REF(ZIG(3,3),1)<=REF(ZIG(3,3),2)) AND (REF(ZIG(3,3),2)<=REF(ZIG(3,3),3)),2,1) {XG51};
S13:DRAWICON((ZIG(3,3)<REF(ZIG(3,3),1)) AND (REF(ZIG(3,3),1)>=REF(ZIG(3,3),2)) AND (REF(ZIG(3,3),2)>=REF(ZIG(3,3),3)),96,2){XG51};
B3:DRAWTEXT(CROSS(ZIG(3,4),REF(ZIG(3,4),1)),20,'+20'),COLORWHITE{XG51};
B6:DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),30,'+40'),COLORWHITE{XG51};
B9:DRAWTEXT(CROSS(ZIG(3,12),REF(ZIG(3,12),1)),40,'+60'),COLORWHITE{XG51};
B12:DRAWTEXT(CROSS(ZIG(3,16),REF(ZIG(3,16),1)),50,'+80'),COLORWHITE{XG51};
B15:DRAWTEXT(CROSS(ZIG(3,20),REF(ZIG(3,20),1)),60,'+100'),COLORWHITE{XG51};
S15:DRAWTEXT(CROSS(REF(ZIG(3,20),1),ZIG(3,20)),50,'-100'),COLORCYAN{XG51};
S12:DRAWTEXT(CROSS(REF(ZIG(3,16),1),ZIG(3,16)),60,'-80'),COLORCYAN{XG51};
S9:DRAWTEXT(CROSS(REF(ZIG(3,12),1),ZIG(3,12)),70,'-60'),COLORCYAN{XG51};
S6:DRAWTEXT(CROSS(REF(ZIG(3,8),1),ZIG(3,8)),80,'-40'),COLORCYAN{XG51};
S3:DRAWTEXT(CROSS(REF(ZIG(3,4),1),ZIG(3,4)),90,'-20'),COLORCYAN{XG51};
CA1:=IF( 趋势线>80 AND S13,1,0){XG51};
CA2:=IF( 买卖线<6 AND A2<10 AND B13,1,0){XG51};
DDA:=' 跌,先卖再补'{XG51};
DRAWTEXT(CA1,100,DDA),COLORCYAN{XG51};
DDB:=' 高吸筹与加仓100%买'{XG51};
DRAWTEXT(CA2,70,DDB),COLORWHITE{X*G~5-1*C*N*{};

通达信北沙月周日MACD框未加密选股指标公式源码

源码正文：

JC:="macd.maCD#MONTH"<0{XG51};
TS:=BArslAst(JC),NODRAW{XG51};
起点:=FILTERX(TS=1,BARSSINCE(C)){XG51};
终点:=FILTERX(TS>=1 AND REFX(TS,1)=0,BARSSINCE(C)){XG51};
天数:=BARSLAST(起点){XG51};
红柱最高价:IF(天数>=0 AND REFX(TS>=1,BARSNEXT(ISLASTBAR)),CONST(HHV(H,TS)),DRAWNULL),COLORBLUE{XG51};
红柱最低价:IF(天数>=0 AND REFX(TS>=1,BARSNEXT(ISLASTBAR)),CONST(LLV(L,TS)),DRAWNULL),COLORBLUE{XG51};
STICKLINE(起点,红柱最高价,红柱最低价,0,-1),COLORBLUE{XG51};
STICKLINE(ISLASTBAR,红柱最高价,红柱最低价,0,-1),COLORBLUE{XG51};
SC:="MacD.MACD#MONTH">0{XG51};
TS1:=BARSLAST(SC),NODRAW{XG51};
起点1:=FILTERX(TS1=1,BARSSINCE(C)){XG51};
终点1:=FILTERX(TS1>=1 AND REFX(TS1,1)=0,BARSSINCE(C)){XG51};
天数1:=BARSLAST(起点1){XG51};
绿柱最高价:IF(天数1>=0 AND REFX(TS1>=1,BARSNEXT(ISLASTBAR)),CONST(HHV(H,TS1)),DRAWNULL),COLORLIGREEN{XG51};
绿柱最低价:IF(天数1>=0 AND REFX(TS1>=1,BARSNEXT(ISLASTBAR)),CONST(LLV(L,TS1)),DRAWNULL),COLORLIGREEN{XG51};
STICKLINE(起点1,绿柱最高价,绿柱最低价,0,-1),COLORLIGREEN{XG51};
STICKLINE(ISLASTBAR,绿柱最高价,绿柱最低价,0,-1),COLORLIGREEN{XG51};
ZJC:="MACD.MACD#WEEK"<0{XG51};
ZTS:=BARSLAST(ZJC),NODRAW{XG51};
Z起点:=FILTERX(ZTS=1,BARSSINCE(C)){XG51};
Z终点:=FILTERX(ZTS>=1 AND REFX(ZTS,1)=0,BARSSINCE(C)){XG51};
Z天数:=BARSLAST(Z起点){XG51};
Z红柱最高价:IF(Z天数>=0 AND REFX(ZTS>=1,BARSNEXT(ISLASTBAR)),CONST(HHV(H,ZTS)),DRAWNULL),COLORLIMAGENTA{XG51};
Z红柱最低价:IF(Z天数>=0 AND REFX(ZTS>=1,BARSNEXT(ISLASTBAR)),CONST(LLV(L,ZTS)),DRAWNULL),COLORLIMAGENTA{XG51};
STICKLINE(Z起点,Z红柱最高价,Z红柱最低价,0,-1),COLORLIMAGENTA{XG51};
STICKLINE(ISLASTBAR,Z红柱最高价,Z红柱最低价,0,-1),COLORLIMAGENTA{XG51};
ZSC:="MACD.MACD#WEEK">0{XG51};
ZTS1:=BARSLAST(ZSC),NODRAW{XG51};
Z起点1:=FILTERX(ZTS1=1,BARSSINCE(C)){XG51};
Z终点1:=FILTERX(ZTS1>=1 AND REFX(ZTS1,1)=0,BARSSINCE(C)){XG51};
Z天数1:=BARSLAST(Z起点1){XG51};
Z绿柱最高价:IF(Z天数1>=0 AND REFX(ZTS1>=1,BARSNEXT(ISLASTBAR)),CONST(HHV(H,ZTS1)),DRAWNULL),COLORCYAN{XG51};
Z绿柱最低价:IF(Z天数1>=0 AND REFX(ZTS1>=1,BARSNEXT(ISLASTBAR)),CONST(LLV(L,ZTS1)),DRAWNULL),COLORCYAN{XG51};
STICKLINE(Z起点1,Z绿柱最高价,Z绿柱最低价,0,-1),COLORCYAN{XG51};
STICKLINE(ISLASTBAR,Z绿柱最高价,Z绿柱最低价,0,-1),COLORCYAN{XG51};
RJC:="MACD.MACD#DAY"<0{XG51};
RTS:=BARSLAST(RJC),NODRAW{XG51};
R起点:=FILTERX(RTS=1,BARSSINCE(C)){XG51};
R终点:=FILTERX(RTS>=1 AND REFX(RTS,1)=0,BARSSINCE(C)){XG51};
R天数:=BARSLAST(R起点){XG51};
R红柱最高价:IF(R天数>=0 AND REFX(RTS>=1,BARSNEXT(ISLASTBAR)),CONST(HHV(H,RTS)),DRAWNULL),COLORlired{XG51};
R红柱最低价:IF(R天数>=0 AND REFX(RTS>=1,BARSNEXT(ISLASTBAR)),CONST(LLV(L,RTS)),DRAWNULL),COLORlired{XG51};
STICKLINE(R起点,R红柱最高价,R红柱最低价,0,-1),COLORlired{XG51};
STICKLINE(ISLASTBAR,R红柱最高价,R红柱最低价,0,-1),COLORlired{XG51};
RSC:="MACD.MACD#DAY">0{XG51};
RTS1:=BARSLAST(RSC),NODRAW{XG51};
R起点1:=FILTERX(RTS1=1,BARSSINCE(C)){XG51};
R终点1:=FILTERX(RTS1>=1 AND REFX(RTS1,1)=0,BARSSINCE(C)){XG51};
R天数1:=BARSLAST(R起点1){XG51};
R绿柱最高价:IF(R天数1>=0 AND REFX(RTS1>=1,BARSNEXT(ISLASTBAR)),CONST(HHV(H,RTS1)),DRAWNULL),COLORgray{XG51};
R绿柱最低价:IF(R天数1>=0 AND REFX(RTS1>=1,BARSNEXT(ISLASTBAR)),CONST(LLV(L,RTS1)),DRAWNULL),COLORgray{XG51};
STICKLINE(R起点1,R绿柱最高价,R绿柱最低价,0,-1),COLORgray{XG51};
STICKLINE(ISLASTBAR,R绿柱最高价,R绿柱最低价,0,-1),COLORgray{XG51};
DRAWKLINE(H,O,L,C){X_G^5.1_C_N_{};