封神榜已全面优化完成,分A,B两板!现源码送上!绝对原创!希望大侠们加点果果! A板 参数: (N 1 120 10) ( M 1 60 3) VAR1:=("399139$C"); VAR2:=("399190$C"); VAR3:=("399132$C"); VAR4:=("399150$C"); VAR5:=("399138$C"); VAR6:=("399200$C"); VAR7:=("399110$C"); VAR8:=("399136$C"); VAR9:=("399135$C"); VAR10:=("399130$C"); VAR11:=("399160$C"); VAR12:=("999999$C"); VAR13:=("399137$C"); 医药:=SUM((VAR1/REF(VAR1,1)-1)*100,0); 金融:=SUM((VAR2/REF(VAR2,1)-1)*100,0); 纺织:=SUM((VAR3/REF(VAR3,1)-1)*100,0); 建筑:=SUM((VAR4/REF(VAR4,1)-1)*100,0); 机械:=SUM((VAR5/REF(VAR5,1)-1)*100,0); 地产:=SUM((VAR6/REF(VAR6,1)-1)*100,0); 农林:=SUM((VAR7/REF(VAR7,1)-1)*100,0); 电子:=SUM((VAR8/REF(VAR8,1)-1)*100,0); 石化:=SUM((VAR9/REF(VAR9,1)-1)*100,0); 制造:=SUM((VAR10/REF(VAR10,1)-1)*100,0); 运输:=SUM((VAR11/REF(VAR11,1)-1)*100,0); 上证:SUM((VAR12/REF(VAR12,1)-1)*100,0),COLORRED; 金属:=SUM((VAR13/REF(VAR13,1)-1)*100,0); VAR17:=CONST(MA(医药,N)); VAR18:=CONST(MA(金融,N)); VAR19:=CONST(MA(纺织,N)); VAR20:=CONST(MA(建筑,N)); VAR21:=CONST(MA(机械,N)); VAR22:=CONST(MA(地产,N)); VAR23:=CONST(MA(农林,N)); VAR24:=CONST(MA(电子,N)); VAR25:=CONST(MA(石化,N)); VAR26:=CONST(MA(制造,N)); VAR27:=CONST(MA(运输,N)); VAR28:=CONST(MA(上证,N)); VAR29:=CONST(MA(金属,N)); PQ:=VAR29-20; P1:=IF(BARSLAST(CURRBARSCOUNT=4),1,0); P2:=IF(BARSLAST(CURRBARSCOUNT=6),1,0); P3:=IF(BARSLAST(CURRBARSCOUNT=8),1,0); P4:=IF(BARSLAST(CURRBARSCOUNT=10),1,0); P5:=IF(BARSLAST(CURRBARSCOUNT=12),1,0); P6:=IF(BARSLAST(CURRBARSCOUNT=14),1,0); P7:=IF(BARSLAST(CURRBARSCOUNT=16),1,0); P8:=IF(BARSLAST(CURRBARSCOUNT=18),1,0); P9:=IF(BARSLAST(CURRBARSCOUNT=20),1,0); P10:=IF(BARSLAST(CURRBARSCOUNT=22),1,0); P11:=IF(BARSLAST(CURRBARSCOUNT=24),1,0); P12:=IF(BARSLAST(CURRBARSCOUNT=26),1,0); P13:=IF(BARSLAST(CURRBARSCOUNT=28),1,0); P14:=IF(BARSLAST(CURRBARSCOUNT=2),1,0); STICKLINE(医药,PQ,IF(P2-P1,CONST(MA(医药,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(金融,PQ,IF(P3-P2,CONST(MA(金融,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(纺织,PQ,IF(P4-P3,CONST(MA(纺织,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(建筑,PQ,IF(P5-P4,CONST(MA(建筑,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(机械,PQ,IF(P6-P5,CONST(MA(机械,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(地产,PQ,IF(P7-P6,CONST(MA(地产,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(农林,PQ,IF(P8-P7,CONST(MA(农林,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(电子,PQ,IF(P9-P8,CONST(MA(电子,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(石化,PQ,IF(P10-P9,CONST(MA(石化,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(制造,PQ,IF(P11-P10,CONST(MA(制造,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(运输,PQ,IF(P12-P11,CONST(MA(运输,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(金属,PQ,IF(P13-P12,CONST(MA(金属,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(上证,上证,IF(P1-P14,VAR28,DRAWNULL),5,-1),COLORYELLOW; STICKLINE(医药,PQ,IF(P2-P1,VAR17,DRAWNULL),4,0),COLORRED; STICKLINE(金融,PQ,IF(P3-P2,VAR18,DRAWNULL),4,0),COLORRED; STICKLINE(纺织,PQ,IF(P4-P3,VAR19,DRAWNULL),4,0),COLORRED; STICKLINE(建筑,PQ,IF(P5-P4,VAR20,DRAWNULL),4,0),COLORRED; STICKLINE(机械,PQ,IF(P6-P5,VAR21,DRAWNULL),4,0),COLORRED; STICKLINE(地产,PQ,IF(P7-P6,VAR22,DRAWNULL),4,0),COLORRED; STICKLINE(农林,PQ,IF(P8-P7,VAR23,DRAWNULL),4,0),COLORRED; STICKLINE(电子,PQ,IF(P9-P8,VAR24,DRAWNULL),4,0),COLORRED; STICKLINE(石化,PQ,IF(P10-P9,VAR25,DRAWNULL),4,0),COLORRED; STICKLINE(制造,PQ,IF(P11-P10,VAR26,DRAWNULL),4,0),COLORRED; STICKLINE(运输,PQ,IF(P12-P11,VAR27,DRAWNULL),4,0),COLORRED; STICKLINE(金属,PQ,IF(P13-P12,VAR29,DRAWNULL),4,0),COLORRED; STICKLINE(医药,PQ,IF(P2-P1,CONST(医药),DRAWNULL),0.8,0),COLORAAAAFF; STICKLINE(金融,PQ,IF(P3-P2,CONST(金融),DRAWNULL),0.8,0),COLORAAAAFF; STICKLINE(纺织,PQ,IF(P4-P3,CONST(纺织),DRAWNULL),0.8,0),COLORAAAAFF; STICKLINE(建筑,PQ,IF(P5-P4,CONST(建筑),DRAWNULL),0.8,0),COLORAAAAFF; STICKLINE(机械,PQ,IF(P6-P5,CONST(机械),DRAWNULL),0.8,0),COLORAAAAFF; STICKLINE(地产,PQ,IF(P7-P6,CONST(地产),DRAWNULL),0.8,0),COLORAAAAFF; STICKLINE(农林,PQ,IF(P8-P7,CONST(农林),DRAWNULL),0.8,0),COLORAAAAFF; STICKLINE(电子,PQ,IF(P9-P8,CONST(电子),DRAWNULL),0.8,0),COLORAAAAFF; STICKLINE(石化,PQ,IF(P10-P9,CONST(石化),DRAWNULL),0.8,0),COLORAAAAFF; STICKLINE(制造,PQ,IF(P11-P10,CONST(制造),DRAWNULL),0.8,0),COLORAAAAFF; STICKLINE(运输,PQ,IF(P12-P11,CONST(运输),DRAWNULL),0.8,0),COLORAAAAFF; STICKLINE(金属,PQ,IF(P13-P12,CONST(金属),DRAWNULL),0.8,0),COLORAAAAFF; DRAWTEXT(P2-P1,PQ-2,'医药'),COLORYELLOW; DRAWTEXT(P3-P2,PQ-2,'金融'),COLORYELLOW; DRAWTEXT(P4-P3,PQ-2,'纺织'),COLORYELLOW; DRAWTEXT(P5-P4,PQ-2,'建筑'),COLORYELLOW; DRAWTEXT(P6-P5,PQ-2,'机械'),COLORYELLOW; DRAWTEXT(P7-P6,PQ-2,'地产'),COLORYELLOW; DRAWTEXT(P8-P7,PQ-2,'农林'),COLORYELLOW; DRAWTEXT(P9-P8,PQ-2,'电子'),COLORYELLOW; DRAWTEXT(P10-P9,PQ-2,'石化'),COLORYELLOW; DRAWTEXT(P11-P10,PQ-2,'制造'),COLORYELLOW; DRAWTEXT(P12-P11,PQ-2,'运输'),COLORYELLOW; DRAWTEXT(P13-P12,PQ-2,'金属'),COLORYELLOW; B板 VAR1:=("399120$C"); VAR2:=("399170$C"); VAR3:=("399333$C"); VAR4:=("399220$C"); VAR5:=("399180$C"); VAR6:=("399134$C"); VAR7:=("399210$C"); VAR8:=("399133$C"); VAR9:=("399140$C"); VAR10:=("399131$C"); VAR11:=("399001$C"); 采掘:=SUM((VAR1/REF(VAR1,1)-1)*100,0); IE业:=SUM((VAR2/REF(VAR2,1)-1)*100,0); 中小板:=SUM((VAR3/REF(VAR3,1)-1)*100,0); 传播:=SUM((VAR4/REF(VAR4,1)-1)*100,0); 批零:=SUM((VAR5/REF(VAR5,1)-1)*100,0); 造纸:=SUM((VAR6/REF(VAR6,1)-1)*100,0); 服务:=SUM((VAR7/REF(VAR7,1)-1)*100,0); 木材:=SUM((VAR8/REF(VAR8,1)-1)*100,0); 水电:=SUM((VAR9/REF(VAR9,1)-1)*100,0); 食品:=SUM((VAR10/REF(VAR10,1)-1)*100,0); 深证:SUM((VAR11/REF(VAR11,1)-1)*100,0),COLORRED; VAR13:=CONST(MA(采掘,N)); VAR14:=CONST(MA(IE业,N)); VAR15:=CONST(MA(中小板,N)); VAR16:=CONST(MA(传播,N)); VAR17:=CONST(MA(批零,N)); VAR18:=CONST(MA(造纸,N)); VAR19:=CONST(MA(服务,N)); VAR20:=CONST(MA(木材,N)); VAR21:=CONST(MA(水电,N)); VAR22:=CONST(MA(食品,N)); VAR23:=CONST(MA(深证,N)); PQ:=VAR22-20; P1:=IF(BARSLAST(CURRBARSCOUNT=4),1,0); P2:=IF(BARSLAST(CURRBARSCOUNT=6),1,0); P3:=IF(BARSLAST(CURRBARSCOUNT=8),1,0); P4:=IF(BARSLAST(CURRBARSCOUNT=10),1,0); P5:=IF(BARSLAST(CURRBARSCOUNT=12),1,0); P6:=IF(BARSLAST(CURRBARSCOUNT=14),1,0); P7:=IF(BARSLAST(CURRBARSCOUNT=16),1,0); P8:=IF(BARSLAST(CURRBARSCOUNT=18),1,0); P9:=IF(BARSLAST(CURRBARSCOUNT=20),1,0); P10:=IF(BARSLAST(CURRBARSCOUNT=22),1,0); P11:=IF(BARSLAST(CURRBARSCOUNT=24),1,0); P12:=IF(BARSLAST(CURRBARSCOUNT=2),1,0); STICKLINE(采掘,PQ,IF(P2-P1,CONST(MA(采掘,M)),DRAWNULL),5,0)COLORYELLOW; STICKLINE(IE业,PQ,IF(P3-P2,CONST(MA(IE业,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(中小板,PQ,IF(P4-P3,CONST(MA(中小板,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(传播,PQ,IF(P5-P4,CONST(MA(传播,M)),DRAWNULL),5,0),COLORYELLOW; STICKLINE(批零,PQ,IF(P6-P5,CONST(MA(批零,M)),DRAWNU |
- 软件大小:53.0 KB
- 推荐星级:
- 更新时间:2009-05-04 14:13:49
- 软件类别: 国产软件 / 通达信公式
- 软件语言:简体中文
- 授权方式: 解密版
- 联系方式:暂无联系方式
- 官方主页: Home Page
- 点击大图: 【一键转帖到论坛】
- 插件情况:
- 运行环境:Win9X/Win2000/WinXP/Win2003/
- 相关Tags:指标公式 股票软件,公式源码
-
(4)50%(4)50%
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!