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


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

   

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

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

主题：请老师帮忙将文华模型改写成金字塔模型，谢谢了！
帅哥哟，离线，有人找我吗？
云潇逸士
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：31 积分：0 威望：0 精华：0 注册：2014/3/13 10:56:30 		请老师帮忙将文华模型改写成金字塔模型，谢谢了！  发帖心情 Post By：2019/2/25 16:36:44    Post IP：116.136.19.119[只看该作者]

请老师帮忙将下面文华跨周期模型改写成金字塔模型，在此谢谢了！

 

TXYHXJSJK（被引用指标）

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;//收盘价与N周期最低值做差，N周期最高值与N周期最低值做差，两差之间做比值。
K:=SMA(RSV,3,1);//RSV的移动平均值
D:=SMA(K,3,1);//K的移动平均值

PB1:=(EMA(CLOSE,4)+MA(CLOSE,4*2)+MA(CLOSE,4*4))/3;
PB2:(EMA(CLOSE,6)+MA(CLOSE,6*2)+MA(CLOSE,6*4))/3;
PB3:(EMA(CLOSE,9)+MA(CLOSE,9*2)+MA(CLOSE,9*4))/3;
PB4:(EMA(CLOSE,13)+MA(CLOSE,13*2)+MA(CLOSE,13*4))/3;
PB5:=(EMA(CLOSE,18)+MA(CLOSE,18*2)+MA(CLOSE,18*4))/3;
PB6:=(EMA(CLOSE,24)+MA(CLOSE,24*2)+MA(CLOSE,24*4))/3;
BK1:=  (PB2>PB3 && PB3>PB4) || K>D  || (PB2>REF(PB2,1) && PB3>REF(PB3,1) && PB4>REF(PB4,1));
SK1:=(PB2<PB3 && PB3<PB4) || K<D || (PB2<REF(PB2,1) && PB3<REF(PB3,1) && PB4<REF(PB4,1));

 

------------------------------------------------------

跨周期指标

#IMPORT [ DAY,1,TXYHXJSJK ] AS VAR1
ZD:=VAR1.BK1;
ZK:=VAR1.SK1;
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;
ISUP&&(AA1||AA2)&& BARSSK>4&&D>1&&ATR>21 AND LASTSIG=201,BP;
ISUP&&(AA1||AA2)&& BARSSK>9&&D>1&&ATR>51 AND LASTSIG<>201&&ZD,BK;
ISDOWN&&(AA1||AA2)&& BARSBK>15&&D<99&&ATR>4 AND LASTSIG=200 ,SP;
ISDOWN&&(AA1||AA2)&& BARSBK>21&&D<99&&ATR>1 AND LASTSIG<>200&&ZK ,SK;
C>SG&&ATR>24 && MA1>MA2&&C>SKPRICE AND LASTSIG=201,BP;
C>SG&&ATR>38 && MA1>MA2&&C>SKPRICE AND LASTSIG<>201&&ZD,BK;
C<XG&&ATR>6 && MA1<MA2&&C<BKPRICE AND LASTSIG=200,SP;
C<XG&&ATR>9 && MA1<MA2&&C<BKPRICE AND LASTSIG<>200&&ZK,SK;
C>=SKPRICE*(1+0.0001*132),BP;
C<=BKPRICE*(1-0.0001*137),SP;
C<SKPRICE*(1-0.001*149),BP;
C>BKPRICE*(1+0.001*150),SP;
C<BKHIGH*(1-0.001*105) ,SP;
C>SKLOW*(1+0.001*105),BP;
SETALLSIGPRICETYPE(LIMIT_ORDER);
TRADE_OTHER('AUTO');
AUTOFILTER;

 

                                                                                      再次谢谢老师了！
 回到顶部
帅哥哟，离线，有人找我吗？
FireScript
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | 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
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | 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);


仅供参考。

命数如织，当如磐石。
 回到顶部
帅哥哟，离线，有人找我吗？
云潇逸士
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：31 积分：0 威望：0 精华：0 注册：2014/3/13 10:56:30 		  发帖心情 Post By：2019/2/26 10:42:42    Post IP：59.63.204.8[只看该作者]

谢谢老师！
 回到顶部
帅哥哟，离线，有人找我吗？
云潇逸士
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：31 积分：0 威望：0 精华：0 注册：2014/3/13 10:56:30 		  发帖心情 Post By：2019/2/26 16:16:40    Post IP：116.136.19.116[只看该作者]

#IMPORT[DAY,1,RCOMAI] AS VAR2
RC:=VAR2.RC;
RO:=VAR2.RO;
DD:=VAR2.D;
DB:=VAR2.B;

 

老师您好，我模仿您将上面文华语句改成下面的形式，15分钟跨周期模型，请问对吗？

RC:=STKINDI('',' RCOMAI.RC',0,6,0);
RO:=STKINDI('',' RCOMAI.RO',0,6,0);
DD:=STKINDI('',' RCOMAI.D',0,6,0);
DB:=STKINDI('',' RCOMAI.B',0,6,0);
 回到顶部
帅哥哟，离线，有人找我吗？
FireScript
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | 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这个必须单独建个指标才行，否则你引用不到。


命数如织，当如磐石。
 回到顶部
帅哥哟，离线，有人找我吗？
云潇逸士
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：31 积分：0 威望：0 精华：0 注册：2014/3/13 10:56:30 		  发帖心情 Post By：2019/2/26 16:19:22    Post IP：218.98.27.158[只看该作者]

我改了一个文华15分钟跨周期模型成金字塔的，可交易信号有点乱，和文华的不一致，晕。。

 回到顶部
帅哥哟，离线，有人找我吗？
FireScript
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | 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[只看该作者]

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


命数如织，当如磐石。
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.23438 秒, 6 次数据查询