通达信末日MACD未加密选股指标公式源码

源码正文：

SHORT:=6{XG51};
LONG:=13{XG51};
MID:=4{XG51};
HJ_1:=ema(CLOSE,SHORT)-Ema(CLOSE,LONG){XG51};
HJ_2:=EMA(HJ_1,MID){XG51};
HJ_3:=2*(HJ_1-HJ_2){XG51};
HJ_4:=IF(HJ_3>0,1,(-1)){XG51};
HJ_5:=REF(HJ_4,1){XG51};
HJ_6:=HJ_4*HJ_5{XG51};
HJ_7:=BArslAst(HJ_6<0){XG51};
HJ_8:=HJ_7+1{XG51};
HJ_9:=(SUM(HJ_3,0)-REF(SUM(HJ_3,0),HJ_8))/10{XG51};
HJ_10:=IF(HJ_3>0 AND HJ_3>=REF(HJ_3,1),HJ_3,0){XG51};
HJ_11:=IF(HJ_3>0 AND HJ_3<=REF(HJ_3,1),HJ_3,0){XG51};
HJ_12:=IF(HJ_3<0 AND HJ_3<REF(HJ_3,1),HJ_3,0){XG51};
HJ_13:=IF(HJ_3<0 AND HJ_3>REF(HJ_3,1),HJ_3,0){XG51};
STICKLINE(HJ_10>0,0,HJ_3,2,0),COLOR0000BB{XG51};
STICKLINE(HJ_11>0,0,HJ_3,2,1),COLOR0000BB{XG51};
STICKLINE(HJ_12<0,HJ_3,0,2,0),COLORCYAN{XG51};
STICKLINE(HJ_13<0,HJ_3,0,2,1),COLORCYAN{XG51};
快线:HJ_1,COLORRED{XG51};
慢线:HJ_2,COLORBLUE{XG51};
乖离:HJ_3*100,NODRAW{XG51};
面积:=HJ_9,NODRAW{XG51};
HJ_14:=crOSS(HJ_1,HJ_2) AND HJ_1<(-0.01){XG51};
DRAWICON(HJ_14,HJ_2*1.02,36){XG51};
HJ_15:=COUNT(CROSS(HJ_1,HJ_2),BARSLAST(HJ_2>=0)){XG51};
HJ_16:=CROSS(HJ_1,HJ_2) AND HJ_2<0 AND COUNT(HJ_15=2,21)=1{XG51};
DRAWICON(HJ_16,HJ_2*1.12,1){XG51};
HJ_17:=BARSLAST(REF(CROSS(HJ_1,HJ_2),1)){XG51};
HJ_18:=REF(CLOSE,HJ_17+1)>CLOSE AND HJ_1>REF(HJ_1,HJ_17+1) AND CROSS(HJ_1,HJ_2){XG51};
底背:DRAWLINE(HJ_17=0,HJ_2,HJ_18,HJ_2,0),COLORLIMAGENTA,LINETHICK2{XG51};
DRAWICON(HJ_18,HJ_2*1.22,38){XG51};
HJ_19:=BARSLAST(REF(CROSS(HJ_2,HJ_1),1)){XG51};
HJ_20:=REF(CLOSE,HJ_19+1)<CLOSE AND REF(HJ_1,HJ_19+1)>HJ_1 AND CROSS(HJ_2,HJ_1){XG51};
顶背:DRAWLINE(HJ_19=0,HJ_2,HJ_20,HJ_2,0),COLORCYAN,LINETHICK2{XG51};
DRAWICON(HJ_20,HJ_2*1.02,2){XG51};
DRAWICON(HJ_14 AND HJ_16 AND HJ_18,HJ_2*1.32,9){XG51};
HJ_21:=ATAN((HJ_1/REF(HJ_1,1)-1)*100)*180/3.141159{XG51};
HJ_22:=ATAN((HJ_2/REF(HJ_2,1)-1)*100)*180/3.141159{XG51};
HJ_23:=HJ_1>REF(HJ_1,1) AND REF(HJ_1,1)>REF(HJ_1,2) AND REF(HJ_1,3)<REF(HJ_1,2){XG51};
HJ_24:=HJ_2>REF(HJ_2,1) AND REF(HJ_2,1)>REF(HJ_2,2) AND REF(HJ_2,3)<REF(HJ_2,2){XG51};
夹角:HJ_21-HJ_22>=30 AND HJ_23 AND HJ_24,NODRAW,COLORCYAN{X-G!5+1-C-N-{};

源码正文：

ma20:=MA(CLOSE,20){XG51};
AA10:=MA(CLOSE,8),COLOR0000FF{XG51};
中期大底:LLV(LOW,30),COLORCDFFBB{XG51};
支撑:=HHV(ema(((((OPEN + LOW) + HIGH) + CLOSE) / 4),5),60){XG51};
压力一:HHV(LOW,20),COLORFAABEC{XG51};
中线:=MA(CLOSE,3){XG51};
DRAWTEXT(FILTER(((((HIGH > 支撑) AND (CLOSE < 支撑)) AND ((CLOSE / OPEN) > (0 - 1.06))) AND (CLOSE < OPEN)),5),(HIGH + 0.02),'←逃!'),COLORCYAN{XG51};
天:=(MA(LOW,15) * 0.985){XG51};
人:=(MA(LOW,15) * 0.96){XG51};
地:=(((HIGH + LOW) + CLOSE) / 3){XG51};
B1:=HHV(地,(4 * 15)){XG51};
B6:=LLV(地,(4 * 15)){XG51};
B7:=(B1 - B6){XG51};
B8:=(MA(((地 - B6) / B7),2) * 80){XG51};
短期底部:(LLV(HIGH,30) * 0.93),COLOR0000FF{XG51};
MA80:=LLV(HIGH,30){XG51};
压力二:=(SMA(HIGH,21,2) * 1.035){XG51};
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100){XG51};
RSV:=SMA(下档线,3,1){XG51};
K:=SMA(RSV,3,1){XG51};
D:=((3 * RSV) - (2 * K)){XG51};
J12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100){XG51};
K24:=SMA(SMA(J12,3,1),3,1){XG51};
D24:=((3 * SMA(J12,3,1)) - (2 * K24)){XG51};
压力位:IF(crOSS(D24,D),HIGH,L),POINTDOT,COLORFFFFFF{XG51};
长期底部:LLV(HIGH,30),COLOR00FF00{XG51};
X1:=EMA((((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6),10){XG51};
逃遁:=(SMA(HIGH,21,2) * 1.05){XG51};
stICKLINE((O >= C),C,O,3.3,0),COLORFF5500{XG51};
STICKLINE((O >= C),C,O,2.8,0),COLORFF8800{XG51};
STICKLINE((O >= C),C,O,2.1,0),COLORFFAA00{XG51};
STICKLINE((O >= C),C,O,1.3,0),COLORFFCC00{XG51};
STICKLINE((O >= C),H,L,0.4,0),COLORFFFF00{XG51};
STICKLINE((C >= O),C,O,3.3,0),COLOR000077{XG51};
STICKLINE((C >= O),C,O,2.8,0),COLOR000099{XG51};
STICKLINE((C >= O),C,O,2.1,0),COLOR0000AA{XG51};
STICKLINE((C >= O),C,O,1.3,0),COLOR0000CC{XG51};
STICKLINE((C >= O),H,L,0.4,0),COLOR0000FF{XG51};
STICKLINE(((((C / O) > 1.04) AND (C < 逃遁)) AND ((C - REF(C,1)) > 0)),C,O,3.3,0),COLOR0077FF{XG51};
STICKLINE(((((C / O) > 1.04) AND (C < 逃遁)) AND ((C - REF(C,1)) > 0)),C,O,2.8,0),COLOR0099FF{XG51};
STICKLINE(((((C / O) > 1.04) AND (C < 逃遁)) AND ((C - REF(C,1)) > 0)),C,O,2.1,0),COLOR00AAFF{XG51};
STICKLINE(((((C / O) > 1.04) AND (C < 逃遁)) AND ((C - REF(C,1)) > 0)),C,O,1.3,0),COLOR00CCFF{XG51};
STICKLINE(((((C / O) > 1.04) AND (C < 逃遁)) AND ((C - REF(C,1)) > 0)),H,L,0.4,0),COLOR00FFFF{XG51};
STICKLINE(((((C < REF(C,1)) AND (C < REF(C,1))) AND (H > 逃遁)) AND (C < 逃遁)),C,O,3.3,0),COLOR9933FF{XG51};
STICKLINE(((((C < REF(C,1)) AND (C < REF(C,1))) AND (H > 逃遁)) AND (C < 逃遁)),C,O,2.8,0),COLORFF33FF{XG51};
STICKLINE(((((C < REF(C,1)) AND (C < REF(C,1))) AND (H > 逃遁)) AND (C < 逃遁)),C,O,2.1,0),COLORFF88FF{XG51};
STICKLINE(((((C < REF(C,1)) AND (C < REF(C,1))) AND (H > 逃遁)) AND (C < 逃遁)),C,O,1.3,0),COLORFFAAFF{XG51};
STICKLINE(((((C < REF(C,1)) AND (C < REF(C,1))) AND (H > 逃遁)) AND (C < 逃遁)),H,L,0.4,0),COLORFFCCFF{XG51};
DRAWTEXT(FILTER(((((LLV(LOW,0) AND ((MA(CLOSE,37) - REF(MA(CLOSE,37),1)) > 0)) AND (LOW <= 短期底部)) AND
(WINNER(CLOSE) < 0.05)) AND ((CLOSE / OPEN) > 0.13)),7),(LOW - 0.09),'●见底'),COLOR00B2FF{XG51};
阻挡:=(SMA(LOW,21,2) * 0.94){XG51};
DRAWTEXT(FILTER(((((((((CLOSE / OPEN) > 1.03) AND ((MA(CLOSE,15) - REF(MA(CLOSE,15),1)) > 0)) AND
((CLOSE - REF(CLOSE,1)) > 0)) AND (HIGH < 压力一)) AND (CLOSE < 压力一)) AND ((压力二 - REF(压力二,1)) > 0))
AND (CLOSE < (SMA(HIGH,21,2) * 1.05))),3),LOW,'←出击'),COLORD4DEE9{XG51};
DRAWTEXT((((((((CLOSE - REF(HIGH,1)) > 0)) AND ((中线 - REF(中线,1)) > 0)) AND (HIGH <= 压力一)) AND
(CLOSE < MA20)) AND (LOW <= 中线)),(LOW - 0.06),'★关注'),COLORBLUE{XG51};
DRAWTEXT(FILTER(((((((LOW <= 天) AND (CLOSE >= MA20)) AND (HIGH < 压力一)) AND ((天 - REF(天,1)) > 0)) AND (CLOSE < 压力一)) AND ((MA20 - REF(MA20,1)) > 0)),6),(LOW - 0.12),'←全仓'),COLORFFFFFF{XG51};
DRAWTEXT(((((LOW <= (SMA(LOW,5,2) * 0.96)) AND (HIGH >= 短期底部)) AND (CLOSE >= 长期底部)) AND
((CLOSE / OPEN) > 1.03)),(LOW - 0.08),'★抄底'),COLOR0000FF{XG51};
DRAWTEXT(((CROSS(SMA(LOW,5,1),阻挡) AND (WINNER(CLOSE) <= 0.17)) AND ((X1 - REF(X1,1)) > 0)),(LOW - 0.08),'←大胆买'),COLOR00FFFF{XG51};
DRAWTEXT(FILTER((((((B8 <= 1) AND (LOW <= 阻挡)) AND (CLOSE > OPEN)) AND (LOW <= 中期大底)) AND
(CLOSE >= 长期底部)),3),(LOW - 0.08),'←短抄'),COLORA100FF{XG51};
DRAWTEXT(FILTER((((CROSS((MA(LOW,10) * 0.96),(EMA(OPEN,107) * 0.897)) AND (HIGH < MA(CLOSE,80))) AND
(HIGH < 压力一)) AND LLV(LOW,0)),10),LOW,'←果断买'),COLOR00FFFF{XG51};
DRAWTEXT(FILTER(((CROSS(中线,人) AND (LOW <= 人)) AND (CLOSE >= 人)),4),(LOW - 0.06),'←买'),COLOR00FF00{XG51};
DRAWTEXT(FILTER((((((((MA20 - REF(MA20,1)) > 0) AND (HIGH < 支撑)) AND ((AA10 - REF(AA10,1)) > 0)) AND
(HIGH < 压力一)) AND (vol >= REF(VOL,1))) AND CROSS(CLOSE,MA20)),57),LOW,'★突破生命线'),COLOR0000FF{XG51};
DRAWTEXT(FILTER(((((LOW <= MA80) AND (CLOSE > MA80)) AND (CLOSE > OPEN)) AND (SMA(CLOSE,2,1) <= MA80)),8),LOW,'←底'),COLOR00FFFF{XG51};
DRAWTEXT(((CROSS(MA20,压力位) AND (LOW <= MA20)) AND ((MA20 - REF(MA20,1)) > 0.02)),(LOW - 0.03),'★绝佳买点'),COLORFFF0FF{X+G.5_1+C+N+{};