分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册

软件名称:[B]关键上涨支撑价位[/B]
软件类型:国产软件
运行环境:Win2000/WinXP/Win2003/WinVista
软件语言:简体中文
授权方式:免费版
软件大小:10.0 KB
官方主页:Home Page
更新时间:2009-12-24 07:51:10
软件简介:

万国测评的资料是否完整,数据不完整就不显示内容

源码:

{大智慧L2--万国F10本行业排名}
cpbd:=f10find('☆[操盘必读]☆',1);
zxzb:=f10find('◆ 最新指标',cpbd+1);
zxsjsj:=f10find('◇万国测评制作',cpbd+1);
hydw:=f10find('◆ 行业地位 ◆',1000);
gxsj:=f10find('◇万国测评制作:',hydw);
zjsj:=f10text(gxsj,36);
hydw1:=f10find('所属行业:',hydw+1);
hydw3:=f10find('证监会行业:',hydw1+1);
hydw2:=f10find('截止日期:',hydw3+1);
{万国测评的资料是否完整,数据不完整就不显示内容。}
IF hydw1>0 and hydw3>0 and hydw2>0  THEN
BEGIN
zjh:=f10text(hydw3,hydw2-hydw3);
hydw4:=f10find('共',hydw3+1);
js:=strtonum(f10text(hydw4+2,3));
sj:=f10text(hydw2,19);
mgsy:=f10find('每股收益 排名',hydw2+1);
mgsy1:=f10find('净资产收 排名',mgsy+1);
gpszh:=f10find(STKLABEL,mgsy);
f10str:=f10text(gpszh,73);
dm:=strleft(f10str,15);
每股收益排:=strtonum(strright(f10str,3));
gpszh1:=f10find(STKLABEL,mgsy1);
f10str1:=f10text(gpszh1,73);
净利润排:=strtonum(f10text(gpszh1+56,3));
主营收入排:=strtonum(f10text(gpszh+56,3));
净资产收益排:=strtonum(strright(f10str1,3));
综合排名值:=每股收益排+净利润排+主营收入排+净资产收益排;
zytb:=f10find('主营收入同比增长',cpbd+1);
主营收入同比:=strtonum(f10text(zytb+20,10));
jll:=f10find('净利润同比增长',zytb+1);
净利润同比:=strtonum(f10text(jll+20,10));
jzc:=f10find('净资产收益率',jll+1);
净资产收益率:=strtonum(f10text(jzc+20,10));
zxsj:=f10text(zxzb,zxsjsj-5-zxzb);
gxsjy:=f10text(zxsjsj,34);
{--------图解模版---------}
DRAWTEXTABS(20,40,zxsj+'  '+gxsjy),ColorFFFFFF;
DRAWTEXTABS(20,60,'主营收入同比增长 '+主营收入同比+' %'+'  净利润同比增长  '+净利润同比+' %'+' 净资产收益率 '+净资产收益率+' %'),ColorFFFFFF;
DRAWTEXTABS(20,80,sj+'  '+zjsj),ColorFFFFFF;
DRAWTEXTABS(20,100,zjh),ColorFFFFFF;
DRAWTEXTABS(20,120,'每股收益在本行业内排第 '+每股收益排+' 位 '+'  净利润金額在本行业内排第 '+净利润排+' 位'),ColorFFFFFF;
DRAWTEXTABS(20,140,'主营收入在本行业内排第 '+主营收入排+' 位 '+'  净资产收益在本行业内排第 '+净资产收益排+' 位'),ColorFFFFFF;
DRAWTEXTABS(20,160,dm+' 在本行业综合排名分值:'+综合排名值),Color00FFF8,linethick2;
DRAWTEXTABS(20,180,'机构当前评级:'+EXTRASTRING('评级')),Color00FFF8,linethick2;
END;
{起点分析 参数:起始天数 31 1 1000,白线 -62 -1000 1000,黄线 -120 -1000  1000,粉线 -180 -1000  1000}
ap:=FILTER(BACKSET(dynainfo(7)=c and dynainfo(10)=amount,起始天数),起始天数);
ma5:ma(c,5),ColorFFFFFA;
ma10:ma(c,10),Color00FFFC;
ma30:ma(c,30),ColorFF00FD;
ma60:ma(c,60),Color00FF05;
if(BARSLAST( ap)>0,INTPART(CLOSE/0.809)*0.809 ,l),POINTDOT,linethick2,coloryellow;
if(BARSLAST( ap)>0,INTPART(CLOSE/0.764)*0.764 ,l),POINTDOT,linethick2,coloryellow;
if(BARSLAST( ap)>0,INTPART(CLOSE/0.809)*0.809+0.809 ,l),POINTDOT,linethick2,colormagenta;
DRAWLINE(ap,L,c>0,c+c*白线/10000,1),colorwhite;
DRAWLINE(ap,L,c>0,c+c*黄线/10000,1),coloryellow;
DRAWLINE(ap,L,c>0,c+c*粉线/10000,1),colormagenta;
DRAWLINE(ap,l,c>0,ref(l,1),1),colorgreen;
STICKLINE(ap,c*1.10,c*0.90,0,1),colorgreen;
DRAWTEXT(ap ,l*0.98,' 起涨点坐标↑' ),linethick2,colorred;
{关键上涨支撑价位}
DPZX:=EMA(C,1);
GGZX:=AMOUNT/V/100;
重心:=IF(CAPITAL>0,GGZX,DPZX);
zc1:=LLV(重心,2);
zc2:=LLV(重心,4);
STICKLINE(BARPOS and BARSTATUS=2,zc1,zc1,120,0),LINETHICK1,COLORGREEN;
DRAWTEXT(BARPOS and BARSTATUS=2,zc1*1.06,'上涨关键价位'+NUMTOSTR(zc1)),ALIGN2,LINETHICK1,COLORGREEN;
STICKLINE(BARPOS and BARSTATUS=2,zc2,zc2,120,0),LINETHICK1,COLORYELLOW;
DRAWTEXT(BARPOS and BARSTATUS=2,zc2*0.99,'下跌支撑价位'+NUMTOSTR(zc2)),ALIGN2,LINETHICK1,coloryellow;

 

[url=http://www.70822.com/soft/sort013/sort03/down-15312.html]关键上涨支撑价位[/url]

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明:本站所有股票公式软件资料均网上公开收集,如侵权请联系删帖。站内所有广告,均与本站无关!
Copyright © 2003-2024 70822.Com. All Rights Reserved .
页面执行时间:31.25000 毫秒