欢迎您光临花生网社区!
| |

 找回密码
 立即注册
查看: 10031|回复: 21
打印 上一主题 下一主题

请高手修改'飞狐MACD买点'改成选股指标 [复制链接]



Rank: 3Rank: 3

跳转到指定楼层
1#
发表于 2013-5-9 11:54:31 |只看该作者 |倒序浏览 | [分享到 腾讯微博 新浪微博]
本帖最后由 kpgood 于 2013-5-9 12:15 编辑

请老师帮我改成飞狐选股公式,谢谢了
有FmlDLL文件
大交易师系统软件
改个底背驰


VARV:=VOL/((HIGH-LOW)*2-(ABS(CLOSE-OPEN)));
ZB:=IF(CLOSE>OPEN,VARV*(HIGH-LOW),IF(CLOSE<OPEN,VARV*(HIGH-OPEN+CLOSE-LOW),VOL/2));
ZS:=ABS(IF(CLOSE>OPEN,-VARV*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,-VARV*(HIGH-LOW),-VOL/2)));
主动买盘:=EMA(ZB,2);
主动卖盘:=EMA(ZS,2);
Z:=主动买盘-主动卖盘;
DIFF:EMA(Z,144)-EMA(Z,189);
DEA:EMA(DIFF,36);
macd:3*(DIFF-DEA),COLORSTICK,LINETHICK1;

STICKLINE(macd>0 and macd<=REF(MACD,1),0,macd,0.5,0),coloryellow;
STICKLINE(macd<0 and macd>=REF(MACD,1),0,macd,0.5,0),colorwhite;
var1:="chzhshch@kxian";
var2:="chzhshch@bi";
var4:="chzhshch@duan";
drawline(var2=1,macd,var2=-1,macd,0),LINEDASH,colorgreen;
drawline(var2=-1,macd,var2=1,macd,0),LINEDASH,colorred;
drawline(var4=-1,macd,var4=1,macd,0),LINEDASH,colorFF6600,linethick2;
drawline(var4=1,macd,var4=-1,macd,0),LINEDASH,colorFF6600,linethick2;

MACDA:=if(macd>0,macd,0);
MACDB:=if(macd<0,abs(macd),0);
红柱面积:=SUM(MACDA,BARSLAST(ref(var2,1)<0));
绿柱面积:=SUM(MACDB,BARSLAST(ref(var2,1)>0));
B1:=BARSLAST(var2>0);
B2:=BARSLAST(var2<0);
目前方向:=if(B1>B2,1,0);
drawnumber(var2<=0 and ref(var2,1)>0,macd,红柱面积-MACDA,3),align4,pxdn50,colorred;
drawnumber(var2>=0 and ref(var2,1)<0,macd,绿柱面积-MACDB,3),align5,pxup50,colorgreen;
drawnumber(islastbar and 目前方向=1,macd,红柱面积,3),align4,pxdn50,colorred;
drawnumber(islastbar and 目前方向=0,macd,绿柱面积,3),align5,pxup50,colorgreen;

DM1:=BARSLAST(REF(var2=1,1));  
DM2:=REF(H,DM1+1)<H AND REF(红柱面积-MACDA,DM1+1)>红柱面积-MACDA AND var2=1;  
DRAWTEXT(IF(DM2>0,1,0),macd,'顶背驰'),align4,pxdn20,colorffff66;
DM3:=BARSLAST(REF(var2=-1,1));  
DM4:=REF(L,DM3+1)>L AND REF(绿柱面积-MACDB,DM3+1)>绿柱面积-MACDB AND var2=-1;  
DRAWTEXT(IF(DM4>0,1,0),macd,'底背驰'),align5,pxup20,colorff66ff;

使用道具 举报



Rank: 3Rank: 3

