|
以下是通达信黄金主图源码副图（无源码的请下载附件导入）
黄金柱主图
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);
STICKLINE(BLZ,0,V,3,0),COLORYELLOW;
倍量柱:BLZ,COLORYELLOW;
DRAWTEXT(倍量柱,VOL*1.3,'倍'),COLORYELLOW;
HJZ:=(3*C+H+L+O)/6;
HJZ2:=(8*HJZ+7*REF(HJZ,1)+6*REF(HJZ,2)+5*REF(HJZ,3)+4*REF(HJZ,4)+3*REF(HJZ,5)+2*REF(HJZ,6)+REF(HJZ,8))/36;
HJZ3:=VOL==HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>HJZ2 AND C>O;
黄金柱:FILTER(HJZ3,5),STICK,COLORRED,LINETHICK4;
STICKLINE(黄金柱,0,V,3,0),COLORRED;
DRAWTEXT(黄金柱,VOL*1.6,'黄'),COLORRED;
价涨量缩:II,COLORGREEN;
FLZ:=V>REF(V,1)*0.98 AND V<REF(V,1)*1.02;
STICKLINE(FLZ,0,V,3,0),COLORMAGENTA;
DRAWTEXT(FLZ,VOL*1.5,'平'),COLORMAGENTA;
平量柱:FLZ,COLORMAGENTA;
544200085.png
|
