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


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

   

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


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

主题:帮忙改写文华代码,谢谢

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


加好友 发短信
等级:新手上路 帖子:11 积分:0 威望:0 精华:0 注册:2021/1/29 17:10:04
帮忙改写文华代码,谢谢  发帖心情 Post By:2021/2/21 21:36:01    Post IP:125.68.165.42[只看该作者]

请帮助改写成金字塔图表程序化代码,谢谢
N1:=BARSLAST(DATE<>REF(DATE,1))+1;
N:=A01;//A01,自己编写填入

TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));//真实波幅
ATR:=MA(TR,30); //求26个周期内真实波幅的简单移动平均
MATR:=A02/;/自己编写填入

DIFF:EMA(CLOSE,3*N)-EMA(CLOSE,6*N);//短周期与长周期的收盘价的指数平滑移动平均值做差。
DEA:EMA(DIFF,2*N);//DIFF的M个周期指数平滑移动平均
MACD:2*(DIFF-DEA),COLORSTICK;//DIFF减DEA的2倍画柱状线

MAH:A03;//自己编写填入
MAC:A04;//自己编写填入

HH:=A05;//自己编写填入
LL:=A06;//自己编写
BSK:A07;//自己编写填入
M11:A08;//自己编写填入
M22:A09;//自己编写填入
GGLL:=ABS(M11-M22)/MA22*1000;
HLGL:=MA(GGLL,2000);
HLGLP:=5*HLGL;




C>(MAH*1.002)&&MAH>REF(MAH,1)&&C>HH&&C<MA22*1.08,BK(K);//
C<(MAL*0.998)&&MAL<REF(MAL,1)&&C<LL&&C>MA22*0.92,SK(K);//

C<REF(LLV(C,10),BARSBK)-2*ATR,SP(BKVOL);//开仓K线前10个周期收盘价的最低价-2*ATR止损;
C>REF(HHV(C,10),BARSSK)+2*ATR,BP(SKVOL);//开仓K线前10个周期收盘价的最高价+2*ATR止损
C>SKLOW*1.055,BP(SKVOL);//固定回撤平空单
C<BKHIGH*0.945,SP(BKVOL);//固定回撤平多单
GGLLL>HLGLP,CLOSEOUT;//率过大平仓


C<BKPRICE-3*ATR,SP(BKVOL);
C>SKPRICE+3*ATR,BP(SKVOL);
CROSSDOWN(MA11,MA22)||C<MAL,SP(BKVOL);
CROSSUP(MA11,MA22)||C>MAH,BP(SKVOL);
//MID<REF(MID,60),SP(BKVOL);
//MID>REF(MID,60),BP(SKVOL);

BKHIGH>MA22*1.08&&C<BKHIGH-3*ATR,SP(BKVOL);//
SKLOW<MA22*0.92&&C>SKLOW+3*ATR,BP(SKVOL);//止盈;
BKHIGH>MAC*1.08&&C<BKHIGH-6*ATR,SP(BKVOL);//
SKLOW<MAC*0.92&&C>SKLOW+6*ATR,BP(SKVOL);//止盈;

COUNT(ATR>MATR*1.7,10)>=3&&C<LV(C,30),SP(BKVOL);//
COUNT(ATR>MATR*1.7,10)>=3&&C>HV(C,30),BP(SKVOL);//出场;
 BKHIGH- BKPRICE>C/70 && (C-BKPRICE)/(BKHIGH-BKPRICE)<=0.2,SP(BKVOL);
SKPRICE-SKLOW>C/70 &&(SKPRICE-C)/(SKPRICE-SKLOW)<=0.2,BP(SKVOL);//止盈平仓
CLOSEKLINE(2,10);

TRADE_AGAIN(10);

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


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2021/2/22 9:54:10    Post IP:58.246.57.26[只看该作者]

 把交易的部分换下试下。


if C>(MAH*1.002) and MAH>REF(MAH,1) and C>HH and C<MA22*1.08 then buy(holding=0,k,market);
if C<(MAL*0.998) and MAL<REF(MAL,1) and C<LL and C>MA22*0.92 then buyshort(holding=0,k,market);

if C<REF(LLV(C,10),ENTERBARS+2)-2*ATR then sell(1,holding,market);//开仓K线前10个周期收盘价的最低价-2*ATR止损;
if C>REF(HHV(C,10),ENTERBARS+2)+2*ATR then sellshort(1,holding,market);//开仓K线前10个周期收盘价的最高价+2*ATR止损
if C>llv(l,ENTERBARS+1)*1.055 then sellshort(1,holding,market);//固定回撤平空单
if C<hhv(h,ENTERBARS+1)*0.945 then sell(1,holding,market);//固定回撤平多单

if GGLLL>HLGLP then
begin
sell(1,holding,market);
sellshort(1,holding,market);
end



if C<ENTERPRICE-3*ATR then sell(1,holding,market);
if C>ENTERPRICE+3*ATR then sellshort(1,holding,market);
if CROSS(MA22,MA11) or C<MAL then sell(1,holding,market);
if CROSS(MA11,MA22)or C>MAH then  sellshort(1,holding,market);
//MID<REF(MID,60),SP(BKVOL);
//MID>REF(MID,60),BP(SKVOL);

if hhv(h,ENTERBARS+1)>MA22*1.08 and C<hhv(h,ENTERBARS+1)-3*ATR then  sell(1,holding,market);
if llv(l,ENTERBARS+1)<MA22*0.92 and C>llv(l,ENTERBARS+1)+3*ATR then  sellshort(1,holding,market);
if hhv(h,ENTERBARS+1)>MAC*1.08 and C< hhv(h,ENTERBARS+1)-6*ATR then sell(1,holding,market);
if llv(l,ENTERBARS+1)<MAC*0.92 and C>llv(l,ENTERBARS+1)+6*ATR then  sellshort(1,holding,market);

if COUNT(ATR>MATR*1.7,10)>=3 and C<LV(C,30) then sell(1,holding,market);
if COUNT(ATR>MATR*1.7,10)>=3 and C>HV(C,30) then sellshort(1,holding,market);
if hhv(h,ENTERBARS+1)- ENTERPRICE>C/70 and  (C-ENTERPRICE)/(hhv(h,ENTERBARS+1)-ENTERPRICE)<=0.2 then sell(1,holding,market);
if ENTERPRICE-llv(l,ENTERBARS+1)>C/70 and (ENTERPRICE-C)/(ENTERPRICE-llv(l,ENTERBARS+1))<=0.2 then sellshort(1,holding,market);
//CLOSEKLINE(2,10);


CLOSEKLINE  这个我们无法实现。没办法做这个信号复核的。


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


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2021/2/22 9:58:32    Post IP:58.246.57.26[只看该作者]

“MAH:A03;//自己编写填入”这个是参数还是只是未完成的部分?
 最好能补全下,这样我改好了能简单测试下。


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


加好友 发短信
等级:新手上路 帖子:11 积分:0 威望:0 精华:0 注册:2021/1/29 17:10:04
发消息给你  发帖心情 Post By:2021/2/22 15:53:37    Post IP:125.68.165.42[只看该作者]

我单独发消息给你

上面的改写,要重新编写才行


 回到顶部