以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  有请老师帮把指标改成模型  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=60297)
--  作者：长赌飘血
--  发布时间：2013/12/25 9:42:20
--  有请老师帮把指标改成模型

{主趋势线:EMA(EMA(C,10),10),COLORBLUE,LINETHICK3;
B:=主趋势线<REF(主趋势线,1);
IF(B-1,主趋势线,DRAWNULL)COLORRED,LINETHICK3;}
主趋势线:EMA(EMA(C,10),10),COLORRED,LINETHICK3;
B:=主趋势线>REF(主趋势线,1);
IF(B-1,主趋势线,DRAWNULL)COLORBLUE,LINETHICK3;

AA:=EMA(C,5) > EMA(C,20);
BB:=EMA(C,5) < EMA(C,20);
CC:= EMA(C,5) > EMA(C,10);
CC1:=EMA(C,5) < EMA(C,10);
DD:=CLOSE<OPEN;


STICKLINE(AA,H,L,0,0),COLORRED;
STICKLINE(AA,O,C,3,1),COLORRED;
STICKLINE(AA AND DD,O,C,3,0),COLORRED;
STICKLINE(BB,H,L,0,0),COLORGREEN;
STICKLINE(BB,O,C,3,1),COLORGREEN;

STICKLINE(BB AND DD,O,C,3,0),COLORGREEN;
STICKLINE(BB AND CC,H,L,0,1),COLORWHITE;
STICKLINE(BB AND CC,O,C,3,1),COLORWHITE;
STICKLINE(BB AND CC AND DD,O,C,3,0),COLORWHITE;
STICKLINE(AA AND CC1,H,L,0,0),COLORWHITE;
STICKLINE(AA AND CC1,O,C,3,1),COLORWHITE;
STICKLINE(AA AND CC1 AND DD,O,C,3,0),COLORWHITE;


