您现在的位置:程序化交易>> 期货公式>> 博易大师>> 博易大师知识>>正文内容

麻烦老师帮着改下,谢谢 [博易POBO]

咨询内容:

麻烦老师帮着改下,谢谢


N:=10;
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,NULL),COLORFF00FF;
IF(VAR1<REF(VAR1,1),VAR1,NULL),COLOR00FF00;
IF(VAR2>REF(VAR2,1),VAR2,NULL),COLORFF00FF;
IF(VAR2<REF(VAR2,1),VAR2,NULL),COLOR00FF00;
IF(VAR3>REF(VAR3,1),VAR3,NULL),COLORFF00FF;
IF(VAR3<REF(VAR3,1),VAR3,NULL),COLOR00FF00;
IF(VAR4>REF(VAR4,1),VAR4,NULL),COLORFF00FF;
IF(VAR4<REF(VAR4,1),VAR4,NULL),COLOR00FF00;
IF(VAR5>REF(VAR5,1),VAR5,NULL),COLORFF00FF;
IF(VAR5<REF(VAR5,1),VAR5,NULL),COLOR00FF00;
IF(VAR6>REF(VAR6,1),VAR6,NULL),COLORFF00FF;
IF(VAR6<REF(VAR6,1),VAR6,NULL),COLOR00FF00;
IF(VAR7>REF(VAR7,1),VAR7,NULL),LINETHICK2,COLORFF00FF;
IF(VAR7<REF(VAR7,1),VAR7,NULL),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),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,3,0),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,2.4,0),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,1.8,0),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,1.2,0),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,0.6,0),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,0,0),COLORRED;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMIN,3,0),COLOR00FF00;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMAX,3,0),COLOR00FF00;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMAX,2.4,0),COLOR00FF00;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMAX,1.8,0),COLOR00FF00;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMAX,1.2,0),COLOR00FF00;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMAX,0.6,0),COLOR00FF00;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMAX,0,0),COLOR00FF00;
M1:MA(CLOSE,N),LINETHICK2;
IF(C>=M1,M1,NULL),COLORRED,LINETHICK2;
IF(C<M1,M1,NULL),COLORWHITE,LINETHICK2;

 

 来源:程序化99网( WWW.CXH99.COM )

博易技术人员: N:=10;
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),COLORFF00FF;
IF(VAR1<REF(VAR1,1),VAR1,DRAWNULL),COLOR00FF00;
IF(VAR2>REF(VAR2,1),VAR2,DRAWNULL),COLORFF00FF;
IF(VAR2<REF(VAR2,1),VAR2,DRAWNULL),COLOR00FF00;
IF(VAR3>REF(VAR3,1),VAR3,DRAWNULL),COLORFF00FF;
IF(VAR3<REF(VAR3,1),VAR3,DRAWNULL),COLOR00FF00;
IF(VAR4>REF(VAR4,1),VAR4,DRAWNULL),COLORFF00FF;
IF(VAR4<REF(VAR4,1),VAR4,DRAWNULL),COLOR00FF00;
IF(VAR5>REF(VAR5,1),VAR5,DRAWNULL),COLORFF00FF;
IF(VAR5<REF(VAR5,1),VAR5,DRAWNULL),COLOR00FF00;
IF(VAR6>REF(VAR6,1),VAR6,DRAWNULL),COLORFF00FF;
IF(VAR6<REF(VAR6,1),VAR6,DRAWNULL),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),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,3,0),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,2.4,0),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,1.8,0),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,1.2,0),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,0.6,0),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,0,0),COLORRED;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMIN,3,0),COLOR00FF00;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMAX,3,0),COLOR00FF00;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMAX,2.4,0),COLOR00FF00;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMAX,1.8,0),COLOR00FF00;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMAX,1.2,0),COLOR00FF00;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMAX,0.6,0),COLOR00FF00;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMAX,0,0),COLOR00FF00;
M1:MA(CLOSE,N),LINETHICK2;
IF(C>=M1,M1,DRAWNULL),COLORRED,LINETHICK2;
IF(C<M1,M1,DRAWNULL),COLORWHITE,LINETHICK2; 老师这个显示不对,再帮着看看谢谢 来源 程序化久久网

 

有思路,想编写各种指标公式,交易模型,选股公式,还原公式的朋友

可联系技术人员 QQ: 262069696  点击在线交流或微信号:cxh99cxh99  进行 有偿收费 编写!

怎么收费,代编流程等详情请点击阅读!

(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容