通达信黄金主图源码副图

M55:=55;

HR:=HHV(HIGH,M55);

HRY:=LLV(LOW,M55);

HRY11:=HR*HRY;

HRY33:SQRT(HRY11),COLORGREEN,LINETHICK2;

IF(C>HRY33 AND HRY33 >=REF(HRY33 ,1), HRY33 ,DRAWNULL),LINETHICK2,COLORRED;

WLT1:=MA(C,5);

WLT2:=MA(C,10);

DRAWBAND(WLT1,RGB(255,255,0),WLT2,RGB(0,0,220));

{横盘整理}

HP:=(HHV(CLOSE,10)-LLV(CLOSE,10))/CLOSE<0.10;

{量比}

LB:=VOL/MA(VOL,5);

{上升角度}

X1:=(C+L+H)/3;

BB5:=ATAN(EMA(X1,7)-REF(EMA(X1,7),1))*3.1416*10;

DRAWTEXT(FILTER(BB5>1 AND EMA(X1,7)>REF(EMA(X1,7),1),10),

LOW*0.99,'★∠45'),COLORFFFFFF;

TT:=FILTER(BB5>1 AND EMA(X1,7)>REF(EMA(X1,7),1),10);

MM:=WLT1>REF(WLT1,1) AND REF(WLT1,1);

GG1:=CROSS(WLT1,WLT2);{均线向上金叉}

{CCI指标}

TYP:= (HIGH + LOW + CLOSE)/3;

CCI1:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,5));

差值1:=ABS(REF(CCI1,1)-CCI1),LINETHICK0;

CCI2:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10));

差值2:=ABS(REF(CCI2,1)-CCI2),LINETHICK0;

CCI3:=(TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20));

差值3:=ABS(REF(CCI3,1)-CCI3),LINETHICK0;

CCI4:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30));

差值4:=ABS(REF(CCI4,1)-CCI4),LINETHICK0;

CCI5:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60));

差值5:=ABS(REF(CCI5,1)-CCI5),LINETHICK0;

CCI:=(CCI1+CCI2+CCI3+CCI4+CCI5)/2,COLORRED,LINETHICK2;

WLT91:=HHV(CCI,13);{CCI的13日内最高}

WLT92:=LLV(CCI,13)<-100;{CCI的13日内最低值小于-100}

WLT95:=COUNT(WLT92,13)>=3;{CCI的13日内最低值小于-100的情况不少于3次}

WLT93:=CCI>WLT91;{CCI大于前13日内最高}

WLT96:=CROSS(CCI,100);{CCI上穿100}

TJ91:=WLT95 AND WLT96;

JLP:=FILTER(TJ91,5);{CCI的13日内完成探底后走强}

超买:=MA(C,10)*IF(CAPITAL=0,1.04,1.1),POINTDOT,COLORGREEN,LINETHICK2;

超卖:=MA(C,10)*IF(CAPITAL=0,0.95,0.9),POINTDOT,COLORRED,LINETHICK2;

TEND:EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),42)

,POINTDOT,COLORFF00FF,LINETHICK4;

DDF:=TEND>REF(TEND,1) AND REF(TEND,1) >REF(TEND,2);{趋势线向上转折}

GG2:=CROSS(WLT1,TEND);{均线与趋势线向上金叉}

HRY1:=LLV(LOW,55);

HRY2:=HHV(HIGH,21);

GG3:=C<HRY2*0.8 AND C>HRY33;{股价高于牛熊线,低于21日内最高价的80%}

JJ1:=C<HRY1*1.62;

TJ1:=GG1;{均线向上金叉}

TJ2:=GG2 AND JJ1;

TJ3:=GG1 AND GG3;

XG:=TJ1 OR TJ3 ;

XG2:=C<HRY2*0.86 OR LB>1;

XG1:=XG AND XG2 AND C>HRY33 AND JLP;

XG3:=XG AND C<HHV(HIGH,250)*0.3;

XG11:=XG1 OR XG3;

DRAWICON(XG11,LOW*0.97,23);

DRAWTEXT(XG1,LOW*0.95,'全'),COLORFFFFFF;

