|
黑马全息彩虹版
! a4 G8 E) \# l, b0 c9 I" ?. O4 X* Q( F; f: d
DRAWGBK(CLOSE=CLOSE,COLORRGB(130,130,130),COLORRGB(30,30,30),1); 2 T* l! V! P* K( d5 e0 F5 I
上:=SMA(HIGH,21,2)*1.05; ! J9 |% f6 G x. h3 C. _$ o* P& E/ _
DRAWTEXT(FILTER(CLOSE=MA(CLOSE,20),50,20); 0 ]2 r: X i2 e+ ~6 C: e5 U! O
RH1:=IF(J=U2L,HHV(REF(HIGH,1),(BARSLAST(J>=U2L AND REF(J,1)=U2L AND REF(J,1)RH1))); - P; w0 c2 y4 n5 r$ i
RH42:=IF(HIGH>RH1,J,REF(J,BARSLAST(HIGH>RH1)));
5 x. Q* m Q' Q5 _0 bRH5:=IF(HIGH>RH4 AND J0 AND CLOSE=1,AA10,AA12),colorFF; , {3 K( w9 N# z; X6 l# v3 l8 L
FILLRGN(AA12>=AA10 AND BB100 AND 黑马趋势>1 AND LOW支持位 AND HIGH0 AND HIGHRL5,LOW,'←短买'),colorFF00; ; k8 P4 [" t- b! \
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; ( z& K4 I3 b# @$ T
DRAWTEXT(VA AND 均线120-REF(均线120,1)>0 AND HIGHOPEN,LOW,'★宝马望月'),colorFFFFFF;
! @" ?. @5 f1 V; m* kDRAWTEXT(均线-REF(均线,1)>0 AND CROSS(均线20,均线120) AND LOW=均线120,LOW,'三线着花'),colorFFFFFF; 7 e4 P9 X# D3 ]% Y0 A
短期底部2 LV(HIGH,30),LINETHICK2,colorFF;
' H" G! g) ^9 W" V上轨:SMA(HIGH,21,2)*1.092,POINTDOT,colorFFFFFF;
% I X1 Q: F! V中轨道:SMA(HIGH,21,2)*1.017,POINTDOT,colorFFFFFF;
& p U' U8 |, D7 `* wDRAWTEXT(FILTER(LOWMA(CLOSE,15) AND CLOSE>短期底部2 AND HIGH=均线120 AND CLOSE=均线 AND HIGH0 AND 拦截-REF(拦截,2)>0,11),LOW-0.11,'★快马加鞭'),colorFF;
' M3 Z6 u `: c( s7 TDRAWTEXT(FILTER(OPEN0 AND HIGH0.35,4),LOW-0.05,'★黑马狂奔'),colorD18073; ' q4 J9 X5 {3 c! u# p
DRAWTEXT(CROSS(支持,均线) AND HIGH0,HIGH*1.14,'●逃命'),colorFF;
7 ?6 o( w# G7 N" ^" a5 mRDV:=SMA(LOW,8,1);
; `- U/ {! A7 v) e4 T; f/ QDRAWTEXT(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;
], X6 N7 m+ PDRAWTEXT(OPEN0 AND CLOSE>均线89 AND BB10>1 AND CLOSE/OPEN>1.04,LOW,'★天马过桥'),colorCC99FF; - G5 _9 K: T. Q+ w
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,9,0),colorFF5B00;
+ r& `( L1 U; `STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,8,0),colorFF6C00;
" l. t4 N/ r: Z4 r2 ~( @STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,7,0),colorFF7B00;
8 {( a* `5 ^- k6 \4 l. F( l0 KSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6,0),colorFF9C00; 4 c1 b$ s+ \3 K7 T" P [
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),colorFFBE00;
) e- b0 p7 M9 W9 f, V- lSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.5,0),colorFFCC00; $ n& \! G6 q0 `
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),colorFFFF00; ! u$ L. C8 T. A3 D3 g
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,9,0),color70084;
* r0 b9 Q( p m: @( GSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,0),colorA3; / c9 t% ? U3 P6 ^$ o
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,7,0),colorB7; , G* t F0 M) T' T) ]; {/ F
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6,0),colorCD;
: _7 H, C: A, w9 k1 t) v; M- bSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,5,0),colorE9;
9 L9 f$ U& D+ ?/ Z+ z3 q) ]- sSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3,0),color754E9; ' q4 H2 n. z- W0 R4 K J
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1.5,0),color76EF3; ( s* f* m, y9 s0 h1 ^* J+ k. `$ n* U' @
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1,0),color77BF3;
- T/ I( Y- x8 F; u7 z, gSTICKLINE(CLOSE>OPEN,OPEN,LOW,1,0),color726CA;
0 O5 U8 C1 n a4 bSTICKLINE(CLOSE>OPEN,CLOSE,HIGH,1,0),color726CA;
) ?5 f; x3 C: QSTICKLINE(OPEN>CLOSE,CLOSE,LOW,1,0),colorDE9100; 9 A( i- S8 H( F
STICKLINE(OPEN>CLOSE,OPEN,HIGH,1,0),colorDE9100; & @5 u3 j# _7 E$ y) [6 P" u+ K
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,9,0),color90FF;
& `( W- x8 q" e6 ^2 FSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,8,0),color9FFF;
A( [" T. F z5 y0 `STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,4,0),colorB5FF; - J$ I6 _* [: K5 E; b' c' Q; _2 m. `9 [9 ]
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,2,0),colorE4FF; 8 z0 {' A4 T# f% T( j) W
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,OPEN,LOW,0.7,0),colorFFFF;
6 W" R6 T( f) ^- r: e( hSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,HIGH,0.7,0),colorFFFF;
2 ^! V" h& k: }' @+ B) RSTICKLINE(CLOSE85))>=1,'RSI相对强弱指标超买,属卖出信号。'),colorFF00; ; t+ `5 X7 k1 v1 A' y% i" b7 r
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;
; L* Y3 i: s3 d1 \- k d0 D dEXPLAIN(CROSS("RSI.RSI1","RSI.RSI2") AND "RSI.RSI1"50,'RSI相对强弱指标死叉,属卖出信号。'),colorFF00; : A: B1 G% s# K! P* T
EXPLAIN("RSI.RSI1"93,'RSI相对强弱指标极高位,猛烈卖出信号。'),colorFF00;
6 d4 e+ v8 R: O7 AEXPLAIN(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;
6 z; K1 q+ ~5 z3 Q" b! T' F1 IEXPLAIN(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; ) q; D1 U& a- R9 D
日K:="KDJ.K#day"(20,5,5); % q1 ^/ ^/ @' h9 |
日D:="KDJ.D#day"(20,5,5); - Y F2 y G+ e! v
周K:="KDJ.K#week"(9,3,3);
' ~+ ?% H" m+ V! K周D:="KDJ.D#week"(9,3,3);
' C3 A: w- S7 e8 o/ c! wEXPLAIN(CROSS(日K,日D),'日KD金叉且底背离买入;'),colorFF;
q4 v' }. ^! i* Z) ]+ [EXPLAIN(CROSS(日D,日K),'日KD死叉且顶背离必须卖出;'),colorFF00; - e% x8 N8 q; N- u+ h% U3 C
EXPLAIN(CROSS(周K,周D),'周KD金叉且底背离买入;'),colorFF;
& l3 z/ ~( X5 ?4 `( _' MEXPLAIN(CROSS(周D,周K),'周KD死叉且顶背离必须卖出;'),colorFF00;
# p8 u- r/ b# F, W/ A V4 v7 ~" D0 PBBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4; 6 {- J) p. W# ^7 d6 I- x3 ~$ \
UPR:=BBI+3*STD(BBI,10); % ]. x. X- M2 v+ f5 J. K3 O
DWN:=BBI-3*STD(BBI,10); / o9 ~ t" T# u& B
VAR55:=(UPR-DWN)/UPR0.18; 0 A5 V& O& Z+ x& e& x( v3 U
VAR57:=(MA(CLOSE,60)-MA(CLOSE,5))/MA(CLOSE,60)>0.15; * z. O! E5 r, W9 t* R' j
VAR58:=(MA(CLOSE,5)-MA(CLOSE,60))/MA(CLOSE,5)>0.15;
@" I0 `3 j2 ^% S) l% _# R4 BEXPLAIN(VAR55,'布林线收窄大概变盘;'),colorFF00FF; - f$ G' {, R- B
EXPLAIN(VAR57 AND VAR56 AND CLOSE>OPEN,'布林上下乖离太大大概反弹;'),colorFF00FF;
& o& L1 }% g2 N. q5 A8 K% z2 \) ]EXPLAIN(VAR58 AND VAR56 AND CLOSE=0.01,'SAR向上突破提示买入;'),colorFF; - G, D. ^1 G8 j p* y5 W( A( ^
EXPLAIN(CROSS("SAR",CLOSE) AND (ABS(CLOSE-"SAR"))/CLOSE>=0.01,'SAR向下突破提示卖出;'),colorFF00;
9 y5 E7 ~( x; [+ ZTYP:=(HIGH+LOW+CLOSE)/3; 4 j" L3 r0 D0 j
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
$ c, L+ ^( ^% d ~9 b/ \3 mEXPLAIN(CCI100,'CCI指标高位,卖出时机。'),colorFF00; 4 S' l+ B+ z% Z, C/ \
EXPLAIN(VOL/CAPITAL>0.075,'换手过大,警惕主力出逃,短期头部。'),colorFFFF;
# s3 S& l' z; Y& l VWR:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
: F2 |- m; U% {, TEXPLAIN(WR>-20,'W&R超买,即将见顶,应实时卖出。'),colorFF00;
9 R; x1 I6 G+ r& C3 V6 ~/ M9 [EXPLAIN(WR=0.5,'ARBR人气指标非常,若股价从高价下跌,属买入信号。'),colorFF; G! T' b8 h- i9 B P7 }8 Q
EXPLAIN(("ARBR.AR"-LLV("ARBR.AR",10))/LLV("ARBR.AR",10)>=0.5,'ARBR人气指标非常,若股价从低价上升,属卖出信号。'),colorFF00; : e4 o! U- x& v* T% R Y# l+ _
EXPLAIN("ARBR.BR"300,'ARBR意愿指标表现股价随时下挫思量卖出。'),colorFF00FF; 8 Y4 Q- S/ Z& f! H/ q7 I
EXPLAIN(CROSS("ARBR.AR","ARBR.BR") AND ("ARBR.AR"300),'ARBR人气意愿指标死叉,属卖出信号。'),colorFF00;
' e' Z4 _5 u X7 j% qEXPLAIN((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;
K2 A4 e4 s. N3 O' u/ \& g# sEXPLAIN("CR.CR"18 AND (COUNT("ROC.ROC">REF("ROC.ROC",1),3))=3,'ROC变动速率指标表现短期反弹有望,属买入信号。'),colorFF; + o; O( g2 Z" Y$ J V2 C
EXPLAIN((COUNT(CLOSE18 AND (COUNT(CLOSE=2) AND (COUNT(CLOSE=3,'VR容量比率指标非常,表现股价即将涨升,属买入信号。'),colorFF;
# J' B5 I( A" b B% \% {2 qEXPLAIN("VR">300 AND (COUNT("VR"=3 AND (COUNT(CLOSE>REF(CLOSE,1),5))>=3,'VR容量比率指标表现涨势耗尽,发起卖出。'),colorFF00;
- ]% L1 d1 Y8 gVV6:=(2*CLOSE+HIGH+LOW)/4;
1 N2 ~2 T4 k m: HVV7:=LLV(LOW,27); & W5 s( g# z4 S% i; s( E' O
VV8:=HHV(HIGH,27);
2 G8 R' l- }. e攀:=EMA((VV6-VV7)/(VV8-VV7)*100,13)-50;
( U E) w! `- N9 ^" V金:=EMA(0.618*REF(攀,1)+0.382*攀,3);
! S( f# ^& n2 b. |: g; Z起攀:=CROSS(攀,金) AND CLOSE>OPEN;
}7 \* s/ _1 T5 G, n& W% e$ cEXPLAIN(CROSS(攀,金) AND CLOSE>OPEN,'起攀指标发出起攀买入信号。'),colorFF; & [3 H$ t" s! V! |% |
EXPLAIN(1=1,' 【均线体系分析】'),colorFFFF;
( ~5 K9 q+ d% _& ]4 ]MA5:=MA(CLOSE,5); 9 k# }; p; t# S5 T" o
MA10:=MA(CLOSE,10);
r' a& ^3 p; a9 s7 SMA30:=MA(CLOSE,30);
, P( L. h" h9 O6 m: QMA60:=MA(CLOSE,60); + Y- m$ }. ^: [0 l/ y
MA125:=MA(CLOSE,125); ) n/ Q. O- B: J
MA250:=MA(CLOSE,250); 4 B# }7 F. s. |& J) c* B6 a# @6 t
EXPLAIN(MA5>MA10 AND MA10>MA30 AND MA5>MA30,'短期均线多头分列;'),colorFF;
) N& I: Y1 q A) jEXPLAIN(MA5MA125,'中期均线多头分列;'),colorFF; O4 ~- J C" g8 S
EXPLAIN(MA30MA250,'恒久均线多头分列;'),colorFF;
0 g6 W! Y% F& K& Z bEXPLAIN(MA60MA(CLOSE,5);
# f: T* I( h+ B+ g+ L3 B穿头破脚:=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));
) ^+ ^, R6 w9 A. y平顶:=(ABS(HIGH-REF(HIGH,1)))/HIGHOPEN AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1);
+ l1 F6 }, k4 J& C双飞乌鸦:=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 |