以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  [求助]请老师讲这个公式改写成一分钟和秒级行情可用的，谢谢了！  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=65749)
--  作者：云潇逸士
--  发布时间：2014/6/3 14:24:16
--  [求助]请老师讲这个公式改写成一分钟和秒级行情可用的，谢谢了！
PL5:=IF(DATATYPE>=10,ZIG(3,1),IF(DATATYPE=6,ZIG(1,2),ZIG(1,2)));
{S说明： 如果周月以上的选5%转向，如果日线选3%转向，如果日线以下周期选2%转向 }
PL10:=IF(DATATYPE>=10,ZIG(3,30),IF(DATATYPE=6,ZIG(1,10),ZIG(1,10)));
{S说明： 如果周月以上的选10%转向，如果日线选5%转向，如果日线以下周期选4%转向 }
PL20:=IF(DATATYPE>=10,ZIG(1,10),IF(DATATYPE=6,ZIG(1,30),ZIG(1,20)));
{S说明： 如果周月以上的选15%转向，如果日线选8%转向，如果日线以下周期选7%转向 }
EN1:=PL5>REF(PL5,1) AND REF(PL5,1)<=REF(PL5,2) AND REF(PL5,2)<=REF(PL5,3);
EX1:=PL5<REF(PL5,1) AND REF(PL5,1)>=REF(PL5,2) AND REF(PL5,2)>=REF(PL5,3);

EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3);
EX2:=PL10<REF(PL10,1) AND REF(PL10,1)>=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3);

EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3);
EX3:=PL20<REF(PL20,1) AND REF(PL20,1)>=REF(PL20,2) AND REF(PL20,2)>=REF(PL20,3);
走强1:=BARSLAST(PL5<REF(PL5,1));
走弱1:=BARSLAST(PL5>REF(PL5,1));
走强2:=BARSLAST(PL10<REF(PL10,1));
走弱2:=BARSLAST(PL10>REF(PL10,1));
走强3:=BARSLAST(PL20<REF(PL20,1));
走弱3:=BARSLAST(PL20>REF(PL20,1));
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);
DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);
DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);
ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);
DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);
DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);
DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,\'(A)\'),COLORFFFF00;
DRAWTEXT(EX1 AND DTJD5=2,H*1.02,\'(B)\'),COLORFFFF00;
DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,\'(C)\'),COLORFFFF00;
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,\'⑴\'),COLOR0000FF;
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,\'⑵\'),COLOR0000FF;
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,\'⑶\'),COLOR0000FF;
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,\'⑷\'),COLOR0000FF;
DRAWTEXT(EX2 AND (PL10>REF(PL10,1) OR REF(PL10>REF(PL10,1),1) OR ZTJD10=1),H*1.08,\'⑸\'),,COLOR0000FF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.06,\'①\'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.94,\'②\'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2,H*1.06,\'③\'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.94,\'④\'),LINETHICK3,COLOR00FFFF;
XG1:=EX2;
XG2:=PL20>REF(PL20,3);
XG3:=ZTJZ10=3;
DRAWTEXT(REF(XG2*XG3,1) AND XG1,H*1.06,\'⑤\'),LINETHICK3,COLORWHITE;
DRAWTEXT(REF(XG2*XG3,1) AND XG1,H*1.04,\'●\'),LINETHICK3,COLORFFFF00;
DRAWTEXT(REF(XG2*XG3,1) AND XG1,H*1.02,\'●\'),LINETHICK3,COLOR00FFFF;

 买线:=EMA(C,2),COLORRED;
卖线:=EMA(SLOPE(C,21)*20+C,42),COLORYELLOW;
 BU:=CROSS(买线,卖线); 
SEL:=CROSS(卖线,买线); 
 STICKLINE(买线>=卖线,LOW,HIGH,0.1,1),COLORRED; 
STICKLINE(买线>=卖线,CLOSE,OPEN,8,1),COLORRED; 
STICKLINE(买线>=卖线,CLOSE,OPEN,10,1),COLORRED; 
STICKLINE(买线<卖线,CLOSE,OPEN,10,0),COLOR00FFFF;
 STICKLINE(买线<卖线,CLOSE,OPEN,8,0),COLOR00FFFF;
 STICKLINE(买线<卖线,LOW,HIGH,0.1,1),COLOR00FFFF;
--  作者：jinzhe
--  发布时间：2014/6/3 14:37:07
--  

编译通过，可以直接用
--  作者：云潇逸士
--  发布时间：2014/6/3 15:43:22
--  
一分钟和秒级别行情图上没有波浪的显示。。。
--  作者：jinzhe
--  发布时间：2014/6/3 15:44:52
--  
那么这个公式在金字塔内不能被使用在秒和1分钟周期上
--  作者：云潇逸士
--  发布时间：2014/6/3 16:22:32
--  
郁闷~~~谢谢！~~不知道有无其他办法。555~~~
[此贴子已经被作者于2014/6/3 16:23:09编辑过]