欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 飞狐的中枢公式,倒入后不显示,请帮忙看看

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有5259人关注过本帖树形打印复制链接

主题:飞狐的中枢公式,倒入后不显示,请帮忙看看

帅哥哟,离线,有人找我吗?
期货股东
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:4 积分:30 威望:0 精华:0 注册:2010/11/6 22:31:21
飞狐的中枢公式,倒入后不显示,请帮忙看看  发帖心情 Post By:2010/11/11 20:20:22    Post IP:218.29.179.19[显示全部帖子]

if DATAPERIOD=0 then minbi:="fbase.var2#min1"; 
if DATAPERIOD=1 then minbi:="fbase.var2#min5"; 
if DATAPERIOD=2 then minbi:="fbase.var2#min30"; 
if DATAPERIOD=3 then minbi:="fbase.var2#min60"; 
if DATAPERIOD=4 then minbi:="fbase.var2#day"; 
if DATAPERIOD=5 then minbi:="fbase.var2#day"; 
if DATAPERIOD=6 then minbi:="fbase.var2#week"; 
if DATAPERIOD=7 then minbi:="fbase.var2#month"; 
if DATAPERIOD=8 then minbi:="fbase.var2#year";

var1:="chzhshch@kxian";
var2:="chzhshch@bi";{处理笔关系}

var3:="chzhshch@tongji"(minbi);{同级别分解}
zg:="chzhshch@zg"(var3);//一定要先调用ZG
zd:="chzhshch@zd"(var3);

pre:=2; //设置小数点位数
if STKTYPE=0 then  pre:=1;
if STKTYPE=11 then pre:=3;
//以背景块的形式画中枢
stickline(zg>zd,zg,zd,10,0),color000055;

drawline(var2=1,h,var2=-1,l,0),linedot,coloryellow;
drawline(var2=-1,l,var2=1,h,0),linedot,coloryellow;

drawline(var3=1,h,var3=-1,l,0),colorFF6600;
drawline(var3=-1,l,var3=1,h,0),colorFF6600;

//以框的形式画中枢
{
stickline(zg>zd and zg<>ref(zg,1),zg,zd,2,0),COLORMAGENTA;
stickline(zg>zd and zg<>refx(zg,1),zg,zd,2,0),COLORMAGENTA;
drawline(zg>zd and zg<>ref(zg,1),zg,zg>zd and zg<>refx(zg,1),zg,0),COLORMAGENTA;
drawline(zg>zd and zd<>ref(zd,1),zd,zg>zd and zd<>refx(zd,1),zd,0),COLORMAGENTA;
}
var1:="chzhshch@kxian";
var2:="chzhshch@bi";{处理笔关系}
if DATAPERIOD<=1 then
begin var2:=var3;{处理段1分钟的关系}
end;
pre:=2; {设置小数点位数}
if STKTYPE=0 then  pre:=1;
if STKTYPE=11 then pre:=3;

a1:=barslast(var2<>0);
a2:=ref(var2,a1);
aa1:=ref(a1+1,1);
aa2:=ref(a2,1);
a3:=if (aa2>0,l-ref(h,aa1),h-ref(l,aa1)),linethick0;{计算点位差}
//显示点位
drawnumber(var2=1,h,h,pre),pxup65,color3300ff,align0; 
drawnumber(var2=-1,l,l,pre),pxdn50,colorffff00,align0;
//显示力度
drawtext(var2=1,h,'+')colormagenta,pxup20,align2;
drawnumber(var2=1,h,a3,pre),colormagenta,pxup20;
drawnumber(var2=-1,l,a3,pre),colorgreen,pxdn5,align0;
//显示周期数
drawtext(var2=1,h,'T'),pxup45,coloryellow,align1;
drawnumber(var2=1,h,aa1,0),coloryellow,pxup45,align2;
drawtext(var2=-1,l,'T'),pxdn30,coloryellow,align1;
drawnumber(var2=-1,l,aa1,0),coloryellow,pxdn30,align2;


kline(o,h,l,c,1);
stickline(DATAPERIOD=6 and c/ref(c,1)>=1.097,o,c,8,1);
//显示最后没完成的点位
aa9:=hhv(h,a1);
aa11:=llv(l,a1);
drawnumber(  islastbar and a2=-1,aa9,aa9,pre),align2,color3300ff;
drawnumber(  islastbar and a2=1,aa11,aa11,pre),align2,colorffff00;
//显示最后没完成的力度
drawtext(   islastbar and a2=-1, aa9,'+     '),align2,colormagenta,pxdn20;
drawnumber( islastbar and a2=-1, aa9,a3,pre),align2,colormagenta,pxdn20;
drawnumber( islastbar and a2=1, aa11,a3,pre),align2,colorgreen,pxup20;
//显示最后没完成的周期
drawtext(  islastbar and a2=-1,  aa9,'T'),coloryellow,align1,pxdn40;
drawnumber(islastbar and a2=-1,  aa9,aa1,0),coloryellow,align2,pxdn40;
drawtext(  islastbar and a2=1, aa11,'T'),coloryellow,align1,pxup40;
drawnumber(islastbar and a2=1, aa11,aa1,0),coloryellow,align2,pxup40;

 回到顶部