以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  请老师转成金字塔的,谢谢  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=155276)

--  作者:sunjach
--  发布时间:2017/6/20 22:26:30
--  请老师转成金字塔的,谢谢
A1:=(REF(O,1) + REF(C,1)) / 2;
A2:=(H + L + C) / 3;
A3:=MAX(MAX(A1,A2),H);
A4:=MIN(MIN(A1,A2),L);
A5:=IF(A1 < A2,A3 - A4 + A2 - A1,A3 - A4);
A6:=IF(A1 > A2,A3 - A4 + A1 - A2,A3 - A4);
A7:=A5 / (A5 + A6) *VOL * MAX(ABS(A1 - A2) / (A3 - A4),0.15) / 10000;
A8:=A6 / (A5 + A6) *VOL * MAX(ABS(A1 - A2) / (A3 - A4),0.15) / 10000;
主力净买资金:=(A7 - A8) * 2.5;
持仓量:VOLINSTK,NODRAW;
MACCL:=MA(持仓量,10);
GAO:=IF(MACCL>REF(MACCL,1),持仓量,REF(持仓量,1));
SHOU:=持仓量;
KAI:=REF(SHOU,1);
DI:=IF(MACCL>REF(MACCL,1),KAI,持仓量);
DRAWKLINE(GAO,KAI,DI,SHOU),COLORRED;
DZ:(C>=REF(C,1) AND 主力净买资金>0 AND 持仓量>REF(持仓量,1)) OR (C<REF(C,1) AND 主力净买资金>=0 AND 持仓量>REF(持仓量,1)),NODRAW;
KZ:(主力净买资金<0 AND 持仓量>REF(持仓量,1) AND C<REF(C,1)) OR ( C>=REF(C,1) AND 主力净买资金<=0 AND 持仓量>REF(持仓量,1) ),NODRAW;
KJ:(C>=REF(C,1) AND 主力净买资金>=0 AND 持仓量<=REF(持仓量,1)) OR (C>REF(C,1) AND 主力净买资金<=0 AND 持仓量<REF(持仓量,1)),NODRAW;
DJ:(C<=REF(C,1) AND 主力净买资金<=0 AND 持仓量<=REF(持仓量,1)) OR ( C<=REF(C,1) AND 主力净买资金>=0 AND 持仓量<=REF(持仓量,1) ),NODRAW;
CC:=持仓量-REF(持仓量,1);
STICKLINE(DZ,KAI,SHOU,3,0),COLORRED;
STICKLINE(KZ,SHOU,KAI,3,0),COLORBLUE;
STICKLINE(DJ,KAI,SHOU,3,0),COLORYELLOW;
STICKLINE(KJ,SHOU,KAI,3,0),COLORYELLOW;
MA10:MA(SHOU,10),COLORRED,LINETHICK1;
IF(SHOU>REF(SHOU,10),MA10,DRAWNULL),COLORRED,LINETHICK1;
IF(SHOU<=REF(SHOU,10),MA10,DRAWNULL),COLORGREEN,LINETHICK1;
MA22:MA(SHOU,22),COLORRED,LINETHICK2;
IF(SHOU>REF(SHOU,22),MA22,DRAWNULL),COLORRED,LINETHICK2;
IF(SHOU<=REF(SHOU,22),MA22,DRAWNULL),COLORGREEN,LINETHICK2;
MID :=MA(SHOU,26);
UPPER: MID + N6*STD(SHOU,M),COLORGREEN,LINETHICK1;
LOWER: MID - N6*STD(SHOU,M),COLORRED,LINETHICK1;


--  作者:wenarm
--  发布时间:2017/6/21 8:15:33
--  

最后两行变量N6未定义,你自己按自己的要求定义下

