心跳の回忆【aielite作品分享】

aiuoker

源码分享，需者自取。

1. {计算区}
   
2. SHBR01:=EMA(SLOPE((C+H+L)/3,21)*9+(C+H+L)/3,21);
   
3. SHBR02:=SHBR01>=(EMA(EMA(H,21),30)+EMA(EMA(L,21),30))/2;
   
4. SHBR03:=SHBR01<=(EMA(EMA(H,21),30)+EMA(EMA(L,21),30))/2;
   
5. ZJX01:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
   
6. ZJX02:=3*SMA(ZJX01,3,1)-2*SMA(SMA(ZJX01,3,1),3,1);
   
7. ZJX03:=CROSS(ZJX02,REVERSE(ZJX02)) AND REF(MA(C,1),10)>REF(MA(C,60),10);
   
8. JCLD01:=REF((L+O+C+H)/4,1);
   
9. JCLD02:=SMA(ABS(L-JCLD01),16,1)/SMA(MAX(L-JCLD01,0),9,1);
   
10. JCLD03:=EMA(IF(L<=LLV(L,25),EMA(JCLD02,9),0),3);
    
11. JCLD04:=SMA(ABS(JCLD01-H),16,1)/SMA(MAX(JCLD01-H,0),9,1);
    
12. JCLD05:=EMA(IF(H>=HHV(H,25),EMA(JCLD04,9),0),3);
    
13. YDBX01:=(2*C+H+L+O)/5;
    
14. YDBX02:=EMA((YDBX01-MA(YDBX01,15))/(0.025*AVEDEV(YDBX01,15)),2);
    
15. YDBX03:=EMA((YDBX01-MA(YDBX01,60))/(0.025*AVEDEV(YDBX01,60)),2);
    
16. RSPL:=SMA(MAX(C-REF(C,2),0),7,1)/SMA(ABS(C-REF(C,2)),7,1)*100;
    
17. JDD01:=100*SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1);
    
18. JDD02:=SUM(IF((H-REF(H,1))>0 AND (H-REF(H,1)>(REF(L,1)-L)),(H-REF(H,1)),0),10);
    
19. JDD03:=SUM(IF((REF(L,1)-L)>0 AND (REF(L,1)-L)>(H-REF(H,1)),(REF(L,1)-L),0),10);
    
20. JDD04:=MA(100*ABS(JDD03-JDD02)/(JDD03+JDD02),5);
    
21. JDD05:=100*(HHV(H,10)-C)/(HHV(H,10)-LLV(L,10));
    
22. JDD06:=LLV(2*JDD01-JDD05+JDD04,1);
    
23. JDD07:=MAX(JDD06-200,0);
    
24. JDD08:=MIN(JDD06,0);
    
25. ASR0:=IF(FROMOPEN<240,REF(C,1),C);
    
26. ASR1:=100*(WINNER(ASR0*1.1)-WINNER(ASR0*0.9));
    
27. ASR2:=100*(WINNER(ASR0*1.2)-WINNER(ASR0*0.8));
    
28. ASR3:=100*(WINNER(ASR0*1.3)-WINNER(ASR0*0.7));
    
29. ASR4:=(68*ASR1+27*ASR2+4*ASR3)/100;
    
30. {绘图区}
    
31. STICKLINE(SHBR02=1,100,-100,12,0),COLOR000044;
    
32. STICKLINE(SHBR03=1,100,-100,12,0),COLOR002200;
    
33. FillRgn(IF(RSPL>85,16,IF(RSPL<15,-16,0)),0,RSPL>85,RGB(66,66,66),RSPL<85,RGB(99,99,99));
    
34. FillRgn(100,100-JDD07,JDD07>0,RGB(168,168,0),JDD07<0,RGB(168,168,0));
    
35. FillRgn(-100-JDD08,-100,JDD08<0,RGB(168,168,0),JDD08>0,RGB(168,168,0));
    
36. 进场:IF(JCLD03>REF(JCLD03,1),JCLD03,0),COLORRED,NODRAW;
    
