软件名称：[B]仿制的分时K线源码+图[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：10.0 KB
官方主页：Home Page
更新时间：2011-12-19 04:20:27
软件简介:

周末出利好顺便转发（wszyj 老师）仿制的分时K线（晴天2119老师的指标）源码+图

仿制的非常不错呀

引用公式

{FSKY}
ZO:ref(o,1);
ZC:ref(c,1);
ZH:ref(h,1);
ZL:ref(l,1);
ZF:(ref(c,1)/ref(c,2)-1)*100;
ma5:ma(c,5);
ma10:ma(c,10);
ma20:ma(c,20);
ma30:ma(c,30);
ma60:ma(c,60);
ma120:ma(c,120);
ma250:ma(c,250);

{FSKX}
ZS:=DYNAINFO(3);
KP:=DYNAINFO(4);
ZX:=DYNAINFO(7);
ZG:=DYNAINFO(5);
ZD:=DYNAINFO(6);
ZT:=DYNAINFO(54);
DT:=DYNAINFO(55);
ZF:=DYNAINFO(14);
OP:=500-(KP/ZS-1)*5000;
CL:=500-(ZX/ZS-1)*5000;
HI:=500-(ZG/ZS-1)*5000;
LO:=500-(ZD/ZS-1)*5000;
n1:=if(CURRENTTIME>=130000 or CURRENTTIME<91500,360,860);
{DRAWRECTREL(n1,0,n1+12,1000,rgb(0,0,0)),Color000000;}
if ZG and ZD then begin
DRAWRECTREL(n1+4,op,n1+8,hi,rgb(255,0,255)),ColorFF00FF;
DRAWRECTREL(n1+4,cl,n1+8,lo,rgb(0,128,0)),Color008000;
if ZX>=KP then begin
DRAWRECTREL(n1,op,n1+12,cl,rgb(255,0,0)),Color00FFFF;
end;
if ZX<KP then begin
DRAWRECTREL(n1,op,n1+12,cl,rgb(0,255,255)),Color00FFFF;
end;end;

ZO:="FSKY.ZO#day";
ZC:="FSKY.ZC#day";
ZH:="FSKY.ZH#day";
ZL:="FSKY.ZL#day";
ZZF:="FSKY.ZF#day";
ZKP:=500-(ZO/ZS-1)*5000;
ZCP:=500-(ZC/ZS-1)*5000;
ZZG:=500-(ZH/ZS-1)*5000;
ZZD:=500-(ZL/ZS-1)*5000;
DRAWRECTREL(n1-16,ZKP,n1-12,ZZG,rgb(255,0,255)),ColorFF00FF;
DRAWRECTREL(n1-16,ZCP,n1-12,ZZD,rgb(0,128,0)),Color008000;
if ZC>=ZO then begin
DRAWRECTREL(n1-20,ZKP,n1-8,ZCP,rgb(255,0,0)),Color00FFFF;
end;
if ZC<ZO then begin
DRAWRECTREL(n1-20,ZKP,n1-8,ZCP,rgb(0,255,255)),Color00FFFF;
end;

ma5:="FSKY.ma5#day";
xma5:=500-(ma5/ZS-1)*5000;
DRAWRECTREL(n1-3,xma5,n1+15,xma5+3,rgb(255,0,0)),Color00FFFF;
DRAWTEXTREL(n1+20,xma5-30,'↙ '+NUMTOSTRN(ma5,2)+'  MA5'),Color00FFFF;

ma10:="FSKY.ma10#day";
xma10:=500-(ma10/ZS-1)*5000;
DRAWRECTREL(n1-3,xma10,n1+15,xma10+3,rgb(255,0,0)),ColorFF00FF;
DRAWTEXTREL(n1+20,xma10-30,'↙ '+NUMTOSTRN(ma10,2)+'  MA10'),ColorFF00FF;

ma20:="FSKY.ma20#day";
xma20:=500-(ma20/ZS-1)*5000;
DRAWRECTREL(n1-3,xma20,n1+15,xma20+3,rgb(255,0,0)),ColorC0C0C0;
DRAWTEXTREL(n1+20,xma20-30,'↙ '+NUMTOSTRN(ma20,2)+'  MA20'),ColorC0C0C0;

ma30:="FSKY.ma30#day";
xma30:=500-(ma30/ZS-1)*5000;
DRAWRECTREL(n1-3,xma30,n1+15,xma30+3,rgb(255,0,0)),Color000080;
DRAWTEXTREL(n1+20,xma30-30,'↙ '+NUMTOSTRN(ma30,2)+'  MA30'),Color000080;

ma60:="FSKY.ma60#day";
xma60:=500-(ma60/ZS-1)*5000;
DRAWRECTREL(n1-3,xma60,n1+15,xma60+3,rgb(255,0,0)),Color808000;
DRAWTEXTREL(n1+20,xma60-30,'↙ '+NUMTOSTRN(ma60,2)+'  MA60'),Color808000;

ma120:="FSKY.ma120#day";
xma120:=500-(ma120/ZS-1)*5000;
DRAWRECTREL(n1-3,xma120,n1+15,xma120+3,rgb(255,0,0)),ColorAA00AA;
DRAWTEXTREL(n1+20,xma120-30,'↙ '+NUMTOSTRN(ma120,2)+'  MA120'),ColorAA00AA;

ma250:="FSKY.ma250#day";
xma250:=500-(ma250/ZS-1)*5000;
DRAWRECTREL(n1-3,xma250,n1+15,xma250+3,rgb(255,0,0)),Color4080FF;
DRAWTEXTREL(n1+20,xma250-30,'↙ '+NUMTOSTRN(ma250,2)+'  MA250'),Color4080FF;
 

[url=http://www.70822.com/soft/sort013/sort03/down-42241.html]仿制的分时K线源码+图[/url]