软件名称：[B]神獒均线主图 另附个人改良版图（附源码及图）[/B]
软件类型：国产软件
运行环境：Win2000/WinXP/Win2003/WinVista
软件语言：简体中文
授权方式：共享软件
软件大小：41.0 KB
官方主页：Home Page
更新时间：2010-07-23 23:27:35
软件简介:
主图很好，带自动划线，箱体等，有粗略的均线技术理论评价，非常适合对技术一知半解的朋友使用
在用的过程中，个人经验觉得EXPMA的均线指标比较直观，已经改成EXPMA均线，下面是改后前后图，希望大家提出更优良的修改方案，我是一菜鸟，希望各位高手指点
如讨论成功改良完美，将继续发出其他神獒赢富系列源码，大家来讨论改良，欢迎使用后提出改良意见
if DISPSTATUS=2 then aaa:=BARPOS;
if DISPSTATUS=1 then bbb:=BARPOS;
ddd:=aaa-bbb;
ee:=hhv(h,ddd);
MSTATUS:=BARSTATUS=2;
MA5:MA(C,5),PRECIS2;
MA10:MA(C,10),PRECIS2;
MA30:MA(C,30),PRECIS2;
MA60:MA(C,60),PRECIS2,LINETHICK2;
MA125:MA(C,125),ColorFFFF00,PRECIS2,LINETHICK2;
MA250:MA(C,250),PRECIS2,LINETHICK2;
i:=1;
IF MSTATUS and (MA5 > MA10 and MA10 > MA30 and MA5 > MA30) THEN BEGIN DRAWTEXTABS(0,i*16,'短期均线多头排列。股价高位谨防筑顶。中低位当股价向上突破5、10、30日均线，均线呈多头排列是最佳买入时机。'+ma5+' > '+ma10+' > '+ma30+';'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA5 < MA10 and MA10 < MA30 and MA5 < MA30) THEN BEGIN DRAWTEXTABS(0,i*16,'短期均线空头排列。股价高位谨防弃庄，卖盘涌出破位下跌。中低位当股价向下突破5、10、30日均线，均线呈空头排列时，注意观察股价所处箱体位置。'+ma5+' < '+ma10+' < '+ma30+';'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA30 > MA60 and MA30 > MA125 and MA60 > MA125) THEN BEGIN DRAWTEXTABS(0,i*16,'中期均线多头排列。注意股价突然下跌，当股价回档至当前盘面30、60、125日任一均线获得支撑，关注均线助涨，次日股价放量向上突破，是中长期最佳买入时机。'+ma30+' > '+ma60+' > '+ma125+';'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA30 < MA60 and MA30 < MA125 and MA60 < MA125) THEN BEGIN DRAWTEXTABS(0,i*16,'中期均线空头列排。30、60、125日中长期均线下行呈空头排列，注意箱体上下撑压或无量空跌。'+ma30+' < '+ma60+' < '+ma125+';'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA60 > MA125 and MA125 > MA250 and MA60 > MA250) THEN BEGIN DRAWTEXTABS(0,i*16,'长期均线多头排列。即60，125，250日均线向上多头排列。注意：当股价处于箱体顶部，所有均线多头排列，股价反复震荡不能突破，可能顶部即将形成。'+ma60+' > '+ma125+' > '+ma250+';'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1; END;
IF MSTATUS and (MA60 < MA125 and MA125 < MA250 and MA60 < MA250) THEN BEGIN DRAWTEXTABS(0,i*16,'长期均线空头排列。即60，125，250日均线向下空头排列。注意：当所有均线空头排列的时候，股价处于箱体的一个次高位，中位，或箱体下沿，可能是阶段底部的形成。 '+ma60+' < '+ma125+' < '+ma250+';'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(MA5,MA10)) THEN BEGIN DRAWTEXTABS(0,i*16,'短期5日10日均线金叉。注意观察股价在箱体的位置，30日和其他均线是否成为股价上涨的阻力，或股价在高位的运行方向，判断是反转上涨还是下跌中途的小反弹。'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(MA10,MA5)) THEN BEGIN DRAWTEXTABS(0,i*16,'短期5日10日均线死叉。当股价反弹遭遇30日和其他均线的阻力形成死叉，可能是股价下跌中途的小反弹。高位区死叉，必须逃顶或止损。'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(C,MA125)) THEN BEGIN DRAWTEXTABS(0,i*16,'今日股价上穿半年线。在半年线上方运行的个股被称为强势股。适合中小资金根据短线技术指标套利操作。'),COLORFF00FF,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(MA125,C)) THEN BEGIN DRAWTEXTABS(0,i*16,'今日股价跌破半年线。在半年线下方运行的个股被称为弱势股。适合大资金进场吸筹操作。'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(C,MA250)) THEN BEGIN DRAWTEXTABS(0,i*16,'今日股价上穿年线。股票筑底后，股价经过反复震荡洗盘上穿年线，予以锁定跟踪。'),COLORFF00FF,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(MA250,C)) THEN BEGIN DRAWTEXTABS(0,i*16,'今日股价跌破年线。跌破年线，证明深度调整格局可能形成。如果后市股价继续深跌，调整时间和空间难以预测。'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(C,MA60) and CROSS(C,MA125) and CROSS(C,MA250)) THEN BEGIN DRAWTEXTABS(0,i*16,'股价一阳穿三线。5、10、30日均线三线合一，股价一阳穿三线，向上反转，可能变盘反转在即。'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA30 > REF(MA30,1)) THEN BEGIN DRAWTEXTABS(0,i*16,'30日均线趋势向上。注意：如果股价在低位中位30日均线之上，围绕另一条重要均线缩量横盘，随后5-10日均线金叉，所有均线向上呈多头排列，是中长期绩优牛股的摇篮。'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA30 > REF(MA30,1) AND MA30 < REF(MA30,1)*1.001) THEN BEGIN DRAWTEXTABS(0,i*16,'30日均线趋势走平。需观察5日和10日均线方向，如30日均线发出趋势向下信号，5日10日均线形成死叉，注意减仓或出货。'),COLORFFCC66,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA30 < REF(MA30,1)) THEN BEGIN DRAWTEXTABS(0,i*16,'30日均线趋势向下。关注股价所处箱体位置，如股价当前上涨或下跌时，则需观察箱体阻力支撑位置。如果股价处于远离30日均线位置，一般情况下股价反弹空间有限。'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA5 > REF(MA5,1)*1.015) THEN BEGIN DRAWTEXTABS(0,i*16,'5日均线强劲向上。需观察股价所处其他均线和箱体位置,如果收盘时股价突然跌破5日均线，则需观察箱体下方支撑，提防空头陷阱，股价转向。'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA5 > REF(MA5,1) AND MA5 < REF(MA5,1)*1.005) THEN BEGIN DRAWTEXTABS(0,i*16,'5日均线方向不明。当股价连续跌破5日均线和箱体下沿，导致股价方向开始向下，绩优股应适当做空；股价在箱体内则需观察股价下方的重要均线位置，可否获得支撑。'),COLORYELLOW,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA5 < REF(MA5,1)*0.985) THEN BEGIN DRAWTEXTABS(0,i*16,'5日均线快速向下，短线风险可能降临。需结合其他均线运行方向分析，如果股价在一个大箱体中，则需观察下方均线支撑，偌收盘前股价获得支撑，5-10均线金叉并数日向上，则可顺势而为做多。'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
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+'石化。
[url=http://www.70822.com/soft/sort013/sort03/down-22929.html]神獒均线主图 另附个人改良版图（附源码及图）[/url]