|
黑马全息彩虹版0 s* w+ u' I$ N4 Z" P
9 `" p; i1 b. ]/ i# L9 KDRAWGBK(CLOSE=CLOSE,COLORRGB(130,130,130),COLORRGB(30,30,30),1);
8 ~ t0 _* e& |8 j- M+ A/ t上:=SMA(HIGH,21,2)*1.05; 4 q* U, B( m8 g* D6 z/ ^
DRAWTEXT(FILTER(CLOSE=MA(CLOSE,20),50,20);
~# ]8 M9 I7 i! {* SRH1:=IF(J=U2L,HHV(REF(HIGH,1),(BARSLAST(J>=U2L AND REF(J,1)=U2L AND REF(J,1)RH1)));
% ], Q4 Z' t) }" ?RH42:=IF(HIGH>RH1,J,REF(J,BARSLAST(HIGH>RH1))); , N. e- F( o: K% n8 C! m& {) m
RH5:=IF(HIGH>RH4 AND J0 AND CLOSE=1,AA10,AA12),colorFF;
5 j/ \5 e+ t( C5 `FILLRGN(AA12>=AA10 AND BB100 AND 黑马趋势>1 AND LOW支持位 AND HIGH0 AND HIGHRL5,LOW,'←短买'),colorFF00;
' s2 l/ j3 u9 M3 t; e& h. VDRAWTEXT(FILTER(LOWCLOSE AND MA(CLOSE,10)-REF(MA(CLOSE,10),1)>0 AND WINNER(CLOSE)均线120 AND 均线20OPEN AND 均线120-REF(均线120,1)>0 AND HIGH=均线120,15),LOW,'★120跳马'),color89E0; / [4 a, |& N& F0 ]6 m2 f' X4 D! B
DRAWTEXT(VA AND 均线120-REF(均线120,1)>0 AND HIGHOPEN,LOW,'★宝马望月'),colorFFFFFF;
, X- |3 \, D- Y$ gDRAWTEXT(均线-REF(均线,1)>0 AND CROSS(均线20,均线120) AND LOW=均线120,LOW,'三线着花'),colorFFFFFF;
* a, `1 P* c( v; p2 y: I- y短期底部2 LV(HIGH,30),LINETHICK2,colorFF;
( b. d. E2 A3 t上轨:SMA(HIGH,21,2)*1.092,POINTDOT,colorFFFFFF; + A7 U8 a1 a1 V4 b+ R* p8 f
中轨道:SMA(HIGH,21,2)*1.017,POINTDOT,colorFFFFFF;
9 R* E& Z0 w: q$ T. e8 EDRAWTEXT(FILTER(LOWMA(CLOSE,15) AND CLOSE>短期底部2 AND HIGH=均线120 AND CLOSE=均线 AND HIGH0 AND 拦截-REF(拦截,2)>0,11),LOW-0.11,'★快马加鞭'),colorFF; 4 E# L7 P* B& V
DRAWTEXT(FILTER(OPEN0 AND HIGH0.35,4),LOW-0.05,'★黑马狂奔'),colorD18073; / u0 Q0 z+ R, ? P0 c6 E8 u
DRAWTEXT(CROSS(支持,均线) AND HIGH0,HIGH*1.14,'●逃命'),colorFF;
0 C z% k1 c2 D; @" {RDV:=SMA(LOW,8,1); : P# ?5 B1 F, t$ q* }4 U
DRAWTEXT(CROSS(K,D) AND CLOSE>=OPEN AND X2-REF(X2,1)>0 AND RDV-REF(RDV,1)>0 AND K=均线30 AND WINNER(CLOSE)1.01,3),LOW,'★天马奔月'),color76B0FC; : W# h# d% X% A# u
DRAWTEXT(OPEN0 AND CLOSE>均线89 AND BB10>1 AND CLOSE/OPEN>1.04,LOW,'★天马过桥'),colorCC99FF; % X+ k+ w1 b( r9 i
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,9,0),colorFF5B00;
0 g+ T: z [) O6 M6 G8 _& B8 p* kSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,8,0),colorFF6C00;
: G: L$ E4 P1 M2 T! x3 s4 TSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,7,0),colorFF7B00;
8 o7 o& ]$ s- u2 p& x6 Q7 OSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6,0),colorFF9C00; & g; }4 B& u3 G o
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),colorFFBE00; 0 |7 q4 }/ c8 C& W& u8 p9 P0 q
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.5,0),colorFFCC00; 4 m- A- W6 h& H3 H. E2 z" f
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),colorFFFF00; 6 i" m, J. f* b
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,9,0),color70084;
" M& Q/ t& n& }0 [3 WSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,0),colorA3; ; H* r8 |4 M- T6 O4 H- s2 }
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,7,0),colorB7; , ?3 K% g4 R: @9 ]( o7 y/ w/ [
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6,0),colorCD;
! A4 G: Z F& b4 V: QSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,5,0),colorE9;
/ M! L1 A- F* bSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3,0),color754E9;
( g3 m# F* f! U3 _/ E: ASTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1.5,0),color76EF3;
# {$ p' L4 v3 f# H) z/ ZSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1,0),color77BF3;
, X& i4 Q9 K) p- NSTICKLINE(CLOSE>OPEN,OPEN,LOW,1,0),color726CA;
0 |: _( J, V, X3 Y7 T' N& J3 r' sSTICKLINE(CLOSE>OPEN,CLOSE,HIGH,1,0),color726CA;
0 [4 B: `# o- A, D$ R/ ?STICKLINE(OPEN>CLOSE,CLOSE,LOW,1,0),colorDE9100; + s0 a8 u6 [. Y
STICKLINE(OPEN>CLOSE,OPEN,HIGH,1,0),colorDE9100; + b; |2 G2 F7 W& E
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,9,0),color90FF; 3 Y' s- b: `0 G q! k' s
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,8,0),color9FFF;
' b' s3 {* }. U3 H) S8 \STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,4,0),colorB5FF;
; m' k, R s) T1 O9 o+ }7 TSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,2,0),colorE4FF;
0 E+ r% V4 r- I9 s; Z. P5 c* G4 N- QSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,OPEN,LOW,0.7,0),colorFFFF;
& ?: X0 v- {" ?STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,HIGH,0.7,0),colorFFFF;
& q6 x0 L& h0 W$ D7 v8 ~STICKLINE(CLOSE85))>=1,'RSI相对强弱指标超买,属卖出信号。'),colorFF00; . h% e& D3 S2 @: d
EXPLAIN((LLV(LOW,20)=LOW AND NOT(LLV("RSI.RSI1",20)="RSI.RSI1") OR (COUNT(CLOSE18 AND (COUNT("RSI.RSI1">REF("RSI.RSI1",1),30))>18) AND "RSI.RSI1"REF(CLOSE,1),30))>18 AND (COUNT("RSI.RSI1"18) AND "RSI.RSI1">80,'RSI相对强弱指标顶背离,股价在高位时属卖出信号。'),colorFF00;
. `' a6 T( H- m7 \4 K4 Y O8 z6 uEXPLAIN(CROSS("RSI.RSI1","RSI.RSI2") AND "RSI.RSI1"50,'RSI相对强弱指标死叉,属卖出信号。'),colorFF00; ! _ z( k2 c. l- m, r
EXPLAIN("RSI.RSI1"93,'RSI相对强弱指标极高位,猛烈卖出信号。'),colorFF00; 3 ]8 i# g" q3 ~
EXPLAIN(RSI1REF(VOL,1),30))>3 AND VOL/CAPITAL=60 AND "KDJ.D">=60))>=1 AND (BARSLAST(CROSS("KDJ.D","KDJ.K") AND "KDJ.K">=60 AND "KDJ.D">=60))18 AND ((COUNT("KDJ.K"18 OR (COUNT("KDJ.D"18),'KD顶背离提示卖出;'),colorFF00;
2 @+ a7 m, Z- MEXPLAIN(LLV(LOW,20)=LOW AND (NOT(LLV("KDJ.K",20)="KDJ.K" OR LLV("KDJ.D",20)="KDJ.D")) OR (COUNT(CLOSE18 AND ((COUNT("KDJ.K">REF("KDJ.K",1),30))>18 OR (COUNT("KDJ.D">REF("KDJ.D",1),30))>18),'KD底背离提示买入;'),colorFF; 3 W4 {1 E, p7 _: R
日K:="KDJ.K#day"(20,5,5); % @: Q7 C9 x; x7 }& e7 q
日D:="KDJ.D#day"(20,5,5);
' m' @" k1 ? O3 X周K:="KDJ.K#week"(9,3,3); % P0 O- t5 [2 l* A' ^- X5 d- W2 m
周D:="KDJ.D#week"(9,3,3); + F1 E ~* p. g- @. ^
EXPLAIN(CROSS(日K,日D),'日KD金叉且底背离买入;'),colorFF;
% L; g# {5 K& \EXPLAIN(CROSS(日D,日K),'日KD死叉且顶背离必须卖出;'),colorFF00;
+ p6 U* i/ o$ E; E4 J# sEXPLAIN(CROSS(周K,周D),'周KD金叉且底背离买入;'),colorFF;
N' L+ E, t" F! j( `EXPLAIN(CROSS(周D,周K),'周KD死叉且顶背离必须卖出;'),colorFF00;
# Y E2 B; K( e+ J# r0 MBBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4; 8 M) |8 B8 w" }1 v4 `: X `
UPR:=BBI+3*STD(BBI,10); 0 Q; u2 }" v1 y) z: I) i( D9 x! V) n
DWN:=BBI-3*STD(BBI,10);
2 |5 x. s) R( x, d; X. XVAR55:=(UPR-DWN)/UPR0.18; ( G6 {+ \4 O: @1 u+ J
VAR57:=(MA(CLOSE,60)-MA(CLOSE,5))/MA(CLOSE,60)>0.15;
0 K* j! a3 E# p3 A) m zVAR58:=(MA(CLOSE,5)-MA(CLOSE,60))/MA(CLOSE,5)>0.15; ' B n$ _: n5 O8 t5 b# J. r+ _
EXPLAIN(VAR55,'布林线收窄大概变盘;'),colorFF00FF; % i2 A1 \) Y" n( G1 u
EXPLAIN(VAR57 AND VAR56 AND CLOSE>OPEN,'布林上下乖离太大大概反弹;'),colorFF00FF;
# @, _4 \$ H5 C1 S4 H' K V, |EXPLAIN(VAR58 AND VAR56 AND CLOSE=0.01,'SAR向上突破提示买入;'),colorFF;
6 _* ~. {0 j; r" f1 I* }" k; `EXPLAIN(CROSS("SAR",CLOSE) AND (ABS(CLOSE-"SAR"))/CLOSE>=0.01,'SAR向下突破提示卖出;'),colorFF00; ! p, c6 b) D6 I1 z0 a! [
TYP:=(HIGH+LOW+CLOSE)/3; 9 ^4 _' ?0 Z/ K: ]% Q
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
4 u/ K) a. Y4 I# V3 g% `; C' SEXPLAIN(CCI100,'CCI指标高位,卖出时机。'),colorFF00;
- h% N% ~) |& I6 m9 Q$ D# wEXPLAIN(VOL/CAPITAL>0.075,'换手过大,警惕主力出逃,短期头部。'),colorFFFF;
0 {! K) i; }' v4 rWR:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)); 7 a9 l. ~4 r5 [5 l, ?
EXPLAIN(WR>-20,'W&R超买,即将见顶,应实时卖出。'),colorFF00; 5 W& X1 k- C' f& H
EXPLAIN(WR=0.5,'ARBR人气指标非常,若股价从高价下跌,属买入信号。'),colorFF; 3 V' ^ K% E% G3 u2 z$ Y
EXPLAIN(("ARBR.AR"-LLV("ARBR.AR",10))/LLV("ARBR.AR",10)>=0.5,'ARBR人气指标非常,若股价从低价上升,属卖出信号。'),colorFF00; v8 v% j/ V# n3 Q2 m$ O! t& h$ h7 K/ r' P U
EXPLAIN("ARBR.BR"300,'ARBR意愿指标表现股价随时下挫思量卖出。'),colorFF00FF; $ M l+ a3 t+ Q; \1 [* [& c' }
EXPLAIN(CROSS("ARBR.AR","ARBR.BR") AND ("ARBR.AR"300),'ARBR人气意愿指标死叉,属卖出信号。'),colorFF00;
9 N' n/ O6 h# [% O: SEXPLAIN((COUNT(CLOSE18 AND (COUNT(CLOSEREF("OBV.OBV",1),30))>18 AND (COUNT("OBV.OBV">REF("OBV.OBV",1),3))=3 AND (COUNT(VOL>REF(VOL,1),30))>3 AND VOL/CAPITALREF(CLOSE,1),30))>18 AND (COUNT(CLOSE>REF(CLOSE,1),3))=3 AND (COUNT("OBV.OBV">REF("OBV.OBV",1),30))>18 AND (COUNT("OBV.OBV">REF("OBV.OBV",1),3))=3 AND (COUNT(VOL>REF(VOL,1),30))>3 AND VOL/CAPITALREF(CLOSE,1),30))>18 AND (COUNT(CLOSE>REF(CLOSE,1),3))=3 AND ((COUNT("OBV.OBV"18 OR (COUNT("OBV.OBV"0.07 AND "OBV.OBV">REF("OBV.OBV",1),'OBV能量潮非常。若股价在高位属卖出信号,若OBV能量线在低位长时间横向整理后出现,属买入信号。'),colorFF00FF;
0 ]# @+ O; e. Z y9 t& \- yEXPLAIN("CR.CR"18 AND (COUNT("ROC.ROC">REF("ROC.ROC",1),3))=3,'ROC变动速率指标表现短期反弹有望,属买入信号。'),colorFF; 2 W8 O+ ?1 O2 F* I$ e. Y, C3 U
EXPLAIN((COUNT(CLOSE18 AND (COUNT(CLOSE=2) AND (COUNT(CLOSE=3,'VR容量比率指标非常,表现股价即将涨升,属买入信号。'),colorFF; ' y' T; @5 B" ?' N, ^1 _6 v/ S
EXPLAIN("VR">300 AND (COUNT("VR"=3 AND (COUNT(CLOSE>REF(CLOSE,1),5))>=3,'VR容量比率指标表现涨势耗尽,发起卖出。'),colorFF00; & F. B% h% c- |! i$ \
VV6:=(2*CLOSE+HIGH+LOW)/4;
2 q7 i5 g5 B- J& a% LVV7:=LLV(LOW,27); % b1 ]$ }6 u- K T" ]9 e
VV8:=HHV(HIGH,27);
M# ~8 m+ `6 m9 Q/ ^* l# I攀:=EMA((VV6-VV7)/(VV8-VV7)*100,13)-50; 1 j; E! K+ d0 F, [
金:=EMA(0.618*REF(攀,1)+0.382*攀,3);
8 k. S6 R$ X" ]% G, }1 c起攀:=CROSS(攀,金) AND CLOSE>OPEN;
1 O0 g+ t, x# l6 TEXPLAIN(CROSS(攀,金) AND CLOSE>OPEN,'起攀指标发出起攀买入信号。'),colorFF; " D$ ~9 O, K( Y' h0 ^
EXPLAIN(1=1,' 【均线体系分析】'),colorFFFF; % Z8 h+ Z9 j1 @! J2 t* }
MA5:=MA(CLOSE,5); + O/ a: W" x) C' m9 C7 @
MA10:=MA(CLOSE,10);
. b) h! S4 x! N% B5 L* q/ f$ w2 hMA30:=MA(CLOSE,30);
- P1 b2 d3 @/ d8 s; H( }7 X# @MA60:=MA(CLOSE,60);
' D! h w6 J. P) B1 ^+ {MA125:=MA(CLOSE,125);
; O5 f7 K; T. s/ iMA250:=MA(CLOSE,250);
' Q, q2 ]! w) @EXPLAIN(MA5>MA10 AND MA10>MA30 AND MA5>MA30,'短期均线多头分列;'),colorFF; " O( `+ S7 \; A5 x8 ^
EXPLAIN(MA5MA125,'中期均线多头分列;'),colorFF; ; S/ H% k, M' {) e. L2 Q4 k
EXPLAIN(MA30MA250,'恒久均线多头分列;'),colorFF;
- Y( I4 O% D8 Q0 l) fEXPLAIN(MA60MA(CLOSE,5); * P4 |8 a. T& ^1 t9 X
穿头破脚:=REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPENREF(OPEN,1) AND OPEN1.03 AND CLOSE/OPENREF(CLOSE,1) AND CLOSE0.04 AND (ABS(CLOSE-OPEN))/CLOSE0.04 AND CLOSE=OPEN AND CLOSEMIN(REF(CLOSE,1),REF(OPEN,1)); - t# y8 ]) z& M, p1 ~
平顶:=(ABS(HIGH-REF(HIGH,1)))/HIGHOPEN AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1);
: q8 A, m0 w/ ^, v2 A双飞乌鸦:=REF(CLOSE,1)=REF(CLOSE,1) AND (REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)=OPEN AND (CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=REF(OPEN,1) AND OPEN1.03 AND REF(CLOSE,3)REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND REF(LOW,4)REF(HIGH,1) AND CLOSE/OPEN |