大智慧上升通道短线预警指标公式源码[大智慧公式]

相关标签: 融胜超级短线预警指标 、 短线王股票预警系统 、 融胜超级短线预警系统 、 短线狙击手预警源码 、 短线涨停股票预警系统 、 融胜短线预警 、 薛斯通道2预警 、 薛斯通道预警选股公式 、 薛斯通道上穿预警 、

大智慧上升通道短线预警指标公式源码

1. INPUT:M(5,1,250,1);均线:(MA(CLOSE,M) * 1),LINETHICK2,COLORYELLOW;DRAWGBKLAST(1,STRIP(RGB(10,10,50),RGB(50,10,10),0));
   
2. MA3:MA(CLOSE,3); MA4:MA(CLOSE,4);MA10:MA(C,10),COLORE66878;
   
3. 警报:=CROSS(MA4,MA3);DRAWTEXT(警报,H*1.05,'↓'),LINETHICK6,ALIGN1,COLORFFFFFF;安全:=CROSS(MA3,MA4);DRAWTEXT(安全,L*0.95,'↑'),LINETHICK6,ALIGN1,colorRED;
   
4. SD:=HHV(HIGH,13)=HIGH AND HIGH>ref(HIGH,1);
   
5. a:="LTFunc5@FORLT2";
   
6. s1:="LTFunc5@LT_S1";
   
7. hs:="LTFunc5@LT_HS";
   
8. ls:="LTFunc5@LT_LS";
   
9. p1:="LTFunc5@LT_P1";
   
10. upp:="LTFunc5@LT_UPP";
    
11. udd:=LTFunc5@LT_UDD;
    
12. {hs;ls;hhs;lls;us;ds;s1;p1;p0;upp;udd};
    
13. 买入:p1=1 and ref(p1,1)=0,LINETHICK0,Precis0,ColorRed;
    
14. d1:=eMA(ABS("ddx.ddx"),60);
    
15. d2:=MAx("ddx.ddx"/d1+7.5,7.5);
    
16. d3:=min("ddx.ddx"/d1,10);
    
17. fb:=if(s1=0,hs,ls);
    
18. tr0:=ifs(p1=1,'明日收盘价<'+numtostrn(udd,2)+',出现S点\n','若明日收盘价>'+numtostrn(upp,2)+',出现B点\n');
    
19. tr1:=ifs(s1=1,'明日收盘价<'+numtostrn(ls,2)+',短线卖出机会','若明日收盘价>'+numtostrn(hs,2)+'短线买入机会');
    
20. tr2:=ifs(p1=1,ifs(cross(p1,0),'B点','持股'),ifs(cross(1,p1),'S点','持币'));
    
21. tr3:=ifs(s1=0,'向下,','向上,');
    
22. tr4:='3.能量级别:'+numtostrn(d3,1)+'级';
    
23. bs:=''+datestr(date)+'买卖点决策系统提示\n'+'1.BS点:'+tr2+','+tr0+'2.短线:'+tr3+tr1+'\n'+tr4;
    
24. drawflagtext(1,fb,bs);
    
25. STICKLINE(p1=1 and c>=o and o<>0,c,o,d2,0),color5454ff;
    
26. STICKLINE(p1=1 and c>=o and o<>0,c,o,7.5,0),colorblack;
    
27. STICKLINE(p1=1 and c>=o and o<>0,c,c,7.5,0),color5454ff;
    
28. STICKLINE(p1=1 and c>=o and o<>0,o,o,7.5,0),color5454ff;
    
29. STICKLINE(p1=1 and c>=o and o<>0,o,c,7.5,1),color5454ff;
    
30. STICKLINE(p1=1 and c<=o,o,c,7.5,1),color5454ff;
    
31. STICKLINE(p1=1 and c<=o,l,c,0.5,1),color5454ff;
    
32. STICKLINE(p1=1 and c<=o,h,o,0.5,1),color5454ff;
    
33. STICKLINE((p1<>1 or barsCOUNT(c)<3) and c>=o,c,o,7.5,1),colorffff54;
    
34. CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
    
35. WARNING('http://www.cxh99.com',CURRENTTIME>180000 and CXH=5);
    
36. DRAWTEXTREL(10 ,10 ,'');
    
37. STICKLINE((p1<>1 or barsCOUNT(c)<3) and c>=o,c,h,0.5,1),colorffff54;
    
38. STICKLINE((p1<>1 or barsCOUNT(c)<3) and c>=o,l,o,0.5,1),colorffff54;
    
39. drawbmp(p1=1 and ref(p1,1)=0,l,'buy1.bmp'),align1,valign0;
    
40. drawbmp(p1=0 and ref(p1,1)=1,h,'sell1.bmp'),align1,valign2;
    
41. drawbmp(s1=1 and ref(s1,1)=0 and (p1+ref(p1,1))<>1,l,'bs.bmp'),align1,valign0;
    
42. drawbmp(s1=0 and ref(s1,1)=1 and (p1+ref(p1,1))<>1,h,'ss.bmp'),align1,valign2; SD1:=FILTER(SD,12);
    
43. SF:=LLV(LOW,13)=LOW AND LOW<ref(LOW,1);
    
44. SF1:=FILTER(SF,12);
    
45. AA1:=MA(CLOSE,20);
    
46. AA2:=(CLOSE > MA(CLOSE,5));
    
