以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  文华中的公式,能在金字塔中修改下逐K线下使用吗?  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=65082)

--  作者:wjxkjs
--  发布时间:2014/5/16 8:41:49
--  文华中的公式,能在金字塔中修改下逐K线下使用吗?
NN:=BARSLAST(DATE<>REF(DATE,1))+1;
KH:=HHV(NN,300);

VERTLINE(DATE<>REFX(DATE,1)&&ISLASTBAR<>1&&KH<>1,COLORBLUE);

QQ:=OPI-REF(OPI,1);

K1:=IF(CLOSE>OPEN&&QQ>=0,QQ,0);
KK1:=IF(CLOSE<OPEN&&QQ<0,QQ,0);
KKK1:=IF(CLOSE=OPEN,QQ*0.5,0);
K2:=IF(CLOSE<OPEN&&QQ>=0,QQ,0);
KK2:=IF(CLOSE>OPEN&&QQ<0,QQ,0);
DO:=SUM(K1,NN)+SUM(KK1,NN)+SUM(KKK1,NN);
KO:=SUM(K2,NN)+SUM(KK2,NN)+SUM(KKK1,NN);
N4:=IF(NN<=4,NN,4);
VK1:=IF(CLOSE>=OPEN,VOL,0);
VK2:=IF(CLOSE<=OPEN,VOL,0);
VDO:=SUM(VK1,N4);
VKO:=SUM(VK2,N4);
VDK:=VDO-VKO;
//STICKLINE(VDK>=0,VDK,0,COLORRED,0);
//STICKLINE(VDK<=0,VDK,0,COLORCYAN,0);
CC:=SUM(QQ,NN);
DRAWNUMBER(ISLASTBAR&&CC>0,0,CC,0,COLORMAGENTA);
DRAWNUMBER(ISLASTBAR&&CC<0,0,CC,0,COLORWHITE);
POLYLINE(CLOSE>0,DO,COLORRED);
POLYLINE(CLOSE>0,KO,COLORBLUE);
W:=MOD(NN,5);
J:=BACKSET(ISLASTBAR,5);
DRAWNUMBER(ISLASTBAR,DO,DO,0,COLORYELLOW);
DRAWNUMBER(ISLASTBAR,KO,KO,0,COLORBLUE);
DRAWNUMBER(W=0&&J=0,DO,DO,0,COLORYELLOW);
DRAWNUMBER(W=0&&J=0,KO,KO,0,COLORBLUE);
DRAWTEXT(ISLASTBAR,DO,\'多\',COLORYELLOW);


--  作者:wjxkjs
--  发布时间:2014/5/16 8:42:22
--  
文华中OPI是持仓量函数
--  作者:jinzhe
--  发布时间:2014/5/16 9:02:17
--  
有未来,不能用在逐k线下