大智慧热点F10副图指标
源码
{热点F10----白马唐僧整理修改版,大智慧2版本副图}
{基本素材来自于创幻论坛一品茶缘老师“热点五星”“简单F10”指标}
DRAWRECTREL(0,0,250,550,RGB(75,75,75));
DRAWTEXTREL(10,45,''+STKLABEL+' '+STKNAME),LINETHICK1,COLORwhite;
ZYTB:=FINANCE2(11);JLTB:=FINANCE2(10);
★奥运概念:(STRFIND(BKNAME,'奥运',1)>0),COLOR00FFFF,POINTDOT,LINETHICK0;
★整体上市:(STRFIND(BKNAME,'整体上市',1)>0),COLORFF00FF,POINTDOT,LINETHICK0;
★定向增发:(STRFIND(BKNAME,'定向增发',1)>0),COLOR00FF00,POINTDOT,LINETHICK0;
★预盈预增:(STRFIND(BKNAME,'预盈预增',1)>0),COLOR0000FF,POINTDOT,LINETHICK0;
★基金重仓:(STRFIND(BKNAME,'基金重仓',1)>0),COLORFFFF00,POINTDOT,LINETHICK0;
★注资承诺概念:(STRFIND(BKNAME,'注资承诺',1)>0),COLOR00FFFF,POINTDOT,LINETHICK0;
★定向:(STRFIND(BKNAME,'定向增发',1)>0),COLOR00FFFF,POINTDOT,LINETHICK0;
★定向L: PERCENTBAR(REF(★定向,0),REF(★定向,0)),COLORRED;
DRAWTEXTREL(600,50,'■机构评级:'+Extrastring('评级')),colorFFFF00;
DRAWTEXTREL(260,170,'■分红预案:'+SELFSTRING('分红')),COLORRED;
DRAWTEXTREL(260,50,'总股本:'+NUMTOSTRN(FINANCE2(35)/10000,2)+'亿股' +' 流通A股:'+NUMTOSTRN(FINANCE2(37)/10000,2)+'亿股'),COLOR00ffff;
if DISPSTATUS=2 then begin;
var100:='所属地区:';
if inblock('安徽')=1 then var100:=var100+' 安 徽';
if inblock('北京')=1 then var100:=var100+' 北 京';
if inblock('福建')=1 then var100:=var100+' 福 建';
if inblock('甘肃')=1 then var100:=var100+' 甘 肃';
if inblock('广东')=1 then var100:=var100+' 广 东';
if inblock('广西')=1 then var100:=var100+' 广 西';
if inblock('贵州')=1 then var100:=var100+' 贵 州';
if inblock('海南')=1 then var100:=var100+' 海 南';
if inblock('河北')=1 then var100:=var100+' 河 北';
if inblock('河南')=1 then var100:=var100+' 河 南';
if inblock('黑龙江')=1 then var100:=var100+' 黑龙江';
if inblock('湖北')=1 then var100:=var100+' 湖 北';
if inblock('湖南')=1 then var100:=var100+' 湖 南';
if inblock('吉林')=1 then var100:=var100+' 吉 林';
if inblock('江苏')=1 then var100:=var100+' 江 苏';
if inblock('江西')=1 then var100:=var100+' 江 西';
if inblock('辽宁')=1 then var100:=var100+' 辽 宁';
if inblock('内蒙古')=1 then var100:=var100+' 内蒙古';
if inblock('宁夏')=1 then var100:=var100+' 宁 夏';
if inblock('青海')=1 then var100:=var100+' 青 海';
if inblock('山东')=1 then var100:=var100+' 山 东';
if inblock('山西')=1 then var100:=var100+' 山 西';
if inblock('陕西')=1 then var100:=var100+' 陕 西';
if inblock('上海')=1 then var100:=var100+' 上 海';
if inblock('深圳')=1 then var100:=var100+' 深 圳';
if inblock('四川')=1 then var100:=var100+' 四 川';
if inblock('天津')=1 then var100:=var100+' 天 津';
if inblock('***')=1 then var100:=var100+' ***';
if inblock('新疆')=1 then var100:=var100+' 新 疆';
if inblock('云南')=1 then var100:=var100+' 云 南';
if inblock('浙江')=1 then var100:=var100+' 浙 江';
if inblock('重庆')=1 then var100:=var100+' 重 庆';
if inblock('H股')=1 then var100:=var100+' H股';
if inblock('3G')=1 then var100:=var100+' 3G';
if inblock('QFII持股')=1 then var100:=var100+' QFII持股';
if inblock('创投')=1 then var100:=var100+' 创投';
if inblock('次新股')=1 then var100:=var100+' 次新股';
if inblock('大盘')=1 then var100:=var100+' 大盘';
if inblock('参股金融')=1 then var100:=var100+' 参股金融';
if inblock('股权投资')=1 then var100:=var100+' 股权投资';
end;
DRAWTEXTREL(10,170,var100),color00ffff;
DRAWTEXTREL(260,300,'■市盈率:'+NUMTOSTRN(DYNAINFO(39),2)+'%'+' ■每股收益:'+NUMTOSTRN(FINANCE2(3),3)+' ■主营收入:'+NUMTOSTRN(FINANCE2(27)/10000,2)+'万元'+' ■主营同比:'+NUMTOSTRN(ZYTB,2)+'%'+' ■净利同比:'+NUMTOSTRN(JLTB,0)+'%'),COLORffffff;
DRAWTEXTREL(20,650,'--*-- 净资产:'+NUMTOSTRN(FINANCE2(4),2)+'元'+' --*-- 净资收益率:'+NUMTOSTRN(FINANCE2(5),2)+'%'+' --*-- 公积金:'+NUMTOSTRN(FINANCE2(7),2)+'元'+' --*-- 未分配利润:'+NUMTOSTRN(FINANCE2(8),2)+'元 --*--'),COLORRED;
DRAWTEXTREL(10,800,'所属板块:'+BKNAME),COLORffffff;
AA:=DISPSTATUS=2;
买入:=STRFIND(Extrastring('评级'),'买入',1)>0{,COLOR00FF00};
增持:=STRFIND(Extrastring('评级'),'增持',1)>0{,COLOR0000FF};
持有:=STRFIND(Extrastring('评级'),'持有',1)>0{,COLORFF00FF};
STICKLINE(C*AA,0,9,6,1),COLORFFFFFF;
STICKLINE(买入*AA,0,9,6,0),COLOR00FF00;
STICKLINE(增持*AA,0,9,6,0),COLOR0000FF;
STICKLINE(持有*AA,0,9,6,0),COLORFF00FF;
10,COLOR0000FF;
DRAWTEXTREL(810,550,'■买入'),COLOR00FF00;
DRAWTEXTREL(860,550,'■增持'),COLOR0000FF;
DRAWTEXTREL(910,550,'■持有'),COLORFF00FF;
DRAWTEXTREL(960,550,'=>'),COLORwhite;
DRAWTEXT(★奥运概念*AA,10,'★'),COLOR00FFFF;
DRAWTEXT(★整体上市*AA,8.5,'★'),COLORFF00FF;
DRAWTEXT(★定向增发*AA,7,'★'),COLOR00FF00;
DRAWTEXT(★预盈预增*AA,5.5,'★'),COLOR0000FF;
DRAWTEXT(★基金重仓*AA,4,'★'),COLORFFFF00;
DRAWTEXTREL(130,45,'上市日:'+NUMTOSTRN(FINANCE2(2),0)),colorYELLOW;
DRAWTEXTREL(10,300,'解禁1:'),LINETHICK1, COLORyellow;
DRAWTEXTREL(60,300,SELFSTRING('时间')),LINETHICK1,COLORyellow;
DRAWTEXTREL(160,300,NUMTOSTRN(SELFDATA('数量'),0)+'万股'),Colorgreen,POINTDOT,LINETHICK1;
DRAWTEXTREL(10,380,'解禁2:'),LINETHICK1, COLORyellow;
DRAWTEXTREL(60,380,SELFSTRING('时间2')),LINETHICK1,COLORyellow;
DRAWTEXTREL(160,380,NUMTOSTRN(SELFDATA('数量2'),0)+'万股'),Colorgreen,POINTDOT,LINETHICK1;
DRAWTEXTREL(10,460,'解禁3:'),LINETHICK1, COLORyellow;
DRAWTEXTREL(60,460,SELFSTRING('时间3')),LINETHICK1,COLORyellow;
DRAWTEXTREL(160,460,NUMTOSTRN(SELFDATA('数量3'),0)+'万股'),Colorgreen,POINTDOT,LINETHICK1;