以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://www.weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://www.weistock.com/bbs/list.asp?boardid=4)
----  求助：如何实现k线变色？  (http://www.weistock.com/bbs/dispbbs.asp?boardid=4&id=2284)
--  作者：sludi
--  发布时间：2010/7/29 15:07:09
--  求助：如何实现k线变色？

我想实现的是，从开空到平空的所有k线都是绿色，从开多到平多的所有k线都是红色，不知道该怎么写？五彩k线的教程比较简单，只用一个backset并不能实现。bow～～
--  作者：董小球
--  发布时间：2010/7/29 16:48:26
--  
MARK下 一起研究下
--  作者：董小球
--  发布时间：2010/7/29 17:40:04
--  
AA:=CROSS(MA(CLOSE,5),MA(CLOSE,10));//假设一个开空条件 SS:=CROSS(MA(CLOSE,10),MA(CLOSE,5));//假设一个平空条件 BUYSHORT(AA,1);//空开一手 SELLSHORT(SS,1);//空平 IF (AA AND HOLDING<0) THEN EXTGBDATASET(\'TIME1\',CURRENTTIME) AND="AND" EXTGBDATASET(\'DATE1\',DATE); IF VV:=HOLDING<0 AND="AND" CURRENTTIME="CURRENTTIME" >\'TIME1\' AND CURRENTDATE>\'DATE1\' OR CURRENTDATE=\'DATE1\' THEN BEGIN DRAWTEXT(VV,LOW,\'Q\');END 这个代码试了一次 基本符合类似你的要求了 但是不知道为啥 后来又出不来了 郁闷
--  作者：金字塔
--  发布时间：2010/7/29 20:04:27
--  

AA:=CROSS(MA(CLOSE,5),MA(CLOSE,10));

SS:=CROSS(MA(CLOSE,10),MA(CLOSE,5));

 

ud:=BARSLAST(SS)-BARSLAST(AA);
stickline(ud>0,low,high,0.1,1),colorred;
stickline(ud>0 and c>o,close,open,10,1),colorred;
stickline(ud>0 and c<=o,close,open,10,0),colorred;
stickline(ud<0,low,high,0.1,1),colorgreen;
stickline(ud<0 and c>o,close,open,10,1),colorgreen;
stickline(ud<0 and c<=o,close,open,10,0),colorgreen;
--  作者：sludi
--  发布时间：2010/7/30 9:14:04
--  
非常感谢:)
--  作者：sludi
--  发布时间：2010/7/30 9:54:54
--  

知道了画法之后，我有一个更简单的办法，供大家参考：


//赋予颜色
stickline(holding>0,low,high,0.1,1),colorred;
stickline(holding>0 and c>o,close,open,10,1),colorred;
stickline(holding>0 and c<=o,close,open,10,0),colorred;
stickline(holding<0,low,high,0.1,1),colorblue;
stickline(holding<0 and c>o,close,open,10,1),colorblue;
stickline(holding<0 and c<=o,close,open,10,0),colorblue;

 

以holding为标准，这样，在没有仓位的时候，k线仍是原来的颜色，视觉效果更加好。
--  作者：金字塔
--  发布时间：2010/7/30 10:26:41
--  
好！
--  作者：蔡宛宏
--  发布时间：2012/2/2 15:10:16
--  
实际模型不敢用