分析家公式网,提供股票公式,股票软件用户登录  |  用户 注册
盘口分析 - 龙虎榜公式
  • 软件大小:23.0 KB
  • 推荐星级:
  • 更新时间:2009-01-22 09:44:43
  • 软件类别: 国产软件 / 大智慧L2公式
  • 软件语言:简体中文
  • 授权方式: 解密版
  • 联系方式:暂无联系方式
  • 官方主页: Home Page
  • 点击大图:  【一键转帖到论坛】
  • 插件情况:
  • 运行环境:Win9X/2000/XP/2003/
  • 相关Tags:指标公式 股票软件,公式源码
  • (5)83%
    (1)17%

软件介绍

盘口分析
input:n1(2,1,50),n2(18,1,100);
DRAWTEXTREL(29,29,STKLABEL),LINETHICK6,Colorcc99ff;DRAWTEXTREL(144,29,STKNAME),LINETHICK6,Colorff0000;
DRAWTEXTREL(30,30,STKLABEL),LINETHICK6,Colorffff00;DRAWTEXTREL(145,30,STKNAME),LINETHICK6,Color00ffff;
DRAWTEXTREL(746,189,'盘 口 分 析'),LINETHICK6,Color00ffff;DRAWTEXTREL(748,191,'盘 口 分 析'),LINETHICK6,Color0000ff;
DRAWTEXTREL(295,45,'流通:'+NUMTOSTRN(FINANCE2(37),0)+'  收益:'+NUMTOSTRN(FINANCE2(3),2)+'  市盈:'+NUMTOSTRN(DYNAINFO(39),2)+'  市净:'+NUMTOSTRN(DYNAINFO(58),2)+'  换手:'+NUMTOSTRN(DYNAINFO(37),2)),LINETHICK3,Color9999ff;
DRAWTEXTREL(20,120,'---------------------------------------------------------'),LINETHICK3,Colorffffff;
mr:=BUYVOL*c/100;zmr:=sum(mr,0);mc:=SELLVOL*c/100;zmc:=sum(mc,0);rch:=zmr+zmc;rcc:=zmr-zmc;
mr0:=if(mr<5  ,mr,0);zmr0:=sum(mr0,0);mc0:=if(mc<5  ,mc,0);zmc0:=sum(mc0,0);
mr5:=if(mr<10 and mr>=5 ,mr,0);zmr5:=sum(mr5,0);mc5:=if(mc<10 and mc>=5,mc,0);zmc5:=sum(mc5,0);
mr10:=if(mr<25 and mr>=10 ,mr,0);zmr10:=sum(mr10,0);mc10:=if(mc<25 and mc>=10 ,mc,0);zmc10:=sum(mc10,0);
mr25:=if(mr<50 and mr>=25 ,mr,0);zmr25:=sum(mr25,0);mc25:=if(mc<50 and mc>=25 ,mc,0);zmc25:=sum(mc25,0);
mr50:=if(mr<75 and mr>=50 ,mr,0);zmr50:=sum(mr50,0);mc50:=if(mc<75 and mc>=50 ,mc,0);zmc50:=sum(mc50,0);
mr75:=if(mr<100 and mr>=75,mr,0);zmr75:=sum(mr75,0);mc75:=if(mc<100 and mc>=75,mc,0);zmc75:=sum(mc75,0);
mr100:=if(mr>=100 ,mr,0);zmr100:=sum(mr100,0);mc100:=if(mc>=100 ,mc,0);zmc100:=sum(mc100,0);
jg:=10*n2;mr200:=if(mr>jg ,mr,0);zmr200:=sum(mr200,0);mc200:=if(mc>jg,mc,0);zmc200:=sum(mc200,0);mmc200:=zmr200-zmc200;
mmc0:=zmr0-zmc0;mmc5:=zmr5-zmc5;mmc10:=zmr10+zmr25+zmr50-zmc10-zmc25-zmc50;mmc75:=zmr75+zmr100-zmc75-zmc100;
DRAWTEXTREL(20,492,'---------------------------------------------------------'),LINETHICK3,Colorffffff;
IF BARSTATUS=2 and (zmr) THEN BEGIN DRAWTEXTREL(34,545,'    总买入: '+NUMTOSTRN(zmr,2)),LINETHICK2,COLORff00ff;end;
IF BARSTATUS=2 and (zmc) THEN BEGIN DRAWTEXTREL(261,545,'       总卖出: '+NUMTOSTRN(zmc,2)),LINETHICK2,COLORffff00;end;
IF BARSTATUS=2 and (zmr0) THEN BEGIN DRAWTEXTREL(17,608,' 5万下小单买入: ' +NUMTOSTRN(zmr0,2)),LINETHICK1,COLOR0000ff;end;
IF BARSTATUS=2 and (zmc0) THEN BEGIN DRAWTEXTREL(264,608,'  5万下小单卖出: '+NUMTOSTRN(zmc0,2)),LINETHICK1,COLOR00ff00;end;
IF BARSTATUS=2 and (zmr5) THEN BEGIN DRAWTEXTREL(17,660,'  5 万中单买入: '+NUMTOSTRN(zmr5,2)),LINETHICK1,COLOR9900ff;end;
IF BARSTATUS=2 and (zmc5) THEN BEGIN DRAWTEXTREL(264,660,'   5 万中单卖出: '+NUMTOSTRN(zmc5,2)),LINETHICK1,COLOR99ff00;end;
IF BARSTATUS=2 and (zmr10) THEN BEGIN DRAWTEXTREL(17,712,' 10 万大单买入: '+NUMTOSTRN(zmr10,2)),LINETHICK1,COLOR0000ff;end;
IF BARSTATUS=2 and (zmc10) THEN BEGIN DRAWTEXTREL(264,712,'  10 万大单卖出: '+NUMTOSTRN(zmc10,2)),LINETHICK1,COLOR00ff00;end;
IF BARSTATUS=2 and (zmr25) THEN BEGIN DRAWTEXTREL(17,764,' 25 万大单买入: '+NUMTOSTRN(zmr25,2)),LINETHICK1,COLOR9900ff;end;
IF BARSTATUS=2 and (zmc25) THEN BEGIN DRAWTEXTREL(264,764,'  25 万大单卖出: '+NUMTOSTRN(zmc25,2)),LINETHICK1,COLOR99ff00;end;
IF BARSTATUS=2 and (zmr50) THEN BEGIN DRAWTEXTREL(17,816,' 50 万大单买入: '+NUMTOSTRN(zmr50,2)),LINETHICK1,COLOR0000ff;end;
IF BARSTATUS=2 and (zmc50) THEN BEGIN DRAWTEXTREL(264,816,'  50 万大单卖出: '+NUMTOSTRN(zmc50,2)),LINETHICK1,COLOR00ff00;end;
IF BARSTATUS=2 and (zmr75) THEN BEGIN DRAWTEXTREL(17,868,' 75 万大单买入: '+NUMTOSTRN(zmr75,2)),LINETHICK1,COLOR9900ff;end;
IF BARSTATUS=2 and (zmc75) THEN BEGIN DRAWTEXTREL(264,868,'  75 万大单卖出: '+NUMTOSTRN(zmc75,2)),LINETHICK1,COLOR99ff00;end;
IF BARSTATUS=2 and (zmr100) THEN BEGIN DRAWTEXTREL(17,920,'100 万大单买入: '+NUMTOSTRN(zmr100,2)),LINETHICK1,COLOR0000ff;end;
IF BARSTATUS=2 and (zmc100) THEN BEGIN DRAWTEXTREL(264,920,' 100 万大单卖出: '+NUMTOSTRN(zmc100,2)),LINETHICK1,COLOR00ff00;end;
IF BARSTATUS=2 and (zmr+zmc) THEN BEGIN DRAWTEXTREL(475,545,'        成交总额: '+NUMTOSTRN(zmr+zmc,2)),LINETHICK2,COLOR6699ff;end;
IF BARSTATUS=2 and (rcc) and rcc<0 THEN BEGIN DRAWTEXTREL(480,608,'        总成交净额: '+NUMTOSTRN(rcc,2)),LINETHICK1,COLORffff00;end;
IF BARSTATUS=2 and (rcc) and rcc>0 THEN BEGIN DRAWTEXTREL(480,608,'        总成交净额: '+NUMTOSTRN(rcc,2)),LINETHICK1,COLOR9966ff;end;
IF BARSTATUS=2 and (mmc0) and mmc0<0 THEN BEGIN DRAWTEXTREL(480,660,'          小单净额: '+NUMTOSTRN(mmc0,2)),LINETHICK1,COLORff9900;end;
IF BARSTATUS=2 and (mmc0) and mmc0>0 THEN BEGIN DRAWTEXTREL(480,660,'          小单净额: '+NUMTOSTRN(mmc0,2)),LINETHICK1,COLOR9966ff;end;
IF BARSTATUS=2 and (mmc5) and mmc5<0 THEN BEGIN DRAWTEXTREL(480,712,'          中单净额: '+NUMTOSTRN(mmc5,2)),LINETHICK1,COLORff6600;end;
IF BARSTATUS=2 and (mmc5) and mmc5>0 THEN BEGIN DRAWTEXTREL(480,712,'          中单净额: '+NUMTOSTRN(mmc5,2)),LINETHICK1,COLOR9966ff;end;
IF BARSTATUS=2 and (mmc10) and mmc10<0 THEN BEGIN DRAWTEXTREL(480,764,'          大单净额: '+NUMTOSTRN(mmc10,2)),LINETHICK1,COLORff9900;end;
IF BARSTATUS=2 and (mmc10) and mmc10>0 THEN BEGIN DRAWTEXTREL(480,764,'          大单净额: '+NUMTOSTRN(mmc10,2)),LINETHICK1,COLOR0000ff;end;
IF BARSTATUS=2 and (mmc75) and mmc75<0 THEN BEGIN DRAWTEXTREL(480,816,'          特大净额: '+NUMTOSTRN(mmc75,2)),LINETHICK1,COLORff6600;end;
IF BARSTATUS=2 and (mmc75) and mmc75>0 THEN BEGIN DRAWTEXTREL(480,816,'          特大净额: '+NUMTOSTRN(mmc75,2)),LINETHICK1,COLOR0000ff;end;
xzj:=mmc0+mmc5;dzj:=mmc10+mmc75;
IF BARSTATUS=2 and (xzj) and xzj<0 THEN BEGIN DRAWTEXTREL(725,640,'小资金流出: '+NUMTOSTRN(ABS(xzj),2)),LINETHICK3,COLORff9900;end;
IF BARSTATUS=2 and (xzj) and xzj>0 THEN BEGIN DRAWTEXTREL(725,640,'小资金流入: '+NUMTOSTRN(xzj,2)),LINETHICK3,COLOR9966ff;end;
IF BARSTATUS=2 and (dzj) and dzj<0 THEN BEGIN DRAWTEXTREL(725,734,'大资金流出: '+NUMTOSTRN(ABS(dzj),2)),LINETHICK3,COLORff9900;end;
IF BARSTATUS=2 and (dzj) and dzj>0 THEN BEGIN DRAWTEXTREL(720,734,'大资金流入: '+NUMTOSTRN(dzj,2)),LINETHICK3,COLOR0000ff;end;
IF BARSTATUS=2 and (mmc200) and mmc200<0 THEN BEGIN DRAWTEXTREL(479,898,' 大机构减仓: '+NUMTOSTRN(abs(mmc200),2)),LINETHICK4,COLOReeeeee;end;
IF BARSTATUS=2 and (mmc200) and mmc200<0 THEN BEGIN DRAWTEXTREL(480,899,' 大机构减仓: '+NUMTOSTRN(abs(mmc200),2)),LINETHICK4,COLORff0000;end;
IF BARSTATUS=2 and (mmc200) and mmc200>0 THEN BEGIN DRAWTEXTREL(479,898,' 大机构增仓: '+NUMTOSTRN(mmc200,2)),LINETHICK4,COLOReeeeee;end;
IF BARSTATUS=2 and (mmc200) and mmc200>0 THEN BEGIN DRAWTEXTREL(480,899,' 大机构增仓: '+NUMTOSTRN(mmc200,2)),LINETHICK4,COLOR0000ff;end;
mrl:=SUM(BUYVOL,0);mcl:=SUM(SELLVOL,0);dydd:=100*n1;tddr:=SUM(if(BUYVOL>800,BUYVOL,0),0);tddc:=SUM(if(SELLVOL>800,SELLVOL,0),0);
ddr:=SUM(if(BUYVOL>dydd,BUYVOL,0),0);ddc:=SUM(if(SELLVOL>dydd,SELLVOL,0),0);xdr:=mrl-ddr;xdc:=mcl-ddc;
dr:=sum(if(BUYVOL>dydd,BUYVOL,0)*c,0);drj:=dr/ddr;dc:=sum(if(SELLVOL>dydd,SELLVOL,0)*c,0);dcj:=dc/ddc;zb:=sum(if(BUYVOL>0,1,0),0)+sum(if(SELLVOL>0,1,0),0);
DRAWTEXTABS(20,55,'   总买入量: '+mrl),Color0099ff,LINET

·上一软件:凤凰波段倒仓源码
·下一软件:XHS小护士

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

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

说明

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

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

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

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

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

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

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