【资料名称】:主图叠加成交量主图源码 通达信 贴图介绍【资料描述】:
主图叠加成交量主图源码 通达信 贴图
分享一个自己整理的主图叠加成交量主图源码,要需要的拿去。
{修改后}
MAXV:=CONST(HHV(VOL,42));
MAXS:=CONST(HHV(HIGH,42));
BS:=MAXV/MAXS;
VOLUME:=VOL/BS*0.18;
ORIGIN:=CONST(LLV(LOW,0))-CONST(0.5*HHV(VOLUME,0));
STICKLINE(CLOSE>=OPEN,ORIGIN,ORIGIN+VOLUME,2,1),COLORRED;
STICKLINE(CLOSE<OPEN,ORIGIN,ORIGIN+VOLUME,2,0),COLORCYAN;
MAV5:(MA(VOLUME,5)+ORIGIN),COLORFFFFFF;
MAV10:(MA(VOLUME,10)+ORIGIN),COLORYELLOW;
MAV60:(MA(VOLUME,60)+ORIGIN),COLORMAGENTA,,LINETHICK2;
BL:=V>=REF(V,1)*2;
STICKLINE(BL,ORIGIN,ORIGIN+VOLUME,1,0),COLORYELLOW;
SBL:=V>=REF(V,1)*3;
STICKLINE(SBL,ORIGIN,ORIGIN+VOLUME,1,0),COLORMAGENTA;
IF(MAV60<REF(MAV60,1),MAV60,DRAWNULL),LINETHICK2,COLORGREEN;
JC:=CROSS(MAV5,MAV10);
DRAWICON(JC,ORIGIN+VOLUME,1);
MA5:MA(CLOSE,5),COLORWHITE,LINETHICK1;
MA10:MA(CLOSE,10),COLORYELLOW,LINETHICK1;
MA20:MA(CLOSE,20),COLORLIRED,LINETHICK1;
MA30:MA(CLOSE,30),COLORFFFF00,LINETHICK1;
所属地区:DRAWTEXT_FIX(1,0,0,0,'地:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.04,0,0,DYBLOCK),COLORYELLOW;
所属行业:DRAWTEXT_FIX(1,0,0.08,0,'行:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.04,0.08,0,HYBLOCK),COLORYELLOW;
所属概念:DRAWTEXT_FIX(1,0,0.16,0,'概:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.04,0.16,0,GNBLOCK),COLORYELLOW;
所属风格:DRAWTEXT_FIX(1,0,0.24,0,'风:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.04,0.24,0,FGBLOCK),COLORYELLOW;
STICKLINE(CLOSE>=OPEN,HIGH,LOW,0,1 ),COLOR5B5BFF;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,3,0 ),COLOR0000CC;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,2,0 ),COLOR0E0EFF;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,1.2,0 ),COLOR4848FF;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,0.6,0 ),COLOR7878FF;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,0.1,0 ),COLORA1A1FF;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,0,0 ),COLORCACAFF;
STICKLINE(CLOSE< OPEN,HIGH,LOW,0,1 ),COLORCYAN;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,3,0 ),COLOR990000;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,2,0 ),COLORCC0000;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,1.2,0 ),COLORFF4400;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,0.6,0 ),COLORFF8800;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,0.1,0 ),COLORFFCC00;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,0,0 ),COLORCYAN;
STICKLINE(C/REF(C,1)>1.097 AND C=H,C,O,2,0),COLORYELLOW;
CC3:=REF(C,1);
跌停:=IF((CC3-C)*100/CC3>=(10-0.01*100/CC3),1,0);
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;
STICKLINE(C/REF(C,1)<=1.097 AND C/REF(C,1)>=1.05 ,C,O,1.8,0),COLORFFFF00;
{下面是第一次的,可以参考,发现有很少量错误)
{主图成交量}
HH0:=CONST(HHV(H,120))*1;
LL0:=CONST(LLV(L,120))*1;
MM0:=CONST((HH0+LL0)/2);
HH1:=IF(CONST(C)<MM0,LL0-(HH0-LL0)*0.4,LL0-(HH0-LL0)*0.4),COLORRED;
LL1:=LL0;
HLMAX:=MAX(HH1,LL1);
HLMIN:=MIN(HH1,LL1);
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=(HLMAX-HLMIN);
HLMN3:=HHV(V,250)/2;
HLMN4:=HHV(V,250);
VZ:=(V-HLMN3)*HLMN2/HLMN4+HLMN1;
STICKLINE(C>=O,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2.5,1),COLORRED;
STICKLINE(C<O,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2.5,0),COLORCYAN;
MAV5:(MA(V,5)-HLMN3)*HLMN2/HLMN4+HLMN1,COLORFFFFFF;
MAV10:(MA(V,10)-HLMN3)*HLMN2/HLMN4+HLMN1,COLORYELLOW;
MAV60:(MA(V,60)-HLMN3)*HLMN2/HLMN4+HLMN1,COLORMAGENTA,,LINETHICK2;
JC:=CROSS(MAV5,MAV10);
DRAWICON(JC,(V-HLMN3)*HLMN2/HLMN4+HLMN1,1);
STICKLINE(C/REF(C,1)>1.099,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2,0),COLORRED;
STICKLINE(C/REF(C,1)<0.901,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2,0),COLORGREEN;
VY:=(0-HLMN3)*HLMN2/HLMN4+HLMN1;
STICKLINE(V>=2*REF(V,1),VZ,VY,1,0),COLORYELLOW;
STICKLINE(V>=3*REF(V,1),VZ,VY,1,0),COLORMAGENTA;
IF(MAV60<REF(MAV60,1),MAV60,DRAWNULL),LINETHICK2,COLORGREEN;
MA5:MA(CLOSE,5),COLORWHITE,LINETHICK1;
MA10:MA(CLOSE,10),COLORYELLOW,LINETHICK1;
MA20:MA(CLOSE,20),COLORLIRED,LINETHICK1;
MA30:MA(CLOSE,30),COLORFFFF00,LINETHICK1;
所属地区:DRAWTEXT_FIX(1,0,0,0,'地:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.04,0,0,DYBLOCK),COLORYELLOW;
所属行业:DRAWTEXT_FIX(1,0,0.08,0,'行:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.04,0.08,0,HYBLOCK),COLORYELLOW;
所属概念:DRAWTEXT_FIX(1,0,0.16,0,'概:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.04,0.16,0,GNBLOCK),COLORYELLOW;
所属风格:DRAWTEXT_FIX(1,0,0.24,0,'风:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.04,0.24,0,FGBLOCK),COLORYELLOW;
STICKLINE(CLOSE>=OPEN,HIGH,LOW,0,1 ),COLOR5B5BFF;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,3,0 ),COLOR0000CC;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,2,0 ),COLOR0E0EFF;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,1.2,0 ),COLOR4848FF;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,0.6,0 ),COLOR7878FF;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,0.1,0 ),COLORA1A1FF;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,0,0 ),COLORCACAFF;
STICKLINE(CLOSE< OPEN,HIGH,LOW,0,1 ),COLORCYAN;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,3,0 ),COLOR990000;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,2,0 ),COLORCC0000;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,1.2,0 ),COLORFF4400;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,0.6,0 ),COLORFF8800;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,0.1,0 ),COLORFFCC00;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,0,0 ),COLORCYAN;
STICKLINE(C/REF(C,1)>1.097 AND C=H,C,O,2,0),COLORYELLOW;
CC3:=REF(C,1);
跌停:=IF((CC3-C)*100/CC3>=(10-0.01*100/CC3),1,0);
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;
STICKLINE(C/REF(C,1)<=1.097 AND C/REF(C,1)>=1.05 ,C,O,1.8,0),COLORFFFF00;
gd52843
【下载地址隐藏】: 点:回复可见地址