A1:=(REF(O,1) + REF(C,1)) / 2;
A2:=(H + L + C) / 3;
A3:=MAX(MAX(A1,A2),H);
A4:=MIN(MIN(A1,A2),L);
A5:=IF(A1 < A2,A3 - A4 + A2 - A1,A3 - A4);
A6:=IF(A1 > A2,A3 - A4 + A1 - A2,A3 - A4);
A7:=A5 / (A5 + A6) *VOL * MAX(ABS(A1 - A2) / (A3 - A4),0.15) / 10000;
A8:=A6 / (A5 + A6) *VOL * MAX(ABS(A1 - A2) / (A3 - A4),0.15) / 10000;
主力净买资金:=(A7 - A8) * 2.5;
持仓量:VOL,NODRAW;
MACCL:=MA(持仓量,10);
GAO:=IF(MACCL>REF(MACCL,1),持仓量,REF(持仓量,1));
SHOU:=持仓量;
KAI:=REF(SHOU,1);
DI:=IF(MACCL>REF(MACCL,1),KAI,持仓量);
KLINE(GAO,KAI,DI,SHOU,1),COLORRED;
DZ:(C>=REF(C,1) AND 主力净买资金>0 AND 持仓量>REF(持仓量,1)) OR (C<REF(C,1) AND 主力净买资金>=0 AND 持仓量>REF(持仓量,1)),NODRAW;
KZ:(主力净买资金<0 AND 持仓量>REF(持仓量,1) AND C<REF(C,1)) OR ( C>=REF(C,1) AND 主力净买资金<=0 AND 持仓量>REF(持仓量,1) ),NODRAW;
KJ:(C>=REF(C,1) AND 主力净买资金>=0 AND 持仓量<=REF(持仓量,1)) OR (C>REF(C,1) AND 主力净买资金<=0 AND 持仓量<REF(持仓量,1)),NODRAW;
DJ:(C<=REF(C,1) AND 主力净买资金<=0 AND 持仓量<=REF(持仓量,1)) OR ( C<=REF(C,1) AND 主力净买资金>=0 AND 持仓量<=REF(持仓量,1) ),NODRAW;
CC:=持仓量-REF(持仓量,1);
STICKLINE(DZ,KAI,SHOU,3,0),COLORRED;
STICKLINE(KZ,SHOU,KAI,3,0),COLORBLUE;
STICKLINE(DJ,KAI,SHOU,3,0),COLORYELLOW;
STICKLINE(KJ,SHOU,KAI,3,0),COLORYELLOW;
MA10:MA(SHOU,10),COLORRED,LINETHICK1;
IF(SHOU>REF(SHOU,10),MA10,DRAWNULL),COLORRED,LINETHICK1;
IF(SHOU<=REF(SHOU,10),MA10,DRAWNULL),COLORGREEN,LINETHICK1;
MA22:MA(SHOU,22),COLORRED,LINETHICK2;
IF(SHOU>REF(SHOU,22),MA22,DRAWNULL),COLORRED,LINETHICK2;
IF(SHOU<=REF(SHOU,22),MA22,DRAWNULL),COLORGREEN,LINETHICK2;
MID :=MA(SHOU,26);
UPPER: MID + N6*STD(SHOU,M),COLORGREEN,LINETHICK1;
LOWER: MID - N6*STD(SHOU,M),COLORRED,LINETHICK1;


--  作者:sunjach
--  发布时间:2017/6/21 8:46:56
--  
老师,不太对啊,图形是乱的,应该是这样的,正确的为图1,目前转金字塔后是图2
图片点击可在新窗口打开查看此主题相关图片如下:11.png
图片点击可在新窗口打开查看

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

--  作者:pyd
--  发布时间:2017/6/21 8:56:54
--  

KLINE(GAO,KAI,DI,SHOU,1),COLORRED;

把1改成0试试


--  作者:sunjach
--  发布时间:2017/6/21 14:19:28
--  
我找到问题了,它显示 的是当周期的持仓量,不是总持仓量,老师看看怎么改一下
--  作者:pyd
--  发布时间:2017/6/21 14:21:52
--  

当周期是vol

当天是callstock(stklabel,vtvol,6,0);

自己改下

[此贴子已经被作者于2017/6/21 14:24:51编辑过]

--  作者:wenarm
--  发布时间:2017/6/21 14:25:55
--  
持仓量:OPENINT,NODRAW;
--  作者:sunjach
--  发布时间:2017/6/22 9:41:44
--  
搞定,谢谢