以下是通达信倍量平量天量地量一图尽显副图源码(无源码的请下载附件导入)
通达信倍量平量天量地量一图尽显副图源码
M1:=5;
M2:=10;
总量:AMOUNT,VOLSTICK;
MAVOL1:=MA(总量,M1);
MAVOL2:=MA(总量,M2);
去除次新股:=BARSCOUNT(C)>=15;{次新股的天数}
ZTB:=C>INTPART(REF(C,1)*(1+10/100)/0.01+0.5)*0.01-0.006 AND C=H;
STICKLINE(AMOUNT>800000000 AND ZTB,0,AMOUNT,-1,0),COLORRED;
STICKLINE(AMOUNT>1000000000 AND ZTB,0,AMOUNT,-1,0),COLORMAGENTA;
启动:=MA(总量,250),DOTLINE,LINETHICK1,COLORWHITE;
量比:V/REF(MA(V,5),1),COLORBROWN,NODRAW;
几倍:=1.9;
倍量: 总量 >=REF(总量,1)*几倍 AND (IF(C<O,C>REF(C,1),1)),COLORYELLOW,NODRAW;
倍缩: REF(总量,1)>= 总量 *几倍,COLORMAGENTA,NODRAW;
百低:总量=LLV(总量,125) AND BARSCOUNT(总量)>=125,COLORBLUE,NODRAW;
平量: RANGE(总量 /REF(总量,1),0.97,1.03) AND BARSCOUNT(总量)>=2,COLORWHITE,NODRAW;
天量:总量=HHV(总量,120), COLORRED;
量王:天量&&倍量&&量比>2&&(BARSCOUNT(C)+1)>120,COLORGREEN, NODRAW;
倍数:总量/REF(总量,1),COLORYELLOW,NODRAW;
V1:=总量 *0.9;
V2:= 总量 *0.8;
STICKLINE(倍量, 0,V1,0,0),COLORYELLOW;
STICKLINE(倍缩, 0,V1,0.1,0),COLORMAGENTA;
STICKLINE(百低, 0,V1,1,0),COLORBLUE;
STICKLINE(天量,0,V1,0.1,0),COLORRED;
STICKLINE(量王&&COUNT(量王,2)<=1,0,AMOUNT,-1,0),COLORGREEN;
STICKLINE(C<O AND C>REF(C,1),0, 总量,0,0),COLORRED;{假阴柱}
STICKLINE((量王 AND 总量),总量/3,总量/3,2,0)COLORRED LINETHICK9;
STICKLINE((量王 AND 总量),总量*2/3,总量*2/3,2,0)COLORRED LINETHICK9;
STICKLINE((量王 AND 总量),总量*1/2,总量*1/2,2,0)COLORRED LINETHICK9;
LX1:=BARSLAST(量王>0);
NOTEXT8:IF(CURRBARSCOUNT<=CONST(LX1)+1,CONST(REF(总量,LX1)),DRAWNULL),COLORGREEN LINETHICK1;
VOLUME:=AMOUNT,VOLSTICK;
{流通市值:(FINANCE(40)/100000000),NODRAW,COLORRED;}
流通市值:C*FINANCE(7)/100000000,NODRAW,COLORFF6633;
实流通市值:C*FINANCE(46)/100000000,NODRAW,COLORYELLOW;
HX5:=C>O OR (C=O AND C<REF(C,1));
HT5:=BARSLASTCOUNT(HX5);
TJ119:=HT5=5;
TJ129:=RANGE(HT5,0,5);
TJ139:=BARSLAST(CURRBARSCOUNT=CONST(HT5)+1);
HY99:=(BACKSET(TJ119>0,HT5) OR TJ129*0 OR TJ139>0)*HT5;
DRAWTEXT(HY99=5,V*1.2,'串'),COLORWHITE;
量线3:=MA(总量,3);
量线30:=MA(总量,30);
量线120:=MA(总量,120);
H_L:=0.1*CONST(HHV(总量,250));
V100:= V<=LLV(V,100)*1.2 AND V>0 AND BARSCOUNT(V)>=100;
百日地量群:=COUNT(V100,5)>=3;
DRAWTEXT(FILTER(百日地量群,4),V+3*H_L,'地量群'),COLORGRAY;
82533547.png
825155481.png
|