| 
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码$ m% k; [3 _6 _) ]. g$ x3 A  ; K: y: h! s" p" e4 A# R. ?
 $ g8 K6 U" m" }) y4 X
 
 " C* c2 m$ o3 P0 i源码如下:! Y3 c5 B8 z; I( ?' z
  
 ' r) q5 i' e7 n3 [趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
 ' ?1 |+ x1 z: e. lSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
 ) e( ^% U: X& F! c! ESTICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
 I$ u6 [' E% J$ a, UIF(趋势>50, 趋势,DRAWNULL), COLORRED;' R% R. |5 r1 i" ?! G
 RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
 $ N% ~, m4 \5 kK:=SMA(RSV,3,1);
 2 M& h" h2 Q* E/ wD:=SMA(K,3,1);
 ! G/ J9 Z, q! J, C6 i: G% @" bTYP:=(HIGH+LOW+CLOSE)/3;6 L& `& m$ R9 B/ k$ ^
 CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
 % l  a5 L7 d  F. _4 a1 u/ lDIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
 , ~, y; J, ^3 K, cDEA:=EMA(DIFF,6);( w" f2 `' G4 M8 C% T& w; p
 MACD:=2*(DIFF-DEA);) Y1 y- w; f, P$ ^  o
 转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);3 k4 h& o$ {8 U; r% z) f
 STICKLINE(转点=1,50,50,6,0),COLORYELLOW;2 E9 e- X: _. ^+ q$ d
 STICKLINE(转点=0,50,50,6,0),COLORCYAN;6 w. E) Z! p$ Q7 V0 }) z
 顶部:90,COLORYELLOW;
 # k, u- T3 `9 G底部:10,COLORCYAN;
 ( H/ `: K" }& T& a  D' n6 ~0 g! [判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
 ' {6 a) Y) v2 [0 d$ LIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
 6 k3 y8 i* }- n9 E3 BIF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;
 3 ?8 p5 ?9 b* l' m$ I. b- t5 ^DRAWICON(CROSS(趋势,判定),判定,1);0 s5 D' I- H' w' U
 DRAWICON(CROSS(趋势,顶部),顶部,2);
 / i1 V$ s" {/ b; ?) dLC:= REF(CLOSE,1);! r# S# s9 q( e# |9 \
 RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;( H1 Y! u# w) E. {, n1 c. ?# h
 VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
 9 X" E1 z+ D- E! J' R+ lVAR2:=SMA(VAR1,9,1)+100;+ U+ n; V& S$ \- U0 e0 q$ X
 VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 / L( K6 `- m/ wVAR4:=SMA(VAR3,3,1);
 * d* R' s4 I: d* D! ?; t+ u! V! hVAR5:=SMA(VAR4,3,1)+100;; g% e" M1 m' H% F
 VAR6:=VAR5-VAR2;$ Y6 [: o8 q2 i
 趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;
 0 N( y2 W( U. K" t- _VAR2Q:=REF(LOW,1);
 2 A! v- t# r+ m5 N2 [VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;# _* {4 k9 O$ L( _( D2 t% ~
 VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);! I! x1 g, U" F% Z' D& o. V' w% v
 VAR5Q:=LLV(LOW,30);
 9 e/ n( M7 B$ ]& QVAR6Q:=HHV(VAR4Q,30);
 1 w9 z. B2 E3 x  F  H- B6 bVAR7Q:=IF(MA(CLOSE,58),1,0);) O" k0 c% M  f; C
 VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;( \' s, V. l( ]# F0 N* q/ I6 T( s
 火焰山:=IF(VAR8Q>100,100,VAR8Q);
 0 _* i6 B. Q' F9 z% [% TSTICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
 6 s5 }7 {/ g1 k' l( RSTICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;1 B/ }" G8 ]( q+ {  j6 y, y/ g. {
 STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
 4 `) K( C7 `6 s" q) bSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;, y, c. J- H; Z. L2 d$ p$ Q& L
 STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;' f. o9 |- p) l8 D
 STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
 , {- V/ ^% y2 NSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;; U! t; q$ A0 Y
 STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;; O! d) ~4 B$ X& y+ H# K& f1 ^
 STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
 % b$ u- P* K' G& C$ g$ a- q( hSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
 & j" C& B$ b+ ~8 T& HSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;3 R; p6 G$ a! X: f$ o4 x
 STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;
 3 T$ e  b+ \8 u3 {+ U* K  x6 MSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;) X( p' S4 H% o: W0 P
 STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;4 G. `+ r3 \8 O- `# E  t) i& j
 STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;* ~: M( f0 ?( \+ F( H9 R, B6 U
 逃顶:=CROSS(82,RSI);2 s5 u$ S# {  [! z
 STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;4 Y; V- [0 J8 V2 O- M- u% _% O
 STICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
 5 N4 e) b. U5 w1 u) ySTICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;; ^0 ]' ], G0 i3 f& J
 STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
 " w% E) ]9 p: RD1:=(C+L+H)/3;
 + G4 W; x7 p2 T8 HD2:=EMA(D1,6);; b9 W2 a5 \" z9 Z
 D3:=EMA(D2,5);
 ' v4 A# U- ^/ s9 T# Y) c* c+ ?) ~BBUY:=CROSS(D2,D3);) r( }" d% Y7 A4 `1 S0 l& [* r
 风险区:80,COLORFF85FF;
 . E8 N$ F0 g- L. S- E, ]& x平安区:20,COLORYELLOW,POINTDOT;
 * ]& R' l7 ~/ W& f- j8 o: {天线:100,COLORFFFF00;
 , w1 M; i5 T1 P7 G) d7 N强弱线:50,COLORGREEN,POINTDOT;
 3 c5 `: m" e& H- b7 R6 lDRAWICON(BBUY,(LOW *1),1);
 8 W0 A& C4 Z, F& EVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
 4 k, X4 j7 G( A. X& H% l" |DRAWICON(CROSS(82,VARR1),HIGH,15);2 {2 o$ E: x* s+ m3 {
 DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;# {* S6 X5 C" u& C" _+ e
 {用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}
    tdxjietu1.JPG (277.4 KB) ' ]5 c3 w$ Y+ V* Y. i7 P时间:2015-9-4 20:077 R% _% w# z1 P0 g* g
 股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】
 |