以文本方式查看主题

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

--  作者:qaz88
--  发布时间:2014/11/27 16:44:51
--  指标请写成模型.

老师好!.如下指标请写成模型.红色线开多平空.青色线开空平多.用收盘价下单.谢谢!

 

USERRIGHT:=1;
OO:=(USERRIGHT=0);
AA:=(USERRIGHT=1);
BB:=(USERRIGHT=2);
CC:=(USERRIGHT=3);
DD:=(USERRIGHT=4);
EE:=(USERRIGHT=5);
if (((AA or BB) or CC)) then
begin

A7:=(((EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),40)+EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),120))+EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),256))/3);
VAR7:=FORCAST(A7,16);
PARTLINE((VAR7>REF(VAR7,1)),VAR7,COLORRED),COLOR0000FF;
PARTLINE((VAR7<REF(VAR7,1)),VAR7,COLORCYAN),COLORFFFF54;

end


--  作者:jinzhe
--  发布时间:2014/11/27 16:49:56
--  

if VAR7>REF(VAR7,1) then begin

    sellshort(1,0,thisclose);

    buy(holding=0,1,thisclose);

end

 

if VAR7<REF(VAR7,1) then begin

     sell(1,0,thisclose);

     buyshort(holding=0,1,thisclose);

end


--  作者:qaz88
--  发布时间:2014/11/27 21:33:07
--  
1楼试了出错如附图请更改谢谢!!
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20141127212723.png
图片点击可在新窗口打开查看

--  作者:jinzhe
--  发布时间:2014/11/28 8:56:53
--  

 

 

USERRIGHT:=1;
OO:=(USERRIGHT=0);
AA:=(USERRIGHT=1);
BB:=(USERRIGHT=2);
CC:=(USERRIGHT=3);
DD:=(USERRIGHT=4);
EE:=(USERRIGHT=5);
ee:=(((EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),40)+EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),120))+EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),256))/3);
if (((AA or BB) or CC)) then
begin

A7:=ee;
VAR7:=FORCAST(A7,16);
PARTLINE((VAR7>REF(VAR7,1)),VAR7,COLORRED),COLOR0000FF;
PARTLINE((VAR7<REF(VAR7,1)),VAR7,COLORCYAN),COLORFFFF54;

end
 
if VAR7>REF(VAR7,1) then begin

    sellshort(1,0,thisclose);

    buy(holding=0,1,thisclose);

end

 

if VAR7<REF(VAR7,1) then begin

     sell(1,0,thisclose);

     buyshort(holding=0,1,thisclose);

end


--  作者:qaz88
--  发布时间:2014/11/28 9:20:54
--  
试了出错呢需修改
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20141128091528.png
图片点击可在新窗口打开查看

--  作者:jinzhe
--  发布时间:2014/11/28 9:28:24
--  

 

 

USERRIGHT:=1;
OO:=(USERRIGHT=0);
AA:=(USERRIGHT=1);
BB:=(USERRIGHT=2);
CC:=(USERRIGHT=3);
DD:=(USERRIGHT=4);
EE:=(USERRIGHT=5);
ee:=(((EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),40)+EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),120))+EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),256))/3);

if (((AA or BB) or CC)) then
begin

A7:=ee;

 

end
ff:=FORCAST(A7,16);
if (((AA or BB) or CC)) then
begin
VAR7:=ff;
end
PARTLINE((VAR7>REF(VAR7,1)) and (AA or BB or CC),VAR7,COLORRED),COLOR0000FF;
PARTLINE((VAR7<REF(VAR7,1))  and (AA or BB or CC),VAR7,COLORCYAN),COLORFFFF54;
if VAR7>REF(VAR7,1) then begin

    sellshort(1,0,thisclose);

    buy(holding=0,1,thisclose);

end

 

if VAR7<REF(VAR7,1) then begin

     sell(1,0,thisclose);

     buyshort(holding=0,1,thisclose);

end