自己用很好用的精品指标公式公式[大智慧公式]

龙听

1,COLOR00

1. input:n(5,1,100,1);
   
2. DRAWGBKLAST(v>1,STRIP(RGB(0,100,0),RGB(0,0,0),0));
   
3. MA5:MA(CLOSE,5),PRECIS2,COLORred,linethick2;
   
4. MA10:MA(CLOSE,10),PRECIS2,color009900,linethick2;
   
5. MA20:MA(CLOSE,20),linethick0;
   
6. MA30:MA(CLOSE,30),PRECIS2,colorffffFF,linethick0;
   
7. MA120:=MA(CLOSE,120);
   
8. MA250:=MA(CLOSE,250);
   
9. {底:llv(l,N),color009900,PRECIS2,CROSSDOT;}
   
10. DTPL:=MA10>MA30 AND MA20>MA30 AND MA30>REF(MA30,1);
    
11. 破线:MIN(MA20*1.05,MA30*1.1),COLORff89b2,DOTLINE,LINETHICK1,PRECIS2;
    
12. 差幅:=C/MIN(MA20*1.05,MA30*1.1)-1;
    
13. 均线流:=(DTPL AND MA5>MA30 AND MA5<MA10)*-0.1;
    
14. 偏离率:=(C<MIN(MA20*1.05,MA30*1.1) AND C>MA30)*0.1;
    
15. BDGD:=C=HHV(C,20);
    
16. GDSJ:=BARSLAST(BDGD);
    
17. REF(C,GDSJ),COLORff9933,POINTDOT,LINETHICK3,PRECIS2;
    
18. {C/REF(C,GDSJ)-FF00,POINTDOT;}
    
19. 目标:=IF(均线流=-0.1 AND 偏离率=0.1 AND GDSJ>=N,0.8,0);
    
20. MBSJ:=BARSLAST(目标=0.8);
    
21. TP1:=CROSS(C,MIN(MA20*1.05,MA30*1.1)) AND REF(GDSJ,1)>=N;
    
22. TP2:=偏离率=0 AND REF(COUNT(偏离率=0.1,N)=N,1) AND C>REF(C,1);
    
23. 突破:=(TP1 OR TP2)*1;
    
24. QSXS1:=MA5>REF(MA5,1);
    
25. LYHT:=DTPL AND MA5>MA10 AND NOT(QSXS1) AND REF(QSXS1,1);
    
26. MAV5:=EMA(V,5);
    
27. MAV10:=EMA(V,10);
    
28. LNMACD:=((V-MAV5)/MAV5*2+(V-MAV10)/MAV10)*10;
    
29. 量坑:=LNMACD<=-10;
    
30. 优选:=目标 AND COUNT(量坑,3)>=1;
    
31. {以下设置主图显示方式}
    
32. DRAWTEXT(目标=0.8,L*1.009,'='),colorFFFFFF,LINETHICK3,ALIGN1;
    
33. DRAWTEXT(突破,L,''),coloryellow;
    
34. DRAWTEXT(LYHT,(MA10+MA20)/2, '¤'),COLORFF00FF;
    
35. DRAWICON(优选,L*0.98,1),ALIGN1;
    
36. GX:=MAX(MA5,MAX(MA10,MA20));
    
37. DX:=MIN(MA5,MIN(MA10,MA20));
    
38. QSXS:=DX>MA30 AND MA30>REF(MA30,1);
    
39. 均线粘合:=IF(ABS(GX/DX-1)*100<=3,1,0);
    
40. FL:=V>REF(V,1) OR V>MA(V,5);
    
41. SZ:=(CROSS(C,MA(C,3)) OR CROSS(C,MA(C,5))) AND C>=O;
    
42. 放量上涨:=IF(FL AND SZ,1,0);
    
43. 果断出击:=FILTER(COUNT(均线粘合,2) AND COUNT(放量上涨,2) AND C>O AND QSXS,2)*100;
    
44. {以下设置果断出击后的涨幅跟踪,不需要的可以删除}
    
