|
黑马全息彩虹版. }2 g( d0 v1 b. a
- q8 o0 k0 E7 c2 V8 j& X$ c* R
DRAWGBK(CLOSE=CLOSE,COLORRGB(130,130,130),COLORRGB(30,30,30),1);
m1 A3 ^9 K- A" A上:=SMA(HIGH,21,2)*1.05;
3 j' v3 C% H; \- }, {" H( MDRAWTEXT(FILTER(CLOSE=MA(CLOSE,20),50,20); 2 f0 K. ?7 ^# Q# C- D+ H
RH1:=IF(J=U2L,HHV(REF(HIGH,1),(BARSLAST(J>=U2L AND REF(J,1)=U2L AND REF(J,1)RH1))); D9 K3 s1 {. S2 i
RH42:=IF(HIGH>RH1,J,REF(J,BARSLAST(HIGH>RH1))); / w. L5 s5 m1 i1 K; Z$ A
RH5:=IF(HIGH>RH4 AND J0 AND CLOSE=1,AA10,AA12),colorFF; % a6 d; ^1 }0 D H
FILLRGN(AA12>=AA10 AND BB100 AND 黑马趋势>1 AND LOW支持位 AND HIGH0 AND HIGHRL5,LOW,'←短买'),colorFF00; - k) y+ }! l7 y" c) m$ j$ I
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 @+ |+ c5 P/ S7 m8 PDRAWTEXT(VA AND 均线120-REF(均线120,1)>0 AND HIGHOPEN,LOW,'★宝马望月'),colorFFFFFF;
2 \6 W3 j1 Q. A0 k# d& yDRAWTEXT(均线-REF(均线,1)>0 AND CROSS(均线20,均线120) AND LOW=均线120,LOW,'三线着花'),colorFFFFFF; , V! }' X8 N7 f1 N
短期底部2 LV(HIGH,30),LINETHICK2,colorFF;
! Q6 r% ~% K* Z! n. E" U$ t6 x上轨:SMA(HIGH,21,2)*1.092,POINTDOT,colorFFFFFF;
5 _8 d6 c: m# y! W中轨道:SMA(HIGH,21,2)*1.017,POINTDOT,colorFFFFFF;
5 ^! h: c9 W. L6 b! `DRAWTEXT(FILTER(LOWMA(CLOSE,15) AND CLOSE>短期底部2 AND HIGH=均线120 AND CLOSE=均线 AND HIGH0 AND 拦截-REF(拦截,2)>0,11),LOW-0.11,'★快马加鞭'),colorFF; 6 B* d5 W& f+ c7 h* [9 F4 E: Z9 I
DRAWTEXT(FILTER(OPEN0 AND HIGH0.35,4),LOW-0.05,'★黑马狂奔'),colorD18073;
4 `# f& s. y m" LDRAWTEXT(CROSS(支持,均线) AND HIGH0,HIGH*1.14,'●逃命'),colorFF;
8 t) u" K9 H- dRDV:=SMA(LOW,8,1);
3 Q; ]5 ?+ F# wDRAWTEXT(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; % y! _1 l1 L; g9 R- L" ^2 c6 q
DRAWTEXT(OPEN0 AND CLOSE>均线89 AND BB10>1 AND CLOSE/OPEN>1.04,LOW,'★天马过桥'),colorCC99FF; 8 L) l1 N, ^3 F- M: t, y% j
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,9,0),colorFF5B00;
0 D! s8 Q( _# F! e/ [STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,8,0),colorFF6C00;
# C) q& G; l: k1 W+ E& y3 y4 GSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,7,0),colorFF7B00;
+ s8 u6 ^7 p3 N" C8 ~/ r: tSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6,0),colorFF9C00;
5 S4 X! r- u, a% sSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),colorFFBE00; + F- r) k5 x, ]5 V( E8 V
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.5,0),colorFFCC00;
X" N" H1 b. `STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),colorFFFF00;
9 s! u3 N1 o* {% G+ xSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,9,0),color70084; ^* A7 ^5 [% M0 q
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,0),colorA3; $ P3 C( b" ~2 E5 L6 C$ N
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,7,0),colorB7;
" d0 o1 J8 p$ j) \/ D7 nSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6,0),colorCD;
( t2 y7 Q( f/ A) wSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,5,0),colorE9;
, O% M* ~! r( b2 k# G; [, CSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3,0),color754E9; ) E( N* M) X8 V) M7 y
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1.5,0),color76EF3;
$ g3 w* @2 O7 ?) G2 LSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1,0),color77BF3; & v9 _4 Q6 I& ^! Y1 H
STICKLINE(CLOSE>OPEN,OPEN,LOW,1,0),color726CA;
+ C6 ^) @' T" C1 Q& fSTICKLINE(CLOSE>OPEN,CLOSE,HIGH,1,0),color726CA; ) Y. f3 ~: S5 j) d
STICKLINE(OPEN>CLOSE,CLOSE,LOW,1,0),colorDE9100;
6 E9 E& R/ M# J; E) s9 N8 H- USTICKLINE(OPEN>CLOSE,OPEN,HIGH,1,0),colorDE9100;
( Y) G8 \0 \1 y# jSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,9,0),color90FF; 4 Z2 {9 _ g4 k \9 K# g" N' g7 L/ q2 j
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,8,0),color9FFF; 6 s# H7 d$ v W
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,4,0),colorB5FF;
1 w7 m) ?% E2 K e" mSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,2,0),colorE4FF; / t- i9 ~$ o/ w8 E7 b
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,OPEN,LOW,0.7,0),colorFFFF; % V% |* ]/ i( N9 E7 ^! F
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,HIGH,0.7,0),colorFFFF; ! Y& a+ n* u J' r3 e# Q
STICKLINE(CLOSE85))>=1,'RSI相对强弱指标超买,属卖出信号。'),colorFF00;
2 v) T) K$ F! r1 C( |5 x8 [! \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;
% i0 t* \/ B% UEXPLAIN(CROSS("RSI.RSI1","RSI.RSI2") AND "RSI.RSI1"50,'RSI相对强弱指标死叉,属卖出信号。'),colorFF00; ' d3 l b, v! u! L" W) v
EXPLAIN("RSI.RSI1"93,'RSI相对强弱指标极高位,猛烈卖出信号。'),colorFF00;
6 Z3 Z: T; y! c. c: g8 rEXPLAIN(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; 7 a9 h5 S6 l5 k: Z9 D
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; $ v |% _1 m+ c) q1 g. W1 U
日K:="KDJ.K#day"(20,5,5);
' `0 R, x: m. ^9 ?4 M' h: }日D:="KDJ.D#day"(20,5,5);
/ S# h/ S% v# S" Q- T周K:="KDJ.K#week"(9,3,3); , b( `# v# p" ~$ [* [
周D:="KDJ.D#week"(9,3,3); 6 L7 y; J" P4 U r p. T' L
EXPLAIN(CROSS(日K,日D),'日KD金叉且底背离买入;'),colorFF; 4 \: k2 b y" r$ C' O
EXPLAIN(CROSS(日D,日K),'日KD死叉且顶背离必须卖出;'),colorFF00; 7 r( W# i! D. `5 ]( X* q& P
EXPLAIN(CROSS(周K,周D),'周KD金叉且底背离买入;'),colorFF; 4 B, \+ D4 E& T& l+ X) B
EXPLAIN(CROSS(周D,周K),'周KD死叉且顶背离必须卖出;'),colorFF00; 1 ]+ d, E, f; E6 t3 r
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
/ i- x9 \% |$ z0 X- zUPR:=BBI+3*STD(BBI,10); 8 k( _( ]8 _3 s. i( T* B
DWN:=BBI-3*STD(BBI,10);
' k4 L; A9 ^+ @+ t0 O t: kVAR55:=(UPR-DWN)/UPR0.18; {" b( z/ y% U
VAR57:=(MA(CLOSE,60)-MA(CLOSE,5))/MA(CLOSE,60)>0.15;
6 |2 H* ?3 x6 zVAR58:=(MA(CLOSE,5)-MA(CLOSE,60))/MA(CLOSE,5)>0.15;
+ G/ g* p3 W, r4 E4 |' BEXPLAIN(VAR55,'布林线收窄大概变盘;'),colorFF00FF;
" F; @8 K( p) m) L6 zEXPLAIN(VAR57 AND VAR56 AND CLOSE>OPEN,'布林上下乖离太大大概反弹;'),colorFF00FF; . f. M- D9 O7 L3 l2 F+ S5 {1 P
EXPLAIN(VAR58 AND VAR56 AND CLOSE=0.01,'SAR向上突破提示买入;'),colorFF;
- i2 h4 u3 q6 w; B' j; lEXPLAIN(CROSS("SAR",CLOSE) AND (ABS(CLOSE-"SAR"))/CLOSE>=0.01,'SAR向下突破提示卖出;'),colorFF00; % m: @: r1 q. b, [9 t" s
TYP:=(HIGH+LOW+CLOSE)/3;
# _$ o. s1 H+ l: U- cCCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)); 1 {' A1 Z/ ?) m( z
EXPLAIN(CCI100,'CCI指标高位,卖出时机。'),colorFF00; + X; o1 i: s0 G' D
EXPLAIN(VOL/CAPITAL>0.075,'换手过大,警惕主力出逃,短期头部。'),colorFFFF;
. B7 ^0 y' i8 N9 V5 NWR:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
# {5 k0 Y! \3 }" r" ?6 w- UEXPLAIN(WR>-20,'W&R超买,即将见顶,应实时卖出。'),colorFF00;
3 N0 C3 t2 v$ d# V0 y6 [/ d! xEXPLAIN(WR=0.5,'ARBR人气指标非常,若股价从高价下跌,属买入信号。'),colorFF;
d" l* @& l% |1 ?: ?- aEXPLAIN(("ARBR.AR"-LLV("ARBR.AR",10))/LLV("ARBR.AR",10)>=0.5,'ARBR人气指标非常,若股价从低价上升,属卖出信号。'),colorFF00;
T" z r* y; k! i5 v1 X# PEXPLAIN("ARBR.BR"300,'ARBR意愿指标表现股价随时下挫思量卖出。'),colorFF00FF;
1 X {: i: Q+ r/ o7 h( O! t. gEXPLAIN(CROSS("ARBR.AR","ARBR.BR") AND ("ARBR.AR"300),'ARBR人气意愿指标死叉,属卖出信号。'),colorFF00; 8 B) k+ ^ K) O! Z0 F1 r: n! R
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;
* g* n/ ?* k; E- wEXPLAIN("CR.CR"18 AND (COUNT("ROC.ROC">REF("ROC.ROC",1),3))=3,'ROC变动速率指标表现短期反弹有望,属买入信号。'),colorFF; $ }7 C' [/ H. B$ g, b: V: R. r. t
EXPLAIN((COUNT(CLOSE18 AND (COUNT(CLOSE=2) AND (COUNT(CLOSE=3,'VR容量比率指标非常,表现股价即将涨升,属买入信号。'),colorFF;
: u0 N0 z) j1 k. b5 I6 lEXPLAIN("VR">300 AND (COUNT("VR"=3 AND (COUNT(CLOSE>REF(CLOSE,1),5))>=3,'VR容量比率指标表现涨势耗尽,发起卖出。'),colorFF00;
5 g0 T. f) E2 n# e% p- VVV6:=(2*CLOSE+HIGH+LOW)/4; & e4 ?6 r7 F2 {; m' ~' K: ~* S- m
VV7:=LLV(LOW,27);
9 D- v; \" Q' n* |$ ?6 t- ]VV8:=HHV(HIGH,27); 3 c; |% o! [6 B
攀:=EMA((VV6-VV7)/(VV8-VV7)*100,13)-50;
$ h+ \9 r% x) v& x; V; ]/ v7 s% A. z" w金:=EMA(0.618*REF(攀,1)+0.382*攀,3);
6 \1 Q$ l" O, A! {, G7 K5 N起攀:=CROSS(攀,金) AND CLOSE>OPEN;
8 r/ `% L* p3 D8 Y+ oEXPLAIN(CROSS(攀,金) AND CLOSE>OPEN,'起攀指标发出起攀买入信号。'),colorFF;
5 u6 _' b3 _$ J, G X9 M3 lEXPLAIN(1=1,' 【均线体系分析】'),colorFFFF;
$ N! d, ]! u' a# Y) [- q& b5 mMA5:=MA(CLOSE,5);
+ s% b2 ~8 C/ sMA10:=MA(CLOSE,10);
1 ^; u6 b; q& e; ]1 B0 i4 c) gMA30:=MA(CLOSE,30); % U7 g" K9 N5 O6 i: n w
MA60:=MA(CLOSE,60);
* E- ^8 \ C6 \; t1 F- x/ S& DMA125:=MA(CLOSE,125);
, }$ l& G, G! w6 t! i- R' zMA250:=MA(CLOSE,250); % Y% n/ e d1 ^$ K
EXPLAIN(MA5>MA10 AND MA10>MA30 AND MA5>MA30,'短期均线多头分列;'),colorFF; & g$ Z5 N, f& l; O1 b6 b
EXPLAIN(MA5MA125,'中期均线多头分列;'),colorFF; 1 w: L% S8 m0 A4 M" U/ L7 y( q
EXPLAIN(MA30MA250,'恒久均线多头分列;'),colorFF;
4 z. K( Q* a, _EXPLAIN(MA60MA(CLOSE,5);
( w0 e, {6 l& D/ O穿头破脚:=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));
. _0 X% V2 @8 {7 f平顶:=(ABS(HIGH-REF(HIGH,1)))/HIGHOPEN AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1); 9 ~0 O$ J9 e8 h9 `5 ` Q
双飞乌鸦:=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 |