公式模型编写问题提交-[原创]CCI指标改进为金字塔公式金字塔客服中心 - 专业程序化交易软件提供商

以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  [原创]CCI指标改进为金字塔公式  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=173433)

--  作者：zygq
--  发布时间：2019/12/7 23:32:45
--  [原创]CCI指标改进为金字塔公式

老师好，我是金字塔正式用户，请你帮我将通达信的CCI指标改进型转换为金字塔公式指标，谢谢

{MACD 参数优化}
SHORT0:=6;
LONG0:=12;
MID0:=9;
DIF0:=EMA(CLOSE,SHORT0)-EMA(CLOSE,LONG0);
DEA0:=EMA(DIF0,MID0);

{KD 参数设置}
N0:=9;
M10:=3;
M20:=3;
RSV:=(CLOSE-LLV(LOW,N0))/(HHV(HIGH,N0)-LLV(LOW,N0))*100;
K:=SMA(RSV,M10,1);
D:=SMA(K,M20,1);

{成交量柱}
MA005:=MA(VOL,5);
MA010:=MA(VOL,10);

{多空评估}
多方:=IF( DIF0>DEA0 AND DIF0>REF(DIF0,1) AND K>D AND K>REF(K,1) AND MA005>MA010, 1,0);
空方:=IF( DIF0<DEA0 AND DIF0<REF(DIF0,1) AND K<D AND K<REF(K,1) AND MA005<MA010, -1, 0);

UP0:=IF(多方=1 AND REF(多方,1)=0,1,0);
DOWN0:=IF(空方=-1 AND REF(空方,1)=0,-1,0);
DRAWICON(UP0=1,0,1);
DRAWICON(DOWN0=-1,0,2);

{叠加CCI}
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:(TYP-MA(TYP,14))/(0.015*AvEDEV(TYP,14));

AAA:100;BBB:-100;CCC:0;

--  作者：wenarm
--  发布时间：2019/12/9 8:52:22
--

这段代码可以直接在金字塔中使用。

--  作者：zygq
--  发布时间：2019/12/9 10:59:59
--
老师，我想将买入卖出改为前头把笑脸改为箭头，谢谢了

--  作者：zygq
--  发布时间：2019/12/9 11:00:58
--
老师，我想将买入卖出改为把笑脸改为箭头，谢谢了

--  作者：FireScript
--  发布时间：2019/12/9 11:13:25
--

改2句代码：

DRAWICON(UP0=1,0,1);
DRAWICON(DOWN0=-1,0,2);

改成
DRAWICON(UP0=1,h+5*MINDIFF,4);
DRAWICON(DOWN0=-1,L-5*MINDIFF,5);

--  作者：zygq
--  发布时间：2019/12/9 11:45:40
--

老师，改为箭头后，1分钟，5分钟图无法显示，我不会调试，请老师帮助调一下

--  作者：zygq
--  发布时间：2019/12/9 11:51:49
--

老师，改为箭头后，1分钟能显示，但剪头离副图太远，我不会调试，请老师帮助调一下，把剪头调到副图中，谢谢了

--  作者：FireScript
--  发布时间：2019/12/9 13:54:15
--

你要是需要在幅图上使用。
那就这样：

DRAWICON(UP0=1,0,4);
DRAWICON(DOWN0=-1,0,5);

效果大致是这样：

此主题相关图片如下：temp.png

[此贴子已经被作者于2019/12/9 13:56:08编辑过]