45. MRSJ:=BARSLAST(果断出击);
    
46. 涨:=(C/REF(C,MRSJ)-1)*100*(MRSJ<=20);
    
47. ZZ:=MRSJ<20 AND CROSS(H,REF(C,MRSJ)*1.09999);
    
48. 知足:=ZZ AND COUNT(ZZ,MRSJ)=1;
    
49. DB:=MRSJ<20 AND CROSS(H,REF(C,MRSJ)*1.05);
    
50. 达标:=DB AND COUNT(DB,MRSJ)=1;
    
51. DRAWTEXT(知足,H*1.03,'+10%'),COLORFFFFFF;
    
52. DRAWTEXT(果断出击,L,'♂'),COLORFFFF33,ALIGN1,LINETHICK3;
    
53. DRAWTEXT(达标,H*1.01,'+5%'),COLORYELLOW,ALIGN1;
    
54. WR5:=100*(HHV(H,5)-C)/(HHV(H,5)-LLV(L,5));
    
55. WR6:=100*(HHV(H,6)-C)/(HHV(H,6)-LLV(L,6));
    
56. WR:=80-(WR5*3+WR6*2)/5;
    
57. DRAWTEXT(WR<-10,L*0.99, '#'),COLOR00ff00;
    
58. MTM:=C-REF(C,1);
    
59. DX1:=100*EMA(EMA(MTM,N),N)/EMA(EMA(ABS(MTM),N),N);
    
60. 买1:=IF(LLV(DX1,2)=LLV(DX1,7) AND COUNT(DX1<0,2) AND CROSS(DX1,MA(DX1,2)),1,0);
    
61. 卖1:=IF(HHV(DX1,2)=HHV(DX1,7) AND COUNT(DX1>50,2) AND CROSS(MA(DX1,2),DX1),1,0);
    
62. DRAWTEXT(filter(卖1=1,5),high*1.02, '▼'),color00ff00,ALIGN1;
    
63. DRAWTEXT(filter(买1=1,5),low*0.99, '▲'),colorRED,ALIGN1;
    
64. QSXS3:=MA20>=REF(MA20,1);
    
65. DTPL3:=MA5>MA10 AND MA10>MA20 AND MA20>MA30;
    
66. ZWP3:=COUNT(C>MA20,5)=5 AND DTPL3;
    
67. HCP3A:=CROSS(MA20*1.03,L) AND REF(ZWP3,1);
    
68. HCP3B:=CROSS(MA20,C) AND REF(ZWP3,1);
    
69. 回3:=((HCP3A OR HCP3B) AND QSXS3)*3;
    
70. HCSJ3:=BARSLAST(回3);
    
71. ZC3:=(CROSS(C,MA20) OR CROSS(C,MA20*1.03)) AND HCSJ3<=5;
    
72. 支撑:IF(COUNT(ZC3>0,5),REF(L,HCSJ3),REF(L,HCSJ3)),COLORFF00ff,POINTDOT,linethick3,PRECIS2;
    
73. KK:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.14159;
    
74. 准备:=CROSS(KK,0)*80;
    
75. ZBSJ:=BARSLAST(准备=80);
    
76. IF(NOT(准备=80),REF(L,ZBSJ),REF(L,ZBSJ)),COLOR00FF00,POINTDOT,linethick3,PRECIS2;
    
77. 主筹估算:=EMA(WINNER(c)*70,3);
    
78. 散筹估算:=EMA((WINNER((c)*1.1)-WINNER((c)*0.9))*70,3);
    
79. 筹码锁定:=散筹估算-主筹估算 ;
    
80. 动态底部:=EMA(IF(L<= LLV(l,60),SMA(ABS(L-REF(L,1)),60,1)/SMA(MAX(L-REF(l,1),0),99,1),0)*5,3);
    
81. 涨:=CROSS(主筹估算,筹码锁定);
    
82. 强:=CROSS(主筹估算,散筹估算);
    
83. STICKLINE(涨,O,C,4,0),COLORYELLOW;
    
