• 分享
  • 举报
  • 2024-8-23 15:31 发布     
  • 浏览 617 次
  • 下载 3 次
整合优化波段测量画线指标

整合优化波段测量画线指标

9.6
  • 大小: 未知
    价格: 免费
    更新时间: 2024-08-23
在线客服

软件简介

  1. DRAWGBK(C>0, RGB(0,0,20),RGB(00,0,0),0,0,1);
  2. DRAWKLINE(H,O,L,C);
  3. {HD LD ZIG}
  4. HD:=FILTER(BACKSET(FILTER(REF(H,5)=HHV(H,13),5),5+1),6);{高点}
  5. LD:=FILTER(BACKSET(FILTER(REF(L,5)=LLV(L,21),6),6),5);{低点}
  6. DRAWLINE(LD,L,HD,H,0),COLORRED,LINETHICK2;
  7. DRAWLINE(HD,H,LD,L,0),COLORGREEN;
  8. {----------------------------------------------}
  9. {A B C}
  10. J1:=BACKSET(CURRBARSCOUNT=2 ,MIN(BARSLAST(HD),BARSLAST(LD))+1);
  11. J2:=J1>REF(J1,1);
  12. DRAWLINE(J2,IF(HD,H,L),CURRBARSCOUNT=2 ,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),DOTLINE,COLORWHITE;
  13. C点:=BARSLAST(LD);
  14. DRAWTEXT(LD AND BARSLAST(HD)<BARSLAST(REF(LD,1)) ,L-0.1,'A'),COLORRED;
  15. DRAWTEXT(HD,H+0.1,'B'),COLORGREEN;
  16. {25T高 100T低}
  17. 波1:=12;
  18. PLZ:=CONST(BARSLAST(CONST(FINDHIGH(H,0,25,1))=H))+1;
  19. 高25:CONST(IF(PLZ=1,H,REF(H,PLZ-1))),COLORGREEN,DOTLINE;
  20. PLL:=CONST(BARSLAST(CONST(FINDLOW(L,0,100,1))=L))+1;
  21. 低100:CONST(IF(PLL=1,L,REF(L,PLL-1))),COLORGREEN,DOTLINE;
  22. 波动速率:=100*((高25-低100)/(IF(PLL>PLZ,低100,高25)))/(PLL-PLZ);
  23. BPURC:=CONST(FINDHIGH(H,0,(IF(波1>0,波1,IF(PLZ<PLL,5,10)))*5,1));
  24. BPLZ:=CONST(BARSLAST(BPURC=H))+1;
  25. BQQT:=CONST(FINDLOW(L,0,(IF(波1>0,波1,IF(PLZ<PLL,5,10)))*5,1));
  26. BPLL:=CONST(BARSLAST(BQQT=L))+1;
  27. BLC顶X:=CONST(IF(BPLZ=1,H,REF(H,BPLZ-1)));
  28. BLC低X:=CONST(IF(BPLL=1,L,REF(L,BPLL-1)));
  29. BASE:=IF(波动速率<0,BLC顶X,BLC低X);
  30. BLCZ:=(高25-低100)*(IF(PLL>PLZ,1,-1));
  31. B12:=BASE+(BLCZ*1.382);
  32. B14:=BASE+(BLCZ*1.618);
  33. B200:=BASE+(BLCZ*2);
  34. XZDD:=IF(PLL>PLZ,BPLL,BPLZ);
  35. STICKLINE(CURRBARSCOUNT=XZDD ,BASE,B200,0,0),COLORGREEN;
  36. DRAWTEXT(CURRBARSCOUNT=XZDD,B12,'---------------------------------------------------------------C1')COLORC0FF7F;
  37. DRAWTEXT(CURRBARSCOUNT=XZDD,B14,'---------------------------------------------------------------C2')COLORYELLOW;
  38. DRAWTEXT(CURRBARSCOUNT=XZDD,B200,'--------------------------------------------------------------C3')COLORGREEN;
  39. DRAWTEXT(CURRBARSCOUNT=10,B12,CON2STR(B12,2)),COLORC0FF7F;
  40. DRAWTEXT(CURRBARSCOUNT=10,B14,CON2STR(B14,2)),COLORYELLOW;
  41. DRAWTEXT(CURRBARSCOUNT=10,B200,CON2STR(B200,2)),COLORGREEN;
  42. DRAWTEXT(CURRBARSCOUNT=10,B200,CON2STR(B200,2)),COLORGREEN;
  43. {合第二个};
  44. B121:=BASE+(BLCZ*0.775)COLORRED;
  45. B141:=BASE+(BLCZ*0.868)COLORRED;
  46. B2001:=BASE+(BLCZ*1)COLORRED;
  47. XZDD1:=IF(PLL>PLZ,BPLL,BPLZ);
  48. STICKLINE(CURRBARSCOUNT=XZDD1 ,BASE,B2001,0,0),COLORGREEN;
  49. DRAWTEXT(CURRBARSCOUNT=XZDD1,B121,'---------------------------C1')COLORC0FF7F;
  50. DRAWTEXT(CURRBARSCOUNT=XZDD1,B141,'---------------------------C2')COLORYELLOW;
  51. DRAWTEXT(CURRBARSCOUNT=XZDD1,B2001,'--------------------------C3')COLORGREEN;
  52. DRAWTEXT(CURRBARSCOUNT=10,B121,CON2STR(B121,2)),COLORC0FF7F;
  53. DRAWTEXT(CURRBARSCOUNT=10,B141,CON2STR(B141,2)),COLORYELLOW;
  54. DRAWTEXT(CURRBARSCOUNT=10,B2001,CON2STR(B2001,2)),COLORGREEN;
  55. DRAWTEXT(CURRBARSCOUNT=10,B2001,CON2STR(B2001,2)),COLORGREEN;
复制代码
软件截图

QQ20240823-152923.jpg