2#
发表于 2013-5-9 14:06:00 |只看该作者 | [分享到 腾讯微博 新浪微博]
请参考这个帖子:http://www.hs633.com/forum.php?mod=viewthread&tid=1498
  1. VARV:=VOL/((HIGH-LOW)*2-(ABS(CLOSE-OPEN)));
  2. ZB:=IF(CLOSE>OPEN,VARV*(HIGH-LOW),IF(CLOSE<OPEN,VARV*(HIGH-OPEN+CLOSE-LOW),VOL/2));
  3. ZS:=ABS(IF(CLOSE>OPEN,-VARV*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,-VARV*(HIGH-LOW),-VOL/2)));
  4. 主动买盘:=EMA(ZB,2);
  5. 主动卖盘:=EMA(ZS,2);
  6. Z:=主动买盘-主动卖盘;
  7. DIFF:EMA(Z,144)-EMA(Z,189);
  8. DEA:EMA(DIFF,36);
  9. macd:3*(DIFF-DEA),COLORSTICK,LINETHICK1;

  10. STICKLINE(macd>0 and macd<=REF(MACD,1),0,macd,0.5,0),coloryellow;
  11. STICKLINE(macd<0 and macd>=REF(MACD,1),0,macd,0.5,0),colorwhite;
  12. var1:="chzhshch@kxian"();
  13. var2:="chzhshch@bi"();
  14. var4:="chzhshch@duan"();
  15. drawline(var2=1,macd,var2=-1,macd,0),LINEDASH,colorgreen;
  16. drawline(var2=-1,macd,var2=1,macd,0),LINEDASH,colorred;
  17. drawline(var4=-1,macd,var4=1,macd,0),LINEDASH,colorFF6600,linethick2;
  18. drawline(var4=1,macd,var4=-1,macd,0),LINEDASH,colorFF6600,linethick2;

  19. MACDA:=if(macd>0,macd,0);
  20. MACDB:=if(macd<0,abs(macd),0);
  21. 红柱面积:=SUM(MACDA,BARSLAST(ref(var2,1)<0));
  22. 绿柱面积:=SUM(MACDB,BARSLAST(ref(var2,1)>0));
  23. B1:=BARSLAST(var2>0);
  24. B2:=BARSLAST(var2<0);
  25. 目前方向:=if(B1>B2,1,0);
  26. drawnumber(var2<=0 and ref(var2,1)>0,macd,红柱面积-MACDA,3),align4,pxdn50,colorred;
  27. drawnumber(var2>=0 and ref(var2,1)<0,macd,绿柱面积-MACDB,3),align5,pxup50,colorgreen;
  28. drawnumber(islastbar and 目前方向=1,macd,红柱面积,3),align4,pxdn50,colorred;
  29. drawnumber(islastbar and 目前方向=0,macd,绿柱面积,3),align5,pxup50,colorgreen;

  30. DM1:=BARSLAST(REF(var2=1,1));  
  31. DM2:=REF(H,DM1+1)<H AND REF(红柱面积-MACDA,DM1+1)>红柱面积-MACDA AND var2=1;  
  32. DRAWTEXT(IF(DM2>0,1,0),macd,'顶背驰'),align4,pxdn20,colorffff66;
  33. DM3:=BARSLAST(REF(var2=-1,1));  
  34. DM4:=REF(L,DM3+1)>L AND REF(绿柱面积-MACDB,DM3+1)>绿柱面积-MACDB AND var2=-1;  
  35. DRAWTEXT(IF(DM4>0,1,0),macd,'底背驰'),align5,pxup20,colorff66ff;
复制代码运行代码

使用道具 举报



Rank: 3Rank: 3

3#
发表于 2013-5-9 14:24:46 |只看该作者 | [分享到 腾讯微博 新浪微博]
jackong 发表于 2013-5-9 14:06
请参考这个帖子:http://www.hs633.com/forum.php?mod=viewthread&tid=1498

改成飞狐选股公式

使用道具 举报



Rank: 8Rank: 8

4#
发表于 2013-5-13 08:45:29 |只看该作者 | [分享到 腾讯微博 新浪微博]
kpgood 发表于 2013-5-9 14:24
改成飞狐选股公式

我试试
1,Initial stop loss
2,Trailing stop loss(Moves up from initial stop to reduce risk,Protects us at break-even point)
3,Profit protection stop(Keeps winning trades from becoming losses,Locks in a portion of the open profit)
4,Profit maximizing exit(Attempts to exit without giving back profits)

使用道具 举报



Rank: 8Rank: 8

