大智慧热点F10副图指标

以下是大智慧热点F10副图指标

大智慧热点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)+'万股'),Culorgreen,POINTDOT,LINETHICK1; DRAWTEXTREL(10,380,'解禁2：'),LINETHICK1, COLORyellow;DRAWTEXTREL(60,380,SELFSTRING('时间2')),LINETHICK1,COLORyellow;DRAWTEXTREL(160,380,NUMTOSTRN(SELFDATA('数量2'),0)+'万股'),Culorgreen,POINTDOT,LINETHICK1; DRAWTEXTREL(10,460,'解禁3：'),LINETHICK1, COLORyellow;DRAWTEXTREL(60,460,SELFSTRING('时间3')),LINETHICK1,COLORyellow;DRAWTEXTREL(160,460,NUMTOSTRN(SELFDATA('数量3'),0)+'万股'),Culorgreen,POINTDOT,LINETHICK1;