通达信漂亮K线主图未加密选股指标公式源码

源码正文：

ma3:MA(CLOSE,3),COLORRED{XG51};
MA5:MA(CLOSE,5),COLORBLUE{XG51};
MA10:MA(CLOSE,10),COLORWHITE{XG51};
MA20:MA(CLOSE,20),COLORYELLOW{XG51};
MA30:MA(CLOSE,30),COLORCYAN{XG51};
MA60:MA(CLOSE,60),COLORLIMAGENTA,DOTLINE,LINETHICK1{XG51};
VAR1:=ema(CLOSE,3){XG51};
VAR2:=EMA(CLOSE,5){XG51};
VAR3:=EMA(CLOSE,10){XG51};
VAR4:=EMA(CLOSE,20){XG51};
VAR5:=EMA(CLOSE,30){XG51};
VAR6:=(VAR2+VAR3+VAR4+VAR5)/4{XG51};
VAR7:=(VAR6-REF(VAR6,15))/REF(VAR6,15)*100{XG51};
VAR8:=(VAR6-REF(VAR6,15))/REF(VAR6, 15)*100{XG51};
VAR9:=EMA(VAR7,8){XG51};
stICKLINE(VAR7<1*REF(VAR7,1),HIGH,LOW,0,0),COLORCYAN{XG51};
STICKLINE(VAR7<1*REF(VAR7,1),OPEN,CLOSE,2.5, 0),COLOR006000{XG51};
STICKLINE(VAR7<1*REF(VAR7,1),OPEN,CLOSE,1.9, 0),COLOR007500{XG51};
STICKLINE(VAR7<1*REF(VAR7,1),OPEN,CLOSE,1.4, 0),COLOR009100;
STICKLINE(VAR7<1*REF(VAR7,1),OPEN,CLOSE,1, 0),COLOR00A600{XG51};
STICKLINE(VAR7<1*REF(VAR7,1),OPEN,CLOSE,0.7, 0),COLOR00BB00{XG51};
STICKLINE(VAR7<1*REF(VAR7,1),OPEN,CLOSE,0.4, 0),COLOR00CC00{XG51};
STICKLINE(VAR7<1*REF(VAR7,1),OPEN,CLOSE,0.1, 0),COLORCYAN{XG51};
STICKLINE(VAR7>1*REF(VAR7,1),HIGH,LOW,0,0),COLORWHITE{XG51};
STICKLINE(VAR7>1*REF(VAR7,1),OPEN,CLOSE,2.5, 0),COLOR000055{XG51};
STICKLINE(VAR7>1*REF(VAR7,1),OPEN,CLOSE,1.9, 0),COLOR000077{XG51};
STICKLINE(VAR7>1*REF(VAR7,1),OPEN,CLOSE,1.3, 0),COLOR000099{XG51};
STICKLINE(VAR7>1*REF(VAR7,1),OPEN,CLOSE,0.7, 0),COLOR0000DD{XG51};
STICKLINE(VAR7>1*REF(VAR7,1),OPEN,CLOSE,0.2, 0),COLOR0000FF{XG51};
STICKLINE(VAR7<1*REF(VAR7,1) AND VAR9>1*REF(VAR9,1),HIGH,LOW,0,0),COLORYELLOW{XG51};
STICKLINE(VAR7<1*REF(VAR7,1) AND VAR9>1*REF(VAR9,1),OPEN,CLOSE,2.5, 0),COLORA12100{XG51};
STICKLINE(VAR7<1*REF(VAR7,1) AND VAR9>1*REF(VAR9,1),OPEN,CLOSE,1.9, 0),COLORB72100{XG51};
STICKLINE(VAR7<1*REF(VAR7,1) AND VAR9>1*REF(VAR9,1),OPEN,CLOSE,1.4, 0),COLORC32100{XG51};
STICKLINE(VAR7<1*REF(VAR7,1) AND VAR9>1*REF(VAR9,1),OPEN,CLOSE,1, 0),COLORCF2100{XG51};
STICKLINE(VAR7<1*REF(VAR7,1) AND VAR9>1*REF(VAR9,1),OPEN,CLOSE,0.6, 0),COLORDB2100{XG51};
STICKLINE(VAR7<1*REF(VAR7,1) AND VAR9>1*REF(VAR9,1),OPEN,CLOSE,0.3, 0),COLORFF5E00{XG51};
STICKLINE(VAR7<1*REF(VAR7,1) AND VAR9>1*REF(VAR9,1),OPEN,CLOSE,0.1, 0),COLORFF6E00{XG51};
买进价:=((CLOSE-REF(MA(CLOSE,6),1))/6+MA(CLOSE,6))*1.004{XG51};
买进条件:=crOSS(CLOSE,买进价) AND 买进价>REF(买进价,1){XG51};
STICKLINE(买进条件,HIGH,LOW,0,1),COLORRED,LINETHICK2{XG51};
STICKLINE(买进条件,OPEN,CLOSE,2.8,0),COLOR808080{XG51};
STICKLINE(买进条件,OPEN,CLOSE,2.5,0),COLOR919890{XG51};
STICKLINE(买进条件,OPEN,CLOSE,2.2,0),COLORB4B5AF{XG51};
STICKLINE(买进条件,OPEN,CLOSE,1.7,0),COLORCCCCCC{XG51};
STICKLINE(买进条件,OPEN,CLOSE,1.2,0),COLORDDDDDD{XG51};
STICKLINE(买进条件,OPEN,CLOSE,0.8,0),COLOREEEEEE{XG51};
STICKLINE(买进条件,OPEN,CLOSE,0.4,0),COLORF5F1F1{XG51};
STICKLINE(买进条件,OPEN,CLOSE,0.1,0),COLORFFFAFA{XG51};
加码价:=((CLOSE-REF(MA(CLOSE,18),1))/18+MA(CLOSE,18))*1.004{XG51};
加码条件:=CROSS(CLOSE,加码价) AND 加码价>REF(加码价,1){XG51};
STICKLINE(加码条件,HIGH,LOW,0,1),COLORBLUE,LINETHICK2{XG51};
STICKLINE(加码条件,OPEN,CLOSE,2.5,0),COLOR0033FF{XG51};
STICKLINE(加码条件,OPEN,CLOSE,2.1,0),COLOR00BEFF{XG51};
STICKLINE(加码条件,OPEN,CLOSE,1.7,0),COLOR13BCFF{XG51};
STICKLINE(加码条件,OPEN,CLOSE,1.3,0),COLOR13D1FF{XG51};
STICKLINE(加码条件,OPEN,CLOSE,0.9,0),COLOR00D6FF{XG51};
STICKLINE(加码条件,OPEN,CLOSE,0.4,0),COLOR13E5FF{XG51};
STICKLINE(加码条件,OPEN,CLOSE,0,0),COLOR00F6FC{XG51};
TIM:=IF(C,1,0){XG51};
缩倍柱:=(vol*1.95<=REF(VOL,1))*TIM{XG51};
百日低量:=(VOL=LLV(VOL,100))*TIM{XG51};
倍量柱:=(VOL>=1.95*REF(VOL,1))*TIM{XG51};
四日前倍量柱:=(REF(VOL,3)>1.95*REF(VOL,4))*TIM{XG51};
DRAWTEXT(百日低量,HIGH*1.01,'↙百日低量'),COLORWHITE{X_G~5!1_C_N_{};

源码正文：

macd:"maCD.MacD",NODRAW{XG51};
W1:stICKLINE(MACD>0,MACD,0,3,1),COLORWHITE{XG51};
W2:STICKLINE(MACD<0,MACD,0,3,1),COLORGREEN{XG51};
VA1:=HHVBARS(MACD,BArslAST(MACD<0)+1){XG51};
VA2:=crOSS(BACKSET(CROSS(0,MACD),REF(VA1,1)+2),0.5){XG51};
QG:=CROSS(BACKSET(CROSS(0,MACD) OR (ISLASTBAR AND MACD>0),REF(VA1,1)+2),0.5){XG51};
前高:DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),COLORLIMAGENTA{XG51};
VA3:=LLVBARS(MACD,BARSLAST(MACD>0)+1){XG51};
VA4:=CROSS(BACKSET(CROSS(MACD,0),REF(VA3,1)+2),0.5){XG51};
BD:=BARSLAST(FILTERX(CROSS(0,MACD),BARSCOUNT(C))){XG51};
前低:DRAWLINE(VA4,MACD,REF(VA4,1),REF(MACD,1),1){XG51};
BDTJ:=IF(MACD<0,FILTERX(MACD=LLV(MACD,BARSLAST(MACD>0)),
BARSCOUNT(C)),DRAWNULL){XG51};
TSBDTJ:=BARSLAST(BDTJ){XG51};
BDZH:=FILTERX(MACD<CONST(LLV(MACD,BD+1)),BARSCOUNT(C)){XG51};
BDTS:=BARSLAST(BDZH){XG51};
本低:IF(BD+1>=1,CONST(LLV(MACD,BD+1)),DRAWNULL){XG51};
BDCL:=CROSS(COUNT(CROSS(MACD>本低/2 AND MACD<0,0.5),TSBDTJ)=1,0.5) AND TSBDTJ>=0{XG51};
终点:=IF(ISLASTBAR AND MACD>0 AND MACD=HHV(MACD,BARSLAST(MACD<0)),1,
IF(FILTERX(QG,BARSCOUNT(C)),2,DRAWNULL)){XG51};
UU:=(终点=1 OR 终点=2) AND MACD>0{XG51};
ZZ:=FILTERX(UU,BARSCOUNT(C)){XG51};
本高:DRAWLINE(ZZ,MACD,REF(ZZ,1),REF(MACD,1),1),COLORRED{XG51};
横线:=CONST(REF(MACD,BARSLAST(ZZ))){XG51};
WW:=MACD>横线{XG51};
起始点:=FILTERX(REFX(BARSLAST(WW),1)=1,BARSCOUNT(C)){XG51};
天数:BARSLAST(起始点),COLORBLUE,NODRAW{XG51};
上横线:DRAWLINE(起始点,横线,ZZ,横线,0),COLORCYAN,DOTLINE{XG51};
下横线:DRAWLINE(BDZH,CONST(LLV(MACD,BD+1)),BDTJ=1,MACD,0),COLOR8080FF,DOTLINE{XG51};
DRAWNUMBER(BDTJ,CONST(LLV(MACD,BD+1))*0.9,BDTS){XG51};
DRAWNUMBER(ZZ,上横线*1.1,天数){XG51};
TJ:=IF(起始点,BARSNEXT(ZZ),DRAWNULL){XG51};
红柱数量:IF(天数>0 AND 天数<=REF(TJ,天数),SUM(MACD>0,天数),DRAWNULL),COLORRED,NODRAW{XG51};
横线起始价:REF(C,天数),NODRAW{XG51};
空间评估:(横线起始价-C)/C*100,NODRAW{XG51};
TT:=BARSLAST(ZZ){XG51};
WQG:=CROSS(COUNT(CROSS(MACD<本高/2 AND MACD>0,0.5),ZZ)=1,0.5) AND ZZ>=0{XG51};
STICKLINE(MACD>前高 AND 本高>前高 AND BARSLAST(CROSS(MACD<本高/2,0.5))>0 AND
MACD>(前高+本高)/2,MACD,前高,1,0),COLORBLUE{XG51};
前高本高二分位:IF(MACD>0 AND 本高!=前高,DRAWLINE(WQG,(前高+本高)/2,REF(WQG,1),REF((前高+本高)/2,1),1)
,DRAWNULL),COLORC0C000,DOTLINE{XG51};
AA:=STRCAT(STRCAT(STRCAT('〖','上升空间'),'〗'),CON2STR(IF(空间评估,空间评估,
DRAWNULL),2)){XG51};
DRAWTEXT_FIX(C>0,0,1,0,STRCAT(AA,'﹪')),COLORRED{XG51};
DRAWTEXT(WQG,MACD*1.1,'本高成立'),COLORRED{XG51};
DRAWTEXT(BDCL,MACD*1.1,'本低成立'),COLORRED{XG51};
STICKLINE(MACD>前高,MACD,前高,1,0),COLORBLUE{XG51};
STICKLINE(WQG,MACD,0,1,0),COLORCYAN{XG51};
STICKLINE(MACD<0 AND MACD<前低 AND 前低<0,MACD,前低,1,0),COLORYELLOW{XG51};
B1:=IF(CROSS(MACD<0,0.5),BARSNEXT(BDTJ),DRAWNULL){XG51};
TSB1:=BARSLAST(MACD>0)-1{XG51};
STICKLINE(BARSLAST(BDCL)>=0 AND MACD<前低 AND MACD<0,MACD,前低,1,0),COLORCYAN{XG51};
STICKLINE(BDCL,MACD,0,1,0),COLORRED{XG51};
STICKLINE(MACD>前高 AND 本高>前高 AND BARSLAST(WQG)>0,
MACD,前高,1,0),COLORWHITE{XG51};
DRAWTEXT(VA2 AND VA2!=UU,(MACD/10)*9,'前'){XG51};
DRAWTEXT(VA2 AND VA2!=UU,MACD/10,'高'){XG51};
DRAWTEXT(ZZ,(MACD/10)*9,'本'),COLORRED{XG51};
DRAWTEXT(ZZ,MACD/10,'高'),COLORRED{XG51};
DRAWTEXT(BDTJ,(MACD/10)*9,'低'),COLORWHITE{XG51};
DRAWTEXT(BDTJ,MACD/10,'本'),COLORWHITE{XG51};
IF(BARSLAST(BDCL)>=0,本低/2,DRAWNULL),COLORWHITE,DOTLINE{X?G=5-1?C?N?{};