分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册
当前位置：分析家公式网 → 股票公式 → 飞狐公式 → 一键转帖：黄进指标

软件名称：[B]黄进指标[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：3.00 KB
官方主页：Home Page
更新时间：2012-04-09 04:08:11
软件简介:

btxc1:=CLOSE;btxo1:=OPEN;
ss1:=MAX(btxc1,btxo1),LINETHICK0;
xx1:=MIN(btxc1,btxo1),LINETHICK0;
zz1:=0*CLOSE,LINETHICK0;
btxy:=IF(CLOSE>OPEN,1,0)+IF(CLOSE<OPEN,4,0),LINETHICK0;
for btxi=2 to DATACOUNT do begin
IF btxy[btxi-1]=1 or btxy[btxi-1]=0 then begin
IF btxc1[btxi]>ss1[btxi-1] then begin
ss1[btxi]:=btxc1[btxi];
xx1[btxi]:=ss1[btxi-1];
zz1[btxi]:=0;
btxy[btxi]:=1;
end;else
IF btxc1[btxi]<xx1[btxi-1] then begin//=
ss1[btxi]:=xx1[btxi-1];
xx1[btxi]:=btxc1[btxi];
zz1[btxi]:=ss1[btxi-1];
btxy[btxi]:=4;
end;else begin
ss1[btxi]:=ss1[btxi-1];
xx1[btxi]:=btxc1[btxi];
zz1[btxi]:=0;
btxy[btxi]:=1;
end;end;
IF btxy[btxi-1]=4 or btxy[btxi-1]=0 then begin
IF btxc1[btxi]<xx1[btxi-1] then begin
ss1[btxi]:=xx1[btxi-1];
xx1[btxi]:=btxc1[btxi];
zz1[btxi]:=0;
btxy[btxi]:=4;
end;else
IF btxc1[btxi]>ss1[btxi-1] then begin//=
ss1[btxi]:=btxc1[btxi];
xx1[btxi]:=ss1[btxi-1];
zz1[btxi]:=xx1[btxi-1];
btxy[btxi]:=1;
end;else begin
ss1[btxi]:=btxc1[btxi];
xx1[btxi]:=xx1[btxi-1];
zz1[btxi]:=0;
btxy[btxi]:=4;
end;
end;
end;
btxk1:=(btxy=1 and REF(btxy=1,1) and CLOSE>REF(ss1,1))*1;
btxk2:=(btxy=1 and REF(btxy=1,1) and CLOSE<=REF(ss1,1) and CLOSE>=REF(xx1,1))*2;
btxk3:=(btxy=4 and REF(btxy=1,1) and CLOSE<REF(xx1,1))*3;
btxk4:=(btxy=4 and REF(btxy=4,1) and CLOSE<REF(xx1,1))*4;
btxk5:=(btxy=4 and REF(btxy=4,1) and CLOSE<=REF(ss1,1) and CLOSE>=REF(xx1,1))*5;
btxk6:=(btxy=1 and REF(btxy=4,1) and CLOSE>REF(ss1,1))*6;
btxk7:=(btxy=1 and REF(btxy=0,1))*1;//6
btxk8:=(btxy=4 and REF(btxy=0,1))*4;
btxkk:=IF(BARPOS=1,btxy,btxk1+btxk2+btxk3+btxk4+btxk5+btxk6+btxk7+btxk8),LINETHICK0;//显示
maxg:=MAX(MAX(ss1,xx1),zz1);ming:=MIN(MIN(ss1,xx1),zz1);
zxng:=(ss1<>maxg and ss1<>ming)*ss1+(xx1<>maxg and xx1<>ming)*xx1+(zz1<>maxg and zz1<>ming)*zz1;
btxp1:=(ss1=xx1)*ss1;btxp2:=(ss1=zz1)*zz1;btxp3:=(xx1=zz1)*xx1;
btxpp:=IF(btxp1=0 and btxp2=0,btxp3,IF(btxp1,btxp1,btxp2));
STICKLINE(zz1=0 and btxy=1,ss1,xx1,8,0),COLORAA;//yellow
STICKLINE(zz1=0 and btxy=1,ss1,xx1,7,0),COLORBB;
STICKLINE(zz1=0 and btxy=1,ss1,xx1,6,0),COLORBB;
STICKLINE(zz1=0 and btxy=1,ss1,xx1,5,0),COLORCC;
STICKLINE(zz1=0 and btxy=1,ss1,xx1,4,0),COLORDD;
STICKLINE(zz1=0 and btxy=1,ss1,xx1,3,0),COLOREE;
STICKLINE(zz1=0 and btxy=1,ss1,xx1,2,0),COLORFF;
STICKLINE(zz1=0 and btxy=1,ss1,xx1,1,0),COLORFF;
STICKLINE(zz1=0 and btxy=4,ss1,xx1,8,0),COLOR8800;//blue
STICKLINE(zz1=0 and btxy=4,ss1,xx1,7,0),COLOR9900;
STICKLINE(zz1=0 and btxy=4,ss1,xx1,6,0),COLORAA00;
STICKLINE(zz1=0 and btxy=4,ss1,xx1,5,0),COLORBB00;
STICKLINE(zz1=0 and btxy=4,ss1,xx1,4,0),COLORCC00;
STICKLINE(zz1=0 and btxy=4,ss1,xx1,3,0),COLORDD00;
STICKLINE(zz1=0 and btxy=4,ss1,xx1,2,0),COLOREE00;
STICKLINE(zz1=0 and btxy=4,ss1,xx1,1,0),COLORFF00;
STICKLINE(zz1>0 and btxpp=0,maxg,zxng,8,0),COLORAA;//YELLOW
STICKLINE(zz1>0 and btxpp=0,maxg,zxng,7,0),COLORBB;
STICKLINE(zz1>0 and btxpp=0,maxg,zxng,6,0),COLORBB;
STICKLINE(zz1>0 and btxpp=0,maxg,zxng,5,0),COLORCC;
STICKLINE(zz1>0 and btxpp=0,maxg,zxng,4,0),COLORDD;
STICKLINE(zz1>0 and btxpp=0,maxg,zxng,3,0),COLOREE;
STICKLINE(zz1>0 and btxpp=0,maxg,zxng,2,0),COLORFF;
STICKLINE(zz1>0 and btxpp=0,maxg,zxng,1,0),COLORFF;
STICKLINE(zz1>0 and btxpp=0,ming,zxng,8,0),COLOR8800;//BLUE
STICKLINE(zz1>0 and btxpp=0,ming,zxng,7,0),COLOR9900;
STICKLINE(zz1>0 and btxpp=0,ming,zxng,6,0),COLORAA00;
STICKLINE(zz1>0 and btxpp=0,ming,zxng,5,0),COLORBB00;
STICKLINE(zz1>0 and btxpp=0,ming,zxng,4,0),COLORCC00;
STICKLINE(zz1>0 and btxpp=0,ming,zxng,3,0),COLORDD00;
STICKLINE(zz1>0 and btxpp=0,ming,zxng,2,0),COLOREE00;
STICKLINE(zz1>0 and btxpp=0,ming,zxng,1,0),COLORFF00;
STICKLINE(zz1>0 and btxpp and btxy=1,maxg,ming,8,0),COLORAA;//YELLOW
STICKLINE(zz1>0 and btxpp and btxy=1,maxg,ming,7,0),COLORBB;
STICKLINE(zz1>0 and btxpp and btxy=1,maxg,ming,6,0),COLORBB;
STICKLINE(zz1>0 and btxpp and btxy=1,maxg,ming,5,0),COLORCC;
STICKLINE(zz1>0 and btxpp and btxy=1,maxg,ming,4,0),COLORDD;
STICKLINE(zz1>0 and btxpp and btxy=1,maxg,ming,3,0),COLOREE;
STICKLINE(zz1>0 and btxpp and btxy=1,maxg,ming,2,0),COLORFF;
STICKLINE(zz1>0 and btxpp and btxy=1,maxg,ming,1,0),COLORFF;
STICKLINE(zz1>0 and btxpp and btxy=4,maxg,ming,8,0),COLOR8800;//BLUE
STICKLINE(zz1>0 and btxpp and btxy=4,maxg,ming,7,0),COLOR9900;
STICKLINE(zz1>0 and btxpp and btxy=4,maxg,ming,6,0),COLORAA00;
STICKLINE(zz1>0 and btxpp and btxy=4,maxg,ming,5,0),COLORBB00;
STICKLINE(zz1>0 and btxpp and btxy=4,maxg,ming,4,0),COLORCC00;
STICKLINE(zz1>0 and btxpp and btxy=4,maxg,ming,3,0),COLORDD00;
STICKLINE(zz1>0 and btxpp and btxy=4,maxg,ming,2,0),COLOREE00;
STICKLINE(zz1>0 and btxpp and btxy=4,maxg,ming,1,0),COLORFF00;
STICKLINE(zz1>0 and btxpp and (btxy=1 or (REF(btxy,1)=1 and btxy=4)),btxpp,btxpp,8,0),COLORAA;//YELLOW
STICKLINE(zz1>0 and btxpp and (btxy=1 or (REF(btxy,1)=1 and btxy=4)),btxpp,btxpp,7,0),COLORBB;
STICKLINE(zz1>0 and btxpp and (btxy=1 or (REF(btxy,1)=1 and btxy=4)),btxpp,btxpp,6,0),COLORBB;
STICKLINE(zz1>0 and btxpp and (btxy=1 or (REF(btxy,1)=1 and btxy=4)),btxpp,btxpp,5,0),COLORCC;
STICKLINE(zz1>0 and btxpp and (btxy=1 or (REF(btxy,1)=1 and btxy=4)),btxpp,btxpp,4,0),COLORDD;
STICKLINE(zz1>0 and btxpp and (btxy=1 or (REF(btxy,1)=1 and btxy=4)),btxpp,btxpp,3,0),COLOREE;
STICKLINE(zz1>0 and btxpp and (btxy=1 or (REF(btxy,1)=1 and btxy=4)),btxpp,btxpp,2,0),COLORFF;
STICKLINE(zz1>0 and btxpp and (btxy=1 or (REF(btxy,1)=1 and btxy=4)),btxpp,btxpp,1,0),COLORFF;
STICKLINE(zz1>0 and btxpp and (btxy=4 or (REF(btxy,1)=4 and btxy=1)),btxpp,btxpp,8,0),COLOR8800;//BLUE
STICKLINE(zz1>0 and btxpp and (btxy=4 or (REF(btxy,1)=4 and btxy=1)),btxpp,btxpp,7,0),COLOR9900;
STICKLINE(zz1>0 and btxpp and (btxy=4 or (REF(btxy,1)=4 and btxy=1)),btxpp,btxpp,6,0),COLORAA00;
STICKLINE(zz1>0 and btxpp and (btxy=4 or (REF(btxy,1)=4 and btxy=1)),btxpp,btxpp,5,0),COLORBB00;
STICKLINE(zz1>0 and btxpp and (btxy=4 or (REF(btxy,1)=4 and btxy=1)),btxpp,btxpp,4,0),COLORCC00;
STICKLINE(zz1>0 and btxpp and (btxy=4 or (REF(btxy,1)=4 and btxy=1)),btxpp,btxpp,3,0),COLORDD00;
STICKLINE(zz1>0 and btxpp and (btxy=4 or (REF(btxy,1)=4 and btxy=1)),btxpp,btxpp,2,0),COLOREE00;
STICKLINE(zz1>0 and btxpp and (btxy=4 or (REF(btxy,1)=4 and btxy=1)),btxpp,btxpp,1,0),COLORFF00;
STICKLINE((zz1>0 and btxpp=0) AND (zz1>0 and btxpp=0) AND REF((zz1=0 and btxy=4),1),ming,zxng,8,0),COLOR88CC;
STICKLINE((zz1>0 and btxpp=0) AND (zz1>0 and btxpp=0) AND REF((zz1=0 and btxy=4),1),ming,zxng,7,0),COLOR99CC;
STICKLINE((zz1>0 and btxpp=0) AND (zz1>0 and btxpp=0) AND REF((zz1=0 and btxy=4),1),ming,zxng,6,0),COLORAACC;
STICKLINE((zz1>0 and btxpp=0) AND (zz1>0 and btxpp=0) AND REF((zz1=0 and btxy=4),1),ming,zxng,5,0),COLORBBCC;
STICKLINE((zz1>0 and btxpp=0) AND (zz1>0 and btxpp=0) AND REF((zz1=0 and btxy=4),1),ming,zxng,4,0),COLORCCCC;
STICKLINE((zz1>0 and btxpp=0) AND (zz1>0 and btxpp=0) AND REF((zz1=0 and btxy=4),1),ming,zxng,3,0),COLORDDCC;
STICKLINE((zz1>0 and btxpp=0) AND (zz1>0 and btxpp=0) AND REF((zz1=0 and btxy=4),1),ming,zxng,2,0
[url=http://www.70822.com/soft/sort013/sort02/down-46826.html]黄进指标[/url]

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