【资料名称】:通达信量能百分图副图指标 显示获利百分比和北京时间 源码 附图介绍
【资料描述】:
通达信量能百分图副图指标 显示获利百分比和北京时间 源码 附图
{量能百分图 副图源码}
STICKLINE(CLOSE=REF(CLOSE,1),0,VOL,3.3,0),COLORWHITE;
STICKLINE(CLOSE>REF(CLOSE,1),0,VOL,3.3,0),COLORRED;
STICKLINE(CLOSE<REF(CLOSE,1),0,VOL,3.3,0),COLORGREEN;
累计换手:SUM(VOL,0)*100/CAPITAL,NODRAW;
当日换手:IF((SETCODE==0||SETCODE==1),100*VOL,VOL)/(FINANCE(7)/100),NODRAW;
二日换手:SUM(VOL,2)*100/CAPITAL,NODRAW;
三日换手:SUM(VOL,3)*100/CAPITAL,NODRAW;
四日换手:SUM(VOL,4)*100/CAPITAL,NODRAW;
五日换手:SUM(VOL,5)*100/CAPITAL,NODRAW;
十日换手:SUM(VOL,10)*100/CAPITAL,NODRAW;
十五日换手:SUM(VOL,15)*100/CAPITAL,NODRAW;
二十日换手:SUM(VOL,20)*100/CAPITAL,NODRAW;
三十日换手:SUM(VOL,30)*100/CAPITAL,NODRAW;
四十日换手:SUM(VOL,40)*100/CAPITAL,NODRAW;
五十日换手:SUM(VOL,50)*100/CAPITAL,NODRAW;
六十日换手:SUM(VOL,60)*100/CAPITAL,NODRAW;
百日换手:SUM(VOL,100)*100/CAPITAL,NODRAW;
二百日换手:SUM(VOL,200)*100/CAPITAL,NODRAW;
三百日换手:SUM(VOL,300)*100/CAPITAL,NODRAW;
四百日换手:SUM(VOL,400)*100/CAPITAL,NODRAW;
五百日换手:SUM(VOL,500)*100/CAPITAL,NODRAW;
{年月日星期}
DA:=YEAR AND MONTH AND DAY;
AA1:=STRCAT(CON2STR(YEAR,0),'年');
AA2:=STRCAT(CON2STR(MONTH,0),'月');
AA3:=STRCAT(CON2STR(DAY,0),'日');
AA4:=STRCAT('【',IF(WEEKDAY=1,'星期一',IF(WEEKDAY=2,'星期二',
IF(WEEKDAY=3,'星期三',IF(WEEKDAY=4,'星期四',IF
(WEEKDAY=5,'星期五',IF(WEEKDAY=6,'星期六','星期日')))))));
AA:=STRCAT(STRCAT(STRCAT(AA1,AA2),STRCAT(AA3,AA4)),'】');
DRAWTEXT_FIX(DA,0.848,0.01,0,AA),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR=1,0.08,0,0,STKNAME),COLORWHITE ;
DRAWTEXT_FIX(ISLASTBAR=1,0.18,0,0,CODE) COLOR0000FF;
ASDF:=STRCAT(STRCAT('当前获利盘比例: ',CON2STR(WINNER(CLOSE)*100,2)),'％');
DRAWTEXT_FIX(ISLASTBAR,0.500,0.001,0,ASDF),COLORWHITE;
{画横线，区分空间维度，间隔为10%比例}
DRAWRECTREL(000,001,999,005,000);
DRAWRECTREL(000,100,999,105,000);
DRAWRECTREL(000,200,999,205,000);
DRAWRECTREL(000,300,999,305,000);
DRAWRECTREL(000,400,999,405,000);
DRAWRECTREL(000,500,999,505,000);
DRAWRECTREL(000,600,999,605,000);
DRAWRECTREL(000,700,999,705,000);
DRAWRECTREL(000,800,999,805,000);
DRAWRECTREL(000,900,999,905,000);
DRAWRECTREL(000,995,999,999,000);
{右侧解说性文字}
DRAWTEXT_FIX(1,0.999,0.999,1,'最后边'),COLORYELLOW;
DRAWTEXT_FIX(1,0.999,0.900,1,'10%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.999,0.800,1,'20%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.999,0.700,1,'30%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.999,0.600,1,'40%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.999,0.500,1,'50%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.999,0.400,1,'60%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.999,0.300,1,'70%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.999,0.200,1,'80%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.999,0.100,1,'90%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.999,0.001,1,'最前边'),COLORYELLOW;
{左侧解说性文字}
DRAWTEXT_FIX(1,0.03,0.999,1,'最后边'),COLORYELLOW;
DRAWTEXT_FIX(1,0.03,0.900,1,'10%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.03,0.800,1,'20%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.03,0.700,1,'30%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.03,0.600,1,'40%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.03,0.500,1,'50%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.03,0.400,1,'60%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.03,0.300,1,'70%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.03,0.200,1,'80%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.03,0.100,1,'90%'),COLORYELLOW;
DRAWTEXT_FIX(1,0.03,0.001,1,'最前边'),COLORYELLOW;
gd58811
【下载地址隐藏】： 点：回复可见地址 
