|
黑马全息彩虹版
$ ]8 e k, f" j& M5 }- D* ]
6 K& \7 ], }0 f$ N$ fDRAWGBK(CLOSE=CLOSE,COLORRGB(130,130,130),COLORRGB(30,30,30),1);
3 z1 v3 |$ v3 k, o上:=SMA(HIGH,21,2)*1.05; 4 L) z& Q# H" Z7 _7 I, x! s
DRAWTEXT(FILTER(CLOSE=MA(CLOSE,20),50,20);
+ o: y/ N9 y4 s* ~, K9 L1 E' I+ A/ F5 p. mRH1:=IF(J=U2L,HHV(REF(HIGH,1),(BARSLAST(J>=U2L AND REF(J,1)=U2L AND REF(J,1)RH1)));
+ J4 f: N/ r. Z2 p, C: [RH42:=IF(HIGH>RH1,J,REF(J,BARSLAST(HIGH>RH1)));
9 c$ z/ A" `' \+ d8 y) BRH5:=IF(HIGH>RH4 AND J0 AND CLOSE=1,AA10,AA12),colorFF;
2 Z# v$ s8 d# ~) Y/ VFILLRGN(AA12>=AA10 AND BB100 AND 黑马趋势>1 AND LOW支持位 AND HIGH0 AND HIGHRL5,LOW,'←短买'),colorFF00; * ?/ y6 O7 ?" j$ ^3 c/ ^7 h* @
DRAWTEXT(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; 2 i1 c, t. C. t' X
DRAWTEXT(VA AND 均线120-REF(均线120,1)>0 AND HIGHOPEN,LOW,'★宝马望月'),colorFFFFFF;
, o4 E4 n o0 B, B, XDRAWTEXT(均线-REF(均线,1)>0 AND CROSS(均线20,均线120) AND LOW=均线120,LOW,'三线着花'),colorFFFFFF;
) \2 t, k% S7 m6 l6 o' S; a+ j, [短期底部2 LV(HIGH,30),LINETHICK2,colorFF; & v" ^/ Q* x2 u$ }/ ]$ V. d
上轨:SMA(HIGH,21,2)*1.092,POINTDOT,colorFFFFFF;
" ~. Q8 S7 g4 V! s3 s: s; g) T中轨道:SMA(HIGH,21,2)*1.017,POINTDOT,colorFFFFFF;
- N$ i0 A: I @4 d3 Y6 O% _DRAWTEXT(FILTER(LOWMA(CLOSE,15) AND CLOSE>短期底部2 AND HIGH=均线120 AND CLOSE=均线 AND HIGH0 AND 拦截-REF(拦截,2)>0,11),LOW-0.11,'★快马加鞭'),colorFF;
, q1 z3 s& u0 b+ n* X& KDRAWTEXT(FILTER(OPEN0 AND HIGH0.35,4),LOW-0.05,'★黑马狂奔'),colorD18073;
" Q& T: B' |/ x' h6 l) w% S9 ^% zDRAWTEXT(CROSS(支持,均线) AND HIGH0,HIGH*1.14,'●逃命'),colorFF;
, h$ c2 a/ L3 n. x6 GRDV:=SMA(LOW,8,1);
. X/ [% w. S; v* o8 |9 u5 ^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; 6 p4 Y) n# R1 t& D
DRAWTEXT(OPEN0 AND CLOSE>均线89 AND BB10>1 AND CLOSE/OPEN>1.04,LOW,'★天马过桥'),colorCC99FF;
6 g3 [' u+ _4 ]& ^' Z% ESTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,9,0),colorFF5B00;
! k; `4 g- \3 a0 I5 `) DSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,8,0),colorFF6C00;
: {' V3 K2 ?' |STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,7,0),colorFF7B00;
0 C! Y" U; K+ M d M O: l9 R+ ^STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6,0),colorFF9C00;
! X( y6 I7 G# d& {' FSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),colorFFBE00; 9 A1 v7 S( y9 c8 o
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.5,0),colorFFCC00; ' N6 X! n! l7 U1 p! z/ d$ ?; e
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),colorFFFF00;
* w( W0 l$ v% Y6 o# S$ n# q6 ?STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,9,0),color70084;
# L/ i/ B8 w: }2 qSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,0),colorA3; 4 s7 p- d9 i$ n' _% _2 D+ S+ t' x
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,7,0),colorB7;
. E7 C- n$ `% ?7 zSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6,0),colorCD; . u# m4 v1 b9 F L( E; m
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,5,0),colorE9;
! F) e+ C' n$ Y9 Y9 WSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3,0),color754E9;
- p$ ?: O% s7 B& S# [STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1.5,0),color76EF3; - _& E$ E: r4 s+ ?8 a: m+ V8 @; l+ D! `
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1,0),color77BF3; 1 r; s; |- {. g& U- B K7 y# H
STICKLINE(CLOSE>OPEN,OPEN,LOW,1,0),color726CA; ( c/ Q2 h. f2 z6 ~* q
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,1,0),color726CA;
4 l3 c" O ?; @& r8 D3 L& x" ]4 GSTICKLINE(OPEN>CLOSE,CLOSE,LOW,1,0),colorDE9100;
- X: O( J! q k+ [0 KSTICKLINE(OPEN>CLOSE,OPEN,HIGH,1,0),colorDE9100;
- V A _ i- K7 c: N3 | WSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,9,0),color90FF;
+ P& z" {* x0 }1 x0 @# a/ GSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,8,0),color9FFF; 8 y, V, n* f3 k7 R) X% E, O" T
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,4,0),colorB5FF; 6 `; m, g" Q' M+ B& C
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,2,0),colorE4FF; 6 P3 Z; H: D% ~- t" c
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,OPEN,LOW,0.7,0),colorFFFF; 8 v* j1 T8 c) n# e3 e
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,HIGH,0.7,0),colorFFFF;
6 j; G: q) v* O4 PSTICKLINE(CLOSE85))>=1,'RSI相对强弱指标超买,属卖出信号。'),colorFF00;
% X& C* O6 k/ L& lEXPLAIN((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;
" W0 A4 y: |. `( i7 mEXPLAIN(CROSS("RSI.RSI1","RSI.RSI2") AND "RSI.RSI1"50,'RSI相对强弱指标死叉,属卖出信号。'),colorFF00;
. {. B" ]+ {6 N, Y4 B+ a! ZEXPLAIN("RSI.RSI1"93,'RSI相对强弱指标极高位,猛烈卖出信号。'),colorFF00; 2 g* N( z! ^8 }. k4 g+ L1 B
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;
/ \, f' e4 p7 P9 HEXPLAIN(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; ( n. J# h* P" ^5 K2 G! x
日K:="KDJ.K#day"(20,5,5);
- }3 M/ F" f! k# m日D:="KDJ.D#day"(20,5,5); / p/ j M q! y: _0 H% C* {
周K:="KDJ.K#week"(9,3,3); ' q P& j1 V: r6 C# J
周D:="KDJ.D#week"(9,3,3); ( W' x9 s9 n% c% T5 U0 I
EXPLAIN(CROSS(日K,日D),'日KD金叉且底背离买入;'),colorFF; , ?8 [4 f# u: A% J' p3 J
EXPLAIN(CROSS(日D,日K),'日KD死叉且顶背离必须卖出;'),colorFF00;
4 i2 m. l$ z0 |, i; @: x$ wEXPLAIN(CROSS(周K,周D),'周KD金叉且底背离买入;'),colorFF; ' Q( s4 x* j, j+ ]; c2 N$ o
EXPLAIN(CROSS(周D,周K),'周KD死叉且顶背离必须卖出;'),colorFF00; / |6 w# x9 G% U" h- W; l, @
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
" r- F, O( _, v0 N1 r7 y- gUPR:=BBI+3*STD(BBI,10); * {9 [6 ]6 R4 R. F- j, I- J L
DWN:=BBI-3*STD(BBI,10); ( [8 j5 j( t/ t) ^" f
VAR55:=(UPR-DWN)/UPR0.18; 0 Z$ ?8 J3 |2 t6 ?+ Q
VAR57:=(MA(CLOSE,60)-MA(CLOSE,5))/MA(CLOSE,60)>0.15; 1 r* ^6 C4 g( q% H/ D: S
VAR58:=(MA(CLOSE,5)-MA(CLOSE,60))/MA(CLOSE,5)>0.15;
& \, l9 U8 I% }9 `EXPLAIN(VAR55,'布林线收窄大概变盘;'),colorFF00FF; + J/ h6 F) H7 T. q% R* b+ A5 p# J
EXPLAIN(VAR57 AND VAR56 AND CLOSE>OPEN,'布林上下乖离太大大概反弹;'),colorFF00FF;
2 N( m V! b7 k' PEXPLAIN(VAR58 AND VAR56 AND CLOSE=0.01,'SAR向上突破提示买入;'),colorFF; % H% s1 t3 L; [* \ w
EXPLAIN(CROSS("SAR",CLOSE) AND (ABS(CLOSE-"SAR"))/CLOSE>=0.01,'SAR向下突破提示卖出;'),colorFF00;
4 Y* y7 H0 D: P6 W! oTYP:=(HIGH+LOW+CLOSE)/3;
, E# c% s2 r D) {. d7 ? vCCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
1 E! Q: J. d- d* S/ x k9 I( B7 u% FEXPLAIN(CCI100,'CCI指标高位,卖出时机。'),colorFF00;
: H! |. J; q4 k4 u1 e& SEXPLAIN(VOL/CAPITAL>0.075,'换手过大,警惕主力出逃,短期头部。'),colorFFFF;
. K! F2 C; b" Z- HWR:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)); / z2 V" z% |- \0 _2 ]( w/ [ z, S b
EXPLAIN(WR>-20,'W&R超买,即将见顶,应实时卖出。'),colorFF00;
; w. L; Q, Y5 a+ g3 M9 v! _EXPLAIN(WR=0.5,'ARBR人气指标非常,若股价从高价下跌,属买入信号。'),colorFF;
- R% `7 e6 [. K2 rEXPLAIN(("ARBR.AR"-LLV("ARBR.AR",10))/LLV("ARBR.AR",10)>=0.5,'ARBR人气指标非常,若股价从低价上升,属卖出信号。'),colorFF00;
, ~/ |7 A/ x5 }: FEXPLAIN("ARBR.BR"300,'ARBR意愿指标表现股价随时下挫思量卖出。'),colorFF00FF;
) T2 L( V- a& @7 S1 H/ d0 O! pEXPLAIN(CROSS("ARBR.AR","ARBR.BR") AND ("ARBR.AR"300),'ARBR人气意愿指标死叉,属卖出信号。'),colorFF00; * t, ]2 ~: n$ I8 V
EXPLAIN((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; 9 g8 D J/ |, ^7 k7 O
EXPLAIN("CR.CR"18 AND (COUNT("ROC.ROC">REF("ROC.ROC",1),3))=3,'ROC变动速率指标表现短期反弹有望,属买入信号。'),colorFF; 8 M3 N& j8 U. }
EXPLAIN((COUNT(CLOSE18 AND (COUNT(CLOSE=2) AND (COUNT(CLOSE=3,'VR容量比率指标非常,表现股价即将涨升,属买入信号。'),colorFF; ^) l9 h3 T& n; ~8 J9 {& w
EXPLAIN("VR">300 AND (COUNT("VR"=3 AND (COUNT(CLOSE>REF(CLOSE,1),5))>=3,'VR容量比率指标表现涨势耗尽,发起卖出。'),colorFF00; 5 m7 l. z! x9 Q8 J, C
VV6:=(2*CLOSE+HIGH+LOW)/4; 5 O" r8 _- s' C. w" e- ^
VV7:=LLV(LOW,27);
3 [- c, i& Q) [VV8:=HHV(HIGH,27);
! Q( i0 o* ~3 S ]# W攀:=EMA((VV6-VV7)/(VV8-VV7)*100,13)-50; # }) K5 P: e8 R; V4 h- \0 C* x: ~
金:=EMA(0.618*REF(攀,1)+0.382*攀,3);
# e% W/ p1 d& c4 ^$ |. `) ~0 |起攀:=CROSS(攀,金) AND CLOSE>OPEN; # T& \' H: I z" k( f
EXPLAIN(CROSS(攀,金) AND CLOSE>OPEN,'起攀指标发出起攀买入信号。'),colorFF; . r' Z' u% |: J7 Y4 |: o: s
EXPLAIN(1=1,' 【均线体系分析】'),colorFFFF;
7 C% T+ L) J+ q$ l# KMA5:=MA(CLOSE,5);
! }9 j) Q- {8 u7 d0 i! EMA10:=MA(CLOSE,10); 6 S* d9 G$ `4 [# ~6 ?
MA30:=MA(CLOSE,30);
; @7 R* U7 D$ ?, x% |MA60:=MA(CLOSE,60); & t! t. G! I/ ^& i5 c; @% E! w
MA125:=MA(CLOSE,125); 1 P' \9 l3 _" v9 r
MA250:=MA(CLOSE,250);
9 o5 g* i! L" W6 bEXPLAIN(MA5>MA10 AND MA10>MA30 AND MA5>MA30,'短期均线多头分列;'),colorFF;
/ E( c4 ^2 M) M/ P" zEXPLAIN(MA5MA125,'中期均线多头分列;'),colorFF;
% W8 G5 n% B2 N: q+ }- A" E1 uEXPLAIN(MA30MA250,'恒久均线多头分列;'),colorFF;
$ w1 J$ ? X/ T: @7 AEXPLAIN(MA60MA(CLOSE,5); * }* H3 @ x, [& V
穿头破脚:=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)); * \ T6 }* H0 g' C: E( A$ @
平顶:=(ABS(HIGH-REF(HIGH,1)))/HIGHOPEN AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1);
8 l/ T+ e H+ k- U7 S; 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 |