首页 - 入门 - K线 - 新股 - 短线 - 波段 - 买卖点 - 看盘 - 抄底 - 成交量 - 均线 - 分时图 - 名词 - 视频 - 理财 - 创业 - 书籍 - 软件 - 大师 - 佣金 - 手机炒股 - 专题
查看行情
股票代码:
当前位置: > 股票学院 > 公式源码 > 正文

大智慧公式:新龙虎看盘原码及其说明

2011年06月22日   www.chaoguba.com   来源:炒股吧   文字大小:【】【】【

大智慧公式:新龙虎看盘原码及其说明

{新龙虎看盘原码}

input:n(403,1,10000);
DRAWTEXTREL(30,5,STKLABEL),LINETHICK6,Colorffff00;
DRAWTEXTREL(150,5,STKNAME),LINETHICK5,Color00ffff;
DRAWTEXTREL(740,150, ' 高'),LINETHICK4,Color00ffff;
DRAWTEXTREL(740,300, ' 原'),LINETHICK4,Color00ffff;
DRAWTEXTREL(740,450, ' 阳'),LINETHICK4,Color00ffff;
DRAWTEXTREL(740,600, ' 光'),LINETHICK4,Color00ffff;
DRAWTEXTREL(740,750, ' 新'),LINETHICK4,ColorFF00FF;
DRAWTEXTREL(740,900, ' 编'),LINETHICK4,Color00FF00;
DRAWTEXTREL(800,100,' 新'),LINETHICK6,Color00ff00;
DRAWTEXTREL(800,300,' 龙'),LINETHICK6,Color00ff00;
DRAWTEXTREL(800,500,' 虎'),LINETHICK6,Colorffffff;
DRAWTEXTREL(800,700,' 看'),LINETHICK6,Color0000ff;
DRAWTEXTREL(800,900,' 盘'),LINETHICK6,Color00FFFF;
DRAWTEXTREL(20,520,'----------------2007.07.11--3.36版--------------------2007.07.07--1.0版---------------------'),LINETHICK1,Coloreeeeee;

