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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 策略编写求助区 → 编写求助

   

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

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

主题：编写求助
帅哥哟，离线，有人找我吗？
an8885
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：95 积分：0 威望：0 精华：0 注册：2020/6/19 11:00:48 		编写求助  发帖心情 Post By：2021/1/13 13:58:07 [只看该作者]



DS:=NEWHBARS(HIGH,1);
DN:=IFELSE(BARPOS=DS,1,DS);
DM:REF(DN,DN)+DN,NODRAW;
HH:=IFELSE(BARPOS<4,CLOSE,REF(HIGH,DM));
KD:=CLOSE>LLV(HH,DS);
KS:=NEWLBARS(LOW,1);
KN:=IFELSE(KS=BARPOS,1,KS);
KM:REF(KN,KN)+KN,NODRAW;
LL:=IFELSE(BARPOS<4,CLOSE,REF(LOW,KM));
KK:=CLOSE<HHV(LL,KS);
ENTERLONG:=KD;
EXITLONG:=KK;
TD:=BARSLAST(ENTERLONG)+1;
TK:=BARSLAST(EXITLONG)+1;
A:=REF(IFELSE(TD<TK,HHV(LL,TD),LLV(HH,TK)),1);
多空线:A,COLORRED,LINETHICK2;
DRAWCOLORLINE(CLOSE<多空线,多空线,COLOR00FF00,COLORRED),LINETHICK2;
CROSS(C,多空线),BPK;
CROSSDOWN(C,多空线),SPK;
AUTOFILTER;

文华公式能否改为金字塔公式可用，谢谢
 回到顶部
帅哥哟，离线，有人找我吗？
FireScript
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：14496 积分：0 威望：0 精华：0 注册：2017/7/4 13:40:18 		  发帖心情 Post By：2021/3/1 16:11:39 [只看该作者]

 以下代码适用于图表程序化。


DS:=NEWHBARS(HIGH,1);
DN:=IF(BARPOS=DS,1,DS);
DM:REF(DN,DN)+DN,NODRAW;
HH:=IF(BARPOS<4,CLOSE,REF(HIGH,DM));
KD:=CLOSE>LLV(HH,DS);
KS:=NEWLBARS(LOW,1);
KN:=IF(KS=BARPOS,1,KS);
KM:REF(KN,KN)+KN,NODRAW;
LL:=IF(BARPOS<4,CLOSE,REF(LOW,KM));
KK:=CLOSE<HHV(LL,KS);
开多:buy(holding=0 and kd,1,market);
//ENTERLONG:=KD;
平多:sell(holding>0 and kk,holding,market);
//EXITLONG:=KK;
TD:=ENTERBARS+1;
TK:=EXITBARS+1;
A:=REF(IF(TD<TK,HHV(LL,TD),LLV(HH,TK)),1);
多空线:A,COLORRED,LINETHICK2;

//DRAWCOLORLINE(CLOSE<多空线,多空线,COLOR00FF00,COLORRED),LINETHICK2;
//上面这个函数无法直接转换，需要用2个线的变色来间接实现
green:if(CLOSE<多空线,多空线,drawnull),colorgreen;
red:if(not(CLOSE<多空线),多空线,drawnull),colorred ;


if CROSS(C,多空线) then
begin
sellshort(holding<0,holding,market);
buy(holding=0,1,market);
end

if CROSS(多空线,c) then
begin
sell(holding>0,holding,market);
buyshort(holding=0,1,market);   
end

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