|
源码:
. C' i5 u- [' Y" i2 r
% W$ P7 i: l( r8 `& V周换:SUM(V/CAPITAL*100,5),NODRAW,COLORMAGENTA; + i' I) t }( V9 @& ]8 S
推测:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,VOL),NODRAW;# L7 O4 C+ G+ ^& ^8 E
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,推测,0,-1,-1),COLOR00C0C0;/ r7 P" ?& |* R0 A. r! J2 u; K
持币:IF(SAR(10,2,20)>=H,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORGREEN;
4 f0 K0 T( W# u1 C2 s持股:IF(SAR(10,2,20)OPEN,AA*(HIGH-LOW),IF(CLOSEOPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE=3*REF(V,1),V/3,V/3,3.9,0),COLORGREEN;; }9 B: J* h5 ^; ^' Y$ [6 ~
STICKLINE(V>=2*REF(V,1),V/2,V/2,3.9,0),COLORYELLOW;1 b1 \0 c* g% Q
DRAWLINE(V>=HHV(V,30),V,V OPEN),CLOSE,OPEN));0 j# b, c4 e( N! o. S$ A$ d0 a
VAR10:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);
: Y: }9 v$ t2 F& W8 QVAR11:=((VAR8 / VAR7) * VOL); E) o' q" U) B8 g
VAR12:=((VAR9 / VAR7) * VOL);
2 M$ |; K# {. A+ `' J, ]) E, PVAR13:=((VAR10 / VAR7) * VOL);* ]$ H' O& Y$ S
VAR14:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));5 Z0 J! Q8 E# k7 P, J+ R1 e7 Z' y. ~
VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100);2 n% p! X0 O5 T/ G" ` R: i6 w, \
VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60)));% h( n1 ~/ Z( k) Z! k
VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30)));. N, O6 H, B! c: ~; @! Y
VARD:=REF(CLOSE,1);
. {. t2 \; ^/ KDRAWTEXT(((VAR14 > 2) AND (VOL < (MA(VOL,5) / 2))),V-15000,''◆''),COLORFB2DFB;
5 V @, l) ^1 z7 j9 iDRAWTEXT(((VAR14 > 2) AND (VOL < (MA(VOL,5) / 2))),V+59000,''地''),COLORFB2DFB;" [6 S5 r# j* t7 ~3 F$ x7 M
换手率:=((VOL / CAPITAL) * 100);, B/ k5 e: h. J
DRAWTEXT((((VOL / REF((SUM(VOL,5) / 5),1)) >= 2) AND (换手率 > 1)),(V+55000),''变''),COLORFFFFCC;; A% t" C. D; q, V- b0 g
量:=IF((CLOSE > 200),(VOL / 1000000),(VOL / 100)), LINETHICK0;
* V5 x9 R6 e. C. T' z振幅:=(((HIGH - LOW) / LOW) * 100);
& [* g7 f1 z, s9 \' j1 ]% [8 FDRAWTEXT(VAR12>VAR11 AND VARA>2 AND VAR12>VAR13 AND CLOSE>MA(CLOSE,5) AND CLOSE>MA (CLOSE,30) AND HIGH>MA(CLOSE,60) AND VOL>MA(VOL,5) AND VAR12>=MA(VOL,5),V+5000,''高''),COLORGREEN;
" X- b) O3 O5 RDRAWTEXT(VAR13>VAR11 AND VAR13>VAR12 AND VARA REF(A07,1))) AND (A05 0) AND 趋势 20),A014,0);
& D1 n1 q! w: n5 K, ?3 bA016:=IF((HIGH < A011),0,IF((LOW > A011),1,(((A011 - HIGH) + 0.009) / ((LOW - HIGH) + 0.009))));
) e4 s. h! o [2 EA017:=DMA(A016,(VOL / CAPITAL)) * 60;8 T2 o; |% p7 K+ R
A019:=IF((((A017 >0) AND (A017 > REF(A017,1))) AND (A015 >= 88)),A017,0);
' D! }# r8 ~7 q3 G1 Y0 lVAR21:=3*SMA((CLOSE-HHV(HIGH,27))/(LLV(LOW,27)-HHV(HIGH,27))*100,5,1)-" @( d2 H6 M8 K4 N
2*SMA(SMA((HIGH-HHV(HIGH,27))/(LLV(LOW,27)-HHV(HIGH,27))*100,5,1),3,1);
* m/ \0 v; Y2 }$ NVAR22:=EMA(VAR21,8);
' ], d: ?" P4 M) J+ mVAR23:=3*SMA((HIGH-HHV(HIGH,55))/(LLV(LOW,55)-HHV(HIGH,55))*100,5,1)-& x: ]0 I+ t" K* T
2*SMA(SMA((HIGH-HHV(HIGH,55))/(LLV(LOW,55)-HHV(HIGH,55))*100,5,1),3,1);- Y: i- V3 ?) S; l. H. C
趋势1:=EMA(VAR23,3)-10;
3 n' E+ R: C0 \# eSTICKLINE((A019 > 0 AND (趋势1REF(趋势1,1)AND 趋势1=HHV(V,10),V,VO,1,0);# {) [* T w3 Q* n/ M9 }9 Q4 Z
DRAWICON(入货点=1,底部地区*1.2,1),COLORBLUE;, i5 U$ G. L$ [, a& k+ @$ S
DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J" |