84. STICKLINE(涨,O,H,0,0),COLORYELLOW;
    
85. STICKLINE(涨,L,C,0,0),COLORYELLOW;
    
86. STICKLINE(强, O,C,4,0),colormagenta;
    
87. STICKLINE(强,O,H,0,0),colormagenta;
    
88. STICKLINE(强,L,C,0,0),colormagenta;
    
89. STICKLINE(筹码锁定<-50,O,C,4,0),COLORred;
    
90. STICKLINE(筹码锁定<-50,O,H,0,0),COLORred;
    
91. STICKLINE(筹码锁定<-50,L,C,0,0),COLORred;
    
92. gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);
    
93. 明日阻力:=l+(gj-l)+(c-l);
    
94. 明日支撑:=l+(c-gj);
    
95. 今日阻力:=REF(明日阻力 , 1);
    
96. 今日支撑:=REF(明日支撑 , 1);
    
97. STICKLINE(DISPSTATUS=2 and c>=今日阻力,今日阻力,今日阻力,20,0),ColorRED;
    
98. STICKLINE(DISPSTATUS=2 and c<今日阻力,今日阻力,今日阻力,20,0),Color00FFFF;
    
99. STICKLINE(DISPSTATUS=2 and c>=今日支撑,今日支撑,今日支撑,20,0),ColorFF00FF;
    
100. STICKLINE(DISPSTATUS=2 and c<今日支撑,今日支撑,今日支撑,20,0),Color00ADFF;
     
101. DRAWTEXTREL(610,40,'今日支撑：'+NUMTOSTRN(今日支撑 ,2 )),Colorred;
     
102. DRAWTEXTREL(610,5,'今日阻力：'+NUMTOSTRN(今日阻力 ,2 )),Color00FFFF;
     
103. 买入:=STRFIND(Extrastring('评级'),'买入',1)>0;
     
104. 增持:=STRFIND(Extrastring('评级'),'增持',1)>0;
     
105. 持有:=STRFIND(Extrastring('评级'),'持有',1)>0;
     
106. DRAWTEXTREL(5,970,'评级:'+Extrastring('评级')),ColorFFB6C1;
     
107. {DRAWTEXTABS(5,360,'板块:'+BKNAME),ColorRED;}
     
108. 流通:=FINANCE2(37)/10000;
     
109. 市盈率:=DYNAINFO(39);
     
110. F:=COST(5 );J:=COST(95 );
     
111. M:=COST(15 );B:=COST(85 );
     
112. F1:=(J-F)/(F+J)*100;M1:=(B-M)/(B+M)*100;
     
113. 集中度90:=F1;
     
114. 集中度70:=M1;
     
115. 获利盘:=WINNER(CLOSE)*100;
     
116. 套牢盘:=100*(1-WINNER(C));
     
117. 最新收益:=FINANCE2(3);
     
118. 浮筹比:=(winner(c*1.1)-winner(c*0.9))/winner(hhv(h,0))*100;
     
119. DRAWTEXTABS(5,50,'浮筹比:'+浮筹比+'% '),LINETHICK1,Colora9a9a9;
     
120. DRAWTEXTABS(300,5,'流通:'+流通+' '),LINETHICK1,Colora9a9a9;
     
121. DRAWTEXTABS(5,65,'市盈率:'+市盈率+' '),LINETHICK1,Colora9a9a9;
     
122. DRAWTEXTABS(5,5,'集中度90:'+集中度90+' '),LINETHICK1,Color00FF00;
     
123. DRAWTEXTABS(100,5,'集中度70:'+集中度70+' '),LINETHICK1,ColorYELLOW;
     
124. DRAWTEXTABS(5,20,'获利盘:'+获利盘+'% '),LINETHICK1,Colora9a9a9;
     
125. DRAWTEXTABS(5,35,'套牢盘:'+套牢盘+'% '),LINETHICK1,Colora9a9a9;

复制代码

下载 (395.54 KB)

2019-1-3 15:08