牛熊线源码(通达信)

牛熊线源码(通达信)

源码正文：

参数：M1 2 100 7
M2 2 100 21
N  2 100 4
S  2 100 2
M  2 100 20
用法注释：判断股票运行趋势强弱的方法，被称为“牛熊三色”，牛熊三色每翻红一色，就可以增加1/3的仓位，三色全翻红的时候基本可以满仓。这三色分别是：macd指标，difF金叉DEA，即maCD出现红柱的时候即为翻红；SAR指标，股价重新回到SRA指标以上，SAR转向到股价之下运行即为翻红；expma指标，7号操盘线（参数7）金叉2号操盘线（参数21）即为翻红。
源码：
EXP1:EXPMA(CLOSE,M1){XG51};
EXP2:EXPMA(CLOSE,M2){XG51};
A:IF(CLOSE>SAR(N,S,M),SAR(N,S,M),DRAWNULL),CIRCLEDOT,COLORWHITE{XG51};
B:IF(CLOSE<SAR(N,S,M),SAR(N,S,M),DRAWNULL),CIRCLEDOT,COLORGREEN{XG51};
高1:=REF(HHV(H,150),3){XG51};
低1:=REF(LLV(L,150),3){XG51};
H3:=高1-(高1-低1)*0.5{XG51};
中轴:REFDATE(H3,DATE),POINTDOT,COLORBLACK,LINETHICK3{XG51};
B1:=ema(C,12){XG51};
B2:=EMA(C,26){XG51};
B3:=(B1-B2)*2{XG51};
WDIF:中轴+B3{XG51};
WDEA:EMA(WDIF,9){XG51};
MacD:=2*(WDIF-WDEA){XG51};
stICKLINE(MACD>0,中轴,中轴+MACD,0,1),COLORBLUE{XG51};
STICKLINE(MACD<0,中轴,中轴+MACD,0,1),COLORLIGREEN{X_G_5_1_C_N_{};