以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  指标请写成模型.  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=72693)
--  作者：qaz88
--  发布时间：2014/12/5 9:57:02
--  指标请写成模型.

 

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

 

VARN6:=(2*CLOSE+HIGH+LOW)/4;
VARN8:=LLV(L,34);
VARN11:=HHV(H,34);
VARN12:=EMA((VARN6-VARN8)/(VARN11-VARN8)*100,13);
VARN13:=EMA(0.667*REF(VARN12,1)+0.333*VARN12,2);
//FILLRGN(VARN12>=VARN13 and bj,HHV(H,89),LLV(L,89)),COLOR002828;
//FILLRGN(VARN12<=VARN13 and bj,HHV(H,89),LLV(L,89)),COLOR003C00;
//VERTLINE(VARN12>VARN13 and bj and st),COLOR002828,LINETHICK7;
//VERTLINE(VARN12<=VARN13 and bj and st),COLOR003C00,LINETHICK7;
MA1:=MA(C,94);
MA2:=MA(C,91);
//压力线:IF(MA1>MA2,MA2,MA1),COLORGREEN,LINETHICK2;
//YLX:=压力线;
EE:=EMA(CLOSE,200);
B:=IF(CLOSE>EE,EE,0),LINETHICK0,COLOR7748e3;
S:=IF(CLOSE<EE,EE,0),LINETHICK0,COLORffFF80;
PARTLINE(CLOSE>EE,EE),LINETHICK2,COLOR7748e3;
PARTLINE(CLOSE<EE,EE),LINETHICK2,COLORffFF80
--  作者：jinzhe
--  发布时间：2014/12/5 9:58:49
--  
处理中，请稍等
--  作者：pyd
--  发布时间：2014/12/5 10:09:58
--  
VARN6:=(2*CLOSE+HIGH+LOW)/4;
VARN8:=LLV(L,34);
VARN11:=HHV(H,34);
VARN12:=EMA((VARN6-VARN8)/(VARN11-VARN8)*100,13);
VARN13:=EMA(0.667*REF(VARN12,1)+0.333*VARN12,2);
//FILLRGN(VARN12>=VARN13 and bj,HHV(H,89),LLV(L,89)),COLOR002828;
//FILLRGN(VARN12<=VARN13 and bj,HHV(H,89),LLV(L,89)),COLOR003C00;
//VERTLINE(VARN12>VARN13 and bj and st),COLOR002828,LINETHICK7;
//VERTLINE(VARN12<=VARN13 and bj and st),COLOR003C00,LINETHICK7;
MA1:=MA(C,94);
MA2:=MA(C,91);
//压力线:IF(MA1>MA2,MA2,MA1),COLORGREEN,LINETHICK2;
//YLX:=压力线;
EE:=EMA(CLOSE,200);
B:=IF(CLOSE>EE,EE,0),LINETHICK0,COLOR7748e3;
S:=IF(CLOSE<EE,EE,0),LINETHICK0,COLORffFF80;
PARTLINE(CLOSE>EE,EE),LINETHICK2,COLOR7748e3;//红色
PARTLINE(CLOSE<EE,EE),LINETHICK2,COLORffFF80;//绿色
 
kk:CLOSE>EE and cross(h,ee);
if kk then begin
sell(holding>0,holding,limit,c);
buyshort(holding=0,1,limit,c);
end
kd:CLOSE<EE and cross(ee,l);
if kd then begin
sellshort(holding<0,holding,limit,c);
buy(holding=0,1,limit,c);
end