|
黑马全息彩虹版
r1 G$ Q9 O2 X$ \6 E
: J7 b' S0 k+ |DRAWGBK(CLOSE=CLOSE,COLORRGB(130,130,130),COLORRGB(30,30,30),1); ' u) v& L7 O( T: _
上:=SMA(HIGH,21,2)*1.05;
; v0 f9 w) v: V2 |/ LDRAWTEXT(FILTER(CLOSE=MA(CLOSE,20),50,20); % {5 \' n' g2 M6 S0 a, E: m& ~
RH1:=IF(J=U2L,HHV(REF(HIGH,1),(BARSLAST(J>=U2L AND REF(J,1)=U2L AND REF(J,1)RH1)));
- S4 [* t) U5 `2 E+ G* a& S0 oRH42:=IF(HIGH>RH1,J,REF(J,BARSLAST(HIGH>RH1))); ( m4 [: Q* H, E' E, o; W! X+ ~
RH5:=IF(HIGH>RH4 AND J0 AND CLOSE=1,AA10,AA12),colorFF;
# B' M* i7 | I* q7 N# [( nFILLRGN(AA12>=AA10 AND BB100 AND 黑马趋势>1 AND LOW支持位 AND HIGH0 AND HIGHRL5,LOW,'←短买'),colorFF00;
7 M5 \/ i6 m3 a zDRAWTEXT(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 \ C9 p# S& d8 C$ N% gDRAWTEXT(VA AND 均线120-REF(均线120,1)>0 AND HIGHOPEN,LOW,'★宝马望月'),colorFFFFFF;
, B! m) Z: M+ M: _( LDRAWTEXT(均线-REF(均线,1)>0 AND CROSS(均线20,均线120) AND LOW=均线120,LOW,'三线着花'),colorFFFFFF; . G Y! w- y! j2 K# }/ A
短期底部2 LV(HIGH,30),LINETHICK2,colorFF; ; ^- n. E/ P$ b. x9 M$ D2 [8 r w2 k
上轨:SMA(HIGH,21,2)*1.092,POINTDOT,colorFFFFFF; $ ~# ]+ e( j. q. `4 D5 k2 h' ~
中轨道:SMA(HIGH,21,2)*1.017,POINTDOT,colorFFFFFF; 8 q+ W# o. \. f
DRAWTEXT(FILTER(LOWMA(CLOSE,15) AND CLOSE>短期底部2 AND HIGH=均线120 AND CLOSE=均线 AND HIGH0 AND 拦截-REF(拦截,2)>0,11),LOW-0.11,'★快马加鞭'),colorFF; # F" W9 v; T; H3 y
DRAWTEXT(FILTER(OPEN0 AND HIGH0.35,4),LOW-0.05,'★黑马狂奔'),colorD18073; 6 A) W j/ g6 r% `5 e. X) {2 j9 \
DRAWTEXT(CROSS(支持,均线) AND HIGH0,HIGH*1.14,'●逃命'),colorFF;
' _! W$ ^% `% qRDV:=SMA(LOW,8,1); 8 D% g( X! H: Z8 |# c1 l! Y+ ?
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; ' ] g( C# \; o0 m/ W/ c7 `+ f
DRAWTEXT(OPEN0 AND CLOSE>均线89 AND BB10>1 AND CLOSE/OPEN>1.04,LOW,'★天马过桥'),colorCC99FF;
( u! P- \" n2 G$ tSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,9,0),colorFF5B00;
+ |* m( U) A3 y+ W V# F. ASTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,8,0),colorFF6C00; 2 O- d6 I" Y$ ^4 h8 i9 A
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,7,0),colorFF7B00;
. w D! _) s$ p# uSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6,0),colorFF9C00; m; E ]4 z' P7 }, a
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),colorFFBE00;
( @9 o# [: a! p" L6 n3 p# S% FSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.5,0),colorFFCC00; m5 r, B1 n+ x {& X% ?# l8 S6 [
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),colorFFFF00; 3 {( q" ~, `' C' z3 T
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,9,0),color70084;
$ {/ G: Q! @) x. B3 i# e/ Z. Q! FSTICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,0),colorA3; # W) W+ o5 L7 P, n+ X& p( F: W
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,7,0),colorB7; - Z( a3 m8 X: F2 O: ]9 a
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6,0),colorCD; 7 c. _% k& i6 l# q8 d! J
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,5,0),colorE9; 8 k- q& l- H' _
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3,0),color754E9; / U+ P) o; w" C2 u2 y" N# |1 W* y
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1.5,0),color76EF3; ; \) T* Q2 N. g
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1,0),color77BF3;
* }9 w* {$ N0 n! l" ?7 m1 mSTICKLINE(CLOSE>OPEN,OPEN,LOW,1,0),color726CA;
7 k2 f1 ^$ A; q- _STICKLINE(CLOSE>OPEN,CLOSE,HIGH,1,0),color726CA;
o& q# Q. R3 H/ i' FSTICKLINE(OPEN>CLOSE,CLOSE,LOW,1,0),colorDE9100;
) G8 M/ c7 e0 q% t/ [STICKLINE(OPEN>CLOSE,OPEN,HIGH,1,0),colorDE9100; 3 ^7 h7 s0 }+ e ]+ ]2 I
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,9,0),color90FF; & P' C" @5 `0 F' m5 `% _! K
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,8,0),color9FFF;
" m+ n8 D7 f1 f% vSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,4,0),colorB5FF;
! B" }7 ~5 x1 {5 ^- rSTICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,2,0),colorE4FF; 4 [% r( N! }) i* t$ p7 f1 Q
STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,OPEN,LOW,0.7,0),colorFFFF;
; N1 A( B1 G/ j8 |) [STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,HIGH,0.7,0),colorFFFF;
. k! F2 R: x; a4 I+ zSTICKLINE(CLOSE85))>=1,'RSI相对强弱指标超买,属卖出信号。'),colorFF00;
2 a5 j4 I5 Y: ^. ^% c' J/ hEXPLAIN((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; + S: s6 x; q/ X1 {
EXPLAIN(CROSS("RSI.RSI1","RSI.RSI2") AND "RSI.RSI1"50,'RSI相对强弱指标死叉,属卖出信号。'),colorFF00; Y! B2 |( ^' O1 Z
EXPLAIN("RSI.RSI1"93,'RSI相对强弱指标极高位,猛烈卖出信号。'),colorFF00;
; _9 X$ Y4 Q, U% Q5 I z+ CEXPLAIN(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;
4 [& a a+ p8 REXPLAIN(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;
8 o R. \) ]. t2 i; n日K:="KDJ.K#day"(20,5,5); $ }, J" v4 o& k/ c, B) s
日D:="KDJ.D#day"(20,5,5); " A. z/ k. P d$ l
周K:="KDJ.K#week"(9,3,3);
/ |* @ a$ v4 c" G7 {周D:="KDJ.D#week"(9,3,3);
* X4 d# {7 q. I$ jEXPLAIN(CROSS(日K,日D),'日KD金叉且底背离买入;'),colorFF; % H. c( k6 x8 B: O" u6 ?# f$ e) P
EXPLAIN(CROSS(日D,日K),'日KD死叉且顶背离必须卖出;'),colorFF00; 5 Q' o- e4 y* J8 f
EXPLAIN(CROSS(周K,周D),'周KD金叉且底背离买入;'),colorFF;
" U; [) l4 J$ u& R4 e$ r( W. {9 REXPLAIN(CROSS(周D,周K),'周KD死叉且顶背离必须卖出;'),colorFF00; & i& v( f0 s: w
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
, z/ }9 }) i: A# O% a3 w% [UPR:=BBI+3*STD(BBI,10); : y% N+ C( X( d
DWN:=BBI-3*STD(BBI,10); $ w j4 U: ]5 i' h
VAR55:=(UPR-DWN)/UPR0.18; b" F% I |. q, x' y/ |
VAR57:=(MA(CLOSE,60)-MA(CLOSE,5))/MA(CLOSE,60)>0.15;
/ v- s, u( f7 S K) m+ f. }VAR58:=(MA(CLOSE,5)-MA(CLOSE,60))/MA(CLOSE,5)>0.15;
) K$ X- o& a% ^1 G6 G( UEXPLAIN(VAR55,'布林线收窄大概变盘;'),colorFF00FF;
( k2 b+ s# ^# DEXPLAIN(VAR57 AND VAR56 AND CLOSE>OPEN,'布林上下乖离太大大概反弹;'),colorFF00FF;
( ~2 n) e8 S X1 R/ f. y# SEXPLAIN(VAR58 AND VAR56 AND CLOSE=0.01,'SAR向上突破提示买入;'),colorFF;
. c9 H p, H2 n: DEXPLAIN(CROSS("SAR",CLOSE) AND (ABS(CLOSE-"SAR"))/CLOSE>=0.01,'SAR向下突破提示卖出;'),colorFF00;
* @$ B$ Q8 H- I8 R- q6 xTYP:=(HIGH+LOW+CLOSE)/3; % m7 P7 P8 h& A D2 ^* v: I- T0 s8 g
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)); 4 x# B1 U+ E7 ?, V9 M) r8 H
EXPLAIN(CCI100,'CCI指标高位,卖出时机。'),colorFF00; " q4 K; j5 T/ _+ C" L: l5 w+ Z
EXPLAIN(VOL/CAPITAL>0.075,'换手过大,警惕主力出逃,短期头部。'),colorFFFF;
0 H( D! B6 k4 q( UWR:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)); ' Q8 c9 S, L6 k( |
EXPLAIN(WR>-20,'W&R超买,即将见顶,应实时卖出。'),colorFF00; * }! R1 S. H# `
EXPLAIN(WR=0.5,'ARBR人气指标非常,若股价从高价下跌,属买入信号。'),colorFF;
1 ?# {( Z7 U7 \$ U% }EXPLAIN(("ARBR.AR"-LLV("ARBR.AR",10))/LLV("ARBR.AR",10)>=0.5,'ARBR人气指标非常,若股价从低价上升,属卖出信号。'),colorFF00; ( y6 N9 K+ E) t/ t% r: i
EXPLAIN("ARBR.BR"300,'ARBR意愿指标表现股价随时下挫思量卖出。'),colorFF00FF;
2 e# \/ u2 w4 UEXPLAIN(CROSS("ARBR.AR","ARBR.BR") AND ("ARBR.AR"300),'ARBR人气意愿指标死叉,属卖出信号。'),colorFF00;
9 T/ r9 _4 |# p$ G# X5 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 n& B# b9 P& ?" n1 F o
EXPLAIN("CR.CR"18 AND (COUNT("ROC.ROC">REF("ROC.ROC",1),3))=3,'ROC变动速率指标表现短期反弹有望,属买入信号。'),colorFF;
6 r- d5 u5 c* J! oEXPLAIN((COUNT(CLOSE18 AND (COUNT(CLOSE=2) AND (COUNT(CLOSE=3,'VR容量比率指标非常,表现股价即将涨升,属买入信号。'),colorFF;
8 s( i2 C+ F$ p$ j" O, \3 OEXPLAIN("VR">300 AND (COUNT("VR"=3 AND (COUNT(CLOSE>REF(CLOSE,1),5))>=3,'VR容量比率指标表现涨势耗尽,发起卖出。'),colorFF00; ' [7 p) c. Y% w9 H5 d3 T
VV6:=(2*CLOSE+HIGH+LOW)/4;
$ z1 b& U* @1 O- oVV7:=LLV(LOW,27); & p! f6 b; Z8 _. z9 g2 p: a
VV8:=HHV(HIGH,27); . p9 d# U X& `: i
攀:=EMA((VV6-VV7)/(VV8-VV7)*100,13)-50;
$ k* P! A, N1 e金:=EMA(0.618*REF(攀,1)+0.382*攀,3); * m# T L: @' u
起攀:=CROSS(攀,金) AND CLOSE>OPEN; 3 v2 \9 U: Y0 l+ P
EXPLAIN(CROSS(攀,金) AND CLOSE>OPEN,'起攀指标发出起攀买入信号。'),colorFF; 9 B4 O* r' h5 g. l: Q
EXPLAIN(1=1,' 【均线体系分析】'),colorFFFF;
* \. m# F$ g" H3 m0 q/ Z9 CMA5:=MA(CLOSE,5);
& B2 @/ E: g- E& X4 BMA10:=MA(CLOSE,10); . [: A4 n, B% ]5 A$ V; b4 l" [
MA30:=MA(CLOSE,30); 6 ?0 N( D! M2 Q, ~' }
MA60:=MA(CLOSE,60); - `# V6 `# l& K7 @
MA125:=MA(CLOSE,125);
* @0 m( O* y& A1 t* Q' T0 MMA250:=MA(CLOSE,250);
# R/ @+ J, R7 b0 c$ c. \8 ^EXPLAIN(MA5>MA10 AND MA10>MA30 AND MA5>MA30,'短期均线多头分列;'),colorFF; - h, I" c- ]+ v
EXPLAIN(MA5MA125,'中期均线多头分列;'),colorFF;
# ~+ c# h- V5 a- REXPLAIN(MA30MA250,'恒久均线多头分列;'),colorFF;
+ ?/ k! g& Y- ~$ ]EXPLAIN(MA60MA(CLOSE,5); # c( m1 r, M/ P4 Y
穿头破脚:=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));
! u. j9 B" H: L8 ~+ y4 L平顶:=(ABS(HIGH-REF(HIGH,1)))/HIGHOPEN AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1);
3 U# T4 T! f( g* N6 O( o7 G8 e: _6 \双飞乌鸦:=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 |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:05:46