以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  请问如何编进金字塔里面  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=75828)

--  作者:ru243463277
--  发布时间:2015/2/24 17:16:47
--  请问如何编进金字塔里面
http://www.360doc.com/content/13/0522/16/7504203_287295409.shtml

DDD:DATE,LINETHICK0,COLORWHITE;

A1:=IF(D=1, REF(H,BARSLAST(DATE=A_TIME)), IF(D=2, REF(L,BARSLAST(DATE=ATIME)), 0));
B1:=IF(D=1, REF(L,BARSLAST(DATE=B_TIME)), IF(D=2, REF(H,BARSLAST(DATE=BTIME)), 0));
C1:=IF(D=1, REF(H,BARSLAST(DATE=C_TIME)), IF(D=2, REF(L,BARSLAST(DATE=CTIME)), 0));

入场点1:=0.618*(A1-B1)+B1,COLORRED;
入场点2:=0.5*(A1-B1)+B1,COLORRED;
入场点3:=0.382*(A1-B1)+B1,COLORRED;

OP:B1-A1+C1,COLORYELLOW,LINETHICK0;
COP:0.618*(B1-A1)+C1,COLORYELLOW,LINETHICK0;
XOP:1.618*(B1-A1)+C1,COLORYELLOW,LINETHICK0;

PARTLINE(DD=10 AND DATE>= B_TIME AND D=1, 入场点1), COLORRED;
PARTLINE(DD=10 AND DATE>= B_TIME AND D=1, 入场点2), COLORRED;
PARTLINE(DD=10 AND DATE>= B_TIME AND D=1, 入场点3), COLORRED;

PARTLINE(DD=10 AND DATE>= BTIME AND D=2, 入场点1), COLORRED;
PARTLINE(DD=10 AND DATE>= BTIME AND D=2, 入场点2), COLORRED;
PARTLINE(DD=10 AND DATE>= BTIME AND D=2, 入场点3), COLORRED;

DRAWNUMBER(FILTER(DD=10 AND DATE>= B_TIME AND D=1,300),入场点1,0.618,3),ALIGN2;
DRAWNUMBER(FILTER(DD=10 AND DATE>= B_TIME AND D=1,300),入场点2,0.5,1),ALIGN2;
DRAWNUMBER(FILTER(DD=10 AND DATE>= B_TIME AND D=1,300),入场点3,0.382,3),ALIGN2;

DRAWNUMBER(FILTER(DD=10 AND DATE>= BTIME AND D=2,300),入场点1,0.618,3),ALIGN2;
DRAWNUMBER(FILTER(DD=10 AND DATE>= BTIME AND D=2,300),入场点2,0.5,1),ALIGN2;
DRAWNUMBER(FILTER(DD=10 AND DATE>= BTIME AND D=2,300),入场点3,0.382,3),ALIGN2;


PARTLINE(DD=10 AND DATE>= C_TIME AND D=1, OP), COLORYELLOW;
PARTLINE(DD=10 AND DATE>= C_TIME AND D=1, COP), COLORYELLOW;
PARTLINE(DD=10 AND DATE>= C_TIME AND D=1, XOP), COLORYELLOW;

PARTLINE(DD=10 AND DATE>= CTIME AND D=2, OP), COLORYELLOW;
PARTLINE(DD=10 AND DATE>= CTIME AND D=2, COP), COLORYELLOW;
PARTLINE(DD=10 AND DATE>= CTIME AND D=2, XOP), COLORYELLOW;
{PARTLINE(DD=10 AND DATE>= ATIME AND D=2, A1), COLORWHITE;
PARTLINE(DD=10 AND DATE>= A_TIME AND D=1, A1), COLORWHITE;
}
DRAWTEXT(FILTER(DD=10 AND DATE>= C_TIME AND D=1,300),OP,\'OP\'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= C_TIME AND D=1,300),COP,\'COP\'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= C_TIME AND D=1,300),XOP,\'XOP\'),ALIGN2;

DRAWTEXT(FILTER(DD=10 AND DATE>= CTIME AND D=2,300),OP,\'OP\'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CTIME AND D=2,300),COP,\'COP\'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CTIME AND D=2,300),XOP,\'XOP\'),ALIGN2;

STICKLINE(FILTER(DD=10 AND DATE>= C_TIME AND D=1,300),L,XOP,0.01,0),COLORGREEN;

STICKLINE(FILTER(DD=10 AND DATE>= CTIME AND D=2,300),L,XOP,0.01,0),COLORGREEN;

DRAWTEXT(FILTER(DD=10 AND DATE>= A_TIME AND D=1,300),A1,\'A\'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= B_TIME AND D=1,300),B1,\'B\'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= C_TIME AND D=1,300),C1,\'C\'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= ATIME AND D=2,300),A1,\'A\'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= BTIME AND D=2,300),B1,\'B\'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CTIME AND D=2,300),C1,\'C\'),ALIGN2;

POLYLINE((DATE=A_TIME OR DATE=B_TIME) AND D=1,IF(DATE=A_TIME, H, L)),COLORGREEN;
POLYLINE((DATE=B_TIME OR DATE=C_TIME) AND D=1,IF(DATE=B_TIME, L, H)),COLORGREEN;


POLYLINE((DATE=ATIME OR DATE=BTIME) AND D=2,IF(DATE=ATIME, L, H)),COLORGREEN;
POLYLINE((DATE=BTIME OR DATE=CTIME) AND D=2,IF(DATE=BTIME, H, L)),COLORGREEN;
--  作者:王锋
--  发布时间:2015/2/24 19:50:34
--  

只要按照文章里的公式参数设置好,复制公式后可以直接使用的


--  作者:ru243463277
--  发布时间:2015/2/25 18:35:33
--  
我试过了,不通过啊,你试一下啊
--  作者:jinzhe
--  发布时间:2015/2/26 8:43:08
--  
好多未定义,你把代码贴全了