47. AA3:=(MA(CLOSE,5) > MA(CLOSE,10));
    
48. AA4:=(CLOSE > MA(CLOSE,10));
    
49. AA5:=(MA(CLOSE,5) > MA(CLOSE,20));
    
50. AA6:=(CLOSE > MA(CLOSE,20));
    
51. AA7:=ref(AA1,1);
    
52. AA8:=(AA1 > AA7);
    
53. AAX:=(((((IF(AA2,10,(0 - 10)) + IF(AA3,10,(0 - 10))) + IF(AA4,10,(0 - 10))) + IF(AA5,10,(0 - 10))) + IF(AA6,10,(0 - 10))) + IF(AA8,10,(0 - 10)));
    
54. DSLX:=(CLOSE / INDEXC); {内容来至程序化交易网 CXH99.COM}
    
55. DSLX1:=MA(DSLX,5);
    
56. DSLX2:=MA(DSLX,10);
    
57. V1:=MA(VOL,5);
    
58. V2:=MA(VOL,10);
    
59. T := BARSLAST(DISPSTATUS=1)+1;
    
60. IF BARSTATUS=2 and c<200 and ((CROSS(AAX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
    
61. DRAWTEXTREL(500,20,'的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。'),colorRED,LINETHICK1,ALIGN1;
    
62. IF BARSTATUS=2 and c<200 and ((CROSS(AAX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
    
63. DRAWTEXTREL(500,20,'虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。'),colorYELLOW,LINETHICK1,ALIGN1;
    
64. IF BARSTATUS=2 and c<200 and ((CROSS(AAX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THEN
    
65. DRAWTEXTREL(500,20,'量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。'),colorYELLOW,LINETHICK1,ALIGN1;
    
66. IF BARSTATUS=2 and c<200 and ((CROSS(AAX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THEN
    
67. DRAWTEXTREL(500,20,'形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。'),colorYELLOW,LINETHICK1,ALIGN1;
    
68. IF BARSTATUS=2 and c<200 and ((CROSS(1,AAX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
    
69. DRAWTEXTREL(500,20,'形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。'),colorGREEN,LINETHICK1,ALIGN1;
    
70. IF BARSTATUS=2 and c<200 and ((CROSS(1,AAX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
    
71. DRAWTEXTREL(500,20,'随大盘一起下跌，呈明显缩量走势，考虑到大盘风险，减持或清仓。'),colorGREEN,LINETHICK1,ALIGN1;
    
72. IF BARSTATUS=2 and c<200 and ((CROSS(1,AAX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
    
73. DRAWTEXTREL(500,20,'放量下跌，走势明显偏弱，离场观望。'),colorGREEN,LINETHICK1,ALIGN1;
    
74. IF BARSTATUS=2 and c<200 and ((CROSS(1,AAX) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
    
75. DRAWTEXTREL(500,20,'缩量下跌，走势偏弱，离场观望。'),colorGREEN,LINETHICK1,ALIGN1;
    
76. IF BARSTATUS=2 and c<200 and ((((AAX >= 1) AND (ref(AAX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
    
77. DRAWTEXTREL(500,20,'形态良好，强势明显，量能充足，可以继续持有。'),colorRED,LINETHICK1,ALIGN1;
    
78. IF BARSTATUS=2 and c<200 and ((((AAX >= 1) AND (ref(AAX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
    
79. DRAWTEXTREL(500,20,'上行趋势不变，强势依然，但量能开始转弱，注意风险。'),colorRED,LINETHICK1,ALIGN1;
    
80. IF BARSTATUS=2 and c<200 and ((((AAX >= 1) AND (ref(AAX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
    
81. DRAWTEXTREL(500,20,'仍然具备上涨潜力，但股性偏弱，可考虑减仓。'),colorGREEN,LINETHICK1,ALIGN1;
    
82. IF BARSTATUS=2 and c<200 and ((((AAX >= 1) AND (ref(AAX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
    
83. DRAWTEXTREL(500,20,'走势趋弱，量能不足，减持大部分筹码。'),colorGREEN,LINETHICK1,ALIGN1;
    
84. IF BARSTATUS=2 and c<200 and ((((AAX < 1) AND (ref(AAX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
    
85. DRAWTEXTREL(500,20,'形态不佳，注意成交量的变化，但目前不适合参与。'),colorGREEN,LINETHICK1,ALIGN1;
    
86. IF BARSTATUS=2 and c<200 and ((((AAX < 1) AND (ref(AAX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
    
87. DRAWTEXTREL(500,20,'趋势不明，股价偏弱，注意量能变化，目前不宜参与。'),colorGREEN,LINETHICK1,ALIGN1;
    
88. IF BARSTATUS=2 and c<200 and ((((AAX < 1) AND (ref(AAX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
    
89. DRAWTEXTREL(500,20,'有走强迹象，但量能不足，趋势不明，不适合操作。'),colorGREEN,LINETHICK1,ALIGN1;
    
90. IF BARSTATUS=2 and c<200 and ((((AAX < 1) AND (ref(AAX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
    
91. DRAWTEXTREL(500,20,'走势太弱，没有参与价值。'),colorGREEN,LINETHICK1,ALIGN1;
    
92. IF BARSTATUS=2 and c>200 and (CROSS(AAX,1) AND (V1 >= V2)) THEN
    
93. DRAWTEXTREL(500,20,'大盘量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右，'),color8000FF,LINETHICK1,ALIGN1;
    
94. IF BARSTATUS=2 and c>200 and (CROSS(AAX,1) AND (V1 >= V2)) THEN
    
95. DRAWTEXTREL(500,20,'如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎。'),color8000FF,LINETHICK1,ALIGN1;
    
96. IF BARSTATUS=2 and c>200 and (CROSS(AAX,1) AND (V1 < V2)) THEN
    
97. DRAWTEXTREL(500,20,'大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌，'),color8000FF,LINETHICK1,ALIGN1;
    
98. IF BARSTATUS=2 and c>200 and (CROSS(AAX,1) AND (V1 < V2)) THEN
    
99. DRAWTEXTREL(500,20,'可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入。'),color8000FF,LINETHICK1,ALIGN1;
    
100. IF BARSTATUS=2 and c>200 and (CROSS(1,AAX) AND (V1 >= V2)) THEN
     
101. DRAWTEXTREL(500,20,'大盘形态走坏，重仓者可以减去大部分仓位。'),color8000FF,LINETHICK1,ALIGN1;
     
102. IF BARSTATUS=2 and c>200 and (CROSS(1,AAX) AND (V1 < V2)) THEN
     
103. DRAWTEXTREL(500,20,'大盘缩量调整，注意风险，短线清仓观望。'),color8000FF,LINETHICK1,ALIGN1;
     
104. IF BARSTATUS=2 and c>200 and (((AAX >= 1) AND (ref(AAX,1) > 0)) AND (V1 >= V2)) THEN
     
105. DRAWTEXTREL(500,20,'大盘走势良好，量能理想，可以继续持有强势股。'),color8000FF,LINETHICK1,ALIGN1;
     
106. IF BARSTATUS=2 and c>200 and (((AAX >= 1) AND (ref(AAX,1) > 0)) AND (V1 < V2)) THEN
     
107. DRAWTEXTREL(500,20,'大盘形态良好，但量能稍显不足，随时准备减仓。'),color8000FF,LINETHICK1,ALIGN1;
     
108. IF BARSTATUS=2 and c>200 and (((AAX < 1) AND (ref(AAX,1) < 0)) AND (V1 >= V2)) THEN
     
109. DRAWTEXTREL(500,20,'大盘趋势不明，注意成交量变化，目前不适宜进场。'),color8000FF,LINETHICK1,ALIGN1;
     
110. IF BARSTATUS=2 and c>200 and (((AAX < 1) AND (ref(AAX,1) < 0)) AND (V1 < V2)) THEN
     
111. DRAWTEXTREL(500,20,'大盘趋势向下，量能萎缩，不适合进场。'),color8000FF,LINETHICK1,ALIGN1;
     
112. MA20:=MA(C,20);
     
113. MA40:=MA(C,40);
     
114. MA60:=MA(C,60);
     
115. BIAS:=(C-MA20)/MA20*100;
     
116. SHOPEN:=OPEN;
     
117. SHHIGH:=HIGH;
     
118. SHLOW:=LOW;
     
119. SHCLOSE:=CLOSE;
     
120. SHAMOUNT:=AMOUNT;
     
121. SHVOL:=VOL;
     
122. J12:=(HIGH - ((HIGH - LOW) / 3));
     
123. J23:=(LOW + ((HIGH - LOW) / 3));
     
124. t1:=(((IF((CLOSE = OPEN),1,0) + IF((CLOSE >= J12),1,0)) + IF((CLOSE <= J23),1,0)) > 1);
     
125. t2:=((((CLOSE > J23) AND (CLOSE < J12)) AND (OPEN > J23)) AND (OPEN < J12));
     
126. t3:=((CLOSE >= J12) AND (OPEN <= J23));
     
127. t4:=(((OPEN <= J12) AND (OPEN >= J23)) AND (CLOSE > J12));
     
128. t5:=(((OPEN <= J23) AND (CLOSE <= J12)) AND (CLOSE >= J23));
     
129. t6:=((CLOSE <= J23) AND (OPEN >= J12));
     
130. t7:=(((OPEN <= J12) AND (OPEN >= J23)) AND (CLOSE < J23));
     
131. t8:=(((OPEN >= J12) AND (CLOSE <= J12)) AND (CLOSE >= J23));
     
132. t9:=(((SHAMOUNT / SHVOL) / 100) > ref(HIGH,1));
     
133. t10:=(((SHAMOUNT / SHVOL) / 100) < ref(LOW,1));
     
134. if DISPSTATUS=2 then begin;
     
135. GP:='';
     
136. if t9>0then GP:=GP+'上涨趋势。';
     
137. if t10>0then GP:=GP+'下跌趋势。';
     
138. if t1>0then GP:=GP+'极端行情,在未来的几日内有85%的机会变更方向。';
     
139. if t2>0then GP:=GP+'中性行情,多空双方都未能取得当日行情主动性的控制权';
     
140. if t3>0then GP:=GP+'爬升行情,整个交易期间都有买方主导。';
     
141. if t4>0then GP:=GP+'爬升行情,信息很少,但收盘期间是买方主导,其他未知。';
     
142. if t5>0then GP:=GP+'爬升行情,买方把收盘价拉升到开盘价之上,卖方也在盘中主导一段行情,但不知道是谁主导最后的行情。';
     
143. if t6>0then GP:=GP+'漂流行情,整个交易期间都有卖方主导。';
     
144. if t7>0then GP:=GP+'漂流行情,信息很少,但收盘期间是卖方主导,其他未知。';
     
145. if t8>0then GP:=GP+'漂流行情,卖方把收盘价压至到开盘价之下,买方也在盘中主导一段行情,但不知道是谁主导最后的行情。';
     
146. if MA20>=MA60 AND CROSS(MA40,MA60) then GP:=GP+'形成季托，待股价回落到20天均线或40天均线时介入，20天均价为:'+MA20+'，40天均价为:'+MA40+' 。';
     
147. if BIAS>9.5 AND (C-ref(C,1))/ref(C,1)*100<9.8 then GP:=GP+'短线涨幅过大，有整理要求。';
     
148. if MA20>=MA60 AND H>=MA20 AND L<=MIN(MA40,MA60) AND C>O AND C>ref(C,1) then GP:=GP+'芙蓉出水，趋势向好。';
     
149. if BIAS<-18 AND (C-ref(C,1))/ref(C,1)*100>-9.8 then GP:=GP+'股价严重超跌，有爆发要求。';
     
150. if BIAS<-7 AND ALL(CLOSE<OPEN,5) then GP:=GP+'连收五阴，超跌有反弹要求。';
     
151. if ABS(HIGH-ref(HIGH,1))/HIGH<0.001 then GP:=GP+'平顶，该高点有一定阻力。';
     
152. if ABS(LOW-ref(LOW,1))/LOW<0.001 and ABS(ref(LOW,1)-ref(LOW,2))/ref(LOW,1)<=0.00 then GP:=GP+'平底，该低点有一定支撑。';
     
153. if CLOSE=OPEN ANDHIGH<>CLOSE and LOW<>CLOSE and HIGH/LOW > 1.03 then GP:=GP+' 长十字，多空激争 前途未明。';
     
154. if OPEN/CLOSE > 1.05 AND HIGH/LOW < OPEN/CLOSE+0.018 then GP:=GP+' 大阴烛，今日空方有绝对优势。';
     
155. if ref(CLOSE,1)<ref(OPEN,1) AND CLOSE<OPEN AND CLOSE/OPEN<0.98 then GP:=GP+'双飞乌鸦，多头力竭，行情走软。';
     
156. if (MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.667 then GP:=GP+'长下影，下档支撑强或空方试探进攻。';
     
157. if (HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.667 then GP:=GP+'长上影，上档阻力大或多方试探进攻。';
     
158. if CLOSE=OPEN AND CLOSE=LOW AND CLOSE<>HIGH then GP:=GP+'垂死十字，在顶部时重要 表强力多头开始疲软。';
     
159. if HIGH=CLOSE AND HIGH<>LOW then GP:=GP+'光头阳线，今日尾盘多方气盛，行情可能延续到明天。';
     
160. if (HIGH<ref(LOW,1) OR LOW>ref(HIGH,1)) then GP:=GP+'跳空缺口，当日未补，有与跳空同向进行，上涨欲望强烈，三日内为回补观察期。';
     
161. if LOW=CLOSE AND HIGH<>LOW then GP:=GP+'赤脚阴线，尾盘空方胜。 注意股价下跌延续至次日。';
     
162. if CLOSE=OPEN AND HIGH<>CLOSE and LOW<>CLOSE and HIGH <>CLOSE then GP:=GP+'十字星，警告信号。原趋势停顿或反转，依上下影线长度判后市。';
     
163. if CLOSE/OPEN>1.05 AND HIGH/LOW < CLOSE/OPEN+0.018 then GP:=GP+'大阳烛，上升行情中意味行情剧烈向上攀升；下跌行情中意味行情剧烈向上反弹。';
     
164. IF ref(CLOSE,2)/ref(OPEN,2) < 0.95 AND ref(OPEN,1) < ref(CLOSE,2) AND ref(OPEN,1)=ref(CLOSE,1)AND CLOSE/OPEN>1.05 AND CLOSE>ref(CLOSE,2) THEN
     
165. GP:=GP+'早晨十字 - 如同晨星。 从看空平衡到看涨转强；左右跳空曰弃婴 。';
     
166. IF ref(CLOSE,4)/ref(OPEN,4)>1.03 AND ref(CLOSE,3)<ref(OPEN,3) AND ref(CLOSE,2)<ref(OPEN,2) AND ref(CLOSE,1)<ref(OPEN,1) AND ref(LOW,4)<ref(LOW,3) AND ref(LOW,4)<ref(LOW,2) AND ref(LOW,4)<ref(LOW,1) AND ref(HIGH,4)>ref(HIGH,3) AND ref(HIGH,4)>ref(HIGH,2) AND ref(HIGH,4)>ref(HIGH,1) AND CLOSE/OPEN>1.03 AND CLOSE>ref(CLOSE,4) THENGP:=GP+'上升三部曲，空方卖压被吸纳。 趋势易顺势走涨。';
     
167. IF (ref(HIGH,2) -ref(o,2))/ref(HIGH,2)<=0.0003 AND (c-LOW)/o<=0.0003 AND ref(c,2)<ref(o,2) AND ref(c,2)>ref(o,1) AND ref(c,1)>o AND ref(c,1)<ref(o,1) AND ref(HIGH,1)-ref(o,1)>0 AND ref(LOW,1)-ref(c,1)<0 AND HIGH-o>0 AND ref(c,2)-ref(LOW,2)>0 THENGP:=GP+'三胎乌鸦，多头走势被扭转。黑K价愈深量愈大，跳空愈大，反转信号愈强。';
     
168. IF ((ref(CLOSE,1)<ref(OPEN,1) AND CLOSE>OPEN AND ABS(CLOSE-ref(CLOSE,1))/CLOSE<0.002) OR (ref(CLOSE,1)>ref(OPEN,1) AND CLOSE<OPEN AND ABS(CLOSE-ref(CLOSE,1))/CLOSE<0.002)) THEN
     
169. GP:=GP+'友好反攻 - 阴(阳)线结合，极线多方跳空向下(跳空向上)后反弹有企稳迹象 。';
     
170. IF CLOSE<>OPEN and MIN(OPEN,CLOSE)=LOW AND HIGH-LOW > 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE > MA(CLOSE,5) THEN
     
171. GP:=GP+'射击之星 - 如伴大量上遇阻力，有短期见顶可能，股价转疲。';
     
172. IF ref(CLOSE,1)-ref(OPEN,1)<0 AND CLOSE-OPEN>0 AND OPEN-ref(CLOSE,1)<0 AND CLOSE<ref(OPEN,1) AND CLOSE>ref(CLOSE,1) AND CLOSE>(ref(CLOSE,1)+ref(OPEN,1))/2 THEN {文章来至程序化交易网 cxh99.com}
     
173. GP:=GP+'贯穿线，多头力道的反扑或是空单回补力道。长阴线之后开低收在昨天1/2之上，为多头反转信号。';
     
174. IF ABS(ref(CLOSE,1)-ref(OPEN,1))/ref(CLOSE,1) > 0.04 AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND MAX(CLOSE,OPEN) < MAX(ref(CLOSE,1),ref(OPEN,1)) AND MIN(CLOSE,OPEN) > MIN(ref(CLOSE,1),ref(OPEN,1)) THEN
     
175. GP:=GP+'身怀六甲 - 阴(阳)怀阳(阴)，怪异的走势，显示该股行情可能转向。 若量由大转缩，下跌趋势更明确。';
     
176. IF (ref(c,1)-ref(o,1)<0 AND c-o>0 AND c>ref(o,1) AND o<ref(c,1)) THEN
     
177. GP:=GP+'需量能配合量。 ';
     
178. IF ((ref(c,2)-ref(o,2)>0 AND (ABS(ref(c,2)-ref(o,2)))/(ABS(ref(c,3)-ref(o,3)))>2.4 AND ABS(c-o)>3 AND ABS(ref(c,2)-ref(o,2))>(ABS(ref(c,1)-ref(o,1))) AND ref(c,1)-ref(o,1)>0 AND c-o<0 AND ref(o,1) >ref(c,2) AND o<ref(o,1) AND c<ref(c,2) AND c>ref(o,2)) OR (ref(c,2)-ref(o,2)>0 AND (ABS(ref(c,2)-ref(o,2)))/(ABS(ref(c,3)-ref(o,3)))>2.4 AND ABS(c-o)>3 AND (ABS(ref(c,2)-ref(o,2)))>(ABS(ref(c,1)-ref(o,1))) AND ref(c,1)-ref(o,1)<0 AND c-o<0 AND ref(c,1) >ref(c,2)AND c<ref(c,2) AND c>ref(o,2) AND o<ref(c,1))) THEN {本文来至CXH99.COM}
     
179. GP:=GP+'夜星 - 从看多平衡到看空转弱，转空。 ';
     
180. IF ABS(ref(CLOSE,1)-ref(OPEN,1))/ref(CLOSE,1) > 0.04 AND CLOSE=OPEN AND CLOSE < MAX(ref(CLOSE,1),ref(OPEN,1)) AND CLOSE > MIN(ref(CLOSE,1),ref(OPEN,1)) THEN
     
181. GP:=GP+'十字胎 - 似身怀六甲，转向可能性更大，量缩观望为宜 。';
     
182. IF ref(c,1)<ref(o,1) AND c-o>0 AND c>ref(H,1) AND o<ref(L,1) and ref(O,1)>ref(MAx(O,C),2) and ref(C,1)>ref(min(O,C),2) and ref(MAx(O,C),2)>ref(MAx(O,C),3) THEN
     
183. GP:=GP+' 双人殉情 - 在上升趋势中最后之空头吞噬，也就是所谓的不见长红不回头。 ';
     
184. IF (ref(c,1)-ref(o,1)>0 AND c-o<0 AND c<ref(o,1) AND o>ref(c,1)) THEN
     
185. GP:=GP+'阴线吞噬，阴包阳，向空反转。 ';
     
186. IF ref(CLOSE,1)/ref(OPEN,1)<0.97 AND CLOSE/OPEN>1.03 AND OPEN<ref(CLOSE,1) AND CLOSE>ref(CLOSE,1) THEN GP:=GP+'曙光，与乌云盖顶相反，行情将演化为V型反转或止跌横盘趋势 。';
     
187. IF (ref(c,1)-ref(o,1)<0 AND c-o>0 AND c<ref(o,1) AND o>ref(c,1)) THEN
     
188. GP:=GP+'多头孕育线，阴育阳。多头反转可能。';
     
189. IF (ref(c,1)-ref(o,1)>0 AND (ABS(ref(c,1)-ref(o,1)))/(ABS(ref(c,2)-ref(o,2)))>2.4 AND c-o<0 AND c>ref(o,1) AND ref(c,1)-o>2) THEN
     
190. GP:=GP+'空头孕育线，阳育阴。看空 。';
     
191. IF (ref(c,1)-ref(o,1)<0 AND c-o<0 AND c>ref(c,1) AND o<ref(o,1) AND o-c <6) THEN
     
192. GP:=GP+'空头孕育线，阴育阴。看空。';
     
193. IF ref(CLOSE,2)<ref(OPEN,2) AND ref(CLOSE,1)<ref(OPEN,1) AND CLOSE<OPEN AND ref(CLOSE,1)<ref(CLOSE,2) AND CLOSE<ref(CLOSE,1) THEN
     
194. GP:=GP+'三只乌鸦 - 强烈转空趋势，阴线越深量越大越易下跌。';
     
195. IF ref(CLOSE,4)/ref(OPEN,4)<0.97 AND ref(CLOSE,3)>ref(OPEN,3) AND ref(CLOSE,2)>ref(OPEN,2) AND ref(CLOSE,1)>ref(OPEN,1) AND ref(LOW,4)<ref(LOW,3) AND ref(LOW,4)<ref(LOW,2) AND ref(LOW,4)<ref(LOW,1) AND ref(HIGH,4)>ref(HIGH,3) AND ref(HIGH,4)>ref(HIGH,2) AND ref(HIGH,4)>ref(HIGH,1) AND CLOSE/OPEN<0.97 AND CLOSE<ref(CLOSE,4) THEN
     
196. GP:=GP+'下跌三部曲，多方弱势不堪一击，趋势易顺势走跌。';
     
197. IF ref(CLOSE,4)/ref(OPEN,4)>1.02 AND ref(CLOSE,3)<ref(OPEN,3) AND ref(CLOSE,2)<ref(OPEN,2) AND ref(CLOSE,1)<ref(OPEN,1) AND ref(CLOSE,4)<=ref(CLOSE,3) AND ref(HIGH,2)<ref(HIGH,3) AND ref(LOW,2)>=ref(OPEN,4) AND ref(HIGH,1)<ref(CLOSE,4) AND ref(LOW,1)>ref(OPEN,4) AND CLOSE/OPEN>1.01 AND OPEN>=ref(OPEN,1) AND CLOSE>=ref(HIGH,3) THEN
     
198. GP:=GP+'连续型态之执垫，比上升三法更具多头意义。';
     
199. IF ref(O,1)/ref(C,1) > 1.05 AND ref(H,1)/ref(L,1) < ref(O,1)/ref(C,1)+0.018 and C>O and O<ref(L,1) and C=ref(L,1) THEN
     
200. GP:=GP+'颈上线 - 下降趋势。若第二天大量，维持原趋势的可能性大增。';
     
201. IF (ref(c,1)-ref(o,1)>0 AND (ABS(ref(c,1)-ref(o,1)))/(ABS(ref(c,2)-ref(o,2)))>2.5 AND c-o<0 AND c>ref(o,1) AND c<(ref(CLOSE,1)+ref(OPEN,1))/2 AND o>ref(c,1)) THEN
     
202. GP:=GP+'乌云罩顶 - 上涨遇重大阻力。空头聚力。';
     
203. IF (ref(c,1)-ref(o,1)>0 AND c-o<0 AND c<ref(o,1) AND o>ref(c,1)) THEN
     
204. GP:=GP+'最后吞噬 - 在下降趋势中为一阴一阳组合，多头吞噬；在上升趋势中为一阳一阴组合，空头吞噬。';
     
205. IF ref(OPEN,1)<>ref(CLOSE,1) and ref(CLOSE,2)/ref(OPEN,2) < 0.95 AND ref(OPEN,1) < ref(CLOSE,2) AND ABS(ref(OPEN,1)-ref(CLOSE,1))/ref(CLOSE,1)<0.03 AND CLOSE/OPEN>1.05 AND CLOSE>ref(CLOSE,2) THEN
     
206. GP:=GP+'晨星 - 多方势盛 变盘信号';
     
207. IF MIN(OPEN,CLOSE)=LOW AND HIGH-LOW > 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE < MA(CLOSE,5) THENGP:=GP+' 倒转槌头 - 高位抛压或低位多空争执';
     
208. IF HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE < MA(CLOSE,5) THENGP:=GP+'槌头 - 下影线有多头意义。在下降趋势之后看涨。注意反弹卖压 。';
     
209. IF HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE > MA(CLOSE,5) THENGP:=GP+'吊颈线 - 高档看跌。';
     
210. IF ((ref(CLOSE,1)/ref(OPEN,1)>1.03 AND CLOSE/OPEN<0.96 AND CLOSE<ref(OPEN,1) AND OPEN>ref(CLOSE,1)) OR (ref(CLOSE,1)/ref(OPEN,1)<0.97 AND CLOSE/OPEN>1.04 AND CLOSE>ref(OPEN,1) AND OPEN<ref(CLOSE,1))) THEN
     
211. GP:=GP+' 穿头破脚 - 若第一根K为阴(阳) 表强劲上涨(下跌)力量。';
     
212. IF ref(OPEN,1)<>ref(CLOSE,1) and ref(CLOSE,2)/ref(OPEN,2) > 1.03 AND ref(OPEN,1) > ref(CLOSE,2) AND ABS(ref(OPEN,1)-ref(CLOSE,1))/ref(CLOSE,1)<0.02 AND CLOSE/OPEN<0.97 AND CLOSE<ref(CLOSE,2) THEN
     
213. GP:=GP+'黄昏之星 - 空方势盛。反转信号，跳空成弃婴。';
     
214. IF ref(CLOSE,2)>ref(OPEN,2) AND (ref(CLOSE,2)-ref(OPEN,2))/ref(OPEN,2)>=2/100AND ref(OPEN,1)>=ref(CLOSE,1) AND (ref(OPEN,1)-ref(CLOSE,1))/ref(CLOSE,1)<=2/100 AND ref(OPEN,1)<=ref(CLOSE,2) AND ref(CLOSE,1)>=ref(OPEN,2) AND C>=OPEN AND (CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=ref(OPEN,1) AND OPEN<=ref(CLOSE,1) AND (MAX(CLOSE,ref(C,2))-MIN(CLOSE,ref(CLOSE,2)))/MIN(CLOSE,ref(CLOSE,2))<=1/100 THENGP:=GP+'二阳夹一阴，必须从后续的走势来研判。';
     
215. IF OPEN=ref(OPEN,1) AND (CLOSE-OPEN)*(ref(CLOSE,1)-ref(OPEN,1))<0 THEN
     
216. GP:=GP+' 分离 - 两日开盘相同 一阴一阳 变盘前彻底整理。';
     
217. IF ((O>C and OPEN>MA(C,5) and OPEN>MA(C,10) and O>MA(C,20) and CLOSE<MA(C,5) and CLOSE<MA(C,10) and CLOSE<MA(C,20)) OR (O<C and OPEN<MA(C,5) and OPEN<MA(C,10) and O<MA(C,20) and CLOSE>MA(C,5) and CLOSE>MA(C,10) and CLOSE>MA(C,20))) THEN GP:=GP+'断头铡刀(出水芙蓉) -一根大阴(阳)线切断了三根均线 如果改变了其后均线的排列为空头(多头)排列 后势看空(多) 。';
     
218. end;
     
219. TIPTEXT(DISPSTATUS=2,0,GP);
     
220. 
     
221. {支撑压力}
     
222. gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);
     
223. 明日阻力:=l+(gj-l)+(c-l);
     
224. 明日支撑:=l+(c-gj);
     
225. 明日阻力:=l+(gj-l)+(c-l);
     
226. 明日支撑:=l+(c-gj);
     
227. 今日阻力:=ref(明日阻力 , 1);
     
228. 今日支撑:=ref(明日支撑 , 1);
     
229. STICKLINE(DISPSTATUS=2and c>=今日阻力,今日阻力,今日阻力,30,0),Color0000FF;
     
230. STICKLINE(DISPSTATUS=2and c<今日阻力,今日阻力,今日阻力,30,0),Color00FF00;
     
231. STICKLINE(DISPSTATUS=2and c>=今日支撑,今日支撑,今日支撑,30,0),ColorFF00FF;
     
232. STICKLINE(DISPSTATUS=2and c<今日支撑,今日支撑,今日支撑,30,0),ColorFF0000;
     
233. 下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
     
234. aRSV:=SMA(下档线,3,1);
     
235. aK:=SMA(aRSV,3,1);
     
236. aD:=((3 * aRSV) - (2 * aK));
     
237. aJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
     
238. aRSV24:=SMA(aJ12,3,1);
     
239. aK24:=SMA(aRSV24,3,1);
     
240. aD24:=((3 * aRSV24) - (2 * aK24));
     
241. 撑压位:=IF(CROSS(aD24,aD),HIGH,ref(HIGH,BARSLAST(CROSS(aD24,aD)))){,LINETHICK2,COLORFFFFFF};
     
242. 底:=LLV(HIGH,30){,COLOR00FF00,LINETHICK2};
     
243. STICKLINE(BARSTATUS=2 ,撑压位,撑压位,30,1),LINETHICK1,COLORFFFFFF;
     
244. DRAWTEXT(BARSTATUS=2 ,撑压位,' 撑压'),COLORFFFFFF,VALIGN1;
     
245. STICKLINE(BARSTATUS=2 ,底,底,30,1),COLOR00FF00,LINETHICK1;
     
246. DRAWTEXT(BARSTATUS=2 ,底,' 底线'),COLOR00FF00,VALIGN0;{43}
     
247. DRAWGBK(c,'7' );
     
248. Var3:=LLV(H,240);
     
249. Var4:=100*(C-Var3)/Var3;
     
250. Var5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
     
251. Var6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
     
252. {Var7:=0;}
     
253. Var8:=MA(HHV(C-ref(C,1),0),34)/MA(ABS(C-ref(C,1)),7)*100;
     
254. Var9:=MA(HHV(C-ref(C,1),0),13)/MA(ABS(C-ref(C,1)),13)*100;
     
255. VarA:=BARSCOUNT(C);
     
256. VarB:=Var8<20 AND Var9<23 AND VarA>35;
     
257. VarC:=VarB AND COUNT(VarB,1)=1;
     
258. VarD:=EMA(C,21)-EMA(C,8);
     
259. VarE:=EMA(VarD,5);
     
260. VarF:=TROUGH(3,6,1)<4 AND CROSS(VarD,VarE);
     
261. Var10:=IF(TROUGH(3,16,1)=0 AND H>L+0.04,4,0);
     
262. Var11:=ZIG(3,6)>ref(ZIG(3,6),1) AND ref(ZIG(3,6),1)<=ref(ZIG(3,6),2) AND ref(ZIG(3,6),2)<=ref(ZIG(3,6),3);
     
263. Var12:=ZIG(3,6)<ref(ZIG(3,6),1)AND ref(ZIG(3,6),1)>=ref(ZIG(3,6),2) AND ref(ZIG(3,6),2)>=ref(ZIG(3,6),3);
     
264. Var13:=ZIG(3,22)>ref(ZIG(3,22),1)AND ref(ZIG(3,22),1)<=ref(ZIG(3,22),2)AND ref(ZIG(3,22),2)<=ref(ZIG(3,22),3);
     
265. Var14:=ZIG(3,22)<ref(ZIG(3,22),1)AND ref(ZIG(3,22),1)>=ref(ZIG(3,22),2)AND ref(ZIG(3,22),2)>=ref(ZIG(3,22),3);
     
266. Var15:=ZIG(3,51)>ref(ZIG(3,51),1)AND ref(ZIG(3,51),1)<=ref(ZIG(3,51),2) AND ref(ZIG(3,51),2)<=ref(ZIG(3,51),3);
     
267. Var16:=ZIG(3,51)<ref(ZIG(3,51),1)AND ref(ZIG(3,51),1)>=ref(ZIG(3,51),2)AND ref(ZIG(3,51),2)>=ref(ZIG(3,51),3);
     
268. Var17:=ZIG(3,72)>ref(ZIG(3,72),1) AND ref(ZIG(3,72),1)<=ref(ZIG(3,72),2)AND ref(ZIG(3,72),2)<=ref(ZIG(3,72),3);
     
269. Var18:=ZIG(3,72)<ref(ZIG(3,72),1) AND ref(ZIG(3,72),1)>=ref(ZIG(3,72),2)AND ref(ZIG(3,72),2)>=ref(ZIG(3,72),3);
     
270. Var19:=EMA(C,2)-EMA(C,150);
     
271. Var1A:=EMA(Var19,100);
     
272. Var1B:=2*(Var19-Var1A);
     
273. Var1C:=POW(Var1B,3)*0.1+POW(Var1B,1);
     
274. Var1D:=SQRT(SQRT(L*H*O*C));
     
275. Var1E:=EMA(Var1D*0.97,3);
     
276. Var1F:=(H+L+C)/3;
     
277. Var20:=(Var1F-MA(Var1F,14))/(0.015*AVEDEV(Var1F,14));
     
278. Var21:=CROSS(Var1E,L);
     
279. 买点1:=Var10;
     
280. 买点2:=(Var11+Var13+Var15+Var17);
     
281. 卖点1:=(Var12+Var14+Var16+Var18);
     
282. Var22:=买点1 AND VarF AND VarC AND Var21 AND Var4<0AND Var5=0 AND Var6=0 AND Var20<(-110);
     
283. DRAWTEXT(买点1>0,L-0.15,'B'),LINETHICK4,ALIGN1,colorred;{B}
     
284. DRAWTEXT(买点2>0,L-0.25,{'B'}'买'),LINETHICK2,ALIGN1,COLORYELLOW;{B}
     
285. DRAWTEXT(卖点1>0,H+0.95,{'S'}'卖'),LINETHICK2,ALIGN1,ColorGREEN;{S};出:EMA(c+(h-l)*0.618,3),Color0099FF,LINETHICK0;入:EMA((o+h+l)/3,4),COLORCYAN,LINETHICK0;
     
286. 
     
287. 预测明日买点:=EMA((o+h+l)/3,4)+((h+l)/2-ref((o+h+l)/3,3))/4;
     
288. DRAWTEXTREL(800,950,'测今日低点：'+NUMTOSTRN(ref(预测明日买点,1),2 )),ColorGREEN;
     
289. 预测明日卖点:=EMA(c+(h-l)*0.618,3)+(EMA(c+(h-l)*0.618,3)-入)*0.618;
     
290. DRAWTEXTREL(580,950,'测今日高点：'+NUMTOSTRN(ref(预测明日卖点,1),2 )),Colorred;{一品资料说明}
     
291. WW:=BARSLAST(DISPSTATUS=1);
     
292. 低涨:(C/LLV(LOW,WW)-1)*100,COLOR0000FF,LINETHICK0,PRECIS2;
     
293. 天:BARSLAST(L=LLV(LOW,WW)),COLOR00FFFF,LINETHICK0,PRECIS0;
     
294. DRAWTEXTABS(0,30,'◇低点至今上涨:'+NUMTOSTRN(低涨,2)+'％'+NUMTOSTRN(天,0)+'天'),COLOR0000FF;
     
295. DRAWTEXTABS(0,10,'◇目前可见K线:'+NUMTOSTRN(WW+1,0)+'天'),COLORYELLOW;

复制代码

下载 (100.02 KB)

2018-12-24 14:34