彩云追月(通达信),牛熊线源码(通达信)

彩云追月(通达信),牛熊线源码(通达信)

彩云追月(通达信)

AVEC:=(2*C+H+L)/4;

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;

dkx:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+

16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+

13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+

10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+

7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+

4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;

AA05:=ma(C,5);

AA13:=MA(C,13);

AacP:=DKX;

AA21:=MA(C,21);

AA34:=MA(C,34);

AADK:=(MA(AVEC,5)+MA(AVEC,10)+MA(AVEC,20)+MA(AVEC,60))/4;

五日乖离率:=(C-AA05)/AA05*100;

BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;

BBCP:=ATAN((AACP/REF(AACP,1)-1)*100)*180/3.1416;

BB21:=ATAN((AA21/REF(AA21,1)-1)*100)*180/3.1416;

BB34:=ATAN((AA34/REF(AA34,1)-1)*100)*180/3.1416;

bbdK:=ATAN((AADK/REF(AADK,1)-1)*100)*180/3.1416;

速度5:=SMA(ema((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);

加速度5:=EMA((速度5-REF(速度5,1)),3);

MCP:=DKX;

操盘线:DKX,COLORWHITE,LINETHICK2;

M5:MA(C,5),COLOR00FF00;

M34:MA(C,34),COLORFF33CC;

多空线: (MA(AVEC,5)+MA(AVEC,10)+MA(AVEC,20)+MA(AVEC,60))/4,POINTDOT,COLOR0044FF,LINETHICK4;

stICKLINE(BB05>30 AND AA05>REF(AA05,1), AA05,REF(AA05,1),8,1),COLORYELLOW;

STICKLINE(BB05<0 AND AA05

三拾日乖离率:=(C-AA34)/AA34*100;

bias5%:(C-MA(C,5))/MA(C,5)*100,NODRAW;

BIASCP%:(C-MCP)/MCP*100,NODRAW;

BIAS34%:(C-MA(C,34))/MA(C,34)*100,NODRAW;

B5度:BB05,NODRAW;

BCP度:BBCP,NODRAW;

B21度:BB21,NODRAW;

B34度:BB34,NODRAW;

BDK度:BBDK,NODRAW;

VAR1:=(AA21-AA34)>REF((AA21-AA34),1) AND AA21>REF(AA21,1) AND AA34>REF(AA34,1);

VAR2:=(AA34-AA21)

STICKLINE(BB34>15 AND AA34>REF(AA34,1), AA34,REF(AA34,1),8,1),COLORFF33CC;

强势狙击:=FILTER(BB34>30 AND BBCP>45 ANDcrOSS(BB05,60),10);

加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA13>REF(AA13,1)

AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ;

清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>AA34 OR O>AA34) AND AA05

DRAWTEXT(加仓 ,LOW*0.98,'←加仓'),COLORRED;

JC:=CROSS(0,五日乖离率) AND 三拾日乖离率REF(AA13,1) ;

减仓:=FILTER(JC,10);

MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)

买入:=FILTER(MR,10);

DRAWTEXT(减仓,HIGH*1.02,'←减仓'),COLORCYAN;

DRAWTEXT(买入,LOW*0.98,'★买入'),COLORYELLOW;

DRAWTEXT(清仓 ,HIGH*1.02,'★清仓'),COLORGREEN;

DRAWTEXT(强势狙击,LOW*0.98,'←强势狙击'),COLORYELLOW;

VAR21:=MAX(Abs(HIGH-AMOUNT/

vol/100),ABS(AMOUNT/VOL/100-LOW));

VAR3:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100);

MV:=(VAR21+VAR3)/AMOUNT*VOL*100*50;

DRAWTEXT(MV>6 AND L<=LLV(L,10),L*0.95,'←异动'),COLORCYAN;

牛熊线源码(通达信)

参数：M1 2 100 7

M2 2 100 21

N 2 100 4

S 2 100 2

M 2 100 20

用法注释：判断股票运行趋势强弱的方法，被称为“牛熊三色”，牛熊三色每翻红一色，就可以增加1/3的仓位，三色全翻红的时候基本可以满仓。这三色分别是：macd指标，dif金叉DEA，即maCD出现红柱的时候即为翻红；

SAR指标，股价重新回到SRA指标以上，SAR转向到股价之下运行即为翻红；

expma指标，7号操盘线（参数7）金叉2号操盘线（参数21）即为翻红。

源码：EXP1:EXPMA(CLOSE,M1);

EXP2:EXPMA(CLOSE,M2);

A:IF(CLOSE>SAR(N,S,M),SAR(N,S,M),DRAWNULL),CIRCLEDOT,COLORRED;

B:IF(CLOSE

高1:=REF(HHV(H,150),3);

低1:=REF(LLV(L,150),3);

H3:=高1-(高1-低1)*0.5;

中轴:REFDATE(H3,DATE),POINTDOT,COLORLIGRAY,LINETHICK3;

B1:=ema(C,12);

B2:=EMA(C,26);

B3:=(B1-B2)*2;

WDIF:中轴+B3;

WDEA:EMA(WDIF,9);

MacD:=2*(WDIF-WDEA);

stICKLINE(MACD>0,中轴,中轴+MACD,0,1),COLORYELLOW;

STICKLINE(MACD<0,中轴,中轴+MACD,0,1),COLORLIBLUE;

牛市通网是一个牛股推荐网与低风险投资知识网，可以在线联系客服领取牛股。牛市通网从权威的投资专家、金融分析师等投资信息中挑选优质的文章进行发布。牛市通网主要为投资者提供股票知识、股票观点、股票分析和明智金融投资讨论等信息。