您现在的位置:好股网 >> 股票公式 >> 大智慧L2公式

盘口分析 (源码)

[下载地址]
  • 更新时间:2010-07-20 09:30:00
  • 指标功能:国产软件
  • 公式大小:25.0 KB
  • 解压密码:goodgupiao
  • 推荐星级:
  • 授权方式:共享版
  • 公式分类:大智慧L2公式
  • 指标类型:简体中文
  • 运行环境:Win2000/WinXP/Win2003/
  • 所需积分:0
  • 相关Tags:

盘口分析 (源码)介绍

好股网(www.goodgupiao.com)提示:您正在下载的是:盘口分析 (源码)

{盘口分析 副图}
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,LINETHICK2;
DRAWTEXTABS(215,55,' 总卖入量: '+mcl),Colorffff66,LINETHICK2;
DRAWTEXTABS(20,74,'■ 特大买入: '+tddr),Color0000FF,LINETHICK2;
DRAWTEXTABS(170,74,''+FLOOR(tddr/(mrl+mcl)*100)+' %'),Color0000ff,LINETHICK2;
DRAWTEXTABS(215,74,'■ 特大卖出: '+tddc),Color00ff00,LINETHICK2;
DRAWTEXTABS(365,74,''+FLOOR(tddc/(mrl+mcl)*100)+' %'),Color00ff00,LINETHICK2;
DRAWTEXTABS(20,93,'■ 大单买入: '+ddr),Colorcc66ff,LINETHICK2;
DRAWTEXTABS(170,93,''+FLOOR(ddr/(mrl+mcl)*100)+' %'),Colorcc66ff,LINETHICK2;
DRAWTEXTABS(215,93,'■ 大单卖出: '+ddc),Colorff9966,LINETHICK2;
DRAWTEXTABS(365,93,''+FLOOR(ddc/(mrl+mcl)*100)+' %'),Colorff9966,LINETHICK2;
DRAWTEXTABS(20,112,'■ 小单买入: '+xdr),Color99ccFF,LINETHICK2;
DRAWTEXTABS(170,112,''+FLOOR(xdr/(mrl+mcl)*100)+' %'),Color99ccFF,LINETHICK2;
DRAWTEXTABS(215,112,'■ 小单卖出: '+xdc),Colorccffcc,LINETHICK2;
DRAWTEXTABS(365,112,''+FLOOR(xdc/(mrl+mcl)*100)+' %'),Colorccffcc,LINETHICK2;
DRAWTEXTABS(20,131,' 大单买均价: '+drj),Color6600FF,LINETHICK2;
DRAWTEXTABS(215,131,' 大单卖均价: '+dcj),Color99ff33,LINETHICK2;
DRAWTEXTABS(415,55,' 总成交量: '+(mrl+mcl)),Colorccccff,LINETHICK2;
DRAWTEXTABS(415,74,' 特大净量: '+(tddr-tddc)),Colorcc66ff,LINETHICK2;
DRAWTEXTABS(415,93,' 大单净量: '+(ddr-ddc)),Colorccff33,LINETHICK2;
DRAWTEXTABS(415,112,' 小单净量: '+(xdr-xdc)),Colorffcc66,LINETHICK2;
DRAWTEXTABS(415,131,' 总买净量: '+(mrl-mcl)+' 总笔数: '+zb+' 每笔 '+NUMTOSTRN(((mrl+mcl)/zb),0)+' 手'),Color00ffff,LINETHICK2;
DRAWTEXTABS(562,96,'参数1:'+dydd+' 参数2:'+jg),LINETHICK3,Colorffffff; STICKLINE((DYNAINFO(8) AND DISPSTATUS=2),0,DYNAINFO(8),60,1),COLORFFFFFF;
STICKLINE((tddr+tddc+ddr+ddc+xdr+xdc AND DISPSTATUS=2),0,DYNAINFO(8),60,0),Color99ccFF;
STICKLINE((tddr+tddc+ddr+ddc+xdc AND DISPSTATUS=2),0,tddr+tddc+ddr+ddc+xdc,60,0),Colorcc66ff;
STICKLINE((tddr+tddc+ddc+xdc AND DISPSTATUS=2),0,tddr+tddc+ddc+xdc,60,0),Color0000FF;
STICKLINE((tddc+ddc+xdc AND DISPSTATUS=2),0,tddc+ddc+xdc,60,0),Color00ff00;
STICKLINE((ddc+xdc AND DISPSTATUS=2),0,ddc+xdc,60,0),Colorff9966;
STICKLINE((xdc AND DISPSTATUS=2),0,xdc,60,0),Colorccffcc;

 


好股网(www.goodgupiao.com)提醒您:股市有风险,投资需谨慎。
盘口分析 (源码)下载地址
下载必看(为了保障您的权益,请在下载指标前务必看清楚相关说明)
  • 网站注册、找回密码、下载过程遇到问题,请您联系,我们会在第一时间指导反馈。
  • 积分指标使用遇到问题,如指标安装不成功或指标介绍的特点与实际发布的不符,请联系好股网客服进行问题处理。
  • 指标来源网络收集和会员提供,不保证提供的下载资源的准确性、安全性和完整性。请自行谨慎甄别公式相关描述后再下载,好股网不保障和承担使用该指标公式投资带来的一切损失。
  • 指标仅供学习和研究使用,不得用于商业或者非法用途。本站对于提供下载的指标、软件等不拥有任何权利,其版权归该下载资源的合法拥有者所有,如有侵犯您的版权,请查看《侵权投诉》,本站将移除相关内容。
更多最新置顶指标公式
相关说明
  • 目前市场常用软件有通达信、大智慧等,通达信版本从高到低的指标格式有tn6、tne、tni,股票池格式为XML。大智慧指标格式有fnc,股票池格式为XML。
  • 通达信指标导入安装快捷方法:快捷键CTRL+F > 公式管理器面板 导入公式 > 选择要导入的公式 打开 > 在导入公式面板中 勾选公式,确定。
  • 通达信指标呈现快捷方法:点击指标面板要显示的主图或副图,快捷键CTRL+I > 选择指标,确定。
  • alg格式股票公式,仅仅可以用飞狐交易师股票软件引入使用;
  • fnc格式股票公式,可以用大智慧新一代高速行情分析系统股票软件使用,少部分可以用分析家股票软件引入使用;
  • exp格式股票公式,仅可以用大智慧经典版股票软件引入使用;
  • tnctni格式股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
  • tn6格式公式,仅可以用通达信公式编辑器5.0版导入,高版本兼容低版本;
  • hxf格式股票公式,仅可以用同花顺股票软件引入使用。
  • 如果引入公式的时候,发现公式名称栏空白,调整电脑时间到1997年,能出现公式名称并正常显示,可能是公式使用期限已过。
  • 如果您发现下载链接错误,请点击报告错误谢谢!