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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 请老师帮忙将文华模型改写成金字塔模型,谢谢了!

   

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


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

主题:请老师帮忙将文华模型改写成金字塔模型,谢谢了!

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


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2019/2/25 17:15:51    Post IP:180.169.30.6[显示全部帖子]

 处理中,请注意本帖的回复。


命数如织,当如磐石。
 回到顶部
帅哥哟,离线,有人找我吗?
FireScript
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2019/2/26 9:55:29    Post IP:180.169.30.6[显示全部帖子]

 被引用指标代码不需要动。把代码复制到一个单独指标中编译下即可:

图片点击可在新窗口打开查看此主题相关图片如下:temp.png
图片点击可在新窗口打开查看


第二部分:



ZD:STKINDI('','TXYHXJSJK.BK1',0,6,0);
ZK:STKINDI('','TXYHXJSJK.SK1',0,6,0);


RSV:=(CLOSE-LLV(LOW,30))/(HHV(HIGH,8)-LLV(LOW,54))*100;
K:=SMA(RSV,1,80);
D:=SMA(K,9,58);
MA1:=MA(C,19);
MA2:=MA(C,15);
ATR:=ABS(CLOSE-REF(CLOSE,22))/(HHV(HIGH,6)-LLV(L,55))*100;
AA1:=ABS(C-REF(C,1))>=REF(HHV(ABS(H-L),42),1);//
AA2:=ABS(C-REF(C,2))>= REF(HHV(ABS(C-REF(C,2)),48),1);
TMP:=STD(C,17);
KPJ:=VALUEWHEN(DATE<>REF(DATE,1),O);
SPJ:=VALUEWHEN(DATE<>REF(DATE,1),C);
SG:=MAX(KPJ,SPJ)+10/100*12*TMP;
XG:=MIN(KPJ,SPJ)-10/100*8*TMP;

if ISUP&&(AA1||AA2)&& (ENTERBARS+1)>4&&D>1&&ATR>21 AND TYPE(1)=3 then  sellshort(holding<0,holding,market);
if ISUP&&(AA1||AA2)&& ((ENTERBARS+1)>9 or ENTERBARS=-1)&&D>1&&ATR>51 AND (TYPE(1)<>3 or type(1)=0)&&ZD then buy(holding=0,1,market);
if ISDOWN&&(AA1||AA2)&& (ENTERBARS+1)>15&&D<99&&ATR>4 AND TYPE(1)=1  then sell(holding>0,holding,market);
if ISDOWN&&(AA1||AA2)&& ((ENTERBARS+1)>21 or ENTERBARS=-1)&&D<99&&ATR>1 AND (TYPE(1)<>1 or type(1)=0)&&ZK then buyshort(holding=0,1,market);
if C>SG&&ATR>24 && MA1>MA2&&C>ENTERPRICE AND TYPE(1)=3 then sellshort(holding<0,holding,market);
if C>SG&&ATR>38 && MA1>MA2&&C>ENTERPRICE AND TYPE(1)<>3&&ZD then buy(holding=0,1,market);
if C<XG&&ATR>6 && MA1<MA2&&C<ENTERPRICE AND TYPE(1)=1 then sell(holding>0,holding,market);;
if C<XG&&ATR>9 && MA1<MA2&&C<ENTERPRICE AND TYPE(1)<>1&&ZK then buyshort(holding=0,1,market);
if C>=ENTERPRICE*(1+0.0001*132)then sellshort(holding<0,holding,market);
if C<=ENTERPRICE*(1-0.0001*137) then sell(holding>0,holding,market);
if C<ENTERPRICE*(1-0.001*149)then sellshort(holding<0,holding,market);;
if C>ENTERPRICE*(1+0.001*150) then sell(holding>0,holding,market);;
if C<hhv(h,ENTERBARS+1)*(1-0.001*105) then sell(holding>0,holding,market);
if C>llv(l,ENTERBARS+1)*(1+0.001*105) then sellshort(holding<0,holding,market);


仅供参考。



命数如织,当如磐石。
 回到顶部
帅哥哟,离线,有人找我吗?
FireScript
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2019/2/26 16:18:24    Post IP:180.169.30.6[显示全部帖子]

 对的。是这样的。不过 RCOMAI这个必须单独建个指标才行,否则你引用不到。


命数如织,当如磐石。
 回到顶部
帅哥哟,离线,有人找我吗?
FireScript
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2019/2/26 16:50:17    Post IP:180.169.30.6[显示全部帖子]

 软件不一样,代码逻辑一样情况下也可能有差异,因为软件的实现机制本身肯定有差异的。并且信号之类情况的可能还收到数据量,复权以及其他设置的影响。


命数如织,当如磐石。
 回到顶部