DRAWTEXT(XG1,LOW*0.93,'仓'),COLORFFFFFF;

TIM:=IFF(FROMOPEN>0,(240/FROMOPEN),1);

预计日成交量:=IFF(ISLASTBAR AND PERIOD==5 AND TIM>0,VOL*TIM,VOL);

JJ:=(3*C+H+L+O)/6;

VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;

黄金柱A:=FILTER(TJ1,5);

MA135:=MA(VOL,135);

CTXIONG:=(预计日成交量==HHV(VOL,10) AND 预计日成交量>=1.7*REF(VOL,1) AND C>=REF(C,1) AND C>=O AND 预计日成交量<=MA135*3.5);

黄金柱B:=FILTER(CTXIONG,3) AND BARSCOUNT(C>0)>=135;

XTJ1:=(VOL=HHV(VOL,10) AND VOL>1.7*REF(VOL,1) AND C>=REF(C,1) AND C>=O);

黄金柱C:=FILTER(TJ1,3) AND BARSCOUNT(C>0)<135;

黄金柱:黄金柱A OR 黄金柱B OR 黄金柱C,NODRAW,COLORYELLOW;

STICKLINE(黄金柱,OPEN,CLOSE,8,0),COLORYELLOW;

QGA1:=REF(C,10)==HHV(C,2*10+1);

QGB1:=FILTER(QGA1,10);

QGC1:=BACKSET(QGB1,10+1);

HD:=FILTER(QGC1,10);

QDA2:=REF(C,10)==LLV(C,2*10+1);

QDB2:=FILTER(QDA2,10);

QDC2:=BACKSET(QDB2,10+1);

LD:=FILTER(QDC2,10);

前期高位:REF(C,BARSLAST(HD)),POINTDOT,COLORFFFFFF;

STICKLINE(C,前期高位,前期高位,8,0),COLORFFFFFF;

前期低位:REF(C,BARSLAST(LD)),NODRAW,COLORRED;

STICKLINE(C,前期低位,前期低位,8,0),COLORRED;

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

A5:EMA(AP,5),COLORFFFFFF;

A13:EMA(AP,13),COLORRED,LINETHICK2;

A55:EMA(AP,55),COLORYELLOW;

A0X:=(A5-REF(A5,1))/REF(A5,1)*100,NODRAW;

A1X:=(A13-REF(A13,1))/REF(A13,1)*100,NODRAW;

A2X:=(A55-REF(A55,1))/REF(A55,1)*100,NODRAW;

高低幅度:100*(前期高位-前期低位)/前期低位,NODRAW,COLORGREEN;

均线幅度:100*(EMA((L+H+C*2)/4,3)-前期低位)/前期低位,NODRAW;

买入持股:IFF(A1X>=0,A13,DRAWNULL),COLORRED,LINETHICK2;

卖出空仓:IFF(A1X<0 AND A2X<0,A13,DRAWNULL),COLORGREEN,LINETHICK2;

STICKLINE(CROSS(A0X,0),C,O,2,0 ),COLORGRAY;

STICKLINE(CROSS(A1X,0),C,O,2,0 ),COLORMAGENTA;

黄金柱主图

M1:=5;

M2:=60;

VOLUME:VOL,VOLSTICK;

MAVOL1:MA(VOLUME,M1);

MAVOL2:MA(VOLUME,M2);

II:COUNT(CLOSE>REF(CLOSE,1),2)==2 AND COUNT(VOL<REF(VOL,1),2)==2;

STICKLINE(II,0,V,3,0),COLORGREEN;

DRAWTEXT(II,VOL*1.5,'降'),COLORGREEN;

T:=DYNAINFO(8)>0;

VO:VOL==LLV(VOL,100) AND T;

地量柱:T AND VO,COLORBLUE;

STICKLINE(地量柱,0,V,3,0),COLORBLUE;

DRAWTEXT(地量柱,VOL*2.5,'地'),COLORBLUE;

BLZ:=VOL>REF(V,1)*1.9;

BLZ1:=VOL<REF(LLV(VOL,13),1);

BLZ2:=VOL<REF(LLV(VOL,55),1);

[1] [2]  下一页