求助老师把这个经营分析显示在主图上的公式改为通达信的(已解答:一发千钧)

[通达信] 4531 2
设置
1835054 Lv.2

专栏

发表于 2011-3-27 22:53 复制 显示全部楼层 倒序浏览 |
跳转到指定楼层
各位老师:
我用的是通达信维赛特财经,可以把下边的公式改为我可以用的吗,谢谢。

{主营构成-港澳}
DM:=STRLEFT(STKLABEL,3)<>'300',LINETHICK;//判断是否创业板股票
F10:=IF(RANGE(F10FIND('◇ 港澳资讯',1),0,200),4,0),LINETHICK;
IF NOT(F10=4) THEN BEGIN //非港澳资讯退出
  DRAWTEXT(SYSPARAM(2)+20=BARPOS,15,'本公式不适合该种F10资料。'),COLOREEFF;
  EXIT;
END;
//F10数据查找
QSW:=F10FIND('┌─',F10FIND('主营构成',F10FIND('主营构成',1000)));//起
IF QSW<0 THEN EXIT;//没找到退出
LTW:=F10FIND('├─',QSW+150)+74;//取起始行位置
IF LTW<0 THEN EXIT;
JSW:=F10FIND('├─',LTW+100);//取尾部行位置
FHS:=CEILING((JSW-LTW)/72),LINETHICK;//数据行数
XST:='    项目名称      '+IF(DM,'      毛利率(%)'+'  占主营收入比例(%)','');
HW:=0;
FOR j=1 TO FHS DO BEGIN
   HW:=F10FIND('|',IF(j=1,LTW,HW+74));//取字符串所在位置
   IF HW>JSW THEN BREAK;//超出尾部行位置跳出循环
   XMT:=F10TEXT(HW+2,24);//取项目名称字符串
   MLT:=F10TEXT(HW+52,6);//取毛利率字符串
   BLT:=F10TEXT(HW+64,8);//取毛利率字符串
   XST:=XST+' n '+XMT+IF(DM,' '+MLT+'    '+BLT,'');
END;
DRAWTEXT(SYSPARAM(2)+2=BARPOS,12,XST),COLORFFEE66,ALIGN4;

[ 本帖最后由 周易2000 于 2011-3-28 13:12 编辑 ]
来自 北京市

举报

使用道具 扔鸡蛋 回复

748161
Lv.7

专栏

发表于 2011-3-27 22:57 复制 查看全部楼层 屏蔽
游客,您是(游客)级别,无法查看回复内容,请登录论坛并到新手区学习升级之后才能查看。升级指南请看...

附件

解答内容.txt [预览]

80 Bytes, 下载次数: 9, 下载积分: 共享币 -10 个

举报

使用道具 支持 扔鸡蛋 回复

1835054
Lv.2

专栏

发表于 2011-3-27 22:59 复制 查看全部楼层 屏蔽
游客,您是(游客)级别,无法查看回复内容,请登录论坛并到新手区学习升级之后才能查看。升级指南请看...
来自 北京市

举报

使用道具 支持 扔鸡蛋 回复

您需要登录后才可以回帖 登录

本版积分规则 《理想财富服务协议》《免责声明》

楼主
2楼
3楼
站长推荐 /5
回顶部 到页底
快速回复 返回顶部 返回列表