分析家公式网,提供股票公式,股票软件用户登录  |  用户 注册
当前位置：分析家公式网 → 软件中心 → 股票公式 → 飞狐公式
ZWZ-席位统计
  • 软件大小：10.0 KB
  • 推荐星级：
  • 更新时间：2008-11-28 04:04:54
  • 软件类别： 国产软件 / 飞狐公式
  • 软件语言：简体中文
  • 授权方式： 解密版
  • 联系方式：暂无联系方式
  • 官方主页： Home Page
  • 点击大图：  【一键转帖到论坛】
  • 插件情况：
  • 运行环境：Win9X/2000/XP/2003/
  • 相关Tags：指标公式 股票软件,公式源码
  • (1)100%
    (0)0%

软件介绍


IF MARKETLABEL<>'SH' THEN BEGIN
DRAWTEXTEX(1,0,200,100,'只能运行在上证A股 ！\n \n请切换到上证个股！！');
EXIT;
END;
S1:=SELFDATA('买1席');
S2:=SELFDATA('卖1额');
SJ:=BARSLAST(ABS(S1-REF(S1,1))>0.1 OR ABS(S2-REF(S2,1))>0.1);
ZQ:=IF(SJ>0,SJ,0);
数据日期:REF(DATE,ZQ)-1000000,LINETHICK0,colorFF;
P:=SYSPARAM(1);
VARIABLE:买账[10]='',卖帐[10]='',买名[10]='',卖名[10]='',其他账[7]='',其他名[7]='';
FOR I=1 TO 10 DO BEGIN
买N额:=SELFDATA('买'+NUMTOSTR(I,0)+'额');
买额[I]:=买N额[P];
买卖N额:=SELFDATA('买'+NUMTOSTR(I,0)+'卖额');
买卖额[I]:=买卖N额[P];
买净额[I]:=买N额[P]-买卖N额[P];
卖N额:=SELFDATA('卖'+NUMTOSTR(I,0)+'额');
卖额[I]:=卖N额[P];
卖买N额:=SELFDATA('卖'+NUMTOSTR(I,0)+'买额');
卖买额[I]:=卖买N额[P];
卖净额[I]:=卖买N额[P]-卖N额[P];
买N席:=INTPART(SELFDATA('买'+NUMTOSTR(I,0)+'席'));
卖N席:=INTPART(SELFDATA('卖'+NUMTOSTR(I,0)+'席'));
JT:=IF(INTPART(买N席[P]/100000)=7,'A',IF(INTPART(买N席[P]/100000)=2,'G',IF(INTPART(买N席[P]/100000)=3,'T',IF(INTPART(买N席[P]/100000)=8,'B','无'))))+STRMID(NUMTOSTR(买N席[P],0),2,5);
CT:=IF(INTPART(卖N席[P]/100000)=7,'A',IF(INTPART(卖N席[P]/100000)=2,'G',IF(INTPART(卖N席[P]/100000)=3,'T',IF(INTPART(卖N席[P]/100000)=8,'B','无'))))+STRMID(NUMTOSTR(卖N席[P],0),2,5);
买账[I]:=JT;
卖帐[I]:=CT;
买名[I]:=F10TEXT(F10FIND(NUMTOSTR(买N席[P],0),1)+6,0);
卖名[I]:=F10TEXT(F10FIND(NUMTOSTR(卖N席[P],0),1)+6,0);
END;
FOR K=1 TO 7 DO BEGIN
其他I额:=SELFDATA('其他'+NUMTOSTR(K,0)+'额');
其他额[K]:=其他I额[P];
其他I席:=INTPART(SELFDATA('其他'+NUMTOSTR(K,0)+'席'));
CR:=IF(INTPART(其他I席[P]/100000)=7,'A',IF(INTPART(其他I席[P]/100000)=2,'G',IF(INTPART(其他I席[P]/100000)=3,'T',IF(INTPART(其他I席[P]/100000)=8,'B','无'))))+STRMID(NUMTOSTR(其他I席[P],0),2,5);
其他账[K]:=CR;
其他名[K]:=F10TEXT(F10FIND(NUMTOSTR(其他I席[P],0),1)+6,0);
END;
KZ1:=其他额[1]>0;
KZ2:=其他额[2]>0;
KZ3:=其他额[3]>0;
KZ4:=其他额[4]>0;
KZ5:=其他额[5]>0;
KZ6:=其他额[6]>0;
KZ7:=其他额[7]>0;
ZZ1:=其他额[1]<0;
ZZ2:=其他额[2]<0;
ZZ3:=其他额[3]<0;
ZZ4:=其他额[4]<0;
ZZ5:=其他额[5]<0;
ZZ6:=其他额[6]<0;
ZZ7:=其他额[7]<0;
YC1:=KZ1+KZ2+KZ3+KZ4+KZ5+KZ6+KZ7;
YC2:=ZZ1+ZZ2+ZZ3+ZZ4+ZZ5+ZZ6+ZZ7;
YP:=MAX(YC1,YC2);
GS1:=IF(STRLEFT(买账[1],1)='G',买账[1]+' '+买名[1],' ');
GS2:=IF(STRLEFT(买账[2],1)='G',买账[2]+' '+买名[2],' ');
GS3:=IF(STRLEFT(买账[3],1)='G',买账[3]+' '+买名[3],' ');
GS4:=IF(STRLEFT(买账[4],1)='G',买账[4]+' '+买名[4],' ');
GS5:=IF(STRLEFT(买账[5],1)='G',买账[5]+' '+买名[5],' ');
GS6:=IF(STRLEFT(买账[6],1)='G',买账[6]+' '+买名[6],' ');
GS7:=IF(STRLEFT(买账[7],1)='G',买账[7]+' '+买名[7],' ');
GS8:=IF(STRLEFT(买账[8],1)='G',买账[8]+' '+买名[8],' ');
GS9:=IF(STRLEFT(买账[9],1)='G',买账[9]+' '+买名[9],' ');
GS10:=IF(STRLEFT(买账[10],1)='G',买账[10]+' '+买名[10],' ');
GT1:=IF(STRLEFT(其他账[1],1)='G',其他账[1]+' '+其他名[1],' ');
GT2:=IF(STRLEFT(其他账[2],1)='G',其他账[2]+' '+其他名[2],' ');
GT3:=IF(STRLEFT(其他账[3],1)='G',其他账[3]+' '+其他名[3],' ');
GT4:=IF(STRLEFT(其他账[4],1)='G',其他账[4]+' '+其他名[4],' ');
GT5:=IF(STRLEFT(其他账[5],1)='G',其他账[5]+' '+其他名[5],' ');
GT6:=IF(STRLEFT(其他账[6],1)='G',其他账[6]+' '+其他名[6],' ');
GT7:=IF(STRLEFT(其他账[7],1)='G',其他账[7]+' '+其他名[7],' ');
TS1:=IF(STRLEFT(买账[1],1)='T',买账[1]+' '+买名[1],' ');
TS2:=IF(STRLEFT(买账[2],1)='T',买账[2]+' '+买名[2],' ');
TS3:=IF(STRLEFT(买账[3],1)='T',买账[3]+' '+买名[3],' ');
TS4:=IF(STRLEFT(买账[4],1)='T',买账[4]+' '+买名[4],' ');
TS5:=IF(STRLEFT(买账[5],1)='T',买账[5]+' '+买名[5],' ');
TS6:=IF(STRLEFT(买账[6],1)='T',买账[6]+' '+买名[6],' ');
TS7:=IF(STRLEFT(买账[7],1)='T',买账[7]+' '+买名[7],' ');
TS8:=IF(STRLEFT(买账[8],1)='T',买账[8]+' '+买名[8],' ');
TS9:=IF(STRLEFT(买账[9],1)='T',买账[9]+' '+买名[9],' ');
TS10:=IF(STRLEFT(买账[10],1)='T',买账[10]+' '+买名[10],' ');
TT1:=IF(STRLEFT(其他账[1],1)='T',其他账[1]+' '+其他名[1],' ');
TT2:=IF(STRLEFT(其他账[2],1)='T',其他账[2]+' '+其他名[2],' ');
TT3:=IF(STRLEFT(其他账[3],1)='T',其他账[3]+' '+其他名[3],' ');
TT4:=IF(STRLEFT(其他账[4],1)='T',其他账[4]+' '+其他名[4],' ');
TT5:=IF(STRLEFT(其他账[5],1)='T',其他账[5]+' '+其他名[5],' ');
TT6:=IF(STRLEFT(其他账[6],1)='T',其他账[6]+' '+其他名[6],' ');
TT7:=IF(STRLEFT(其他账[7],1)='T',其他账[7]+' '+其他名[7],' ');
BS1:=IF(STRLEFT(买账[1],1)='B',买账[1]+' '+买名[1],' ');
BS2:=IF(STRLEFT(买账[2],1)='B',买账[2]+' '+买名[2],' ');
BS3:=IF(STRLEFT(买账[3],1)='B',买账[3]+' '+买名[3],' ');
BS4:=IF(STRLEFT(买账[4],1)='B',买账[4]+' '+买名[4],' ');
BS5:=IF(STRLEFT(买账[5],1)='B',买账[5]+' '+买名[5],' ');
BS6:=IF(STRLEFT(买账[6],1)='B',买账[6]+' '+买名[6],' ');
BS7:=IF(STRLEFT(买账[7],1)='B',买账[7]+' '+买名[7],' ');
BS8:=IF(STRLEFT(买账[8],1)='B',买账[8]+' '+买名[8],' ');
BS9:=IF(STRLEFT(买账[9],1)='B',买账[9]+' '+买名[9],' ');
BS10:=IF(STRLEFT(买账[10],1)='B',买账[10]+' '+买名[10],' ');
BT1:=IF(STRLEFT(其他账[1],1)='B',其他账[1]+' '+其他名[1],' ');
BT2:=IF(STRLEFT(其他账[2],1)='B',其他账[2]+' '+其他名[2],' ');
BT3:=IF(STRLEFT(其他账[3],1)='B',其他账[3]+' '+其他名[3],' ');
BT4:=IF(STRLEFT(其他账[4],1)='B',其他账[4]+' '+其他名[4],' ');
BT5:=IF(STRLEFT(其他账[5],1)='B',其他账[5]+' '+其他名[5],' ');
BT6:=IF(STRLEFT(其他账[6],1)='B',其他账[6]+' '+其他名[6],' ');
BT7:=IF(STRLEFT(其他账[7],1)='B',其他账[7]+' '+其他名[7],' ');
GC1:=IF(STRLEFT(卖帐[1],1)='G',卖帐[1]+' '+卖名[1],' ');
GC2:=IF(STRLEFT(卖帐[2],1)='G',卖帐[2]+' '+卖名[2],' ');
GC3:=IF(STRLEFT(卖帐[3],1)='G',卖帐[3]+' '+卖名[3],' ');
GC4:=IF(STRLEFT(卖帐[4],1)='G',卖帐[4]+' '+卖名[4],' ');
GC5:=IF(STRLEFT(卖帐[5],1)='G',卖帐[5]+' '+卖名[5],' ');
GC6:=IF(STRLEFT(卖帐[6],1)='G',卖帐[6]+' '+卖名[6],' ');
GC7:=IF(STRLEFT(卖帐[7],1)='G',卖帐[7]+' '+卖名[7],' ');
GC8:=IF(STRLEFT(卖帐[8],1)='G',卖帐[8]+' '+卖名[8],' ');
GC9:=IF(STRLEFT(卖帐[9],1)='G',卖帐[9]+' '+卖名[9],' ');
GC10:=IF(STRLEFT(卖帐[10],1)='G',卖帐[10]+' '+卖名[10],' ');
JT1:=IF(STRLEFT(其他账[1],1)='G',其他账[1]+' '+其他名[1],' ');
JT2:=IF(STRLEFT(其他账[2],1)='G',其他账[2]+' '+其他名[2],' ');
JT3:=IF(STRLEFT(其他账[3],1)='G',其他账[3]+' '+其他名[3],' ');
JT4:=IF(STRLEFT(其他账[4],1)='G',其他账[4]+' '+其他名[4],' ');
JT5:=IF(STRLEFT(其他账[5],1)='G',其他账[5]+' '+其他名[5],' ');
JT6:=IF(STRLEFT(其他账[6],1)='G',其他账[6]+' '+其他名[6],' ');
JT7:=IF(STRLEFT(其他账[7],1)='G',其他账[7]+' '+其他名[7],' ');
TB1:=IF(STRLEFT(卖帐[1],1)='T',卖帐[1]+' '+卖名[1],' ');
TB2:=IF(STRLEFT(卖帐[2],1)='T',卖帐[2]+' '+卖名[2],' ');
TB3:=IF(STRLEFT(卖帐[3],1)='T',卖帐[3]+' '+卖名[3],' ');
TB4:=IF(STRLEFT(卖帐[4],1)='T',卖帐[4]+' '+卖名[4],' ');
TB5:=IF(STRLEFT(卖帐[5],1)='T',卖帐[5]+' '+卖名[5],' ');
TB6:=IF(STRLEFT(卖帐[6],1)='T',卖帐[6]+' '+卖名[6],' ');
TB7:=IF(STRLEFT(卖帐[7],1)='T',卖帐[7]+' '+卖名[7],' ');
TB8:=IF(STRLEFT(卖帐[8],1)='T',卖帐[8]+' '+卖名[8],' ');
TB9:=IF(STRLEFT(卖帐[9],1)='T',卖帐[9]+' '+卖名[9],' ');
TB10:=IF(STRLEFT(卖帐[10],1)='T',卖帐[10]+' '+卖名[10],' ');
TC1:=IF(STRLEFT(其他账[1],1)='T',其他账[1]+' '+其他名[1],' ');
TC2:=IF(STRLEFT(其他账[2],1)='T',其他账[2]+' '+其他名[2],' ');
TC3:=IF(STRLEFT(其他账[3],1)='T',其他账[3]+' '+其他名[3],' ');
TC4:=IF(STRLEFT(其他账[4],1)='T',其他账[4]

地址


·上一软件：看盘主图
·下一软件：点滴动量

软件评论评论内容只代表网友观点，与本站立场无关！

   评论摘要(共 0 条，得分 0 分，平均 0 分) 查看完整评论

说明

* 使用方法：点击上面蓝色块，打开新页面按照提示进行

* 本网站提供的各种股票软件，例如大智慧软件，通达信软件，同花顺软件，东方财富通等等，和各种股票公式指标，例如大智慧公式，通达信公式，同花顺公式，文华公式，博易大师公式，股票价格计算公式等等公式指标等，都来源网上公开来源收集

本网提供的公式文件说明：
* alg格式飞狐股票公式，可以用飞狐交易师或者交易师软件导入；
* fnc格式大智慧新一代公式指标，可以用大智慧股票软件使用，少部分可以用分析家股票软件引入使用；
* exp格式大智慧经典版股票公式，仅可以用大智慧经典版股票软件引入使用；
* tni和tnc格式通达信股票公式，仅可以用通达信新引入使用，例如可以用通达信股票软件引入使用；
* tne，tn6格式通达信公式，可以用通达信公式编辑器5.0版导入，推荐通达信金融终端版本；
* hxf格式同花顺股票公式，仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!

* 关于股票公式时间限制,如果在引入大智慧公式，交易师公式或者飞狐公式的时候，发现公式名称栏是空白的，这时候调整电脑时间到1997年，又能出现公式名称，并且能正常显示，可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式，通达信公式，同花顺公式,操盘手公式,飞狐公式，博易大师公式，金字塔公式，文华公式和交易师公式等等公式的密码，本网可帮恢复源码，有.偿.服.务无意勿扰，点击在线咨询联系我。

* 关于股票公式源码编辑
本网提供的源码，一般都可以编辑成公式，如果不明白公式的编辑，在本页右侧教程录像可参考，或者找公式教程资料学习，请搜索：教程

* 如果您发现软件内容或者链接错误，请点击报告错误谢谢！
* 站内提供的所有软件包含源码均是由网上搜集，若侵犯了你的版权利益，请联系通知我们!

~

栏目导航

本类热门

相关软件

如何导入公式

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