|
这几天没有连续更新帖子的缘故起因是和几个朋侪一起研究指标公式,如今小有成效,特发出来供各人查验( j$ P( I) u- N
以下是部门源码:
. e- T$ S# R$ r1 C r1 k回归斜率线A:=EMA(SLOPE(C,4)*20+C,42);
$ b2 I5 k9 b8 E经典RL:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
, O. f( S' h2 w* m& I5 b* `经典K:=SMA(经典RL,3,1); 经典D:=SMA(经典K,3,1); 经典J:=3*经典K-2*经典D;
5 n0 y8 s% p5 r+ S" YMAHL1:=100*((EMA((H+L)/2,3)-LLV(EMA((H+L)/2,5),30)-(EMA(H,20)-EMA(L,20))) /(LLV(EMA((H+L)/2,5),30)-(EMA(H,20)-EMA(L,20))));1 P; q! j1 m; m( `* E' X, d
MAHL2:=IF(EMA(C,2)>回归斜率线A AND MAHL1>0,EMA(C,3),LLV(EMA((H+L)/2,5),30));{A}
) p3 v6 L5 d2 q' ~9 EMAHL3:=IF(EMA(C,2)>回归斜率线A AND MAHL1>0,LLV(EMA((H+L)/2,5),30),EMA(C,5));{A}
, y, j$ `' R( e* k5 W回归斜率带 RAWBAND(回归斜率线A,RGB(235,0,230),REF(回归斜率线A,2),RGB(0,104,154));* d( h% P: C; _8 y9 J$ [2 R) J
上线:=SMA(C,6.5,1);' {- z9 j0 @, d: h, R+ J4 W* D6 K
一号支持线:SMA(C,14.5,1);
" c" _6 T9 H: h! b1 c6 V上线1:=SMA(C,3,1);# L4 ~3 `- n" Y/ t0 z7 G
一号支持线1:=SMA(C,8,1);6 B8 N! t n7 j1 F
上线2:=SMA(C,3.5,1);
4 I% h( m! {* ?( i# TDRAWTEXT(CROSS(一号支持线1,上线1),H*1.08,'洗盘'),COLOR00FF00;$ @0 H* L" C+ w3 C( Z" @
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,25))/4;
% d9 s; ~/ O9 r: U, }' K/ @1 K' z+ CUPR:=BBI+3*STD(BBI,13),LINETHICK2;/ d) t: G- y6 j: K4 E% u4 s5 J) V
DWN:=BBI-3*STD(BBI,13);# c( _5 D# t) Q" k+ @/ D
安全:=MA(CLOSE,55),LINETHICK2;
" f. A' u- }4 [6 F2 b! hLC:=REF(CLOSE,1);
7 H/ C" G& ?' [' ]: ^; uRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100; ) H0 ` k' T4 N# J8 a! f9 ^: r
DRAWTEXT( CROSS(82,RSI) AND CLOSE操纵,LOW *0.92,'买进' ),COLORYELLOW;
, U# L a- o9 L# R. ?& }VAR1 LV(A7,21);
' k6 k- ?3 U# |& t. PVAR2:HHV(A7,30);
8 X% r- W, Y" t+ G& w* u! T0 ADRAWTEXT( CROSS(上线1,操纵) AND 上线1操纵 ,LOW *0.98,'全仓' ),COLORYELLOW;
. z! c" W1 O( h) I8 [SK:=EMA((A7-VAR1)/(VAR2-VAR1)*100,7);
: k3 T* `2 m* |( z8 N5 _SD:=EMA(0.667*REF(SK,1)+0.333*SK,5);
. T- ~- [ L1 z: p, c& ZM1:=1000*操纵/一号支持线=975; + r. @2 A7 e/ D8 r2 x, u
M2:=1000*一号支持线1/一号支持线=980;
9 R* y, k( Y4 _- T f5 `6 ZM3:=1000*上线/一号支持线=985;. {+ M+ Y9 P- I# O2 k0 M, U( z0 M
DRAWTEXT(IF(COUNT(CLOSE6/10 AND & W7 i Z6 m, w! E/ i
COUNT(SK>SD,6) AND REF(LOW,5)=LLV(LOW,120) AND REF(CLOSE>=OPEN,4) AND P1 V: j+ S5 u- Q& ^6 d! Z
REF(CLOSE>OPEN,3) AND REF(CLOSE>OPEN,2) AND REF(OPEN>CLOSE,1) AND 8 A4 ~0 G: ^6 d ]
OPEN>REF(CLOSE,1),1,0),LOW*0.94,'买进') ,COLORYELLOW;
4 l1 N# S9 J0 R2 j. L: l4 e4 F7 ]. T# yD:=MA(CLOSE,89)-MA(CLOSE,10)/3;
4 S; C, H1 E# N) L+ H% x' X3 a3 }DRAWTEXT(IF(CLOSEMA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08. j9 w- D" ~6 ^2 z6 o/ ~
AND CLOSE65,HIGH*1.02,15),COLORGREEN;, x0 S! V0 \% j# {
DRAWICON(CROSS(G,F),LOW *0.9,9),COLORYELLOW;
+ ` W" A6 \9 P" a8 h/ @DRAWTEXT(CLOSE>OPEN AND H1一号支持线 AND JOPEN AND 上线>一号支持线1 AND 一号支持线1>一号支持线 AND CLOSE>MA(CLOSE,一号支持线) AND 操纵>=REF(CLOSE,操纵) AND CROSS(上线1,操纵) AND LOW>VAR1 AND JOPEN AND 操纵>上线 AND 上线>一号支持线1 AND 一号支持线1>一号支持线 AND CROSS(上线1,操纵) AND LOW>VAR1 AND JOPEN AND CROSS(上线,一号支持线) AND LOW>VAR1 AND J |