以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  求助 修改通达信公式 进金字塔 谢谢  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=8487)
--  作者：stst
--  发布时间：2011/10/19 9:24:24
--  求助 修改通达信公式 进金字塔 谢谢
A1:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,3)+EMA((OPEN+HIGH+LOW+CLOSE)/4,6)+EMA((OPEN+HIGH+LOW+CLOSE)/4,9))/3; A2:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,5)+EMA((OPEN+HIGH+LOW+CLOSE)/4,10)+EMA((OPEN+HIGH+LOW+CLOSE)/4,20))/3; A3:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,7)+EMA((OPEN+HIGH+LOW+CLOSE)/4,14)+EMA((OPEN+HIGH+LOW+CLOSE)/4,28))/3; A4:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,9)+EMA((OPEN+HIGH+LOW+CLOSE)/4,18)+EMA((OPEN+HIGH+LOW+CLOSE)/4,36))/3; A5:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,11)+EMA((OPEN+HIGH+LOW+CLOSE)/4,22)+EMA((OPEN+HIGH+LOW+CLOSE)/4,44))/3; A6:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,13)+EMA((OPEN+HIGH+LOW+CLOSE)/4,26)+EMA((OPEN+HIGH+LOW+CLOSE)/4,52))/3; A7:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,21)+EMA((OPEN+HIGH+LOW+CLOSE)/4,34)+EMA((OPEN+HIGH+LOW+CLOSE)/4,68))/3; VAR1:=FORCAST(A1,6); VAR2:=FORCAST(A2,6); VAR3:=FORCAST(A3,6); VAR4:=FORCAST(A4,6); VAR5:=FORCAST(A5,6); VAR6:=FORCAST(A6,6); VAR7:=FORCAST(A7,6);
[此贴子已经被作者于2011-10-19 9:26:01编辑过]
--  作者：jinzhe
--  发布时间：2011/10/19 9:25:20
--  

用IE把公式再帖一遍，这挤成一团了。。。
--  作者：just
--  发布时间：2011/10/19 9:26:08
--  
请用IE游览器 复制代码，别用QQ 这样不好看 谢谢
--  作者：stst
--  发布时间：2011/10/19 9:26:34
--  
IF(VAR1>REF(VAR1,1),VAR1,DRAWNULL),POINTDOT,COLORFF00FF; IF(VAR1REF(VAR2,1),VAR2,DRAWNULL),POINTDOT,COLORFF00FF; IF(VAR2REF(VAR3,1),VAR3,DRAWNULL),POINTDOT,COLORFF00FF; IF(VAR3REF(VAR4,1),VAR4,DRAWNULL),POINTDOT,COLORFF00FF; IF(VAR4REF(VAR5,1),VAR5,DRAWNULL),POINTDOT,COLORFF00FF; IF(VAR5REF(VAR6,1),VAR6,DRAWNULL),POINTDOT,COLORFF00FF; IF(VAR6REF(VAR7,1),VAR7,DRAWNULL),LINETHICK2,COLORFF00FF; IF(VAR7=REF(TOWERC,1),TOWERC,DIRECTIONMAX,3,0),COLOR0000FF; STICKLINE(TOWERCvar reload=1;
--  作者：stst
--  发布时间：2011/10/19 9:27:39
--  
我真的不会 能留下你们的QQ么 我加QQ给你们把
--  作者：stst
--  发布时间：2011/10/19 9:30:33
--  
A1:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,3)+EMA((OPEN+HIGH+LOW+CLOSE)/4,6)+EMA((OPEN+HIGH+LOW+CLOSE)/4,9))/3; A2:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,5)+EMA((OPEN+HIGH+LOW+CLOSE)/4,10)+EMA((OPEN+HIGH+LOW+CLOSE)/4,20))/3; A3:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,7)+EMA((OPEN+HIGH+LOW+CLOSE)/4,14)+EMA((OPEN+HIGH+LOW+CLOSE)/4,28))/3; A4:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,9)+EMA((OPEN+HIGH+LOW+CLOSE)/4,18)+EMA((OPEN+HIGH+LOW+CLOSE)/4,36))/3; A5:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,11)+EMA((OPEN+HIGH+LOW+CLOSE)/4,22)+EMA((OPEN+HIGH+LOW+CLOSE)/4,44))/3; A6:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,13)+EMA((OPEN+HIGH+LOW+CLOSE)/4,26)+EMA((OPEN+HIGH+LOW+CLOSE)/4,52))/3; A7:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,21)+EMA((OPEN+HIGH+LOW+CLOSE)/4,34)+EMA((OPEN+HIGH+LOW+CLOSE)/4,68))/3; VAR1:=FORCAST(A1,6); VAR2:=FORCAST(A2,6); VAR3:=FORCAST(A3,6); VAR4:=FORCAST(A4,6); VAR5:=FORCAST(A5,6); VAR6:=FORCAST(A6,6); VAR7:=FORCAST(A7,6); IF(VAR1>REF(VAR1,1),VAR1,DRAWNULL),POINTDOT,COLORFF00FF; IF(VAR1REF(VAR2,1),VAR2,DRAWNULL),POINTDOT,COLORFF00FF; IF(VAR2REF(VAR3,1),VAR3,DRAWNULL),POINTDOT,COLORFF00FF; IF(VAR3REF(VAR4,1),VAR4,DRAWNULL),POINTDOT,COLORFF00FF; IF(VAR4REF(VAR5,1),VAR5,DRAWNULL),POINTDOT,COLORFF00FF; IF(VAR5REF(VAR6,1),VAR6,DRAWNULL),POINTDOT,COLORFF00FF; IF(VAR6REF(VAR7,1),VAR7,DRAWNULL),LINETHICK2,COLORFF00FF; IF(VAR7=REF(TOWERC,1),TOWERC,DIRECTIONMAX,3,0),COLOR0000FF; STICKLINE(TOWERCvar reload=1;
--  作者：stst
--  发布时间：2011/10/19 9:31:12
--  
呵呵 一弄就成这样了。。。把QQ留一下吧～～
--  作者：stst
--  发布时间：2011/10/19 9:34:23
--  
这是最后一句 STICKLINE(TOWERCvar reload=1;
--  作者：stst
--  发布时间：2011/10/19 9:35:01
--  
怎么发不出来呢。。
--  作者：stst
--  发布时间：2011/10/19 9:35:58
--  
   

A1:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,3)+EMA((OPEN+HIGH+LOW+CLOSE)/4,6)+EMA((OPEN+HIGH+LOW+CLOSE)/4,9))/3;

