以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  [求助]文华公式转过啦检验通过但是不显示信号  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=74125)
--  作者：zhengongyi
--  发布时间：2015/1/7 18:07:29
--  [求助]文华公式转过啦检验通过但是不显示信号
现在显示信号 但是信号不过滤 如何实现autofiter  而且 图形上多条白色的线 不知道这条线是那条命令形成的 
求金字塔的老师帮修改 太复杂了 

VAR1:=(HHV(HIGH,9)-LLV(LOW,9));
VAR2:=(HHV(HIGH,9)-CLOSE);
VAR3:=(CLOSE-LLV(LOW,9));
VAR4:=VAR2/VAR1*100-70 ;
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR7:=SMA((VAR3/VAR1*100),3,1);
VAR8:=LLV(LOW,34);
VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
VAR10:=IFELSE(VAR9>100,VAR9-100,0);
VARA:=HHV(HIGH,34);
FXA:=VAR10*2, COLORWHITE;
X:=SMA(FXA,2,1),COLORYELLOW;
FXB:=EMA((VAR6-VAR8)/(VARA-VAR8)*100,13),COLORCYAN;
B1:=EMA(0.667*REF(FXB,1)+0.333*FXB,2), COLORRED;
FXC:=SMA(VAR5,20,1),COLORBLUE;
Y:=SMA(FXC,5,1),COLORCYAN;
A:=SMA(FXA,2,1)-FXA;
B:=EMA(0.667*REF(FXB,1)+0.333*FXB,2)-FXB;
S:=EMA(0.382*REF(FXB,2)+0.618*FXB,12),COLORYELLOW;


DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);//macd ?aê?
DEA  := EMA(DIFF,9);//DIFF
MACD:=2*(DIFF-DEA),COLORSTICK;//macd ?áê?

//2?á?′??aê? 
input:n(26,5,300,1),M(26,1,100,1),P(2,1,10,1);//?¨ò?2?êy    
MID:=MA(CLOSE,N);//?óN???ü?úμ?ê??ì???ù??￡?3??a2?á?í¨μà?D1ì
TMP2:=STD(CLOSE,M);//?óM???ü?ú?úμ?ê??ì??μ?±ê×?2?
TOP:=MID+P*TMP2;//2?á?í¨μàé?1ì
BOTTOM:=MID-P*TMP2;//2?á?í¨μà??1ì
//2?á?′??áê?

TJ:=FXB-B1>0 AND FXC-SMA(FXC,5,1)>0 AND DIFF>DEA ;
TJ,buy;
NOT(TJ),sell;
TD:=FXB-B1<0 AND FXC-SMA(FXC,5,1)<0 AND DIFF<DEA ;

TD,BUYSHORT;
NOT(TD),sellshort;


//??ò×?μí3
????:SELLSHORT(NOT(Td),0,MARKET);
???à:SELL(NOT(TJ),0,MARKET);
?a?à:BUY(TJ,0,MARKET);
?a??:BUYSHORT(TD,0,MARKET);


μ±?°3?2?:HOLDING,COLORGRAY,LINETHICK0;
μ±?°×ê2ú:ASSET,NOAXIS,COLORGRAY;
--  作者：zhengongyi
--  发布时间：2015/1/7 19:54:02
--  
这么多人看 怎么没有老师帮改下呢 求帮助  谢谢了 
--  作者：zhengongyi
--  发布时间：2015/1/7 21:53:25
--  


VAR1:=(HHV(HIGH,9)-LLV(LOW,9));
VAR2:=(HHV(HIGH,9)-CLOSE);
VAR3:=(CLOSE-LLV(LOW,9));
VAR4:=VAR2/VAR1*100-70 ;
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR7:=SMA((VAR3/VAR1*100),3,1);
VAR8:=LLV(LOW,34);
VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
VAR10:=IFELSE(VAR9>100,VAR9-100,0);
VARA:=HHV(HIGH,34);
FXA:= VAR10*2 COLORWHITE;;
X:=SMA(FXA,2,1),COLORYELLOW;
FXB:=EMA((VAR6-VAR8)/(VARA-VAR8)*100,13),COLORCYAN;
B1:=EMA(0.667*REF(FXB,1)+0.333*FXB,2), COLORRED;
FXC:=SMA(VAR5,20,1),COLORBLUE;
Y:=SMA(FXC,5,1),COLORCYAN;
A:=SMA(FXA,2,1)-FXA;
B:=EMA(0.667*REF(FXB,1)+0.333*FXB,2)-FXB;
S:=EMA(0.382*REF(FXB,2)+0.618*FXB,12),COLORYELLOW;


DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA  := EMA(DIFF,9);
MACD:=2*(DIFF-DEA),COLORSTICK;


input:n(26,5,300,1),M(26,1,100,1),P(2,1,10,1);   
MID:=MA(CLOSE,N);
TMP2:=STD(CLOSE,M);
TOP:=MID+P*TMP2;
BOTTOM:=MID-P*TMP2;


TJ:=FXB-B1>0 AND FXC-SMA(FXC,5,1)>0 AND DIFF>DEA ;
TJ,buy;
NOT(TJ),sell;
TD:=FXB-B1<0 AND FXC-SMA(FXC,5,1)<0 AND DIFF<DEA ;

TD,BUYSHORT;
NOT(TD),sellshort;



删除了乱码 继续求帮助
--  作者：jinzhe
--  发布时间：2015/1/8 9:08:38
--  

VAR1:=(HHV(HIGH,9)-LLV(LOW,9));
VAR2:=(HHV(HIGH,9)-CLOSE);
VAR3:=(CLOSE-LLV(LOW,9));
VAR4:=VAR2/VAR1*100-70 ;
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR7:=SMA((VAR3/VAR1*100),3,1);
VAR8:=LLV(LOW,34);
VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
VAR10:=IFELSE(VAR9>100,VAR9-100,0);
VARA:=HHV(HIGH,34);
FXA:= VAR10*2 COLORWHITE;;
X:=SMA(FXA,2,1),COLORYELLOW;
FXB:=EMA((VAR6-VAR8)/(VARA-VAR8)*100,13),COLORCYAN;
B1:=EMA(0.667*REF(FXB,1)+0.333*FXB,2), COLORRED;
FXC:=SMA(VAR5,20,1),COLORBLUE;
Y:=SMA(FXC,5,1),COLORCYAN;
A:=SMA(FXA,2,1)-FXA;
B:=EMA(0.667*REF(FXB,1)+0.333*FXB,2)-FXB;
S:=EMA(0.382*REF(FXB,2)+0.618*FXB,12),COLORYELLOW;

 


DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA  := EMA(DIFF,9);
MACD:=2*(DIFF-DEA),COLORSTICK;

 


input:n(26,5,300,1),M(26,1,100,1),P(2,1,10,1);  
MID:=MA(CLOSE,N);
TMP2:=STD(CLOSE,M);
TOP:=MID+P*TMP2;
BOTTOM:=MID-P*TMP2;

 


TJ:=FXB-B1>0 AND FXC-SMA(FXC,5,1)>0 AND DIFF>DEA ;
TD:=FXB-B1<0 AND FXC-SMA(FXC,5,1)<0 AND DIFF<DEA ;
if not(td) then sellshort(1,0,marketr);
if tj then buy(holding=0,1,marketr);
if not(tj) then sell(1,0,marketr);
if td then buyshort(holding=0,1,marketr);

 
--  作者：zhengongyi
--  发布时间：2015/1/8 11:05:13
--  
谢谢 金哲老师 非常感谢您的帮助