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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → [求助]黄金分割线源代码改写成金字塔代码

   

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


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

主题:[求助]黄金分割线源代码改写成金字塔代码

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


加好友 发短信
等级:新手上路 帖子:42 积分:0 威望:0 精华:0 注册:2013/6/17 14:00:48
[求助]黄金分割线源代码改写成金字塔代码  发帖心情 Post By:2016/6/25 19:32:58    Post IP:117.81.193.175[只看该作者]

请教下各路大神,下面这段代码如何改写成金字塔代码,非常感谢~

if ws1[p]>1 then begin
DRAWSL(ws=wsp[p],hp,0,wsp1[p],3)LINETHICK1 ,POINTDOT,;
DRAWSL(ws=wsp[p],lp,0,wsp1[p],3) LINETHICK1,POINTDOT,;
DRAWSL(ws=wsp[p],lp+hlpx,0,wsp1[p],3)LINETHICK1 ,POINTDOT,;
DRAWSL(ws=wsp[p],lp+hlpx*2,0,wsp1[p],3) LINETHICK1,POINTDOT,,coloraaaaaa;
DRAWNUMBER(ws=wsp[p],hp,hp,2)COLORRED,SHIFT38;
DRAWNUMBER(ws=wsp[p],lp,lp,2)COLORGREEN,SHIFT38;
DRAWNUMBER(ws=wsp[p],lp+hlpx,lp+hlpx,2)COLORYELLOW,SHIFT38;
DRAWNUMBER(ws=wsp[p],lp+hlpx*2,lp+hlpx*2,2)COLORFFFFFF,SHIFT38;
end;


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


加好友 发短信
等级:罗宾汉 帖子:46311 积分:50819 威望:0 精华:2 注册:2011/3/23 8:50:25
  发帖心情 Post By:2016/6/27 9:36:57    Post IP:180.173.43.114[只看该作者]

这些代码无法编译


金字塔—专业程序化交易量化投资平台

客户服务部

----------------------------------------------------------- 欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com

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


加好友 发短信
等级:新手上路 帖子:42 积分:0 威望:0 精华:0 注册:2013/6/17 14:00:48
  发帖心情 Post By:2016/7/3 8:50:29    Post IP:117.81.192.248[只看该作者]

管理员,这是全部代码。帮忙看看~

 

m:=58;x:=3;p:=SYSPARAM(1);
ws:=BARPOS;ws1:=if(ws<m,ws,m);
wsp:=p-ws1+1;wsp1:=ws1-1;
h1:=hhv(h,ws1);l1:=llv(l,ws1);
hp:=h1[p];lp:=l1[p];hlpx:=(hp-lp)/x;
//VERTLINE(m),LINEDOT,Color0000FF;
//VERTLINE(p),LINEDOT,Color00FB00;
FILLRGN(hp<h1,hp,h1),COLORMAGENTA;
if ws1[p]>1 then begin
DRAWSL(ws=wsp[p],hp,0,wsp1[p],3)LINETHICK1 ,POINTDOT,;
DRAWSL(ws=wsp[p],lp,0,wsp1[p],3) LINETHICK1,POINTDOT,;
DRAWSL(ws=wsp[p],lp+hlpx,0,wsp1[p],3)LINETHICK1 ,POINTDOT,;
DRAWSL(ws=wsp[p],lp+hlpx*2,0,wsp1[p],3) LINETHICK1,POINTDOT,,coloraaaaaa;
DRAWNUMBER(ws=wsp[p],hp,hp,2)COLORRED,SHIFT38;
DRAWNUMBER(ws=wsp[p],lp,lp,2)COLORGREEN,SHIFT38;
DRAWNUMBER(ws=wsp[p],lp+hlpx,lp+hlpx,2)COLORYELLOW,SHIFT38;
DRAWNUMBER(ws=wsp[p],lp+hlpx*2,lp+hlpx*2,2)COLORFFFFFF,SHIFT38;
end;
STICKLINE(CLOSE>=OPEN,HIGH,LOW,0,0),ColorFF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,1),ColorFF;
STICKLINE(CLOSE<OPEN,HIGH,LOW,0,0),ColorCYAN;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,8,0),ColorCYAN;


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


加好友 发短信
等级:罗宾汉 帖子:46311 积分:50819 威望:0 精华:2 注册:2011/3/23 8:50:25
  发帖心情 Post By:2016/7/4 9:15:32    Post IP:180.169.30.6[只看该作者]

这些代码可以直接使用


金字塔—专业程序化交易量化投资平台

客户服务部

----------------------------------------------------------- 欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com

 回到顶部