|
黑马全息彩虹版7 t' Y) P" T1 B# g9 l' F6 i) d
4 E) g" r" x$ M# EDRAWGBK(CLOSE=CLOSE,COLORRGB(130,130,130),COLORRGB(30,30,30),1);
( T% E+ {. ~( G9 j上:=SMA(HIGH,21,2)*1.05;
3 \) [9 b6 O; x1 m; d5 wDRAWTEXT(FILTER(CLOSE=MA(CLOSE,20),50,20);
3 z# C& H. J3 o4 h% dRH1:=IF(J=U2L,HHV(REF(HIGH,1),(BARSLAST(J>=U2L AND REF(J,1)=U2L AND REF(J,1)RH1))); 8 F5 q# o2 m1 `) y' X
RH42:=IF(HIGH>RH1,J,REF(J,BARSLAST(HIGH>RH1)));
# |, S" _+ T' K: BRH5:=IF(HIGH>RH4 AND J0 AND CLOSE=1,AA10,AA12),colorFF;
7 ~: q3 T0 k U- P1 nFILLRGN(AA12>=AA10 AND BB100 AND 黑马趋势>1 AND LOW支持位 AND HIGH0 AND HIGHRL5,LOW,'←短买'),colorFF00; 3 q$ I7 J% w" i) [5 J) T
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;
+ u! }& L' P. y8 S: r3 aDRAWTEXT(VA AND 均线120-REF(均线120,1)>0 AND HIGHOPEN,LOW,'★宝马望月'),colorFFFFFF;
( Q( r0 A0 R6 q& I2 Y1 `0 eDRAWTEXT(均线-REF(均线,1)>0 AND CROSS(均线20,均线120) AND LOW=均线120,LOW,'三线着花'),colorFFFFFF; " L) E% X9 W* a, p2 _& n# M# c& ~
短期底部2 LV(HIGH,30),LINETHICK2,colorFF;
" T |' {9 V5 u" U上轨:SMA(HIGH,21,2)*1.092,POINTDOT,colorFFFFFF; , @$ G2 E" E4 J3 b7 i# @4 k
中轨道:SMA(HIGH,21,2)*1.017,POINTDOT,colorFFFFFF; 7 }- a( ~# @! y7 }
DRAWTEXT(FILTER(LOWMA(CLOSE,15) AND CLOSE>短期底部2 AND HIGH=均线120 AND CLOSE=均线 AND HIGH0 AND 拦截-REF(拦截,2)>0,11),LOW-0.11,'★快马加鞭'),colorFF;
9 i$ M6 s1 B* DDRAWTEXT(FILTER(OPEN0 AND HIGH0.35,4),LOW-0.05,'★黑马狂奔'),colorD18073; ' L) o+ Z5 q% ^) z; W2 O% W. l% F2 |) b
DRAWTEXT(CROSS(支持,均线) AND HIGH0,HIGH*1.14,'●逃命'),colorFF; ) ^6 {3 g0 l. R- C* m6 @2 W
RDV:=SMA(LOW,8,1); 6 C/ C; l) Z8 Z7 j$ O$ I, m
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; 8 R7 k+ \3 N0 E! t
DRAWTEXT(OPEN0 AND CLOSE>均线89 AND BB10>1 AND CLOSE/OPEN>1.04,LOW,'★天马过桥'),colorCC99FF;
! u+ f8 B) q" fSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,9,0),colorFF5B00; 8 T, B1 e8 z8 ?; }
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,8,0),colorFF6C00; : v: J4 O' L6 l% N1 R
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,7,0),colorFF7B00; P" o" X' v6 E" n
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6,0),colorFF9C00; - b4 a C3 ~) } }: h3 @& g
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),colorFFBE00; , s. i( o$ H+ E0 u: R
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.5,0),colorFFCC00;
" h# G$ [2 |, m, s) g F5 `- tSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),colorFFFF00;
4 w8 C6 P! W+ l- y/ FSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,9,0),color70084; + Z7 Q, K, L# B% K8 h7 c
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,0),colorA3;
+ z/ R, N7 o6 b3 \( g& v4 LSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,7,0),colorB7;
9 ^" ]0 q* y. C3 q' HSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6,0),colorCD; ; J- i8 \% G3 l/ E& W3 `5 z. F6 C( t
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,5,0),colorE9;
( R5 x% m- Q! v) S; RSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3,0),color754E9;
7 w3 e4 O8 J% m, k; ^8 j. Q1 ^8 RSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1.5,0),color76EF3;
# c9 Y, s- \" E) [5 Z1 Q0 qSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1,0),color77BF3;
/ V; Y. d: b3 ]& v* e3 x# QSTICKLINE(CLOSE>OPEN,OPEN,LOW,1,0),color726CA; / m6 l; V& s7 \
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,1,0),color726CA;
; B A+ P) J1 b* a7 G9 ^; |STICKLINE(OPEN>CLOSE,CLOSE,LOW,1,0),colorDE9100;
9 [/ s8 Y! ^, B* N# P( C; u; GSTICKLINE(OPEN>CLOSE,OPEN,HIGH,1,0),colorDE9100;
, R" Y. e5 m2 B+ g( R! e! |1 @( M7 cSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,9,0),color90FF;
+ c0 @; B6 `: M2 i( r: oSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,8,0),color9FFF;
. \9 | ^- \- \1 XSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,4,0),colorB5FF; , R r- C: o7 M1 c. R
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,2,0),colorE4FF;
2 ^: `8 }( M! G8 O# t; YSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,OPEN,LOW,0.7,0),colorFFFF; & s7 d, F) e# M# T. }* F
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,HIGH,0.7,0),colorFFFF;
7 u' T' w; J. s2 sSTICKLINE(CLOSE85))>=1,'RSI相对强弱指标超买,属卖出信号。'),colorFF00; & J( t' n7 [( ~4 l# ^5 \ I* X* Y G
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;
6 T9 X! |* c' p0 ^$ X& C3 F& }EXPLAIN(CROSS("RSI.RSI1","RSI.RSI2") AND "RSI.RSI1"50,'RSI相对强弱指标死叉,属卖出信号。'),colorFF00;
) h6 O* G5 ?. J+ ^EXPLAIN("RSI.RSI1"93,'RSI相对强弱指标极高位,猛烈卖出信号。'),colorFF00;
% j4 |6 O: V9 W9 X! x& YEXPLAIN(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: G$ E! u% G( m( b" ~3 ]& d; o p
EXPLAIN(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; + p: j# K1 I# z+ }, \
日K:="KDJ.K#day"(20,5,5); 5 X2 X% l& _* Q4 Q
日D:="KDJ.D#day"(20,5,5);
# T4 T9 U" |& M9 F' ~, C周K:="KDJ.K#week"(9,3,3);
* h4 F5 e/ Z( v% m' E! U7 [周D:="KDJ.D#week"(9,3,3);
# T4 ?! a# N% I, _5 e8 V' sEXPLAIN(CROSS(日K,日D),'日KD金叉且底背离买入;'),colorFF; 2 u0 z1 ^* h8 X9 v
EXPLAIN(CROSS(日D,日K),'日KD死叉且顶背离必须卖出;'),colorFF00; + e: Z& z$ y. i* f9 Q% n# _
EXPLAIN(CROSS(周K,周D),'周KD金叉且底背离买入;'),colorFF;
+ f y' {4 K* m# {' t& }EXPLAIN(CROSS(周D,周K),'周KD死叉且顶背离必须卖出;'),colorFF00;
! t+ v1 p: a: @1 i, KBBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
. {# B6 s, D. |" Z# nUPR:=BBI+3*STD(BBI,10);
# U* [& F4 ~# M8 RDWN:=BBI-3*STD(BBI,10); : s! O9 |- l- [2 l; m q% q
VAR55:=(UPR-DWN)/UPR0.18;
% Y5 ^# d8 L" `/ {/ A; cVAR57:=(MA(CLOSE,60)-MA(CLOSE,5))/MA(CLOSE,60)>0.15;
8 K1 \$ S+ C1 ZVAR58:=(MA(CLOSE,5)-MA(CLOSE,60))/MA(CLOSE,5)>0.15;
% H; M5 R7 v) M# HEXPLAIN(VAR55,'布林线收窄大概变盘;'),colorFF00FF;
9 i5 x2 b9 f: l' b8 Q- U( KEXPLAIN(VAR57 AND VAR56 AND CLOSE>OPEN,'布林上下乖离太大大概反弹;'),colorFF00FF; ( P1 ~$ W" K( @
EXPLAIN(VAR58 AND VAR56 AND CLOSE=0.01,'SAR向上突破提示买入;'),colorFF; , @* f6 D* ]8 Q+ X8 o
EXPLAIN(CROSS("SAR",CLOSE) AND (ABS(CLOSE-"SAR"))/CLOSE>=0.01,'SAR向下突破提示卖出;'),colorFF00; ' t6 m+ ]7 a! h8 B/ k6 c5 a
TYP:=(HIGH+LOW+CLOSE)/3; ' [7 [+ ?8 I) w, s( L" `
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)); - v8 i- ~) h2 i& \
EXPLAIN(CCI100,'CCI指标高位,卖出时机。'),colorFF00;
- T4 F. A* E0 t3 B0 H, }EXPLAIN(VOL/CAPITAL>0.075,'换手过大,警惕主力出逃,短期头部。'),colorFFFF; 9 \' x& p, L$ w
WR:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
1 X* p* V1 A' x) {EXPLAIN(WR>-20,'W&R超买,即将见顶,应实时卖出。'),colorFF00;
; a( Y; D8 T9 R/ M, ~EXPLAIN(WR=0.5,'ARBR人气指标非常,若股价从高价下跌,属买入信号。'),colorFF; , ^$ ^3 _, I% W
EXPLAIN(("ARBR.AR"-LLV("ARBR.AR",10))/LLV("ARBR.AR",10)>=0.5,'ARBR人气指标非常,若股价从低价上升,属卖出信号。'),colorFF00;
/ }- R- b1 {1 L- z1 [& Z: qEXPLAIN("ARBR.BR"300,'ARBR意愿指标表现股价随时下挫思量卖出。'),colorFF00FF;
6 s1 Y+ G s5 QEXPLAIN(CROSS("ARBR.AR","ARBR.BR") AND ("ARBR.AR"300),'ARBR人气意愿指标死叉,属卖出信号。'),colorFF00; 9 a! Y+ o1 P& t4 A7 ^
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;
0 C' M" H$ [6 M+ V7 qEXPLAIN("CR.CR"18 AND (COUNT("ROC.ROC">REF("ROC.ROC",1),3))=3,'ROC变动速率指标表现短期反弹有望,属买入信号。'),colorFF; ; U" y5 D8 y; `
EXPLAIN((COUNT(CLOSE18 AND (COUNT(CLOSE=2) AND (COUNT(CLOSE=3,'VR容量比率指标非常,表现股价即将涨升,属买入信号。'),colorFF; * I9 {% ?5 v8 k3 l, L+ S5 U
EXPLAIN("VR">300 AND (COUNT("VR"=3 AND (COUNT(CLOSE>REF(CLOSE,1),5))>=3,'VR容量比率指标表现涨势耗尽,发起卖出。'),colorFF00; 5 I6 N8 A1 l6 t7 v
VV6:=(2*CLOSE+HIGH+LOW)/4; 2 r9 ?# v8 K. o$ R" V0 `' L+ w& |
VV7:=LLV(LOW,27);
v( X. I! J5 @% i6 ?+ [VV8:=HHV(HIGH,27);
: V! I" E; a5 c3 E攀:=EMA((VV6-VV7)/(VV8-VV7)*100,13)-50;
5 Y' R! u0 R+ g- v金:=EMA(0.618*REF(攀,1)+0.382*攀,3);
4 z3 f# g1 X/ y, ]) d; }" }起攀:=CROSS(攀,金) AND CLOSE>OPEN;
5 X, }4 e. g3 F# p) F: V% kEXPLAIN(CROSS(攀,金) AND CLOSE>OPEN,'起攀指标发出起攀买入信号。'),colorFF; # `8 H6 L5 @# p4 s
EXPLAIN(1=1,' 【均线体系分析】'),colorFFFF; ' F; i) e7 j' C: i. C& ]4 M, Q
MA5:=MA(CLOSE,5);
, U8 l3 J A8 ]0 K8 U" K- H% S; lMA10:=MA(CLOSE,10); 0 L, p9 Q! D8 d
MA30:=MA(CLOSE,30); / V: H+ p* {) g
MA60:=MA(CLOSE,60); . g- f; I/ f/ p% ?$ A2 d
MA125:=MA(CLOSE,125);
5 e J @. R) O* d# m V( FMA250:=MA(CLOSE,250);
/ z4 `. k1 v" C' QEXPLAIN(MA5>MA10 AND MA10>MA30 AND MA5>MA30,'短期均线多头分列;'),colorFF;
2 h3 @6 N- B) G# q0 [EXPLAIN(MA5MA125,'中期均线多头分列;'),colorFF; ) E+ w: ]0 a4 I n
EXPLAIN(MA30MA250,'恒久均线多头分列;'),colorFF;
4 g+ E M% S* z M' \EXPLAIN(MA60MA(CLOSE,5);
+ O9 h: \& J+ w9 F. i% v+ Z& 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)); # s6 x. T+ S+ k1 m2 H' ?
平顶:=(ABS(HIGH-REF(HIGH,1)))/HIGHOPEN AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1); $ f% e3 u% E/ 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 |