5#
发表于 2013-5-13 09:17:54 |只看该作者 | [分享到 腾讯微博 新浪微博]
  1. VARV:=VOL/((HIGH-LOW)*2-(ABS(CLOSE-OPEN)));
  2. ZB:=IF(CLOSE>OPEN,VARV*(HIGH-LOW),IF(CLOSE<OPEN,VARV*(HIGH-OPEN+CLOSE-LOW),VOL/2));
  3. ZS:=ABS(IF(CLOSE>OPEN,-VARV*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,-VARV*(HIGH-LOW),-VOL/2)));
  4. 主动买盘:=EMA(ZB,2);
  5. 主动卖盘:=EMA(ZS,2);
  6. Z:=主动买盘-主动卖盘;
  7. DIFF:=EMA(Z,144)-EMA(Z,189);
  8. DEA:=EMA(DIFF,36);
  9. macd:=3*(DIFF-DEA),COLORSTICK,LINETHICK1;

  10. //STICKLINE(macd>0 and macd<=REF(MACD,1),0,macd,0.5,0),coloryellow;
  11. //STICKLINE(macd<0 and macd>=REF(MACD,1),0,macd,0.5,0),colorwhite;
  12. var1:="chzhshch@kxian";
  13. var2:="chzhshch@bi";
  14. var4:="chzhshch@duan";
  15. //drawline(var2=1,macd,var2=-1,macd,0),LINEDASH,colorgreen;
  16. //drawline(var2=-1,macd,var2=1,macd,0),LINEDASH,colorred;
  17. //drawline(var4=-1,macd,var4=1,macd,0),LINEDASH,colorFF6600,linethick2;
  18. //drawline(var4=1,macd,var4=-1,macd,0),LINEDASH,colorFF6600,linethick2;

  19. MACDA:=if(macd>0,macd,0);
  20. MACDB:=if(macd<0,abs(macd),0);
  21. 红柱面积:=SUM(MACDA,BARSLAST(ref(var2,1)<0));
  22. 绿柱面积:=SUM(MACDB,BARSLAST(ref(var2,1)>0));
  23. B1:=BARSLAST(var2>0);
  24. B2:=BARSLAST(var2<0);
  25. 目前方向:=if(B1>B2,1,0);
  26. //drawnumber(var2<=0 and ref(var2,1)>0,macd,红柱面积-MACDA,3),align4,pxdn50,colorred;
  27. //drawnumber(var2>=0 and ref(var2,1)<0,macd,绿柱面积-MACDB,3),align5,pxup50,colorgreen;
  28. //drawnumber(islastbar and 目前方向=1,macd,红柱面积,3),align4,pxdn50,colorred;
  29. //drawnumber(islastbar and 目前方向=0,macd,绿柱面积,3),align5,pxup50,colorgreen;

  30. DM1:=BARSLAST(REF(var2=1,1));  
  31. DM2:=REF(H,DM1+1)<H AND REF(红柱面积-MACDA,DM1+1)>红柱面积-MACDA AND var2=1;  
  32. //DRAWTEXT(IF(DM2>0,1,0),macd,'顶背驰'),align4,pxdn20,colorffff66;
  33. DM3:=BARSLAST(REF(var2=-1,1));  
  34. DM4:=REF(L,DM3+1)>L AND REF(绿柱面积-MACDB,DM3+1)>绿柱面积-MACDB AND var2=-1;  
  35. //DRAWTEXT(IF(DM4>0,1,0),macd,'底背驰'),align5,pxup20,colorff66ff;
  36. {底背驰}DM4>0;
复制代码运行代码
试试看,用于大交易师
1,Initial stop loss
2,Trailing stop loss(Moves up from initial stop to reduce risk,Protects us at break-even point)
3,Profit protection stop(Keeps winning trades from becoming losses,Locks in a portion of the open profit)
4,Profit maximizing exit(Attempts to exit without giving back profits)

使用道具 举报



Rank: 3Rank: 3

6#
发表于 2013-5-16 11:31:43 |只看该作者 | [分享到 腾讯微博 新浪微博]
1分钟5分钟15分钟30分钟60分钟日线
选股和条件选股一个没有
条件5分钟一天出个100多个吧
可一个没有!!

使用道具 举报



Rank: 6Rank: 6

7#
发表于 2013-5-16 12:09:54 |只看该作者 | [分享到 腾讯微博 新浪微博]
bt11 发表于 2013-5-13 09:17
试试看,用于大交易师

选股公式的参数更改 有bug。
选定一次参数之后选股出来,再更改参数,还是按照上一次设置的参数选。

使用道具 举报



Rank: 8Rank: 8

8#
发表于 2013-5-18 10:37:06 |只看该作者 | [分享到 腾讯微博 新浪微博]
bluechina 发表于 2013-5-16 12:09
选股公式的参数更改 有bug。
选定一次参数之后选股出来,再更改参数,还是按照上一次设置的参数选。 ...

您好。我试过,没有您说的现象哦?
请问你是用哪个公式进行测试的?

使用道具 举报



Rank: 3Rank: 3

9#
发表于 2013-5-18 10:52:32 |只看该作者 | [分享到 腾讯微博 新浪微博]
本帖最后由 kpgood 于 2013-5-18 11:01 编辑

大神们请帮我看看吧!

使用道具 举报



Rank: 3Rank: 3

10#
发表于 2013-5-20 09:51:29 |只看该作者 | [分享到 腾讯微博 新浪微博]
安装金魔方上出票不出票啊!

使用道具 举报

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


bottom

Archiver|www.hs633.com ( 粤ICP备11107430号 )

GMT+8, 2024-5-18 23:24 , Processed in 0.078126 second(s), 8 queries .

花生网 Copyright©2012-2014

回顶部