公式网-网站导航


网站搜索：  

股票公式指标网 发表于2010/11/16 7:47:24

自用布林线主图-主图 源码 带图

 

C/C++ Code复制内容到剪贴板
  1. {布林画线【主图】}   
  2. input: k(2,0,2),n(10,1,255);   
  3. BBI:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,POINTDOT,COLORFFFFFF;   
  4. BBI2:BBI+3*STD(BBI,10),COLOR0000AA,POINTDOT;   
  5. BBI3:BBI-3*STD(BBI,10),COLOR00FF00,POINTDOT;   
  6. XX2:=EMA(EMA((CLOSE+LOW+HIGH)/3,3),23);   
  7. XX3:=REF(XX2,1);   
  8. PARTLINE(XX2,XX2>XX3,RGB(255,0,0),XX2<XX3,RGB(0,255,0)),LINETHICK2;   
  9. B1:=MA(CLOSE,1);   
  10. B2:=SMA(SMA(SMA(B1,2,1),2,1),2,1) ;   
  11. SMA2:=MA(B2,3) ;   
  12. FILLRGN(b2,sma2,b2>sma2,RGB(255,0,0),b2<sma2,RGB(0,255,0));   
  13. VAR9Q:=CLOSE=HHV(CLOSE,4) AND (REF(CLOSE,1)>=REF(CLOSE,2) OR REF(CLOSE,1)>=REF(CLOSE,3)) OR REF(CLOSE,1)=HHV(CLOSE,4) AND CLOSE>=REF(CLOSE,2) OR REF(CLOSE,2)=HHV(CLOSE,4) AND REF(CLOSE,3)=LLV(CLOSE,4) AND CLOSE>=REF(CLOSE,1) OR REF(CLOSE,3)=HHV(CLOSE,4) AND CLOSE>=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  14. 红持:VAR9Q,LINETHICK0,color0000FF;   
  15. VARAQ:=CLOSE=HHV(CLOSE,4) AND REF(CLOSE,1)=LLV(CLOSE,4);   
  16. 粉变:VARAQ,LINETHICK0,colorFF99FF;   
  17. VARBQ:=CLOSE=LLV(CLOSE,4) AND (REF(CLOSE,1)<REF(CLOSE,2) OR REF(CLOSE,1)<REF(CLOSE,3)) OR REF(CLOSE,1)=LLV(CLOSE,4) AND CLOSE<REF(CLOSE,2) OR REF(CLOSE,2)=LLV(CLOSE,4) AND REF(CLOSE,1)<>HHV(CLOSE,4) AND CLOSE<REF(CLOSE,1) OR REF(CLOSE,3)=LLV(CLOSE,4) AND CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);   
  18. 灰跌:VARBQ,LINETHICK0,color888888;   
  19. VARCQ:=REF(CLOSE,1)=LLV(CLOSE,4) AND CLOSE>=REF(CLOSE,2) OR REF(CLOSE,2)=LLV(CLOSE,4) AND REF(CLOSE,1)<=REF(CLOSE,3) AND REF(CLOSE,2)<REF(CLOSE,4) AND CLOSE>=REF(CLOSE,1);   
  20. 绿买:VARCQ,LINETHICK0,color00FF00;   
  21. VARDQ:=REF(CLOSE,1)=HHV(CLOSE,4) AND CLOSE<REF(CLOSE,2) OR (REF(CLOSE,2)=HHV(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,3) OR REF(CLOSE,3)=HHV(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,2)) AND REF(CLOSE,2)>=REF(CLOSE,4) AND CLOSE<REF(CLOSE,1);   
  22. 蓝抛:VARDQ,LINETHICK0,colorFF9900;   
  23. STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0),color0000FF;   
  24. STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5,0),color0000FF;   
  25. STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5,0),color00FF00;   
  26. STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5,0),color00FF00;   
  27. STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,8,0),colorFF7700;   
  28. STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6,0),colorFF9900;   
  29. STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),colorFFBB00;   
  30. STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,4,0),colorFFCC00;   
  31. STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),colorFFDD00;   
  32. STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2,0),colorFFEE00;   
  33. STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1,0),colorFFFF00;   
  34. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0),color000055;   
  35. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0),color000066;   
  36. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0),color000077;   
  37. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0),color000099;   
  38. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),color0000BB;   
  39. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0),color0000DD;   
  40. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0),color0000FF;   
  41. STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,8,0),color000077;   
  42. STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,6,0),color000088;   
  43. STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,5,0),color0000AA;   
  44. STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,4,0),color0000CC;   
  45. STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,2,0),color0000FF;   
  46. STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,0,0),colorFFFFFF;   
  47. STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,8,0),colorFF11FF;   
  48. STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,6,0),colorFF33FF;   
  49. STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,5,0),colorFF55FF;   
  50. STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,4,0),colorFF77FF;   
  51. STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,3,0),colorFF99FF;   
  52. STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,2,0),colorFFBBFF;   
  53. STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,1,0),colorFFDDFF;   
  54. STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,8,0),color333333;   
  55. STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,6,0),color555555;   
  56. STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,5,0),color777777;   
  57. STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,4,0),color999999;   
  58. STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,3,0),colorBBBBBB;   
  59. STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,2,0),colorDDDDDD;   
  60. STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,1,0),colorFFFFFF;   
  61. STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,8,0),color003300;   
  62. STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,6,0),color005500;   
  63. STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,5,0),color007700;   
  64. STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,4,0),color009900;   
  65. STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,3,0),color00BB00;   
  66. STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,2,0),color00DD00;   
  67. STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,1,0),color00FF00;   
  68. STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,8,0),colorFF1100;   
  69. STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,6,0),colorFF3300;   
  70. STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,5,0),colorFF5500;   
  71. STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,4,0),colorFF7700;   
  72. STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,3,0),colorFF9900;   
  73. STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,2,0),colorFFBB00;   
  74. STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,1,0),colorFFDD00;   
  75.   
  76. wN:=3;{原码 N:=3;}   
  77. wA1:=REF(H,wN)=HHV(H,2*wN+1); wB1:=FILTER(wA1,wN); wC1:=BACKSET(wB1,wN+1); wD1:=FILTER(wC1,wN);{高点}   
  78. wA2:=REF(L,wN)=LLV(L,2*wN+1); wB2:=FILTER(wA2,wN); wC2:=BACKSET(wB2,wN+1); wD2:=FILTER(wC2,wN);{低点}   
  79. wE1:=(REF(LLV(L,2*wN),1)+REF(HHV(H,2*wN),1))/2; wE2:=(H+L)/2;{高低点出现在同一K线上时可作取舍}   
  80. wH1:=(wD1 AND NOT(wD2 AND wE1>=wE2)) OR DISPSTATUS=2 OR BARSCOUNT(C)=1;   
  81. wL1:=(wD2 AND NOT(wD1 AND wE1<wE2));  wH2:=wD1 AND NOT(wD2 AND wE1>=wE2);   
  82. wX1:=REF(BARSLAST(wH1),1)+1; wF1:=BACKSET(wH1 AND COUNT(wL1,wX1)>0,LLVBARS(IF(wL1,L,10000),wX1));   
  83. wG1:=wF1>REF(wF1,1); wI1:=BACKSET(wG1,2); wLD:=wI1>REF(wI1,1);{过滤后低点}   
  84. wL2:=wLD OR DISPSTATUS=2 OR BARSCOUNT(C)=1;   
  85. wX2:=REF(BARSLAST(wL2),1)+1; wF2:=BACKSET(wL2 AND COUNT(wH2,wX2)>0,HHVBARS(IF(wH2,H,0),wX2));   
  86. wG2:=wF2>REF(wF2,1); wI2:=BACKSET(wG2,2); wHD:=wI2>REF(wI2,1);{过滤后高点}   
  87. wR1:=BACKSET(DISPSTATUS=2,BARSLAST(wHD)+1); wS1:=wR1>REF(wR1,1); {前一高}   
  88. wT1:=BACKSET(DISPSTATUS=2,BARSLAST(wLD)+1); wU1:=wT1>REF(wT1,1); {前一低}   
  89. wR2:=BACKSET(wS1,REF(BARSLAST(wHD),1)+2); wS2:=wR2>REF(wR2,1); {前二高}   
  90. wT2:=BACKSET(wU1,REF(BARSLAST(wLD),1)+2); wU2:=wT2>REF(wT2,1); {前二低}   
  91. wT3:=BACKSET(wU2,REF(BARSLAST(wLD),1)+2); wU3:=wT3>REF(wT3,1); {前三低}   
  92. wT4:=BACKSET(wU3,REF(BARSLAST(wLD),1)+2); wU4:=wT4>REF(wT4,1); {前四低}   
  93. wR3:=BACKSET(wS2,REF(BARSLAST(wHD),1)+2); wS3:=wR3>REF(wR3,1); {前三高}   
  94. wR4:=BACKSET(wS3,REF(BARSLAST(wHD),1)+2); wS4:=wR4>REF(wR4,1); {前四高}   
  95. DRAWLINE(K=2 AND wS2,H,K=2 AND wS1,H,1),Color008888; {★压力１:}            
  96. DRAWLINE(K=2 AND wU2,L,K=2 AND wU1,L,1),POINTDOT,Color008888;{★支撑１:}   
  97. DRAWLINE(K=2 AND wS3,H,K=2 AND wS2,H,1),Color888000; {★压力２:}   
  98. DRAWLINE(K=2 AND wU3,L,K=2 AND wU2,L,1),POINTDOT,Color888000;{★支撑２:}            
  99. DRAWLINE(K=2 AND wS4,H,K=2 AND wS3,H,1),Color0000CC;{★压力３:}   
  100. DRAWLINE(K=2 AND wU4,L,K=2 AND wU3,L,1),POINTDOT,Color0000CC;{★支撑３:};   
  101.   
  102. 底:=SUM(MA(CLOSE,10),9)/11.114;   
  103. DRAWTEXT(CROSS(LOW,底) AND REF(底,1)>REF(HIGH,1) OR CROSS(HIGH,底),0.85*CLOSE,'---铁底'),color00FF00;   
  104. X1:=(3*CLOSE+HIGH+LOW+OPEN)/6;   
  105. X2:=EMA(X1,10);   
  106. X3:=REF(X2,1);   
  107. X4:=(REF(HIGH,1)+REF(LOW,1))/2;   
  108. X5:=MA(CLOSE,21)+2*STD(CLOSE,21);   
  109. X6:=REF(CLOSE,1);   
  110. X7:=(SMA(MAX(CLOSE-X6,0),7,1))/(SMA(ABS(CLOSE-X6),7,1))*100;   
  111. X8:=CROSS(79,X7);   
  112. X9:=FILTER(X8,4);   
  113. WZ1:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);   
  114. WZ2:=POW(MA(LOW,5),2)+MA(LOW,5);   
  115. WZ3:=POW(MA(HIGH,5),2)+MA(HIGH,5);   
  116. WZ4:=(WZ1-LLV(WZ2,9))/(HHV(WZ3,9)-LLV(WZ2,9))*150+65;   
  117. DK:=SMA(WZ4,3,1)*1.5;   
  118. DD:=SMA(DK,3,1);   
  119. DJ:=3*DK-2*DD;   
  120. WZ5:=EMA(CLOSE,12)-EMA(CLOSE,26);   
  121. WZ6:=EMA(WZ5,9);   
  122. WZ7:=2*(WZ5-WZ6);   
  123. WZ8:=REF(WZ7,1);   
  124. WZ9:=CROSS(WZ8,WZ7) AND WZ8>0;   
  125. VAR1T:=EMA(CLOSE,8);   
  126. VAR2T:=EMA(VAR1T,20);   
  127. VAR3T:=CROSS(VAR1T,VAR2T);   
  128. VAR4T:=VAR1T<MA(CLOSE,120);   
  129. VAR5T:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100;   
  130. VAR6T:=SMA(VAR5T,5,1);   
  131. VAR7T:=SMA(VAR6T,8,1);   
  132. VAR8T:=CROSS(VAR6T,VAR7T) AND VAR7T<20;   
  133. VAR9T:=CLOSE>LLV(CLOSE,60)+0.3*LLV(CLOSE,60) AND VAR8T;   
  134. VARA:=IF(CLOSE>1000,VAR8T,VAR9T);   
  135. 起步:=VAR3T AND VAR4T;   
  136. 逃遁:=VARA;   
  137. XL1:=EMA(CLOSE,10)/100;   
  138. XL2:=MA((XL1-REF(XL1,10))/REF(XL1,10),3)*100;   
  139. XL3:=MA(XL2,3);   
  140. XL4:=SMA((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,3,1);   
  141. DRAWTEXT(IF(CROSS(3*XL4-2*SMA(XL4,3,1),8),87,0) AND X2>X3,LOW-0.1,'←反弹'),color0000FF;   
  142. DRAWTEXT(IF(CROSS((VAR1T-LLV(VAR1T,4))/(HHV(VAR1T,4)-LLV(VAR1T,4))*4*25,87.5) AND VAR1T<40,87,0) AND X2>X3,LOW-0.2,'←短买'),color0000aa;   
  143. DRAWTEXT(IF(CROSS(2*(EMA((CLOSE*2+HIGH+LOW)/4,12)-EMA((CLOSE*2+HIGH+LOW)/4,26)-(EMA(EMA((CLOSE*2+HIGH+LOW)/4,12)-EMA((CLOSE*2+HIGH+LOW)/4,26),2)))*5.8,0.47),LOW,0) AND X2>X3,LOW-0.4,'←加仓'),colorFF5ED8;   
  144. DRAWTEXT(CROSS(X4,X5),HIGH*1.01,'←减'),colorB4FF00;   
  145. DRAWTEXT(FILTER((WZ9 AND DJ>250) OR X9 ,5),HIGH*1.02,'←跑'),colorBCFF8B;   
  146. STICKLINE(起步>0,HIGH,LOW,0.8,0),color00FFFF;   
  147. STICKLINE(起步>0,OPEN,CLOSE,5,0),color00FFFF;   
  148. DRAWTEXT(逃遁>0,HIGH*1.04,'●←逃'),color7FFFD6;   
  149. X1P:=(C+L+H)/3;   
  150. BB13:=ATAN(EMA(X1P,13)-REF(EMA(X1P,13),1))*3.1416*10;   
  151. EMA8:=EMA(C,8);   
  152. DRAWTEXT(FILTER(BB13>1 AND EMA(X1P,13)>REF(EMA(X1P,8),1),10),EMA8,'∠45上升'),COLORWHITE;   
  153. VAR3aa:=IF((CLOSE>REF(CLOSE,1)),88,0);   
  154. VAR4aa:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3aa>0),91,0);   
  155. DRAWTEXT(FILTER((VAR4aa>90),45),(LOW)*0.97,'★大胆搏 '),Color00FFFF;   
  156. L23:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;   
  157. L24:=(HIGH+LOW+CLOSE)/3;   
  158. L25:=(L24-MA(L24,14))/(0.015*AVEDEV(L24,14));   
  159. L26:=(L24-MA(L24,70))/(0.015*AVEDEV(L24,70));   
  160. L27:=IF(L25>=150 AND L25<200 AND L26>=150 AND L26<200,10,0);   
  161. L28:=IF(L25<=-150 AND L25>-200 AND L26<=-150 AND L26>-200,-10,L27);   
  162. L29:=100-ABS((CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100);   
  163. L30:=IF(L29<90,L29,100);   
  164. L31:=IF(L23>0,L23,0);   
  165. XL1:=(IF(L28>=200 AND L25>=150,15,IF(L26<=-200 AND L25<=-150,-15,L28)))+60;   
  166. XL2:=L31>48 AND XL1>60 AND L30<100;   
  167. DRAWTEXT(XL2 AND COUNT(XL2,30)=1,l,'大笔买入'),colorFF00FF;   
  168. VAR3td:=100-3*SMA((CLOSE-LLV(LOW,42))/(HHV(HIGH,42)-LLV(LOW,42))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,42))/(HHV(HIGH,42)-LLV(LOW,42))*100,20,1),15,1);   
  169. VAR4td:=100-3*SMA((OPEN-LLV(LOW,42))/(HHV(HIGH,42)-LLV(LOW,42))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,42))/(HHV(HIGH,42)-LLV(LOW,42))*100,20,1),15,1);   
  170. VAR2td:=VAR3td<REF(VAR4td,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);   
  171. DRAWTEXT(VAR2td AND COUNT(VAR2td,30)=1,l*0.93,'大资金进场'),COLORFF00FF;   
  172.   
  173.   
  174. DRAWTEXTREL(408.5,980.5,STKLABEL+STKNAME+'  流通股:'+NUMTOSTRN(FINANCE2(37),0)+'万'),Color1DFFFF;   
  175.   
  176. DRAWTEXTABS(2,4,'市盈率:'+DYNAINFO(39)),Color9DFFFF;   
  177. DRAWTEXTABS(110,4,'市净率:'+c/FINANCE2(4)),Color9DFFFF;   
  178. DRAWTEXTABS(218,4,'最新收益:'+FINANCE2(3)+'元 '),Color9DFFFF;   
  179. DRAWTEXTABS(326,4,'莸利比例:'+WINNER(c )*100),Color9DFFFF;   
  180. DRAWTEXTABS(434,4,'主营收入同比增长:'+FINANCE2(11)+'% '),Color9DFFFF;   
  181. DRAWTEXTABS(588,4,'净利润同比增长:'+FINANCE2(10)+'% '),Color9DFFFF;   
  182. DRAWTEXTABS(2,17,'板块名称:'+BKNAME),Color9DFFFF;   
  183. DRAWTEXTABS(688,17,'评级:'+Extrastring('评级')),Color9DFFFF;   
  184. {量能饱和}   
  185. SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);   
  186. DRAWTEXTREL(12,5,'量能饱和度：'+NUMTOSTRN(SAT,0)),LINETHICK3,Color8000FF;   
#p##e#



网站搜索：  



Copyright © 2009-2010 gszb.com ™,All Rights Reserved.　
公式网-www.gszx.com.cn-股票指标公式网