通达信牛熊变线主图指标

M60:=MA(C,60);

M120:=MA(C,120);

DRAWBAND(M60,RGB(90,0,0),M120,RGB(0,90,0));

{牛熊变线}

变线:=EMA(MA(CLOSE,30),5),LINETHICK0;{20 或 30 或 35}

STICKLINE(C>=变线 AND C>=O,H,L,0,0),COLORRED;

STICKLINE(C>=变线 AND C>=O,C,O,2.7,1),COLORRED;

STICKLINE(C>变线 AND C<=O,H,L,0,1),COLORCYAN;

STICKLINE(C>变线 AND C<=O,C,O,3,0),COLORCYAN;

STICKLINE(C<变线 AND C<=O,H,L,0,1),COLORCYAN;

STICKLINE(C<变线 AND C<=O,C,O,3,0),COLORCYAN;

STICKLINE(C<变线 AND C<=O,H,L,0,1),COLORGRAY;

STICKLINE(C<变线 AND C>O,H,L,0,1),COLORGRAY;

STICKLINE(C<变线 AND C>O,C,O,3,1),COLORGRAY;

STICKLINE(C<变线 AND C<=O,C,O,3,1),COLORGRAY;

{分水岭操作线}

PM:MA(C,5),COLORGRAY,LINETHICK1;{可用13}

IF(PM<REF(PM,1),PM,DRAWNULL),COLORGRAY,LINETHICK0;

IF(PM>=REF(PM,1),PM,DRAWNULL),COLORRED,LINETHICK2;

IF(PM=REF(PM,1),PM,DRAWNULL),COLORRED,LINETHICK2;

A:=MA(CLOSE,12)+ABS(MA(CLOSE,12)-REF(MA(CLOSE,12),1));{原公式为17,最终确定为12}

B:=MA(CLOSE,12)+MA(CLOSE,12)-REF(MA(CLOSE,12),1);

分水岭:=IF(MA(CLOSE,12)<B,B,MA(CLOSE,12));

操作线:=分水岭-(EMA(C,3)-分水岭);

AA:=CROSS(分水岭,操作线);

DRAWTEXT_FIX(C>O,0.01,0.9,0,''),COLORRED;

STICKLINE(AA,C,O,3,0),COLOR0000AA;

STICKLINE(AA,C,O,2,0),COLOR0033CC;

STICKLINE(AA,C,O,1,0),COLOR0055EE;

STICKLINE(AA,C,O,0.3,0),COLOR0099FF;

STICKLINE(AA,H,L,0,1),COLOR0099FF;

RR:=CROSS((MA(VOL,5)),(MA(VOL,10))) AND MA(C,2)>=MA(C,4); {AND VOL>=REF(VOL,1)}

STICKLINE(RR,C,O,3,0),COLOR0000AA;

STICKLINE(RR,C,O,2,0),COLOR0033CC;

STICKLINE(RR,C,O,1,0),COLOR0055EE;

STICKLINE(RR,C,O,0.3,0),COLOR0099EE;

STICKLINE(RR,H,L,0,1),COLOR0099FF;

MA5:MA(CLOSE,5),NODRAW;

MA10:MA(CLOSE,10),COLORCC66FF;

MA20:MA(CLOSE,20),COLORFFCC66,LINETHICK2;

MA60:MA(CLOSE,60),COLOR00FF99,LINETHICK2;

MA120:MA(C,120),COLORGRAY;

DRAWTEXT(CROSS(MA60,MA120),MA60,'牛'),COLORYELLOW,LINETHICK4;

DRAWTEXT(CROSS(MA120,MA60),MA60,'熊'),COLORWHITE,LINETHICK2;{公式结束};

C3:=REF(C,1);

跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);

STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;

STICKLINE(C/REF(C,1)>1.098 AND C=H,O,C,2,0),COLORYELLOW;

{涨跌停K线}

STICKLINE(HIGH=LOW AND CLOSE=OPEN AND (CLOSE/REF(CLOSE,1))>1.048,HIGH,LOW,3,0) ,COLORRED;

STICKLINE(HIGH=LOW AND CLOSE=OPEN AND (REF(CLOSE,1)/CLOSE)>1.048,HIGH,LOW,3,0) ,COLOR00FF00;

{突破}

海面:MA(C,60),COLORFFFFFF,NODRAW;

乘风:MA(C,8),COLORYELLOW,LINETHICK1,NODRAW;

破浪:EMA(C,21),LINETHICK2,COLORMAGENTA;

IF(破浪>海面,海面,DRAWNULL),COLORFFFFFF;

IF(乘风>=破浪,乘风,DRAWNULL),COLORYELLOW,LINETHICK1;

IF(乘风>破浪 AND 乘风<=REF(乘风,1),乘风,DRAWNULL),COLORCYAN,LINETHICK1;

IF(破浪<=REF(破浪,1),破浪,DRAWNULL),COLORGREEN,LINETHICK2;

BB:=COUNT(CROSS(EMA(C,21),MA(C,60)),30)=1;

CC:=REF(BARSLAST(AA AND BB),1);

DD:=CC AND CROSS(MA(C,8),EMA(C,21));

DRAWTEXT(DD,(LOW * 0.99),'★乘风'),COLORFFC5FF;

MTM:=C-REF(C,1);

DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);

卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0);

DRAWICON(FILTER(卖=1,1),HIGH*1.01,8);

买入:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,COLORMAGENTA;

MA1:SMA(C,3,1),COLORGREEN;

DRAWICON(CROSS(MA1,买入),L*0.99,7);

BU:=CROSS(HIGH,SAR(3,1,20));

SEL:=CROSS(SAR(3,1,20),LOW);

DRAWTEXT(BU,LOW,'☆'),COLORYELLOW,LINETHICK2;

DRAWTEXT(SEL,1.01*HIGH,'↓'),COLORGREEN,LINETHICK2;

Z1:=STRCAT(HYBLOCK,' ');

Z2:=STRCAT(Z1,DYBLOCK);

Z3:=STRCAT(Z2,' ');

DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORLIRED;

{支撑阻力}

T:=1;

V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20)*T;

V2:=(1-7/100)*(DMA(CLOSE,V1))*T;

V3:=(1+7/100)*(DMA(CLOSE,V1))*T;

支撑:REFDATE(V2,DATE),LINETHICK4,COLORFFC8FF;

阻力:REFDATE(V3,DATE),LINETHICK4,COLOR32CD99;

{套牢盘比例}

DRAWTEXT_FIX (1,0.47,0.12,0,'套牢          '),COLORWHITE;

DRAWNUMBER_FIX(1,0.507,0.12,0,CONST(100-WINNER(CLOSE)*100)),COLORCC80FF;