A2:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,5)+EMA((OPEN+HIGH+LOW+CLOSE)/4,10)+EMA((OPEN+HIGH+LOW+CLOSE)/4,20))/3;

A3:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,7)+EMA((OPEN+HIGH+LOW+CLOSE)/4,14)+EMA((OPEN+HIGH+LOW+CLOSE)/4,28))/3;

A4:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,9)+EMA((OPEN+HIGH+LOW+CLOSE)/4,18)+EMA((OPEN+HIGH+LOW+CLOSE)/4,36))/3;

A5:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,11)+EMA((OPEN+HIGH+LOW+CLOSE)/4,22)+EMA((OPEN+HIGH+LOW+CLOSE)/4,44))/3;

A6:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,13)+EMA((OPEN+HIGH+LOW+CLOSE)/4,26)+EMA((OPEN+HIGH+LOW+CLOSE)/4,52))/3;

A7:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,21)+EMA((OPEN+HIGH+LOW+CLOSE)/4,34)+EMA((OPEN+HIGH+LOW+CLOSE)/4,68))/3;

VAR1:=FORCAST(A1,6);

VAR2:=FORCAST(A2,6);

VAR3:=FORCAST(A3,6);

VAR4:=FORCAST(A4,6);

VAR5:=FORCAST(A5,6);

VAR6:=FORCAST(A6,6);

VAR7:=FORCAST(A7,6);

IF(VAR1>REF(VAR1,1),VAR1,DRAWNULL),POINTDOT,COLORFF00FF;

IF(VAR1<REF(VAR1,1),VAR1,DRAWNULL),POINTDOT,COLOR00FF00;

IF(VAR2>REF(VAR2,1),VAR2,DRAWNULL),POINTDOT,COLORFF00FF;

IF(VAR2<REF(VAR2,1),VAR2,DRAWNULL),POINTDOT,COLOR00FF00;

IF(VAR3>REF(VAR3,1),VAR3,DRAWNULL),POINTDOT,COLORFF00FF;

IF(VAR3<REF(VAR3,1),VAR3,DRAWNULL),POINTDOT,COLOR00FF00;

IF(VAR4>REF(VAR4,1),VAR4,DRAWNULL),POINTDOT,COLORFF00FF;

IF(VAR4<REF(VAR4,1),VAR4,DRAWNULL),POINTDOT,COLOR00FF00;

IF(VAR5>REF(VAR5,1),VAR5,DRAWNULL),POINTDOT,COLORFF00FF;

IF(VAR5<REF(VAR5,1),VAR5,DRAWNULL),POINTDOT,COLOR00FF00;

IF(VAR6>REF(VAR6,1),VAR6,DRAWNULL),POINTDOT,COLORFF00FF;

IF(VAR6<REF(VAR6,1),VAR6,DRAWNULL),POINTDOT,COLOR00FF00;

IF(VAR7>REF(VAR7,1),VAR7,DRAWNULL),LINETHICK2,COLORFF00FF;

IF(VAR7<REF(VAR7,1),VAR7,DRAWNULL),LINETHICK2,COLOR00FF00;

TOWERC:=FORCAST(EMA((3*CLOSE+2*OPEN+HIGH+LOW)/7,3),6);

DIRECTIONMAX:=MAX(REF(TOWERC,1),REF(TOWERC,1));

DIRECTIONMIN:=MIN(REF(TOWERC,1),REF(TOWERC,1));

STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,3,0),COLOR0000FF;

STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMIN,3,0),COLOR00FF00;