通达信捡钱印钞机副图 源码

[复制链接]
查看156 | 回复0 | 2022-7-24 08:57:31 | 显示全部楼层 |阅读模式

前两天,看见论坛上淘宝商家做广告卖指标,PEJIE后一看是有未来的(还没有测试信号是否漂移,如果有同学测试了,可以告之交流一下)
加上了一些在论坛淘来的指标鼓捣了一下,与同学们分享,用法自己看,简单明了。

牛牛指标网提供:www.tdx001.com}

复制内容到剪贴板
  1. A7:=C-REF(C,1);   
  2. A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);   
  3. SHORT:=7;   
  4. LONG:=19;   
  5. RMA:=EMA(CLOSE,SHORT);   
  6. NMA:=EMA(CLOSE,LONG);   
  7. UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1),LLV(L,BARSLAST(CROSS(NMA,RMA))+1),H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV(H,BARSLAST(CROSS(RMA,NMA))+1),0);   
  8. DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV(H,BARSLAST(CROSS(RMA,NMA))+1),L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1),LLV(L,BARSLAST(CROSS(NMA,RMA))+1),0);   
  9. MA20:=MA(C,20);   
  10. MA30:=MA(C,30);   
  11. QSXS:=MA20>MA30 AND MA20>REF(MA20,1) AND MA30>REF(MA30,1);   
  12. ZF:=(C/REF(C,1)-1)*100;   
  13. N1:=BARSLAST(CROSS(C,MA(C,5)));   
  14. N2:=BARSLAST(CROSS(MA(C,5),C));   
  15. HM:=IF(N1<N2,N1+1,0)*QSXS;   
  16. Z2:=HM=1 AND ZF>=0 AND C>O AND QSXS;   
  17. KX1:=ZF<=-3 AND C<O;   
  18. XDSJ:=BARSLAST(KX1);   
  19. KX2:=ZF>=3 AND C>O;   
  20. JBY:=KX2 AND XDSJ<=2 AND C>=REF(O*0.99,XDSJ) AND ZF>ABS(REF(ZF,XDSJ)*0.99);   
  21. Z3:=IF(FILTER(JBY,1) AND QSXS,5,0);   
  22. VAR11:=EMA(HHV(HIGH,500),21);   
  23. VAR2:=EMA(HHV(HIGH,250),21);   
  24. VAR3:=EMA(HHV(HIGH,90),21);   
  25. VAR4:=EMA(LLV(LOW,500),21);   
  26. VAR5:=EMA(LLV(LOW,250),21);   
  27. VAR6:=EMA(LLV(LOW,90),21);   
  28. VAR7:=EMA((VAR4*0.96+VAR5*0.96+VAR6*0.96+VAR11*0.558+VAR2*0.558+VAR3*0.558)/6,21);   
  29. VAR8:=EMA((VAR4*1.25+VAR5*1.23+VAR6*1.2+VAR11*0.55+VAR2*0.55+VAR3*0.65)/6,21);   
  30. VAR9:=EMA((VAR4*1.3+VAR5*1.3+VAR6*1.3+VAR11*0.68+VAR2*0.68+VAR3*0.68)/6,21);   
  31. VARA:=EMA((VAR7*3+VAR8*2+VAR9)/6*1.738,21);   
  32. VARB:=REF(LOW,1);   
  33. VARC:=SMA(ABS(LOW-VARB),3,1)/SMA(MAX(LOW-VARB,0),3,1)*100;   
  34. VARD:=EMA(IF(CLOSE*1.35<=VARA,VARC*10,VARC/10),3);   
  35. VARE:=LLV(LOW,30);   
  36. VARF:=HHV(VARD,30);   
  37. VAR10:=IF(MA(CLOSE,58),1,0);   
  38. AA3:=( EMA(IF(LOW<=VARE,(VARD+VARF*2)/2,0),3)/618*VAR10);   
  39. CC:=HHV(AA3,60);   
  40. AR3:=(1-(MA(LOW,3))/(MA((HIGH+LOW+(2)*(CLOSE))/(4),20)))*(100)-(50)/(10);   
  41. AVAR1:=MA(HHV(HIGH,485),17);   
  42. AVAR2:=MA(HHV(HIGH,222),17);   
  43. AVAR3:=MA(HHV(HIGH,96),17);   
  44. AVAR4:=MA(LLV(LOW,485),17);   
  45. AVAR5:=MA(LLV(LOW,222),17);   
  46. AVAR6:=MA(LLV(LOW,96),17);   
  47. AVAR7:=MA(((AVAR4)*(0.96)+(AVAR5)*(0.96)+(AVAR6)*(0.96)+(AVAR1)*(0.558)+(AVAR2)*(0.558)+(AVAR3)*(0.558))/(6),17);   
  48. AVAR8:=MA(((AVAR4)*(1.25)+(AVAR5)*(1.23)+(AVAR6)*(1.2)+(AVAR1)*(0.55)+(AVAR2)*(0.55)+(AVAR3)*(0.65))/(6),17);   
  49. AVAR9:=MA(((AVAR4)*(1.3)+(AVAR5)*(1.3)+(AVAR6)*(1.3)+(AVAR1)*(0.68)+(AVAR2)*(0.68)+(AVAR3)*(0.68))/(6),17);   
  50. AVARA:=MA((((AVAR7)*(3)+(AVAR8)*(2)+AVAR9)/(6))*(1.738),17);   
  51. AVARB:=IF((DATE<=1341231),AVARA,(AVARA)*(DAY));   
  52. AVARC:=LOW;   
  53. AVARD:=REF(LOW,1);   
  54. AVARE:=((SMA(ABS(AVARC-AVARD),3,1))/(SMA(MAX(AVARC-AVARD,0),3,1)))*(100);   
  55. AVARF:=MA(IF(((CLOSE)*(1.35)<=AVARB),(AVARE)*(10),(AVARE)/(10)),3);   
  56. AVAR10:=LLV(LOW,30);   
  57. AVAR11:=HHV(AVARF,30);   
  58. AVAR12:=1341231;   
  59. 买进:=(LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1);   
  60. 捡钱了未来:IF(买进,0,1),COLORMAGENTA,LINETHICK2;   
  61. 抢钱了:Z2 AND Z3,LINETHICK2,COLORYELLOW;    
  62. 大底:=FILTER(AA3>10 ,1);   
  63. 找钱了:大底>0 AND C<O,COLORWHITE,NODRAW;   
  64. 印钞机:IF((AR3>0) AND (DATE>901231) AND (DATE<1341231),   
  65. (((AR3)*(3000))*(REF((HIGH+LOW+(2)*(CLOSE))/(4),3)))/(CLOSE),0),COLORRED,NODRAW;   
  66. 点钞机:IF((DATE<=AVAR12),MA(IF((LOW<=AVAR10),(AVARF+(AVAR11)*(2))/(2),0),3),100000000),COLORYELLOW,NODRAW;   
  67. STICKLINE(大底>0 AND C<O,0,1,1,0),COLORYELLOW;   
  68. STICKLINE(印钞机>0,0,0.1,3,0),COLORRED;   
  69. STICKLINE(点钞机>0,0.1,0.2,3,0),COLORCYAN;   

227952605.jpg

227952605.jpg

回复

使用道具 举报

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

本版积分规则