板块决策 每天前十 板块监控的精品公式
看图写的板块前十,送上一个L2板块(排序的太咔了所以不发上来),想交流股买点,有愿意的发上来
DRAWRECTabs(1,168,860,298,RGB(0,0,1)),Color888866;
DRAWRECTabs(1,1,860,448,RGB(0,0,0)),Coloreeeeaa;
DRAWRECTabs(1,1,860,37,RGB(185,50,75)),Coloreeeeaa;
上s:=STKINDI('1a0001','DY.ss');
DRAWTEXTabs(50,6,' 壹 庆 '+'上证资金'+NUMTOSTRN(上s,2)+'亿 上涨家数'+INDEXADV+'/下跌家数'+INDEXDEC+'/平盘家数'+DYNAINFO(68)),ColorFFFFe9;
DRAWTEXTabs(4,22,' '+'板块名称'+' '+'涨幅%'+' '+'0-涨幅→1-------2-------3-------4-------5-------6-------7-------8-------9←流量-0'+' '+' DDX '+' '+' 飘红 '+' '+'资金(亿)'+' '+'板块家数'),ColorFFFFc9;
TT:=' ';
{工程建筑}
V01c:=STKINDI('991002','DY.CC');
V01d:=STKINDI('991002','DY.DD');
V01p:=count(V01d>0,飘);
V01s:=STKINDI('991002','DY.SS');
V01y:=STKINDI('991002','DY.yy');
DRAWTEXTabs(4,39,' '+'工程建筑'+' '+STRRIGHT(' '+NUMTOSTRN(V01c,2),7)+' '+TT+STRRIGHT(' '+NUMTOSTRN(V01d,2),5)+' '+STRRIGHT(' '+NUMTOSTRN(V01p,0),3)+' '+STRRIGHT(' '+NUMTOSTRN(V01s,3),8)+' '+'工程建筑(47)'),ColorADFFFF;
DRAWRECTabs(132,40,132+ABS(V01c)*48.5,50,IF(V01c>=0,RGB(255,50,30),RGB(100,255,70))),COLOR000000;
DRAWRECTabs(616,45,616-ABS(V01y)*N,51,IF(V01d>=0,RGB(255,200,60),RGB(0,200,255))),COLOR000000;
{电力 }
V02c:=STKINDI('991003','DY.CC');
V02d:=STKINDI('991003','DY.DD');
V02p:=count(V02d>0,飘);
V02s:=STKINDI('991003','DY.SS');
V02y:=STKINDI('991003','DY.yy');
DRAWTEXTabs(4,52,' '+'电力 '+' '+STRRIGHT(' '+NUMTOSTRN(V02c,2),7)+' '+TT+STRRIGHT(' '+NUMTOSTRN(V02d,2),5)+' '+STRRIGHT(' '+NUMTOSTRN(V02p,0),3)+' '+STRRIGHT(' '+NUMTOSTRN(V02s,3),8)+' '+'电力(57)'),ColorADFFFF;
DRAWRECTabs(132,53,132+ABS(V02c)*48.5,63,IF(V02c>=0,RGB(255,50,30),RGB(100,255,70))),COLOR000000;
DRAWRECTabs(616,58,616-ABS(V02y)*N,64,IF(V02d>=0,RGB(255,200,60),RGB(0,200,255))),COLOR000000;
{计算机 }
V03c:=STKINDI('991004','DY.CC');
V03d:=STKINDI('991004','DY.DD');
V03p:=count(V03d>0,飘);
V03s:=STKINDI('991004','DY.SS');
V03y:=STKINDI('991004','DY.yy');
DRAWTEXTabs(4,65,' '+'计算机 '+' '+STRRIGHT(' '+NUMTOSTRN(V03c,2),7)+' '+TT+STRRIGHT(' '+NUMTOSTRN(V03d,2),5)+' '+STRRIGHT(' '+NUMTOSTRN(V03p,0),3)+' '+STRRIGHT(' '+NUMTOSTRN(V03s,3),8)+' '+'计算机(61)'),ColorADFFFF;
DRAWRECTabs(132,66,132+ABS(V03c)*48.5,76,IF(V03c>=0,RGB(255,50,30),RGB(100,255,70))),COLOR000000;
DRAWRECTabs(616,71,616-ABS(V03y)*N,77,IF(V03d>=0,RGB(255,200,60),RGB(0,200,255))),COLOR000000;
{电子信息}
V04c:=STKINDI('991006','DY.CC');
V04d:=STKINDI('991006','DY.DD');
V04p:=count(V04d>0,飘);
V04s:=STKINDI('991006','DY.SS');
V04y:=STKINDI('991006','DY.yy');
DRAWTEXTabs(4,78,' '+'电子信息'+' '+STRRIGHT(' '+NUMTOSTRN(V04c,2),7)+' '+TT+STRRIGHT(' '+NUMTOSTRN(V04d,2),5)+' '+STRRIGHT(' '+NUMTOSTRN(V04p,0),3)+' '+STRRIGHT(' '+NUMTOSTRN(V04s,3),8)+' '+'电子信息(82)'),ColorADFFFF;
DRAWRECTabs(132,79,132+ABS(V04c)*48.5,89,IF(V04c>=0,RGB(255,50,30),RGB(100,255,70))),COLOR000000;
DRAWRECTabs(616,84,616-ABS(V04y)*N,90,IF(V04d>=0,RGB(255,200,60),RGB(0,200,255))),COLOR000000;
{房地产 }
V05c:=STKINDI('991007','DY.CC');
V05d:=STKINDI('991007','DY.DD');
V05p:=count(V05d>0,飘);
V05s:=STKINDI('991007','DY.SS');
V05y:=STKINDI('991007','DY.yy');
DRAWTEXTabs(4,91,' '+'房地产 '+' '+STRRIGHT(' '+NUMTOSTRN(V05c,2),7)+' '+TT+STRRIGHT(' '+NUMTOSTRN(V05d,2),5)+' '+STRRIGHT(' '+NUMTOSTRN(V05p,0),3)+' '+STRRIGHT(' '+NUMTOSTRN(V05s,3),8)+' '+'房地产(142)'),ColorADFFFF;
DRAWRECTabs(132,92,132+ABS(V05c)*48.5,102,IF(V05c>=0,RGB(255,50,30),RGB(100,255,70))),COLOR000000;
DRAWRECTabs(616,97,616-ABS(V05y)*N,103,IF(V05d>=0,RGB(255,200,60),RGB(0,200,255))),COLOR000000;
{纺织服装}
V06c:=STKINDI('991008','DY.CC');
V06d:=STKINDI('991008','DY.DD');
V06p:=count(V06d>0,飘);
V06s:=STKINDI('991008','DY.SS');
V06y:=STKINDI('991008','DY.yy');
DRAWTEXTabs(4,104,' '+'纺织服装'+' '+STRRIGHT(' '+NUMTOSTRN(V06c,2),7)+' '+TT+STRRIGHT(' '+NUMTOSTRN(V06d,2),5)+' '+STRRIGHT(' '+NUMTOSTRN(V06p,0),3)+' '+STRRIGHT(' '+NUMTOSTRN(V06s,3),8)+' '+'纺织服装(67)'),ColorADFFFF;
DRAWRECTabs(132,105,132+ABS(V06c)*48.5,115,IF(V06c>=0,RGB(255,50,30),RGB(100,255,70))),COLOR000000;
DRAWRECTabs(616,110,616-ABS(V06y)*N,116,IF(V06d>=0,RGB(255,200,60),RGB(0,200,255))),COLOR000000;
{钢铁 }
V07c:=STKINDI('991009','DY.CC');
V07d:=STKINDI('991009','DY.DD');
V07p:=count(V07d>0,飘);
V07s:=STKINDI('991009','DY.SS');
V07y:=STKINDI('991009','DY.yy');
DRAWTEXTabs(4,117,' '+'钢铁 '+' '+STRRIGHT(' '+NUMTOSTRN(V07c,2),7)+' '+TT+STRRIGHT(' '+NUMTOSTRN(V07d,2),5)+' '+STRRIGHT(' '+NUMTOSTRN(V07p,0),3)+' '+STRRIGHT(' '+NUMTOSTRN(V07s,3),8)+' '+'钢铁(38)'),ColorADFFFF;
DRAWRECTabs(132,118,132+ABS(V07c)*48.5,128,IF(V07c>=0,RGB(255,50,30),RGB(100,255,70))),COLOR000000;
DRAWRECTabs(616,123,616-ABS(V07y)*N,129,IF(V07d>=0,RGB(255,200,60),RGB(0,200,255))),COLOR000000;
{供水供气}
V08c:=STKINDI('991010','DY.CC');
V08d:=STKINDI('991010','DY.DD');
V08p:=count(V08d>0,飘);
V08s:=STKINDI('991010','DY.SS');
V08y:=STKINDI('991010','DY.yy');
DRAWTEXTabs(4,130,' '+'供水供气'+' '+STRRIGHT(' '+NUMTOSTRN(V08c,2),7)+' '+TT+STRRIGHT(' '+NUMTOSTRN(V08d,2),5)+' '+STRRIGHT(' '+NUMTOSTRN(V08p,0),3)+' '+STRRIGHT(' '+NUMTOSTRN(V08s,3),8)+' '+'供水供气(25)'),ColorADFFFF;
DRAWRECTabs(132,131,132+ABS(V08c)*48.5,141,IF(V08c>=0,RGB(255,50,30),RGB(100,255,70))),COLOR000000;
DRAWRECTabs(616,136,616-ABS(V08y)*N,142,IF(V08d>=0,RGB(255,200,60),RGB(0,200,25 |