37. 洗盘:IF(JCLD03<REF(JCLD03,1),JCLD03,0),COLORGREEN,NODRAW;
    
38. 冲顶:IF(JCLD05>REF(JCLD05,1),JCLD05,0),COLORFF00FF,NODRAW;
    
39. 出场:IF(JCLD05<REF(JCLD05,1),-JCLD05,0),COLORYELLOW,NODRAW;
    
40. STICKLINE(JCLD03>REF(JCLD03,1),0,MIN(JCLD03,100),8,0 ),COLOR000099;
    
41. STICKLINE(JCLD03>REF(JCLD03,1),0,MIN(JCLD03,100),4,0 ),COLOR0000BB;
    
42. STICKLINE(JCLD03>REF(JCLD03,1),0,MIN(JCLD03,100),2,0 ),COLOR0000DD;
    
43. STICKLINE(JCLD03>REF(JCLD03,1),0,MIN(JCLD03,100),1,0 ),COLOR0000FF;
    
44. STICKLINE(JCLD03<REF(JCLD03,1),0,MIN(JCLD03,100),8,0),COLOR009900;
    
45. STICKLINE(JCLD03<REF(JCLD03,1),0,MIN(JCLD03,100),4,0),COLOR00BB00;
    
46. STICKLINE(JCLD03<REF(JCLD03,1),0,MIN(JCLD03,100),2,0),COLOR00DD00;
    
47. STICKLINE(JCLD03<REF(JCLD03,1),0,MIN(JCLD03,100),1,0),COLOR00FF00;
    
48. STICKLINE(JCLD05>REF(JCLD05,1),0,MAX(-JCLD05,-100),8,0 ),COLOR990099;
    
49. STICKLINE(JCLD05>REF(JCLD05,1),0,MAX(-JCLD05,-100),4,0 ),COLORBB00BB;
    
50. STICKLINE(JCLD05>REF(JCLD05,1),0,MAX(-JCLD05,-100),2,0 ),COLORDD00DD;
    
51. STICKLINE(JCLD05>REF(JCLD05,1),0,MAX(-JCLD05,-100),1,0 ),COLORFF00FF;
    
52. STICKLINE(JCLD05<REF(JCLD05,1),0,MAX(-JCLD05,-100),8,0),COLOR009999;
    
53. STICKLINE(JCLD05<REF(JCLD05,1),0,MAX(-JCLD05,-100),4,0),COLOR00BBBB;
    
54. STICKLINE(JCLD05<REF(JCLD05,1),0,MAX(-JCLD05,-100),2,0),COLOR00DDDD;
    
55. STICKLINE(JCLD05<REF(JCLD05,1),0,MAX(-JCLD05,-100),1,0),COLOR00FFFF;
    
56. IF(YDBX02>100,100,IF(YDBX02<-100,-100,YDBX02)),COLORLIMAGENTA,NoText;
    
57. IF(YDBX03>100,100,IF(YDBX03<-100,-100,YDBX03)),COLORLICYAN,NoText;
    
58. IF(ABS((C-MA(C,12))/MA(C,12)*100)>10,2.72*(C-MA(C,12))/MA(C,12)*100,0),DOTLINE,COLORBROWN;
    
59. STICKLINE(ZJX03,0,30,10,0),COLORBLUE;
    
60. STICKLINE(ZJX03,30,60,6,0),COLORWHITE;
    
61. DRAWTEXT(ZJX03,70,'庄家出现'),COLORRED;
    
62. DRAWNUMBER(FILTER(ASR4<24,5),0,100-ASR4),COLORYELLOW;

复制代码

效果如图：

jdgoal

好指标，学习。

aiuoker

只有分享的价值多了，人气才会旺，

jdgoal

如果用法注释补上就更好了。

aiuoker

不注释，别人能看懂、会使用的那是他们悟性高，公式就是工具；
但是一注释明细，那就是战法了，天下没有那么多的免费午餐!