通达信量价背离决策源码附图

2015-10-25 22:51:00来源:本站整理浏览:519

DRAWTEXT_FIX(个股<大盘 AND ISLASTBAR,0.14,0.10,0,"弱于大盘"),COLORGREEN;
DRAWTEXT_FIX(个股>0 AND ISLASTBAR,0.21,0.10,0,"走势较强"),COLORYELLOW;
DRAWTEXT_FIX(个股<0 AND ISLASTBAR,0.21,0.10,0,"走势较弱"),COLORGREEN;
DRAWTEXT_FIX(1,0.00,0.10,0,"友谊看盘："),COLORYELLOW;
DRAWTEXT_FIX(1,0.00,0.00,0,"所属代码名称："),COLORYELLOW;
DRAWTEXT_FIX(1,0.09,0.00,0,CODE),COLORCYAN;
DRAWTEXT_FIX(1,0.15,0,0,"所属行业："),COLORYELLOW;
DRAWTEXT_FIX(1,0.215,0,0,HYBLOCK),COLORCYAN;
DRAWTEXT_FIX(1,0.26,0,0,"所属地区："),COLORYELLOW;
DRAWTEXT_FIX(1,0.33,0,0,DYBLOCK),COLORCYAN;
DRAWTEXT_FIX(1,0.40,0,0,"所属概念："),COLORYELLOW;
DRAWTEXT_FIX(1,0.48,0,0,GNBLOCK),COLORCYAN;
{显示年月日星期几}
D1:=YEAR AND MONTH AND DAY;
AAA1:=STRCAT(CON2STR(YEAR,0),"年");
AAA2:=STRCAT(CON2STR(MONTH,0),"月");
AAA3:=STRCAT(CON2STR(DAY,0),"日");
AAA4:=STRCAT("【",IF(WEEKDAY=1,"一",IF(WEEKDAY=2,"二",IF(WEEKDAY=3,"三",IF(WEEKDAY=4,"四",IF(WEEKDAY=5,"五",IF(WEEKDAY=6,"六","日")))))));
AAA:=STRCAT(STRCAT(STRCAT(AAA1,AAA2),STRCAT(AAA3,AAA4)),"】");
DRAWTEXT_FIX(D1,0.65,0.0,0,AAA),COLORCYAN;
今总成交（亿）:=AMOUNT/100000000,COLORFF00FF,NODRAW;
成交:=AMOUNT/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
今总流入（亿）:=IF(CLOSE>OPEN,成交*(HIGH-LOW),IF(CLOSE<OPEN,成交*((HIGH-OPEN)+(CLOSE-LOW)),AMOUNT/2))/100000000,COLORRED,NODRAW;
今总流出（亿）:=IF(CLOSE>OPEN,0-成交*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-成交*(HIGH-LOW),0-AMOUNT/2))/100000000,COLOR00FF00,NODRAW;
今净流入（亿）:=今总流入（亿）+今总流出（亿）,COLORYELLOW,NODRAW;
今总成交:=STRCAT(STRCAT(" 今总成交: ",CON2STR(今总成交（亿）,2)),"亿");
今总流入:=STRCAT(STRCAT(" 今总流入: ",CON2STR(今总流入（亿）,2)),"亿");
今总流出:=STRCAT(STRCAT(" 今总流出: ",CON2STR(今总流出（亿）,2)),"亿");
今净流入:=STRCAT(STRCAT(" 今净流入: ",CON2STR(今净流入（亿）,2)),"亿");
今资金流:=STRCAT("今资金流: ",STRCAT(STRCAT(STRCAT(STRCAT(今总成交,今总流入),今总流出), 今净流入),0));
DRAWTEXT_FIX(ISLASTBAR,0.00,0.05,0,今资金流),COLORYELLOW;