欢迎您光临博庭社区!

 找回密码
 立即注册
楼主: ptLibert

公式转换器   [复制链接]

Rank: 2

发表于 2014-10-27 15:13:08 |显示全部楼层
楼主帮忙把飞狐的公式转一下码源如下:
输入:M(1,1,9999);
MM:=9*M;
SHORT:=MM*4/3;
LONG:=MM*26/9;
DIF:1000*(指数平滑移动平均(收盘价,SHORT)-指数平滑移动平均(收盘价,LONG))/绝对值(指数平滑移动平均(收盘价,SHORT));
MACD:指数平滑移动平均(DIF,MM),COLOR58FF58;
DEF:2*(DIF-MACD),COLORFFFF00,LINETHICK0;
画柱线(DEF>=0 而且 DEF>=向前引用(DEF,1),0,DEF,6,1),COLOR6058FF;
画柱线(DEF>=0 而且 DEF< 向前引用(DEF,1),0,DEF,6,0),COLOR6058FF;
画柱线(DEF<0 而且 DEF>=向前引用(DEF,1),0,DEF,6,1),COLORFFFF00;
画柱线(DEF<0 而且 DEF< 向前引用(DEF,1),0,DEF,6,0),COLORFFFF00;
画分段线(DIF<1000,0),COLORBROWN;
多头趋势:=如果(DIF>=0 而且 MACD>=0 或者 (DIF<0 而且 MACD>=0),1,0);
空头趋势:=DIF<0 而且 MACD<0 或者 (DIF>=0 而且 MACD<0);
缩头:=如果(DEF>0 而且 向前引用(DEF,1)>向前引用(DEF,2) 而且 DEF< 向前引用(DEF,1),1,0);
缩脚:=如果(DEF<0 而且 向前引用(DEF,1)< 向前引用(DEF,2) 而且 DEF>向前引用(DEF,1),1,0);
阻力:=如果(交叉函数(收盘价,简单移动平均(收盘价,20)) 或者 交叉函数(收盘价,简单移动平均(收盘价,60)),1,0);
支撑:=如果(交叉函数(简单移动平均(收盘价,20),收盘价) 或者 交叉函数(简单移动平均(收盘价,60),收盘价),1,0);
做多:=如果(交叉函数(MACD,DIF) 而且 DIF>0 而且 MACD>0,1,0);
放空:=如果(交叉函数(DIF,MACD) 而且 DIF<0 而且 MACD<0,1,0);
画图标(多头趋势,DIF,10),对齐方式4;
画图标(空头趋势,DIF,11),对齐方式5;
画分段线(DIF<1000,DIF),,COLORCCFFFF,LINETHICK1;
画分段线(MACD<1000,MACD),COLOR58FF58;
画图标(信号过滤(缩头,3) 而且 缩头,DEF+0.01,5),对齐方式0;
画图标(信号过滤(缩脚,3) 而且 缩脚,DEF,4),对齐方式1;

BV:=求和(DEF,0);
BA:=条件函数(最大值(BV,向前引用(BV,2))<向前引用(BV,1) 或者 最小值(BV,向前引用(BV,2))>向前引用(BV,1),1,0);
BC:=上一次条件成立位置(BA)+1;
SMACD:=BV-向前引用(BV,BC);
var3:=条件函数(DEF>0,最高值(绝对值(DEF),bc),最低值(DEF,bc));
var4:=(DEF)/20;{图形比例缩小1/20,可修改}
var5:=SMACD;
显示数字(向前引用(var4,1)>0 而且 var4<=0 ,向前引用(var3,1),向前引用(var5,1),0){,pxup100},colorgreen;
显示数字(向前引用(var4,1)<0 而且 var4>=0 ,向前引用(var3,1),向前引用(绝对值(var5),1),0),{pxdn40,}colorff00ff;
显示数字(是否最后周期 而且 var4<0,向前引用(var3,1),绝对值(var5),0),对齐方式2,colorff00ff{,pxup40};
显示数字(是否最后周期 而且 var4>0,向前引用(var3,1),var5,0),对齐方式2,colorgreen{,pxdn100};
M1:=向前引用(DEF,1);
jc := MACD-dif;
绿柱面积:条件函数 (DEF<0,求和(DEF,上一次条件成立位置(jc<0)),0),linethick0,colorblue;
红柱面积:条件函数 (DEF>0,求和(DEF,上一次条件成立位置(jc>0)),0),linethick0,colorred;
提示@_编译失败,错误:7 提示:0 历时:31毫秒
x 错误 行:3 列:1 语法错误:SHORT
x 错误 行:3 列:6 语法错误::=
x 错误 行:4 列:1 语法错误ONG
x 错误 行:4 列:5 语法错误::=
x 错误 行:5 列:20 语法错误:SHORT
x 错误 行:5 列:37 语法错误ONG
x 错误 行:5 列:58 语法错误:SHORT
谢谢帮忙

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

bottom

Archiver|http://www.patiosoft.com

GMT+8, 2017-12-11 12:37 , Processed in 0.094909 second(s), 8 queries .

花生网 Copyrigh©2012

和讯信息科技有限公司 ALL Rights Reserved 版权所有 复制必究

回顶部