a:=BUYVOL*c/100;
bz:=sum(a,0);
b:=c*SELLVOL/100;
sz:=sum(b,0);
z:=bz+sz;
cz:=bz-sz;
xb5:=if(a<=5 ,a,0);b5:=sum(xb5,0);
xs5:=if(b<=5 ,b,0);s5:=sum(xs5,0);
xb10:=if(a<=10 and a>=5 ,a,0);b10:=sum(xb10,0);
xs10:=if(b<=10 and b>=5,b,0);s10:=sum(xs10,0);
xb30:=if(a<=30 and a>=10 ,a,0);b30:=sum(xb30,0);
xs30:=if(b<=30 and b>=10 ,b,0);s30:=sum(xs30,0);
xb50:=if(a<=50 and a>=30 ,a,0);b50:=sum(xb50,0);
xs50:=if(b<=50 and b>=30 ,b,0);s50:=sum(xs50,0);
xb70:=if(a<=70 and a>=50 ,a,0);b70:=sum(xb70,0);
xs70:=if(b<=70 and b>=50 ,b,0);s70:=sum(xs70,0);
xb100:=if(a<=100 and a>=70,a,0);b100:=sum(xb100,0);
xs100:=if(b<=100 and b>=70,b,0);s100:=sum(xs100,0);
xb150:=if(a>=100 ,a,0);b150:=sum(xb150,0);
xs150:=if(b>=100 ,b,0);s150:=sum(xs150,0);
j5:=b5-s5;
j10:=b10-s10;
j30:=b30-s30;
j50:=b50-s50;
j70:=b70-s70;
j100:=b100-s100;
j150:=b150-s150;
IF BARSTATUS=2 and (z) THEN BEGIN DRAWTEXTREL(320,5,' ■总成交金额(万元):'+NUMTOSTRN(DYNAINFO(10)/10000,2)),LINETHICK4,COLORccffcc;end;
IF BARSTATUS=2 and (bz) THEN BEGIN DRAWTEXTREL(30,550,'■■■买入金额:'+NUMTOSTRN(bz,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (sz) THEN BEGIN DRAWTEXTREL(250,550,' ■■■卖出金额:'+NUMTOSTRN(sz,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b5) THEN BEGIN DRAWTEXTREL(30,600,' 5 万大单买入:' +NUMTOSTRN(b5,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s5) THEN BEGIN DRAWTEXTREL(250,600,' 5 万大单卖出:'+NUMTOSTRN(s5,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b10) THEN BEGIN DRAWTEXTREL(30,650,' 10 万大单买入:'+NUMTOSTRN(b10,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s10) THEN BEGIN DRAWTEXTREL(250,650,' 10 万大单卖出:'+NUMTOSTRN(s10,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b30) THEN BEGIN DRAWTEXTREL(30,700,' 30 万大单买入:'+NUMTOSTRN(b30,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s30) THEN BEGIN DRAWTEXTREL(250,700,' 30 万大单卖出:'+NUMTOSTRN(s30,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b50) THEN BEGIN DRAWTEXTREL(30,750,' 50 万大单买入:'+NUMTOSTRN(b50,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s50) THEN BEGIN DRAWTEXTREL(250,750,' 50 万大单卖出:'+NUMTOSTRN(s50,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b70) THEN BEGIN DRAWTEXTREL(30,800,' 70 万大单买入:'+NUMTOSTRN(b70,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s70) THEN BEGIN DRAWTEXTREL(250,800,' 70 万大单卖出:'+NUMTOSTRN(s70,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b100) THEN BEGIN DRAWTEXTREL(30,850,'100 万大单买入:'+NUMTOSTRN(b100,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s100) THEN BEGIN DRAWTEXTREL(250,850,' 100 万大单卖出:'+NUMTOSTRN(s100,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b150) THEN BEGIN DRAWTEXTREL(30,900,'150 万大单买入:'+NUMTOSTRN(b150,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s150) THEN BEGIN DRAWTEXTREL(250,900,' 150 万大单卖出:'+NUMTOSTRN(s150,2)),LINETHICK1,COLORgreen;end;

IF BARSTATUS=2 and (cz) THEN BEGIN DRAWTEXTREL(470,550,' ■■ 净买入金额:'+NUMTOSTRN(cz,2)),LINETHICK1,COLORccff00;end;
IF BARSTATUS=2 and (j5) THEN BEGIN DRAWTEXTREL(470,600, ' 5 万大单净买入; '+NUMTOSTRN(j5,2)),LINETHICK1,COLORccff00;end;
IF BARSTATUS=2 and (j10) THEN BEGIN DRAWTEXTREL(470,650, ' 10万大单净买入; '+NUMTOSTRN(j10,2)),LINETHICK1,COLORccff00;end;
IF BARSTATUS=2 and (j30) THEN BEGIN DRAWTEXTREL(470,700, ' 30万大单净买入; '+NUMTOSTRN(j30,2)),LINETHICK1,COLORccff00;end;
IF BARSTATUS=2 and (j50) THEN BEGIN DRAWTEXTREL(470,750, ' 50万大单净买入; '+NUMTOSTRN(j50,2)),LINETHICK1,COLORccff00;end;

(责任编辑:admin)
郑重声明:炒股吧网发布此信息出于传递更多信息之目的,不表明证实其描述或赞同其观点。本站不保证该信息(包括但不限于文字、数据及图表)全部或者部分内容的准确性、真实性、完整性、有效性、及时性、原创性等。相关信息并未经过本网站证实,不对您构成任何投资建议,据此操作,风险自担。
关于炒股吧 - 法律申明 - 网站律师 - 合作伙伴 - 广告服务 - 诚聘英才 - 征稿启事 - 联系方式 - 意见反馈 - 友情连接 - 网站地图
Copyright©2007-2016 炒股吧 chaoguba.com All Rights Reserved 版权所有 复制必究

特别声明:本站所载文章、数据仅供参考,使用前务请仔细阅读法律声明,风险自负。