MACD_COLA算法 通达信副图指标 源码 贴图
DIF:(2*EMA(CLOSE,12)-EMA(EMA(CLOSE,12),12)-(2*EMA(CLOSE,26)-EMA(EMA(CLOSE,26),26)))/2.2; DEA:2.1*EMA(DIF,9)-EMA(EMA(DIF,9),9); MACD:2.8*(DIF-DEA),COLORSTICK; DRAWICON(REF(DIF,1)>REF(DIF,2) AND DIF DRAWICON(CROSS(DEA,DIF) AND DIF>0,DIF,37),COLORGREEN; DRAWICON(REF(DIF,1) X_1:=MACD<0 AND MACD>REF(MACD,1) AND REF(MACD,1) X_2:=MACD>0 AND MACD STICKLINE(X_2,0,MACD,0.3,0),COLORGREEN; X_3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)); X_4:=SMA(X_3,9,3); X_5:=SMA(X_4,9,3); X_6:=3*X_4-2*X_5; X_7:=CROSS(X_4,X_5); X_8:=CROSS(X_5,X_4); X_9:=REF(CLOSE,1); X_10:=SMA(MAX(CLOSE-X_9,0),6,1)/SMA(ABS(CLOSE-X_9),6,1)*100; X_11:=CROSS(DIF,DEA) AND (X_7 OR (X_6<20 AND X_10<20)); X_12:=CROSS(DEA,DIF) AND (X_8 OR (X_6>80 AND X_10>80)); DRAWICON(X_11,DEA*1,25); DRAWICON(X_12,DEA*1,24); X_13:=100-100*(HHV(HIGH,40)-CLOSE)/(HHV(HIGH,40)-LLV(LOW,40))-50; NOTEXTLU:IF(X_13>24.99,DIF,DRAWNULL),COLORRED,LINETHICK2; NOTEXTLU2:IF(X_13<(-40.009998),DIF,DRAWNULL),COLORGREEN,LINETHICK2; NOTEXT0:0,DOTLINE,COLORLIGRAY; X_14:=IF(PERIOD=0,0.7,IF(PERIOD=1,1.2,IF(PERIOD=2,2,IF(PERIOD=3,2.5,IF(PERIOD=4,3,IF(PERIOD=5,5.5,IF(PERIOD=6,6,IF(PERIOD=7,7,IF(PERIOD=8,3.5,4))))))))); X_15:=BARSLAST(CROSS(MACD,0)); X_16:=REF(X_15,1)>0 AND X_15=0; X_17:=BARSLAST(X_16); X_18:=REF(X_15,X_17+1); X_19:=HHVBARS(MACD,X_17+X_18); X_20:=IF(X_19>X_17,REF(MACD,X_19),0); X_21:=IF(X_19>X_17,REF(HIGH,X_19),0); X_22:=IF(REF(HIGH,1)=HHV(HIGH,X_17+X_18),REF(HIGH,1),0); X_23:=(X_22-X_21)/X_21*100; X_24:=COUNT(CROSS(0,MACD),X_17+X_18); X_25:=MACD>0 AND MACD X_26:=REF(X_25,1) AND HIGH X_27:=LLVBARS(MACD,X_17+X_18); X_28:=IF(X_27>X_17,REF(MACD,X_27),0); X_29:=IF(X_27>X_17,REF(LOW,X_27),0); X_30:=IF(REF(LOW,1)=LLV(LOW,X_17+X_18),REF(LOW,1),0); X_31:=(X_29-X_30)/X_29*100;{WWW.GPXIAZAI.COM} X_32:=COUNT(CROSS(MACD,0),X_17+X_18); X_33:=MACD<0 AND MACD>X_28 AND LOW=LLV(LOW,X_17+X_18) AND X_28<0 AND COUNT(CROSS(MACD,0),X_17+X_18)<=3; X_34:=REF(X_33,1) AND LOW>REF(LOW,1) AND MACD<0 AND X_28<0; 前高:IF(X_26,X_21,DRAWNULL),NODRAW,COLOR7FFF00; 现高:IF(X_26,X_22,DRAWNULL),NODRAW,COLORGREEN; 幅度_顶:IF(X_26,X_23,DRAWNULL),NODRAW,COLORYELLOW; 原低:IF(X_34,X_29,DRAWNULL),NODRAW,COLORLIMAGENTA; 现低:IF(X_34,X_30,DRAWNULL),NODRAW,COLORRED; 幅度_底:IF(X_34,X_31,0),NODRAW,COLORYELLOW; DRAWICON(X_34,MACD,26); DRAWICON(X_26,MACD,27); X_35:=BACKSET(X_26,X_19+1); X_36:=BACKSET(X_34,X_27+1); NOTEXTMACDL:DRAWLINE(REF(X_36,1)=0 AND X_36=1 AND MACD<0,MACD,X_34,MACD,0),COLORRED; NOTEXTMACDH:DRAWLINE(REF(X_35,1)=0 AND X_35=1 AND MACD>0,MACD,X_26,MACD,0),COLORGREEN; 涨家数:INDEXADV,NODRAW,COLORRED; 跌家数:INDEXDEC,NODRAW,COLORGREEN; 正量能:涨家数/(涨家数+跌家数)*100,NODRAW,COLORMAGENTA; 负量能:跌家数/(涨家数+跌家数)*100,NODRAW,COLORYELLOW; |
