[大智慧指标] 龙行天下副图指标源码[大智慧公式]

1. rsv:=(c-llv(l,7))/(hhv(h,7)-llv(l,7))*100;
   
2. rsv1:=(c-llv(l,38))/(hhv(h,38)-llv(l,38))*100;
   
3. 流金:sma(rsv1,5,1),colorfff000;
   
4. 岁月:sma(流金,10,1),color66cc33;
   
5. fillrgn(流金,岁月,流金<=岁月,rgb(0,250,0));
   
6. fillrgn(岁月,流金,流金>=岁月,250);
   
7. a:=(3*c+l+o+h)/6;
   
8. var2q:=ma(c,80)-ma(c,13)/3;
   
9. 神奇线:=ma((c-var2q)/var2q,1);
   
10. xa:=ema(神奇线,12)*0.7;
    
11. xb:=ema(神奇线,3);
    
12. 底部区域:if(llv(xb-xa,12)>0,0,-15),Linethick2,color00ff00;
    
13. diff:=(ema(c,17)-ema(c,73))*100;
    
14. dea:=ema(diff,73);
    
15. macd:=2*(diff-dea);
    
16. stickline(diff<=0 and dea<=diff and ref(diff,1)<ref(dea,1),3,26,10,0),Linethick2,colorffff00;
    
17. diff:=(ema(c,17)-ema(c,73))*100;
    
18. dea:=ema(diff,73);
    
19. macd:=2*(diff-dea);
    
20. if(diff<=0 and dea<=diff and ref(diff,1)<ref(dea,1),10,0),colorff0000;
    
21. var1:=(c-ref(c,1))/ref(c,1)*100;
    
22. var2:=(indexc-ref(indexc,1))/ref(indexc,1)*100;
    
23. var3:=ema(sum(var1,10),3);
    
24. var4:=ema(sum(var2,10),3);
    
25. var5:=(var3-var4);
    
26. drawicon(var5<-20 and filter(var5>ref(var5,2),7),0,1);
    
27. drawicon(var5>20 and filter(var5<ref(var5,2),7),97,2);
    
28. a1:=ma(c,13);
    
29. zx:=ref(a1,13/2+1);
    
30. b1:=cross(c,zx);
    
31. s1:=cross(zx,c);
    
32. drawicon(cross(c,zx),-3,12);
    
33. drawicon(c>zx and ref(c,1)>ref(zx,1),-3,10);
    
34. drawicon(c<zx and ref(c,1)>ref(zx,1),-3,11);
    
35. lgl:=c-ref(ma(c,20),11);
    
36. wr1:=if(ema(c,5)/ema(ema(c,9),16)<=0.85 and c/ref(c,1)>0.905 and c/ref(c,1)<1.05 and v/capital*100<5,50,0);
    
37. wr2:=-(100*(hhv(h,34)-c)/(hhv(h,34)-llv(l,34)))+100*lgl;
    
38. wr3:=-(100*(hhv(h,50)-c)/(hhv(h,50)-llv(l,50)))+100;
    
39. bias1:=-(100*(hhv(h,70)-c)/(hhv(h,70)-llv(l,70)))+100*lgl;
    
40. bias2:=((c-ma(c,34))/ma(c,34)*100+10)*5;
    
41. bias3:=((c-ma(c,50))/ma(c,50)*100+10)*5;
    
42. sx:=((c-ma(c,70))/ma(c,70)*100+10)*5;
    
43. s1:=(wr2+wr3+bias1+bias2+bias3+sx)/6*lgl;
    
44. ccc:=abs(bias2-sx);
    
45. zjz:=(s1+ccc)/2;
    
46. lxl:=(-1)*(ema(100*(1-winner(c)),1)-50)+50;
    
47. jbj:=lxl+zjz;
    
48. ma3:=if(wr1>0 and jbj<0,200,0)*lgl;
    
49. c0:=if(zjz<0 and c=llv(c,5) and c/ref(c,1)>0.905 and c/ref(c,1)<1.05 and v/capital*100<5,-50,0);
    
50. bot:=if(jbj<0 and c0=-50,100,0)*lgl;
    
51. cxc:=ref(c,2)*0.865;
    
52. vmc:=ref(c,13)*0.772;
    
53. v93:=min(cxc,vmc);
    
54. v90:=100*v/capital*lgl;
    
55. 半年线:=(c-v93)/c<3/100 and sum(v90,5)/5<1.8;
    
56. 预测:=半年线>0 and (c0<0 or wr1>0);
    
57. if(ma3>0 and bot>0 and sum(v/capital*100,5)/5<1 or 半年线>0 and ref(c,1)/ref(c,2)>0.902 or
    
58. (ma3>0 and bot>0 and sum(v/capital*100,5)/5<1 or 半年线>0) and (c0<0 or wr1>0) and 预测<10,50,0),Linethick2,colorffff00;
    
59. a:=ema(winner(c),10);
    
60. b:=ema(winner(c),34);
    
61. var1:=ma(v,5)>ma(v,60);
    
62. 追涨:if(a<0.15 and abs(a-b)<0.05 and cross(a,b) and var1,60,0),Linethick2,colorffcc33;
    
63. if(a>0.9 and c<ma(c,5),69,100),Linethick2,colorred;
    
64. sma(var1,3,1),colorf00ff0;
    
65. 股神:3*sma((c-llv(l,13))/(hhv(h,13)-llv(l,13))*100,5,1)-2*sma(sma((c-llv(l,13))/(hhv(h,13)-llv(l,13))*100,5,1),3,1),colorff8888;
    
66. 短线进出:if(股神<=10,-13,0);
    
67. if(cross(股神,10)AND 岁月<50,40,0),Linethick2;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));

复制代码