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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 请哪位大侠把这个文华模型改编成金字塔模型 谢谢

   

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


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

主题:请哪位大侠把这个文华模型改编成金字塔模型 谢谢

帅哥哟,离线,有人找我吗?
天地我心
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:45 积分:553 威望:0 精华:0 注册:2010/1/23 20:02:11
请哪位大侠把这个文华模型改编成金字塔模型 谢谢  发帖心情 Post By:2010/2/23 14:21:21    Post IP:58.241.107.218[只看该作者]

糖模型

BA:=BARPOS;
VOL1:=IF(LLV(VOL,0)=0,1,INTPART(VOL*100));
HC:=LLV(IF(H-C=0,1000,H-C),0);
CL:=LLV(IF(C-L=0,1000,ABS(C-L)),0);
CO:=LLV(IF(C-O=0,1000,ABS(C-O)),0);
ZXBD:=MIN(HC,MIN(CL,CO));
DFX:=REF(L,2)=LLV(L,15)&&REF(L,1)>REF(L,2)&&L>REF(L,2)&&REF(L,2)<=REF(L,3);
GFX:=REF(H,2)=HHV(H,9)&&REF(H,1)<REF(H,2)&&H<REF(H,2)&&REF(H,2)>=REF(H,3);
DFXI:=VALUEWHEN(DFX,BA);
GFXI:=VALUEWHEN(GFX,BA);
DDP1:=VALUEWHEN(DFX,REF(L,2));
GDP1:=VALUEWHEN(GFX,REF(H,2));
DDP:=VALUEWHEN(DFX&&DDP1<>REF(DDP1,1),DDP1);
GDP:=VALUEWHEN(GFX&&GDP1<>REF(GDP1,1),GDP1);
DFX1I:=VALUEWHEN(DFX,REF(DFXI,1));
DFX1P:=VALUEWHEN(DFX,REF(DDP,BA-DFX1I+1));
GFX1I:=VALUEWHEN(GFX,REF(GFXI,1));
GFX1P:=VALUEWHEN(GFX,REF(GDP,BA-GFX1I+1));
DFXP:=VALUEWHEN(DFX&&DDP<>REF(DDP,1),MIN(DDP,MIN(DFX1P,REF(DDP,1))));
GFXP:=VALUEWHEN(GFX&&GDP<>REF(GDP,1),MAX(GDP,MAX(GFX1P,REF(GDP,1))));
SA:=SAR(4,0.02,0.2);
DZZ:=SA>0&&NOT(REF(SA,1)>0)||BA=0;
GZZ:=SA<0&&NOT(REF(SA,1)<0)||BA=0;
DZZI:=VALUEWHEN(DZZ,BA);
GZZI:=VALUEWHEN(GZZ,BA);
DZZ0I:=IF(NOT(VALUEWHEN(REF(SA,2)<0&&DFX&&REF(L,2)=LLV(L,BA-GZZI+1),BA-2)>=0),0,VALUEWHEN((REF(DZZ,2)=1&&DFX)||(REF(SA,2)  <0&&DFX&&REF(L,2)=LLV (L,BA-GZZI+1)),BA-2));
GZZ0I:=IF(NOT(VALUEWHEN(REF(SA,2)>0&&GFX&&REF(H,2)=HHV(H,BA-DZZI+1),BA-2)>=0),0,VALUEWHEN((REF(GZZ,2)=1&&GFX)||(REF(SA,2)  >0&&GFX&&REF(H,2)=HHV(H,BA-DZZI+1)),BA-2));
DD0I:=VALUEWHEN(DZZ||DZZ0I=0,DZZ0I);
GD0I:=VALUEWHEN(GZZ||GZZ0I=0,GZZ0I);
DZZ0P:=VALUEWHEN(DZZ&&DZZI-GZZI>3,LLV(L,BA-GZZ0I+1));
GZZ0P:=VALUEWHEN(GZZ&&GZZI-DZZI>3,HHV(H,BA-DZZ0I+1));
DD0P:=VALUEWHEN(DZZ,DZZ0P);
GD0P:=VALUEWHEN(GZZ,GZZ0P);
DD0RP:=VALUEWHEN(DZZ,REF(DD0P,1));
GD0RP:=VALUEWHEN(GZZ,REF(GD0P,1));
DZP:=VALUEWHEN(DZZ,MIN(DD0P,DD0RP));
GZP:=VALUEWHEN(GZZ,MAX(GD0P,GD0RP));
QSI:=IF(DZZ0I=0,0,VALUEWHEN(DZZ,REF(DZZ0I,BA-GZZI+1)));
GQSI:=IF(GZZ0I=0,0,VALUEWHEN(GZZ,REF(GZZ0I,BA-DZZI+1)));
SZR:=IF(SA>0,1,0);
XDR:=IF(SA<0,1,0);
XDTS2:=VALUEWHEN(DZZ&&SUM(XDR,DZZI-GZZI+1)>3,SUM(XDR,DZZI-GZZI+1));
SZTS2:=VALUEWHEN(GZZ&&SUM(SZR,GZZI-DZZI+1)>3,SUM(SZR,GZZI-DZZI+1));
XDTS2I:=VALUEWHEN(DZZ&&SUM(XDR,DZZI-GZZI+1)>3,BA);
SZTS2I:=VALUEWHEN(GZZ&&SUM(SZR,GZZI-DZZI+1)>3,BA);
XDTS1:=VALUEWHEN(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,DZZI-REF(GZZI,BA-REF(DZZI,2)));
XDTS1I:=VALUEWHEN(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,BA);
XDTS:=IF(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,XDTS1,XDTS2);
SZTS1:=VALUEWHEN(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,GZZI-REF(DZZI,BA-REF(GZZI,2)));
SZTS1I:=VALUEWHEN(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,BA);
SZTS:=IF(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,SZTS1,SZTS2);
DINI:=IF(BA=DZZ0I||BA-DZZ0I=1,SUM(L*VOL1,BA-QSI+1)/SUM(VOL1,BA-QSI+1),SUM(L*VOL1,BA-DZZ0I+1)/SUM(VOL1,BA-DZZ0I+1));
GINI:=IF(BA=GZZ0I||BA-GZZ0I=1,SUM(H*VOL1,BA-GQSI+1)/SUM(VOL1,BA-GQSI+1),SUM(H*VOL1,BA-GZZ0I+1)/SUM(VOL1,BA-GZZ0I+1));
DDT0:=DFX&&(REF(C,2)<REF(DINI,2)||REF(C,3)<REF(DINI,3));
DDT0I:=VALUEWHEN(DDT0,DZZ0I);
DDT01I:=VALUEWHEN(DDT0,REF(DDT0I,1));
DINI0:=IF(BA=DDT0I||BA-DDT0I=1,SUM(L*VOL1,BA-DDT01I+1)/SUM(VOL1,BA-DDT01I+1),SUM(L*VOL1,BA-DDT0I+1)/SUM(VOL1,BA-  DDT0I+1));
DDT00:=(DZZ&&SZTS<=XDTS&&DZZI-GZZI>3);
DDT00I:=IF(NOT(DDT00),0,VALUEWHEN(DDT00,DD0I));
DZ00I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DINI0,3)||REF(C,2)<REF(DINI0,2)),DZZ0I);
DZ0I:=MAX(DDT00I,DZ00I);
DZ0:=IF(BA=DZ0I||BA-DZ0I=1,(SUM(L*VOL1,BA-REF(DZ0I,1)+1))/(SUM(VOL1,BA-REF(DZ0I,1)+1)),(SUM(L*VOL1,BA-DZ0I+1))/(SUM      (VOL1,BA-DZ0I+1)));
DZ1I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ0,3)||REF(C,2)<REF(DZ0,2)),DZZ0I);
DZ1:=IF(BA=DZ1I||BA-DZ1I=1,(SUM(L*VOL1,BA-REF(DZ1I,1)+1))/(SUM(VOL1,BA-REF(DZ1I,1)+1)),(SUM(L*VOL1,BA-DZ1I+1))/(SUM      (VOL1,BA-DZ1I+1)));
DZ2I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ1,3)||REF(C,2)<REF(DZ1,2)),DZZ0I);
DZ2:=IF(BA=DZ2I||BA-DZ2I=1,(SUM(L*VOL1,BA-REF(DZ2I,1)+1))/(SUM(VOL1,BA-REF(DZ2I,1)+1)),(SUM(L*VOL1,BA-DZ2I+1))/(SUM      (VOL1,BA-DZ2I+1)));
DZ3I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ2,3)||REF(C,2)<REF(DZ2,2)),DZZ0I);
DZ3:=IF(BA=DZ3I||BA-DZ3I=1,(SUM(L*VOL1,BA-REF(DZ3I,1)+1))/(SUM(VOL1,BA-REF(DZ3I,1)+1)),(SUM(L*VOL1,BA-DZ3I+1))/(SUM      (VOL1,BA-DZ3I+1)));
GDT0:=GFX&&(REF(C,2)>REF(GINI,2)||REF(C,3)>REF(GINI,3));
GDT0I:=VALUEWHEN(GDT0,GZZ0I);
GDT01I:=VALUEWHEN(GDT0,REF(GDT0I,1));
GINI0:=IF(BA=GDT0I||BA-GDT0I=1,SUM(H*VOL1,BA-GDT01I+1)/SUM(VOL1,BA-GDT01I+1),SUM(H*VOL1,BA-GDT0I+1)/SUM(VOL1,BA-  GDT0I+1));
GDT00:=(GZZ&&SZTS>=XDTS&&GZZI-DZZI>3);
GDT00I:=IF(NOT(GDT00),0,VALUEWHEN(GDT00,GD0I));
GZ00I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GINI0,3)||REF(C,2)>REF(GINI0,2)),GZZ0I);
GZ0I:=MAX(GDT00I,GZ00I);
GZ0:=IF(BA=GZ0I||BA-GZ0I=1,(SUM(H*VOL1,BA-REF(GZ0I,1)+1))/(SUM(VOL1,BA-REF(GZ0I,1)+1)),(SUM(H*VOL1,BA-GZ0I+1))/(SUM      (VOL1,BA-GZ0I+1)));
GZ1I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ0,3)||REF(C,2)>REF(GZ0,2)),GZZ0I);
GZ1:=IF(BA=GZ1I||BA-GZ1I=1,(SUM(H*VOL1,BA-REF(GZ1I,1)+1))/(SUM(VOL1,BA-REF(GZ1I,1)+1)),(SUM(H*VOL1,BA-GZ1I+1))/(SUM      (VOL1,BA-GZ1I+1)));
GZ2I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ1,3)||REF(C,2)>REF(GZ1,2)),GZZ0I);
GZ2:=IF(BA=GZ2I||BA-GZ2I=1,(SUM(H*VOL1,BA-REF(GZ2I,1)+1))/(SUM(VOL1,BA-REF(GZ2I,1)+1)),(SUM(H*VOL1,BA-GZ2I+1))/(SUM      (VOL1,BA-GZ2I+1)));
GZ3I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ2,3)||REF(C,2)>REF(GZ2,2)),GZZ0I);
GZ3:=IF(BA=GZ3I||BA-GZ3I=1,(SUM(H*VOL1,BA-REF(GZ3I,1)+1))/(SUM(VOL1,BA-REF(GZ3I,1)+1)),(SUM(H*VOL1,BA-GZ3I+1))/(SUM      (VOL1,BA-GZ3I+1)));
DD:=FLOOR((DZ3+ZXBD)/ZXBD)*ZXBD-ZXBD;
GD:=FLOOR((GZ3+ZXBD)/ZXBD)*ZXBD;
GDW:=VALUEWHEN(CROSS(C,GD),BA);
DDW:=VALUEWHEN(CROSS(DD,C),BA);
DK:=IF(DDW>GDW,GD,DD);
DD1:=FLOOR((DINI+ZXBD)/ZXBD)*ZXBD-ZXBD;
GD1:=FLOOR((GINI+ZXBD)/ZXBD)*ZXBD;
GDW11:=VALUEWHEN(CROSS(C,GD1),BA);
DDW11:=VALUEWHEN(CROSS(DD1,C),BA);
DKD:=IF(DDW11>GDW11,GD1,DD1);
DWD:=VALUEWHEN(CROSS(C,DKD),BA);
GWD:=VALUEWHEN(CROSS(DKD,C),BA);
GDW1:=VALUEWHEN(CROSS(C,GFXP)||BA=0,BA);
DDW1:=VALUEWHEN(CROSS(DFXP,C)||BA=0,BA);
DKP:=IF(DDW1>GDW1,GFXP,DFXP);
BZD:=MAX(DK,MAX(DKD,GFXP));
SZD:=MIN(DK,MIN(DKD,DFXP));
DTA:=CROSS(C,BZD);
KTA:=CROSS(SZD,C);
DTAI:=VALUEWHEN(DTA||BA=0,BA);
KTAI:=VALUEWHEN(KTA||BA=0,BA);
DTB:=C<DK&&C<DKD&&REF(CROSS(DKP,C),1)=1&&C>REF(DKP,2)&&DFX;
KTB:=C>DK&&C>DKD&&REF(CROSS(C,DKP),1)=1&&C<REF(DKP,2)&&GFX;
DTC:=C<DK&&C<DKD&&SUM(L<DKP&&C>DKP,2)=2;
KTC:=C>DK&&C>DKD&&SUM(H>DKP&&C<DKP,2)=2;
DTD:=C>DKD&&SUM(C>DK,2)>=2&&SUM(DKD=DK,BA-DWD+1)=BA-DWD&&DKD>DK&&REF(DKD=DK,1)=1;
KTD:=C<DKD&&SUM(C<DK,2)>=2&&SUM(DKD=DK,BA-GWD+1)=BA-GWD&&DKD<DK&&REF(DKD=DK,1)=1;
DTE:=CROSS(C,DK)&&SUM(DK=DKD,BA-REF(DWD,1)+1)=BA-REF(DWD,1)+1;
KTE:=CROSS(DK,C)&&SUM(DK=DKD,BA-REF(GWD,1)+1)=BA-REF(GWD,1)+1;
DTF:=CROSS(C,DK)&&SUM(CROSS(C,GFXP),BA-1)=0;
KTF:=CROSS(DK,C)&&SUM(CROSS(DFXP,C),BA-1)=0;
KTG:=C>DK&&CROSS(DKD,C)&&SUM(C>DK&&C>DKP&&L<DKD&&C>DKD&&O=L,BA-DWD+1)>=1;
DTG0:=C>DK&&CROSS(C,DKD)&&SUM(KTG,BA-GWD+1)>=1;
KTH:=REF(SUM(DK=DKD,2)=2&&CROSS(DK,C)&&ISUP,1)=1&&C<REF(C,1);
DTJ:=C>DKP&&C<DK&&CROSS(C,DKD)&&SUM(C<DK&&L<DKP&&C>DKP&&ISUP,BA-GWD+1)>=1;
KTJ0:=C<DK&&CROSS(DKD,C)&&SUM(DTJ,BA-DWD+1)>=1;
DTK:=C<DK&&CROSS(C,DKD)&&SUM(CROSS(DKP,C),BA-GWD+1)>=1&&ISUP&&L>REF(H,1)&&SUM(L<DK&&C>DK,BA-GWD+1)>=1;
KTK0:=C<DK&&CROSS(DKD,C)&&SUM(DTK,BA-DWD+1)>=1;
KTL:=CROSS(DKD,C)&&SUM(CROSS(C,DKP)&&C>DKD&&DKD>DK,BA-DWD+1);
KTM:=CROSS(DKD,C)&&SUM(SUM(L<DKD&&C>DKD,2)=2,BA-DWD+1)>=1&&SUM(CROSS(C,DKP)||CROSS(C,DK),BA-DWD+1)=0;
DTL:=CROSS(C,DKD)&&O-L<0.5&&SUM(CROSS(DK,C)&&DK<>DKD,BA-GWD+1);
DT1:=DTA||DTC||DTB||DTD||DTE||DTF||DTG0||DTJ||DTK||DTL;
KT1:=KTA||KTC||KTB||KTD||KTE||KTF||KTG||KTH||KTJ0||KTK0||KTL||KTM;
DTI:=VALUEWHEN(DT1||BA=0,BA);
KTI:=VALUEWHEN(KT1||BA=0,BA);
REF(DTI<=KTI,1)=1&&DTI>KTI,BPK;
REF(DTI>=KTI,1)=1&&DTI<KTI,SPK;

 


 回到顶部
帅哥哟,离线,有人找我吗?
金钱豹
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:18 积分:300 威望:0 精华:0 注册:2009/11/20 9:30:51
  发帖心情 Post By:2010/2/26 14:22:55    Post IP:218.61.157.26[只看该作者]

有才,别说改,就是理解一下也挺不容易的。

 


 回到顶部
帅哥哟,离线,有人找我吗?
admin
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:7302 积分:32559 威望:1000 精华:45 注册:2003/12/30 16:34:32
  发帖心情 Post By:2010/2/26 15:00:22    Post IP:125.34.164.182[只看该作者]

建议发到理想论坛上去,那里高手比较多一些

 回到顶部
帅哥哟,离线,有人找我吗?
Likai
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 李凯学堂
等级:论坛游侠 帖子:137 积分:854 威望:0 精华:0 注册:2009/8/24 14:44:18
  发帖心情 Post By:2010/3/1 14:14:24    Post IP:117.81.166.53[只看该作者]

不能理解原理的东西改了也意义不大。


 回到顶部