AAA:=CONST(HHV(H,90));
{DRAWTEXT(T1=1 AND CURRBARSCOUNT=58,AAA,\'智能分析:目前处于红色买区，上涨趋势良好，多单持有。\'),COLORRED,LINETHICK4;};
DRAWTEXT(C AND CURRBARSCOUNT=80 ,AAA, \'红色K线做多,绿色K线做空，白色K线平仓观望。 \'),COLORYELLOW;

 

红色K线开多,绿色K线开空，白色K线平仓，谢谢！
--  作者：jinzhe
--  发布时间：2013/12/25 10:00:57
--  

{B:=主趋势线<REF(主趋势线,1);
IF(B-1,主趋势线,DRAWNULL)COLORRED,LINETHICK3;}
主趋势线:EMA(EMA(C,10),10),COLORRED,LINETHICK3;
B:=主趋势线>REF(主趋势线,1);
IF(B-1,主趋势线,DRAWNULL)COLORBLUE,LINETHICK3;

AA:=EMA(C,5) > EMA(C,20);
BB:=EMA(C,5) < EMA(C,20);
CC:= EMA(C,5) > EMA(C,10);
CC1:=EMA(C,5) < EMA(C,10);
DD:=CLOSE<OPEN;


STICKLINE(AA,H,L,0,0),COLORRED;
STICKLINE(AA,O,C,3,1),COLORRED;
STICKLINE(AA AND DD,O,C,3,0),COLORRED;
STICKLINE(BB,H,L,0,0),COLORGREEN;
STICKLINE(BB,O,C,3,1),COLORGREEN;
STICKLINE(BB AND DD,O,C,3,0),COLORGREEN;

STICKLINE(BB AND CC,H,L,0,1),COLORWHITE;
STICKLINE(BB AND CC,O,C,3,1),COLORWHITE;
STICKLINE(BB AND CC AND DD,O,C,3,0),COLORWHITE;
STICKLINE(AA AND CC1,H,L,0,0),COLORWHITE;
STICKLINE(AA AND CC1,O,C,3,1),COLORWHITE;
STICKLINE(AA AND CC1 AND DD,O,C,3,0),COLORWHITE;


//AAA:=CONST(HHV(H,90));

{红色K线开多,绿色K线开空}
if aa then buy(holding=0,1,market);
if bb  then buyshort(holding=0,1,market);
if bb and cc  then sell(1,0,market);
if aa and cc1  then sellshort(1,0,market);
--  作者：jinzhe
--  发布时间：2013/12/25 10:03:43
--  

有些条件重复了，我又改了一下

 

{B:=主趋势线<REF(主趋势线,1);
IF(B-1,主趋势线,DRAWNULL)COLORRED,LINETHICK3;}
主趋势线:EMA(EMA(C,10),10),COLORRED,LINETHICK3;
B:=主趋势线>REF(主趋势线,1);
IF(B-1,主趋势线,DRAWNULL)COLORBLUE,LINETHICK3;

AA:=EMA(C,5) > EMA(C,20);
BB:=EMA(C,5) < EMA(C,20);
CC:= EMA(C,5) > EMA(C,10);
CC1:=EMA(C,5) < EMA(C,10);
DD:=CLOSE<OPEN;


STICKLINE(AA,H,L,0,0),COLORRED;
STICKLINE(AA,O,C,3,1),COLORRED;
STICKLINE(AA AND DD,O,C,3,0),COLORRED;
STICKLINE(BB,H,L,0,0),COLORGREEN;
STICKLINE(BB,O,C,3,1),COLORGREEN;
STICKLINE(BB AND DD,O,C,3,0),COLORGREEN;

STICKLINE(BB AND CC,H,L,0,1),COLORWHITE;
STICKLINE(BB AND CC,O,C,3,1),COLORWHITE;
STICKLINE(BB AND CC AND DD,O,C,3,0),COLORWHITE;
STICKLINE(AA AND CC1,H,L,0,0),COLORWHITE;
STICKLINE(AA AND CC1,O,C,3,1),COLORWHITE;
STICKLINE(AA AND CC1 AND DD,O,C,3,0),COLORWHITE;


//AAA:=CONST(HHV(H,90));

{红色K线开多,绿色K线开空}
if aa and not(cc1) then buy(holding=0,1,market);
if bb and not(cc)  then buyshort(holding=0,1,market);
if bb and cc  then sellshort(1,0,market);
if aa and cc1  then sell(1,0,market);
--  作者：长赌飘血
--  发布时间：2013/12/25 11:25:45
--  
非常感谢
--  作者：长赌飘血
--  发布时间：2013/12/25 13:30:59
--  
老师,测试了一下,发现很多信号不对啊,麻烦再帮修改下,还有把画图的去掉,只留信号.
--  作者：jinzhe
--  发布时间：2013/12/25 13:34:32
--  

用第二个公式，然后把公式应用在k线图上，把信号不对的地方圈出来，截图上传

[此贴子已经被作者于2013/12/25 13:34:57编辑过]
--  作者：长赌飘血
--  发布时间：2013/12/25 14:25:11
--  
怎么上传图片阿?
--  作者：长赌飘血
--  发布时间：2013/12/25 14:29:28
--  

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20131225141946.png
图片点击可在新窗口打开查看
--  作者：jinzhe
--  发布时间：2013/12/25 14:38:51
--  

{B:=主趋势线<REF(主趋势线,1);
IF(B-1,主趋势线,DRAWNULL)COLORRED,LINETHICK3;}
主趋势线:EMA(EMA(C,10),10),COLORRED,LINETHICK3;
B:=主趋势线>REF(主趋势线,1);
IF(B-1,主趋势线,DRAWNULL)COLORBLUE,LINETHICK3;

AA:=EMA(C,5) > EMA(C,20);
BB:=EMA(C,5) < EMA(C,20);
CC:= EMA(C,5) > EMA(C,10);
CC1:=EMA(C,5) < EMA(C,10);
DD:=CLOSE<OPEN;


STICKLINE(AA,H,L,0,0),COLORRED;
STICKLINE(AA,O,C,3,1),COLORRED;
STICKLINE(AA AND DD,O,C,3,0),COLORRED;
STICKLINE(BB,H,L,0,0),COLORGREEN;
STICKLINE(BB,O,C,3,1),COLORGREEN;
STICKLINE(BB AND DD,O,C,3,0),COLORGREEN;

STICKLINE(BB AND CC,H,L,0,1),COLORWHITE;
STICKLINE(BB AND CC,O,C,3,1),COLORWHITE;
STICKLINE(BB AND CC AND DD,O,C,3,0),COLORWHITE;
STICKLINE(AA AND CC1,H,L,0,0),COLORWHITE;
STICKLINE(AA AND CC1,O,C,3,1),COLORWHITE;
STICKLINE(AA AND CC1 AND DD,O,C,3,0),COLORWHITE;


//AAA:=CONST(HHV(H,90));

{红色K线开多,绿色K线开空}
if aa and not(cc1) then buy(holding=0,1,market);
if bb and not(cc)  then buyshort(holding=0,1,market);
if bb and cc  then begin
sell(1,0,market);
sellshort(1,0,market);
end
if aa and cc1  then  begin
sell(1,0,market);
sellshort(1,0,market);
end

 

 

修改了一下，本地测试后没发现异常