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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 公式模型编写问题提交 → [求助]K线日期划线程序

   

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

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

主题：[求助]K线日期划线程序
帅哥哟，离线，有人找我吗？
FireScript
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

  你把思路贴上来看看。


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


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

cd:LDAY=1;
ct:=count(cd,0);
x1:=if(mod(ct,4)=0,COLORWHITE,if(mod(ct,4)=1,COLORRED,if(mod(ct,4)=2, COLORBLUE,COLORYELLOW)));
VERTLINE(cd ,0,20000 ,x1);

大致效果：


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

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


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

上面代码仅在日线上运行。周期，月线不行。

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


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

 cd:=ref(LMONTH,1)<>LMONTH,NODRAW;//判断初一位置
ct:=count(cd,0);//统计初一次数
a:=mod(ct-1,3);
x:=(ct=1 and ref(ct,1)<>1) or (a=0 and ref(a,1)<>0);//画线条件
ct2:count(x,0);//统计画线位置次数 来进行颜色区分
x1:=if(mod(ct2,3)=0,COLORWHITE,if(mod(ct2,4)=1,COLORRED,if(mod(ct2,4)=2, COLORBLUE,COLORYELLOW)));
VERTLINE( x,0,20000 ,x1);



此外
“ 6、但是可能需要调试，第一根线可能要能够推迟1个月或者2个月划线。”这个没太懂什么意思。

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


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

 就是希望能自行调整第一个画线的位置是吧。


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