一些网友的应对：
山东黄金金黄东山
福建水泥泥水建福 潜水多日，忙于计算数据，真是累人啊！扩展数据的计算时间太长，我有修改采集的算法，汗！现送上股东数从万国测评里面提取股东数及持股数的公式，花了我N长时间调好的。各位用的时候可能需要调整某些数值（定位的数值比如QSW+34中的“34”这个值，诸如此类的……）才能正确取值！！
{大智慧L2--万国测评数据提取}
QSW:=F10FIND('◆ 控盘情况 ◆',500);
IF QSW>0 THEN BEGIN
WZ1:=QSW+34;
WZ2:=WZ1+12;
WZ3:=WZ2+12;
WZ4:=WZ3+12;
WZ5:=F10FIND('◆ 概念题材',WZ1);{查找结束位}
END;
{取时间}
T1:=F10TEXT(WZ1,10);
IF WZ2<WZ5 THEN T2:=F10TEXT(WZ2,10);
IF WZ3<WZ5 THEN T3:=F10TEXT(WZ3,10);
IF WZ4<WZ5 THEN T4:=F10TEXT(WZ4,10);
{取股东户数}
LS:=138;
HS1:=STRTONUM(F10TEXT(WZ1+LS,10));
HS2:=IF(WZ2<WZ5,STRTONUM(F10TEXT(WZ2+LS,10)),0);
HS3:=IF(WZ3<WZ5,STRTONUM(F10TEXT(WZ3+LS,10)),0);
HS4:=IF(WZ4<WZ5,STRTONUM(F10TEXT(WZ4+LS,10)),0);
{取户均持股数}
LS1:=208;
RS1:=STRTONUM(F10TEXT(WZ1+LS1,10));
RS2:=IF(WZ2<WZ5 AND HS2>100,STRTONUM(F10TEXT(WZ2+LS1,10)),0);
RS3:=IF(WZ3<WZ5 AND HS3>100,STRTONUM(F10TEXT(WZ3+LS1,10)),0);
RS4:=IF(WZ4<WZ5 AND HS4>100,STRTONUM(F10TEXT(WZ4+LS1,10)),0);
{---------------图解模版--------------}
A2:=0;
A3:=1000;
AG:=INTPART((A3-A2)/10);
AG0:=AG*0;
AG2:=AG*2;
AG4:=AG*4;
AG6:=AG*6;
AG8:=AG*8;
{显示文字}
DRAWTEXTREL(0,AG0,'报表时间'),COLOR00DD00;
DRAWTEXTREL(0,AG4,'户均持股'),ColorFFC800;
DRAWTEXTREL(0,AG2,'股东户数'),ColorFA7D7D;
{时间}
DRAWTEXTREL(AG8,AG0,T1),COLOR00DD00;
DRAWTEXTREL(AG6,AG0,T2),COLOR00DD00;
DRAWTEXTREL(AG4,AG0,T3),COLOR00DD00;
DRAWTEXTREL(AG2,AG0,T4),COLOR00DD00;
{户均持股}
DRAWTEXTREL(AG8,AG4,NUMTOSTR(RS1)),ColorFFC800;
DRAWTEXTREL(AG6,AG4,NUMTOSTR(RS2)),ColorFFC800;
DRAWTEXTREL(AG4,AG4,NUMTOSTR(RS3)),ColorFFC800;
DRAWTEXTREL(AG2,AG4,NUMTOSTR(RS4)),ColorFFC800;
{股东户数}
DRAWTEXTREL(AG8,AG2,NUMTOSTR(HS1)),ColorFA7D7D;
DRAWTEXTREL(AG6,AG2,NUMTOSTR(HS2)),ColorFA7D7D;
DRAWTEXTREL(AG4,AG2,NUMTOSTR(HS3)),ColorFA7D7D;
DRAWTEXTREL(AG2,AG2,NUMTOSTR(HS4)),ColorFA7D7D;
完整F10下载地址：http://61.129.74.16/data_serve/d_f10a.php 点登录后，用户名和密码都是guest，选F10用户，保留10天最新的F10，也是最全的，分别将压缩包中的base目录释放到大智慧L2安装目录下的data\sh及data\sz中进行覆盖，不能放错目录！！该网站每天都更新，可以收盘后去下载。
[ 本帖最后由 zhbsystem 于 2007-4-1 05:06 编辑 ] 潜水多日，忙于计算数据，真是累人啊，扩展数据的计算时间太长，加上我调整算法，又得重新计算，汗！现送上万国测评F10股东数及户均持股数的提取公式，各位在使用时可能会需要调整一下定位的数字（QSW+34、LS=138、LS1=208等1）才能正确取值。
{大智慧L2--万国测评数据提取}
QSW:=F10FIND('◆ 控盘情况 ◆',500);
IF QSW>0 THEN BEGIN
WZ1:=QSW+34;
WZ2:=WZ1+12;
WZ3:=WZ2+12;
WZ4:=WZ3+12;
WZ5:=F10FIND('◆ 概念题材',WZ1);{查找结束位}
END;
{取时间}
T1:=F10TEXT(WZ1,10);
IF WZ2<WZ5 THEN T2:=F10TEXT(WZ2,10);
IF WZ3<WZ5 THEN T3:=F10TEXT(WZ3,10);
IF WZ4<WZ5 THEN T4:=F10TEXT(WZ4,10);
{取股东户数}
LS:=138;
HS1:=STRTONUM(F10TEXT(WZ1+LS,10));
HS2:=IF(WZ2<WZ5,STRTONUM(F10TEXT(WZ2+LS,10)),0);
HS3:=IF(WZ3<WZ5,STRTONUM(F10TEXT(WZ3+LS,10)),0);
HS4:=IF(WZ4<WZ5,STRTONUM(F10TEXT(WZ4+LS,10)),0);
{取户均持股数}
LS1:=208;
RS1:=STRTONUM(F10TEXT(WZ1+LS1,10));
RS2:=IF(WZ2<WZ5 AND HS2>100,STRTONUM(F10TEXT(WZ2+LS1,10)),0);
RS3:=IF(WZ3<WZ5 AND HS3>100,STRTONUM(F10TEXT(WZ3+LS1,10)),0);
RS4:=IF(WZ4<WZ5 AND HS4>100,STRTONUM(F10TEXT(WZ4+LS1,10)),0);
{---------------图解模版--------------}
A2:=0;
A3:=1000;
AG:=INTPART((A3-A2)/10);
AG0:=AG*0;
AG2:=AG*2;
AG4:=AG*4;
AG6:=AG*6;
AG8:=AG*8;
{显示文字}
DRAWTEXTREL(0,AG0,'报表时间'),COLOR00DD00;
DRAWTEXTREL(0,AG4,'户均持股'),ColorFFC800;
DRAWTEXTREL(0,AG2,'股东户数'),ColorFA7D7D;
{时间}
DRAWTEXTREL(AG8,AG0,T1),COLOR00DD00;
DRAWTEXTREL(AG6,AG0,T2),COLOR00DD00;
DRAWTEXTREL(AG4,AG0,T3),COLOR00DD00;
DRAWTEXTREL(AG2,AG0,T4),COLOR00DD00;
{户均持股}
DRAWTEXTREL(AG8,AG4,NUMTOSTR(RS1)),ColorFFC800;
DRAWTEXTREL(AG6,AG4,NUMTOSTR(RS2)),ColorFFC800;
DRAWTEXTREL(AG4,AG4,NUMTOSTR(RS3)),ColorFFC800;
DRAWTEXTREL(AG2,AG4,NUMTOSTR(RS4)),ColorFFC800;
{股东户数}
DRAWTEXTREL(AG8,AG2,NUMTOSTR(HS1)),ColorFA7D7D;
DRAWTEXTREL(AG6,AG2,NUMTOSTR(HS2)),ColorFA7D7D;
DRAWTEXTREL(AG4,AG2,NUMTOSTR(HS3)),ColorFA7D7D;
DRAWTEXTREL(AG2,AG2,NUMTOSTR(HS4)),ColorFA7D7D;
PS：前面发的怎么不显示啊？奇怪。
1 能编个大智慧新一代公式把近两期股东户数减少前10名和户均持股增加前10名选出来吗 原帖由 zhbsystem 于 2007-4-1 04:59 发表 http://bbs.macd.cn/static/image/common/back.gif
潜水多日，忙于计算数据，真是累人啊，扩展数据的计算时间太长，加上我调整算法，又得重新计算，汗！现送上万国测评F10股东数及户均持股数的提取公式，各位在使用时可能会需要调整一下定位的数字（QSW+34、LS=1 ...
zhbsystem兄很强啊，用f10find确实很累人的，能说说具体的用法吗？谢谢！
另外，用大智慧L2的F10如果在接受行情的时候看F10会不会把你自己安装的F10覆盖掉，因为我知道大智慧L2目前并没有支持本地F10功能。 如何分析股票的基本面
基本面是股票长期投资价值的唯一决定因素，每一个价值投资者选择股票前必须要做的就是透彻地分析企业的基本面。许多投资者没有系统的分析方法，甚至仅仅凭某一短暂的或局部的利好因素就作出草率的买入决定。投资者很容易受一些感性因素的影响而作出错误的操作，如听信其他投资者的言论，或者生活中对某一消费品牌情有独钟，就买入其股票等等。怎样才能理性地投资呢？建立系统是一个最好和最理性的方法。下面从行业、企业和宏观经济三方面并具体结合苏宁对基本面涉及的要素进行简单的分析。
一、行业层面的基本面因素
行业基本面因素十分重要，有时比企业层面的基本面影响还大，差的行业即便是龙头企业也很难获得好的长期回报。
1. 行业的特性
行业的波动性是否很大，是否有强周期性。
家电连锁业波动比较小，超长期来说有很弱的周期性。
2. 行业的市场空间
如果行业发展空间很大，则企业的成长性相对较好。
消费升级以及经济高速发展使家电连锁业有广阔的市场空间，龙头企业将会高速 成长。
3. 行业生存环境
过度激烈的竞争必然会降低企业的盈利能力，恶性竞争更会使所有企业陷入亏损泥潭。
家电连锁业经过前几年的激烈竞争后，形成了国美、苏宁、百思买三大巨头寡头竞争的格局，五星、永乐被 收购，大中、三联只能扮演陪太子读书的角色。行业竞争趋于平缓，未来进入持久战阶段。
4. 回顾国内和欧美国家同行业发展的历史轨迹
以史为鉴，历史总会给予我们启迪。欧美国家行业的发展历史经常就是中国同行业的未来，根据国内外的历史，我们可以对行业未来的发展趋势作出预测。
家电连锁业正沿着美国相同的轨迹运行，如同美国经历过BBY、CC等几大寡头竞争的格局，中国家电连锁也正 经历着同样的时期。BBY苦练内功，慎对并购，CC则只注重外延扩张，偏好多元化，最后BBY大获全胜。今天的国美与CC何其相像，而苏宁则是BBY第二，未来苏宁会是最后胜利者吗？
5. 是否存在并购或被并购的可能
并购的风险很大
作为苏宁的股东，我并不希望并购大中。
6. 行业是否简单易懂
复杂的行业往往包含很多不确定性。
二、企业层面的基本面因素
企业作为个体如果没有竞争力，即便处于很好的行业也是徒劳。好行业还要好企业。我们可以通过分析波特的五力竞争模型和企业经营情况、财务数据对企业基本面作出综合评价。五力包括顾客、供应商、竞争者、潜在新进入者、替代品五种基本竞争力量。
1. 顾客即是买方的讨价还价能力
行业处于买方市场，则卖方要么通过差异化经营获得超额利润，要么只能竟相打折降价争取买方。相反的话，产品供不应求，卖方很容易就获得超额利润。茅台是经典的例子。
家电连锁业处于买方市场，但由于竞争对手的减少，竞争趋于理性。
2. 供应商讨价还价的能力
与顾客相类似，只是企业的角色由卖方转变成买方。除非是卖方稀缺资源，一般企业对供应商都处于强势地位。
家电连锁对家电厂商的强势地位是无容置疑的。
3. 竞争者之间的竞争
这是五力中最重要的一个力量，企业是否处于强有力的竞争地位是决定企业存亡的重要因素。
苏宁规模虽然落后于国美，但后台力量远超国美，而百思买刚刚起步，苏宁又占据先发优势。
4. 潜在新加入者的威胁
如果新进入者拥有新的生产能力和强大的资源，对行业将形成巨大威胁。
现阶段家电连锁企业的已经形成的巨大规模和广阔的地域分布，都对新加入者构成高门槛，而且从发达国家 经验看，家电连锁最后都形成极少数的几家巨头垄断市场，如日本的小岛电器、山田电机，美国的BBY、CC。因此出现潜在新加入者的可能性较少。
5. 替代品的威胁
替代产品的价格如果比较低，而且性能优越，对现有产品是致命性的打击。替代品可能完全替代，也可能部分替代。但无论是那种替代品都会使本行业产品受到严重打击。科技类产品最容易出现替代品。
全球发达国家的家电渠道都是家电连锁占据优势，家电连锁是家电分销行业的大势所趋。因此出现替代的可 能性比较小。但不排除类似沃尔马这种大型连锁超市抢夺市场份额。
6. 企业在行业所处的地位
强者恒强，行业龙头企业通常拥有更优异的产品，更优秀的人才，更雄厚的实力，获得更大的发展空间。
苏宁作为三大寡头之一，与其他竞争者都处于暂时的均势地位。
7. 是否拥有持续的核心竞争力
优于对手的竞争力是企业能持续发展并取得胜利的关键所在。
先进的信息平台、物流基地、后台服务是苏宁暂时领先的核心竞争力，竞争对手能否赶上还要看他们的以后 的竞争战略。无论如何苏宁现在占据有利地位。暂时落后的是规模。
8. 企业战略是否清晰和正确
在波特竞争理论中，竞争战略占据显要位置，战略失误将带给企业毁灭性打击。
苏宁的战略比较清晰，稳中求快，苦炼内功，慎对并购。
9. 管理层是否诚实、优秀，大股东是否诚信
管理层的诚实比能力更重要，而大股东的诚信也是不能忽视的。
苏宁的张近东理性、素质高、心胸广阔，应该是不错的大股东。
10. 是否有稳定的经营史
经营史虽然不能决定未来，但也是很有价值的参考之一，巴菲特对稳定的经营史很重视。
11. 通过公开信息收集企业经营情况
包括收集企业的经营情况、市场状态、管理水平、技术能力、制度等细节，为最后的判断提供依据。
12. 市场份额
市场份额跟企业的行业地位息息相关。
13. 是否有多元化
多元化往往是危险的，即使是多元化计划我们也要留意。特别是跨行业的多元化，经常是以失败告终。
苏宁的主要竞争对手国美最近频频涉足其他行业，包括地产、百货、保健品等，这对苏宁来说是好事。
14. 是否拥有特许经营权
特许经营权是企业获利的利器。
15. 研究财务数据
历史财务数据可以让我们对企业的历史经营情况、资产情况、盈利能力、成长能力、偿债能力等有全面的了解。数据应该追溯到尽量早的历史，有可能的话最好是企业存续期内的财务数据都看一篇。主要财务数据有：
净资产收益率 是判断资产回报率指标，是最重要的财务数据
净利润增长率 企业成长的参考指标
净利率 企业获利能力的指标
毛利率 企业获利能力的指标
资产负债率 企业偿还债务的能力，也是重要的风险指标之一
其他还要根据不同行业的特点关注不同的指标，如家电连锁库存周转率、银行业的总资产收益率等。
三、宏观经济、政治因素的影响
实际上宏观经济、政治对企业的影响可以包含在行业层面的分析中。经济周期、利率、通货膨胀等宏观因素对真正优秀的企业影响甚微。只需要在宏观的层面上关注两者是否对行业的发展趋势产生重大影响就行了，对出口导向型或者原材料进口比例较大的企业应该关注人民币升值和汇率变动带来的影响。分析基本面时没必要花太多精力进行宏观经济、政治因素影响的研究。
老大的资料就是丰富，都来不及看了，:*22*: 谢谢！ 超额利润的源泉
超额利润是指其他条件保持社会平均水平而获得超过市场平均正常利润的那部分利润，又称为纯粹利润或经济利润。获取超额利润的来源有以下几种：
1.供不应求产生的超额利润。
这种方式获得的超额利润最短暂，也最不稳定。自由竞争市场中供需会自动调节，当出现超额利润时，其他竞争者迅速加入，供需平衡很快恢复正常，超额利润消失。
周期性行业阶段性获得的超额利润属于这种类型。景气度高峰来临时，需求急剧上升，萧条期大幅降低的产能使供需产生巨大落差，形成严重的供不应求。这时产品价格大幅上涨，销售火爆，企业获得远高于市场平均水平的超额利润。这种超额利润的获得是很脆弱、不可持续的，竞争者产能大幅扩张、景气度拐点的出现使超额利润迅速消失并可能形成亏损。600497等有色金属股票的风光将不会持续太久。
科技企业由于暂时的技术领先或创新也可能获得短期的超额利润。科技行业的特性使这种领先或创新很快被模仿、替代、超越，大量逐利资本的进入也使所有细分行业竞争异常激烈，微利成为常态，象微软这种能依靠技术垄断长期获得超额利润的企业凤毛麟角。
2.成本领先战略。
低成本较供不应求获得的超额利润稳固。但成本领先战略更依赖于优秀的企业管理层，对企业的规模、管理、制度、成本控制等方面都有着很高的要求。规模经济是这类企业最强有力的竞争优势，一旦这种优势被其他竞争者超越，超额利润很容易消失。优秀的最高管理层离去或者管理、成本控制出现问题，对超额利润的影响也很大。同时上述的这些优势也是很容易被竞争对手模仿、超越的，所形成的壁垒是脆弱的。沃尔马是这方面的优秀代表，优秀的管理、庞大的规模、先进的信息系统、近于苛刻的成本控制，使沃尔马获得成功，但对于人力成本的过度控制使沃尔马臭名昭著。
3.最稳固、最持久的超额利润来自于特许经营权。
垄断、商誉、独占性建立起强大的壁垒，把新的竞争者挡在行业之外，在行业内形成巨大的竞争优势，使同业难于超越。这种超额利润由于坚固壁垒的保护，所以是稳定并可持续的。拥有特许经营权的企业可以轻易地获得远超过市场平均水平的超额利润，甚至容许平庸的管理层的存在，而对超额利润影响甚微，即是那种“傻瓜都可以经营好的公司”。
拥有特许经营权的企业有几个种类，如行政垄断、品牌垄断、自然垄断等。其中拥有强大商誉的品牌垄断是最强大、最具成长性、最持久的垄断，投资者若希望获得超额利润，最好的方式就是投资于这类型的企业并长期持有。 原帖由 zhbsystem 于 2007-4-1 04:52 发表 http://bbs.macd.cn/static/image/common/back.gif
潜水多日，忙于计算数据，真是累人啊！扩展数据的计算时间太长，我有修改采集的算法，汗！现送上股东数从万国测评里面提取股东数及持股数的公式，花了我N长时间调好的。各位用的时候可能需要调整某些数值（定位 ...
前些日子,有人利用万国F10编的公式(利用三季报),可看股东户数,户均持股,前十大股东持仓量(比率,数量),但现在年报已公布,万国F10结构稍有改变,发上原公式,请修改适应现在的F10,谢谢
F10资料
VARIABLE:TT='STR',持股=0,比例=0,变化=0;
F10:=IF(F10FIND('万国测评制作',1)>0,1,0);
HW1:=F10FIND('每股收益',50);
QSW:=F10FIND('◆ 控盘情况 ◆',500);
QSW1:=F10FIND('出]☆',1000)+120;
JSW1:=F10FIND('红]☆',QSW1+300)-80;
{F10数据查找}
IF F10=1 AND QSW>0 AND QSW1>0AND JSW1>0THEN{万国测评的资料是否完整，不完整就什么都不做}
BEGIN
{年报TIP}
f10str:=f10text(HW1,1024);
三季收益 := strmid(f10str,23-3,6);
HW2:=strfind(f10str,'每股净资产',1);
净资产:= strmid(f10str,HW2+22-3,6);
HW3:=strfind(f10str,'预计年报公布日' ,HW2+80);
if(HW3>0) then
begin
年报日:= strmid(f10str,HW3+18-3,10);
end;
{控盘情况数据栏数据提取}
f10str:=f10text(QSW,320);
WZ1:=strfind(f10str,'-',0)-4;
WZ2:=strfind(f10str,'-',WZ1+10)-4;
WZ3:=strfind(f10str,'-',WZ2+10)-4;
WZ4:=strfind(f10str,'-',WZ3+10)-4;
WZ5:=F10FIND('◆ 概念题材',WZ1);{查找结束位}
{取时间}
T1:= strmid(f10str,WZ1,10);
T2:= strmid(f10str,WZ2,10);
T3:=strmid(f10str,WZ3,10);
T4:= strmid(f10str,WZ4,10);
{取股东户数}
LS:=138;
HS1:=STRTONUM(strmid(f10str,WZ1+LS,10));
HS2:=IF(WZ2<WZ5,STRTONUM(strmid(f10str,WZ2+LS,10)),0);
HS3:=IF(WZ3<WZ5,STRTONUM(strmid(f10str,WZ3+LS,10)),0);
HS4:=IF(WZ4<WZ5,STRTONUM(strmid(f10str,WZ4+LS,10)),0);
{取户均持股数}
LS:=208;
RS1:=STRTONUM(strmid(f10str,WZ1+LS,10));
RS2:=IF(WZ2<WZ5 AND HS2>100,STRTONUM(strmid(f10str,WZ2+LS,10)),0);
RS3:=IF(WZ3<WZ5 AND HS3>100,STRTONUM(strmid(f10str,WZ3+LS,10)),0);
RS4:=IF(WZ4<WZ5 AND HS4>100,STRTONUM(strmid(f10str,WZ4+LS,10)),0);
{大股东数据查找}
f10str:=f10text(QSW1,JSW1-QSW1);
HJW:=0;
{for 循环很慢无法忍受，换成下面的展开
FOR i=1 to 4 DO
BEGIN
SJT:=strfind(f10str,'占流通股',HJW+16);
if SJT<0OR SJT > JSW1 THEN BREAK;
TT:=strmid(f10str,SJT-(44-21),10);
HJW:=strfind(f10str,'总计',SJT+300);
持股:=strtonum(strmid(f10str,HJW+6,44-12));
比例:= strtonum(strmid(f10str,HJW+6+45-12,51-45));
ABC:=HJW+80-5+36;
HJW:=ABC;
END;
}
SJT:=strfind(f10str,'占流通股',HJW+15);
TT1:=strmid(f10str,SJT-(45-21),10);{时间}
HJW:=strfind(f10str,'总计',SJT+300);
持股:=strtonum(strmid(f10str,HJW+6,44-12));
比例:= strtonum(strmid(f10str,HJW+6+45-12,51-45));
ABC:=HJW+80-5+36;
HJW:=ABC;
SJT:=strfind(f10str,'占流通股',HJW+15);
TT2:=strmid(f10str,SJT-(45-21),10);{时间}
HJW:=strfind(f10str,'总计',SJT+300);
持股:=strtonum(strmid(f10str,HJW+6,44-12));
比例:= strtonum(strmid(f10str,HJW+6+45-12,51-45));
ABC:=HJW+80-5+36;
HJW:=ABC;
SJT:=strfind(f10str,'占流通股',HJW+15);
TT3:=strmid(f10str,SJT-(45-21),10);{时间}
HJW:=strfind(f10str,'总计',SJT+300);
持股:=strtonum(strmid(f10str,HJW+6,44-12));
比例:= strtonum(strmid(f10str,HJW+6+45-12,51-45));
ABC:=HJW+80-5+36;
HJW:=ABC;
SJT:=strfind(f10str,'占流通股',HJW+15);
if SJT>0 THEN
BEGIN
TT4:=strmid(f10str,SJT-(45-21),10);{时间}
HJW:=strfind(f10str,'总计',SJT+300);
持股:=strtonum(strmid(f10str,HJW+6,44-12));
比例:= strtonum(strmid(f10str,HJW+6+45-12,51-45));
ABC:=HJW+80-5+36;
HJW:=ABC;
END;
当期:=持股;
当期1:=比例;
上期:=持股;
上期1:=比例;
±比例:=当期1-上期1;
前二:=持股;
前二1:=比例;
前三:=持股;
前三1:=比例;
{将变化持股数对应显示在对应位置}
{排序}
股东增幅:(HS1-HS2)/HS2*100,PRECIS2,linethick2,Colorblack;
持股增幅:(RS1-RS2)/RS2*100,PRECIS2,linethick2,COLORRED;
主力增幅:(当期-上期)/上期*100,PRECIS2,LINETHICK2,Colorblue;
主力流通:(当期-上期1)/当期1*100,PRECIS2,LINETHICK2,Colorbrown;
{-------------------【图解模板】-------------------}
A2:=0;
A3:=1000;
AG:=INTPART((A3-A2)/10);
{显示文字}
DRAWTEXTREL(0,AG*0,'报表时间'),COLORblue;
DRAWTEXTREL(0,AG*2,'户均持股'),Colorblue;
DRAWTEXTREL(0,AG*4,'股东户数'),Colorblue;
DRAWTEXTREL(0,AG*6,'主力占流通%'),Colorblue;
DRAWTEXTREL(0,AG*8,'主力持股数(万)'),Colorblue;
{时间}
DRAWTEXTREL(AG*8,AG*0,T1),ALIGN2,COLORred;
DRAWTEXTREL(AG*6,AG*0,T2),ALIGN2,COLORred;
DRAWTEXTREL(AG*4,AG*0,T3),ALIGN2,COLORred;
DRAWTEXTREL(AG*2,AG*0,T4),ALIGN2,COLORred;
{户均持股}
DRAWTEXTREL(AG*8,AG*2,NUMTOSTR(RS1 )),ALIGN2,Colorbrown;
DRAWTEXTREL(AG*6,AG*2,NUMTOSTR(RS2 )),ALIGN2,Colorbrown;
DRAWTEXTREL(AG*4,AG*2,NUMTOSTR(RS3 )),ALIGN2,Colorbrown;
DRAWTEXTREL(AG*2,AG*2,NUMTOSTR(RS4 )),ALIGN2,Colorbrown;
{股东户数}
DRAWTEXTREL(AG*8,AG*4,NUMTOSTR(HS1)),ALIGN2,Colorblack;
DRAWTEXTREL(AG*6,AG*4,NUMTOSTR(HS2)),ALIGN2,Colorblack;
DRAWTEXTREL(AG*4,AG*4,NUMTOSTR(HS3)),ALIGN2,Colorblack;
DRAWTEXTREL(AG*2,AG*4,NUMTOSTR(HS4)),ALIGN2,Colorblack;
{主力占流通比}
temp:=NUMTOSTR(当期1);
tem:=TT1;
temp1:='('+tem+')'+temp;
DRAWTEXTREL(AG*8,AG*6,temp1),ALIGN2,COLORMAGENTA;
temp:=NUMTOSTR(上期1);
tem:=TT2;
temp1:='('+tem+')'+temp;
DRAWTEXTREL(AG*6,AG*6,temp1),ALIGN2,COLORMAGENTA;
temp:=NUMTOSTR(前二1);
tem:=TT3;
temp1:='('+tem+')'+temp;
DRAWTEXTREL(AG*4,AG*6,temp1),ALIGN2,COLORMAGENTA;
temp:=NUMTOSTR(前三1);
tem:=TT4;
temp1:='('+tem+')'+temp;
DRAWTEXTREL(AG*2,AG*6,temp1),ALIGN2,COLORMAGENTA;
{10大股东持股}
DRAWTEXTREL(AG*8,AG*8,NUMTOSTR(当期)),ALIGN2,COLORRED;
DRAWTEXTREL(AG*6,AG*8,NUMTOSTR(上期)),ALIGN2,COLORRED;
DRAWTEXTREL(AG*4,AG*8,NUMTOSTR(前二)),ALIGN2,COLORRED;
DRAWTEXTREL(AG*2,AG*8,NUMTOSTR(前三)),ALIGN2,COLORRED;
{TIP DRAW}
DRAWTEXTREL(AG*9,AG*6,'股收益:'+三季收益),ALIGN1,COLORRED;
DRAWTEXTREL(AG*9,AG*4,'净资产:'+净资产),ALIGN1,COLORRED;
DRAWTEXTREL(AG*9,AG*2,'年报日:'+年报日),ALIGN1,COLORRED;
{柱线}
{持股数柱线}
{STICKLINE(BARPOS=A3-AG*1-10 AND HS1>100,0,RS1,AG*3,1),LINETHICK2,ColorFFDDFF;
STICKLINE(BARPOS=A3-AG*2-15 AND HS2>100,0,RS2,AG*3,1),LINETHICK2,ColorF1FFB5;
STICKLINE(BARPOS=A3-AG*3-20 AND HS3>100,0,RS3,AG*3,1),LINETHICK2,ColorB9FFBC;
STICKLINE(BARPOS=A3-AG*4-25 AND HS4>100,0,RS4,AG*3,1),LINETHICK2,ColorB9FFFF;}
{10大股东画柱线}
{STICKLINE(BARPOS=A3-AG*1-6AND 当期>0,0,当期,AG*3,0),LINETHICK2,ColorFFDDFF;
STICKLINE(BARPOS=A3-AG*2-11 AND 上期>0,0,上期,AG*3,0),LINETHICK2,ColorF1FFB5;
STICKLINE(BARPOS=A3-AG*3-16 AND 前二>0,0,前二,AG*3,0),LINETHICK2,ColorB9FFBC;
STICKLINE(BARPOS=A3-AG*4-21 AND 前三>0,0,前三,AG*3,0),LINETHICK2,ColorB9FFFF;}
END;
[ 本帖最后由 lymanqun 于 2007-4-1 11:06 编辑 ] 原帖由 buhuiwang22 于 2007-4-1 01:03 发表 http://bbs.macd.cn/static/image/common/back.gif
上联：长春高新新高春长，请对下联
一些网友的应对：
山东黄金金黄东山
福建水泥泥水建福
天富热电电热富天 原帖由 skylooker 于 2007-4-1 11:03 发表 http://bbs.macd.cn/static/image/common/back.gif
天富热电电热富天
热电已于昨天被割掉了:*31*: 按对联规矩，此上联应做为下联，试对如下：
上联：汇通水利利水通汇
下联：长春高新新高春长
横批：依然看涨
潜水多日，今天冒个泡。:*29*: :*29*: :*29*: vv
刚得到的消息!!!各位兄弟激励分析!
医药板块,20元附近的票,刚建仓不久,说今年内能到100元,希望各位协力分析,放消息的人不肯讲到底是哪个票,各位有何高见!回复 #11833 solder_cream 的帖子
此人有政治背景! 原帖由 solder_cream 于 2007-4-1 15:11 发表 http://bbs.macd.cn/static/image/common/back.gif医药板块,20元附近的票,刚建仓不久,说今年内能到100元,希望各位协力分析,放消息的人不肯讲到底是哪个票,各位有何高见!
岳阳兴长,同仁堂,天坛生物,康美药业,江中药业,华神集团,S藏药业=>个人选择在其中! 这些公式怎么用呀!哪位能教教我这新股民.谢谢! 请教各位大哥，在飞狐中“显示交易信号”能否同时显示符合组合条件1或符合组合条件2的交易信号？ http://www.go-goal.com/inv_info/infocontent.aspx?id=810 http://www.go-goal.com/inv_info/infocontent.aspx?id=809