Board logo

标题: [通达信指标/源码] 鳄鱼法则交易策略(鳄鱼线、AO、AC指标公式源码)[通达信源码] [打印本页]
作者: 龙听    时间: 2018-3-24 09:31     标题: 鳄鱼法则交易策略(鳄鱼线、AO、AC指标公式源码)[通达信源码]

策略说明：鳄鱼线交易法则策略为鳄鱼线为均线类，所以在主图上。AO AC以及最后面的视窗为副图。设置指标公式源码时注意一下。鳄鱼线法则这个策略需要四个图的，一个主技术图，3个指标图，我在最后有一个示例效果图。


鳄鱼-线源码：
  1. Y:=(H+L)/2;
  2. AA:=REF((SMA(Y,5,1)),3);
  3. BB:=REF((SMA(Y,8,1)),5);
  4. CC:=REF((SMA(Y,13,1)),8);
  5. 鳄:CC,COLORFF6600;
  6. 齿:BB,COLORRED;
  7. 唇:AA,COLORGREEN;
  8. R2:=REF(齿,5);
  9. KU1:=IF(HIGH=HHV(HIGH,3),1,0);
  10. KD1:=IF(LOW=LLV(LOW,3),1,0);
  11. UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0)));
  12. DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0)));
  13. 上分形:IF(HIGH>=R2,UL,REF(UL,BARSLAST(HIGH>R2))),POINTDOT,LINETHICK3,,COLORMAGENTA;
  14. 下分形:IF(LOW<=R2,DL,REF(DL,BARSLAST(LOW<=R2))),POINTDOT,LINETHICK3,COLORYELLOW;
  15. DRAWICON(CLOSE>上分形 AND REF(CLOSE,1)<REF(上分形,1),HIGH*1.03,1);
  16. DRAWICON(CLOSE<下分形 AND REF(CLOSE,1)>REF(下分形,1),LOW*0.99,2);
  17. AO:=MA(Y,5)-MA(Y,34);
  18. MAO:=MA(AO,5);
  19. AC:=AO-MAO;
  20. AC1:=REF(AC,1);
  21. AO1:=REF(AO,1);
  22. KAC:=IF(AC>AC1 AND AO>AO1,1,0);
  23. KAO:=IF(AC<AC1 AND AO<AO1,-1,0);
  24. STICKLINE(KAC=1 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORRED;
  25. STICKLINE(KAO=-1 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORGREEN;
  26. STICKLINE(KAO=0 AND KAC=0 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORDDDDDD;
  27. STICKLINE(CLOSE>=OPEN,HIGH,CLOSE,0.0.1,0),COLORRED;
  28. STICKLINE(CLOSE>=OPEN,OPEN,LOW,0.0.1,0),COLORRED;
  29. STICKLINE(KAC=1 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORRED;
  30. STICKLINE(KAO=-1 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORGREEN;
  31. STICKLINE(KAO=0 AND KAC=0 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORDDDDDD;
复制代码



AO动量源码：

  1. VAR1:=(HIGH+LOW)/2;
  2. AO:MA(VAR1,5)-MA(VAR1,34),LINETHICK0;
  3. STICKLINE(AO>=REF(AO,1),0,AO,2.2,1),COLORRED;
  4. STICKLINE(AO<REF(AO,1),0,AO,2.2,1),COLORGREEN;
  5. AO5:MA(AO,5),COLORFF6600;
  6. S1:=CROSS(0,AO);
  7. DRAWTEXT(S1,AO,'S'),COLORWHITE;
  8. DRAWICON(S1,AO,2);
  9. S2:=AO<0 AND REF(AO,1)>REF(AO,2) AND AO<REF(AO,1);
  10. DRAWTEXT(S2,AO,'S'),COLORWHITE;
  11. DRAWICON(S2,AO,2);
  12. SCOUNT:=BARSLAST(AO<0);
  13. SD:=HHV(AO,SCOUNT);
  14. SCOUNTD:=HHVBARS(AO,SCOUNT);
  15. S3:=AO>0 AND REF(AO,1)>REF(AO,2) AND AO<REF(AO,1);
  16. S31:=COUNT(S3,SCOUNTD);
  17. DRAWTEXT(S31>=2 AND S3,AO,'S'),COLORWHITE;
  18. DRAWICON(S31>=2 AND S3,AO,2);
  19. B1:=CROSS(AO,0);
  20. DRAWTEXT(B1,AO,'B'),COLORWHITE;
  21. DRAWICON(B1,AO,1);
  22. B2:=AO>0 AND REF(AO,1)<REF(AO,2) AND AO>REF(AO,1) ;
  23. DRAWTEXT(B2,AO,'B'),COLORWHITE;
  24. DRAWICON(B2,AO,1);
  25. BCOUNT:=BARSLAST(AO>0);
  26. BD:=LLV(AO,BCOUNT);
  27. BCOUNTD:=LLVBARS(AO,BCOUNT);
  28. B3:=AO<0 AND REF(AO,1)<REF(AO,2) AND AO>REF(AO,1);
  29. B31:=COUNT(B3,BCOUNTD);
  30. DRAWTEXT(B31>=2 AND B3,AO,'B'),COLORWHITE;
  31. DRAWICON(B31>=2 AND B3,AO,1);
复制代码



AC加速源码：

  1. AO:=MA((HIGH+LOW)/2,5)-MA((HIGH+LOW)/2,34);
  2. AO5:=MA(AO,5);
  3. AC:AO-AO5,LINETHICK0;
  4. STICKLINE(AC>=REF(AC,1),0,AC,2.2,1),COLORRED;
  5. STICKLINE(AC< REF(AC,1),0,AC,2.2,1),COLORGREEN;
  6. AC1:=REF(AC,1);
  7. BUY1:=REF(AC,3)<REF(AC1,3) AND REF(AC,2)<REF(AC1,2) AND REF(AC,2)<REF(AC,3) AND REF(AC,1)>REF(AC1,1) AND AC>AC1 AND COUNT(AC>0,4)=4;
  8. DRAWTEXT(BUY1,AC,'B'),COLORWHITE;
  9. DRAWICON(BUY1,AC,1);
  10. BUY2:=COUNT(AC<0,4)=4 AND REF(AC,3)<REF(AC1,3) AND COUNT(AC>AC1,3)=3;
  11. DRAWTEXT(BUY2,AC, 'B'),COLORWHITE;
  12. DRAWICON(BUY2,AC,1);
  13. BUY3:=REF(AC,3)<REF(AC1,3) AND REF(AC,2)<REF(AC1,2) AND REF(AC,2)<REF(AC,3) AND COUNT(AC>AC1,2)=2 AND REF(AC,1)<0 AND AC>0;
  14. DRAWTEXT(BUY3,AC, 'B'),COLORWHITE;
  15. DRAWICON(BUY3,AC,1);
  16. BUY4:=REF(AC,4)<REF(AC1,4) AND REF(AC,3)<REF(AC1,3) AND REF(AC,3)<REF(AC,4) AND COUNT(AC>AC1,3)=3 AND REF(AC,1)<0 AND AC>0;
  17. DRAWTEXT(BUY4,AC, 'B'),COLORWHITE;
  18. DRAWICON(BUY4,AC,1);
  19. S1:=REF(AC,3)>REF(AC1,3) AND REF(AC,2)>REF(AC1,2) AND REF(AC,2)>REF(AC,3) AND REF(AC,1)<REF(AC1,1) AND AC<AC1 AND COUNT(AC<0,4)=4;
  20. DRAWTEXT(S1,AC,'S'),COLORWHITE;
  21. DRAWICON(S1,AC,2);
  22. S2:=COUNT(AC>0,4)=4 AND REF(AC,3)>REF(AC1,3) AND COUNT(AC<AC1,3)=3;
  23. DRAWTEXT(S2,AC,'S'),COLORWHITE;
  24. DRAWICON(S2,AC,2);
  25. S3:=REF(AC,3)>REF(AC1,3) AND REF(AC,2)>REF(AC1,2) AND REF(AC,2)>REF(AC,3) AND COUNT(AC<AC1,2)=2 AND REF(AC,1)>0 AND AC<0;
  26. DRAWICON(S3,AC,2);
复制代码



MFI视窗源码：

  1. MFI:(H-L)*1000000/V,STICK;
  2. A1:=MFI>=REF(MFI,1)*1.1 AND V>=REF(V,1)*1.1;
  3. A2:=MFI<=REF(MFI,1)*0.9 AND V<=REF(V,1)*0.9;
  4. A3:=MFI>=REF(MFI,1)*1.1 AND V<=REF(V,1)*0.9;
  5. A4:=MFI<=REF(MFI,1)*0.9 AND V>=REF(V,1)*1.1;  
  6. STICKLINE(A1,0,MFI,0.1,1),COLORGREEN;
  7. STICKLINE(A2,0,MFI,0.1,1),COLORBLUE;
  8. STICKLINE(A3,0,MFI,0.1,1),COLORBROWN;
  9. STICKLINE(A4,0,MFI,0.1,1),COLORMAGENTA;
  10. MA5:MA(MFI,5);
  11. 绿灯:IF(A1,MFI,DRAWNULL),STICK,COLORGREEN;
  12. 衰退:IF(A2,MFI,DRAWNULL),STICK,COLORBLUE;
  13. 伪装:IF(A3,MFI,DRAWNULL),STICK,COLORBROWN;
  14. 蛰伏:IF(A4,MFI,DRAWNULL),STICK,COLORMAGENTA;
复制代码



效果图如下：
作者: 获嘉小马哥    时间: 2019-3-19 02:18

谢谢，学习了
作者: 阿土伯    时间: 2019-3-21 16:07

看看
作者: 伸手党二    时间: 2019-6-18 20:30

学习
作者: 沸水煮绿蛙    时间: 2020-10-15 11:38

学习了



欢迎光临 龙听期货论坛 (http://www.qhlt.cn/) Powered by Discuz! 7.2