TA的每日心情 | 奋斗 2021-4-11 17:52 |
---|
签到天数: 847 天 [LV.10]签到十级
五段
- 积分
- 26580
|
MMA5:MA(CLOSE,M1);) K4 t- Q* ^4 _. g- m9 p
MA10:MA(CLOSE,M2);
7 ]5 O& X+ h: S0 G8 vMA20:MA(CLOSE,M3);
; k! \ V! `9 pMA34:MA(CLOSE,M4);' r( G$ r2 S6 k' I! T! k7 u# j4 L
MA55:MA(CLOSE,M5);1 U2 [- g) M/ Q3 ]7 q
MA89:MA(CLOSE,M6);
: G) n2 y8 t0 U W( Z- ^MA144:MA(CLOSE,M7);) |9 k5 }; {" j. D, m7 H1 F9 o
MA233:MA(CLOSE,M8);$ g, t# D" f. R5 F! I
MA377:MA(CLOSE,M9);6 l0 Q2 e+ L& V7 _. k
MA450:MA(CLOSE,M10);
) Q C1 D. v& B7 k0 M, S( x1 R$ b8 X2 GMA610:MA(CLOSE,M11); & N; O: W) d, [+ {6 L9 d
涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
+ f- s' H+ ^9 n* E平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;, N, [' t7 s! Z p
跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;
. {3 [0 s9 x6 R( D, K5 r7 L4 CDRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;
. Q2 z. [$ H/ m4 UAB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');
) ~, x7 s6 T, g$ \4 e! YDRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;! f: J6 J7 S7 P5 H3 l% c
流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
5 }; r4 f f* BDRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE; ~# ?( X; ~' O1 {" A
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
' n* f B2 B4 @' q C1:=REF(C,1);
9 v% `9 _* {! Z5 Y. c; \ ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;, L9 e/ s5 C# g
非ST涨停:=IF(1.1*C1-C<0.005,1,0);
4 {( O4 N4 o1 o) }- V 涨停:=ST涨停||非ST涨停;: I0 a. A! j7 O: X- X; G0 s0 |
STICKLINE(涨停,O,C,2,0),COLOR00FFFF;! T$ t. Y* s8 b h j8 N+ r* s. d
STICKLINE(涨停,H,L,0,0),COLOR00FFFF;, f8 g/ [% r$ w& s d
ST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;, O; m8 M& U. K f; {: U$ n) q& } x
非ST跌停:=IF(C-0.9*C1<0.005,1,0);5 Q0 I) n' V1 Y& @ d, F$ a
跌停:=ST跌停||非ST跌停;
$ t9 v- ?/ x0 c. s STICKLINE(跌停,O,C,2,0),COLORGREEN;
. e0 W4 B" B/ R STICKLINE(跌停,H,L,0,1),COLORGREEN;
7 @1 y7 h" o" S; ?6 J 半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);
4 k { u7 A$ s: Q' n' f& t/ H 半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);
. i) R- {' Q, ~5 o. T) k' a JRS:=半涨1&&半涨2&&NOT(ST);
: [! H. T% O# u) r0 D; C2 j {STICKLINE(JRS,O,C,2,0),COLOR0066FF;
1 @* |: H9 y/ W2 E STICKLINE(JRS,H,L,0,0),COLOR0066FF;}9 B- k' B; Q" O2 A9 n" e- ]: ?
{涨停次序标注}6 w9 |( c5 ~2 U" p8 _$ O) X8 ?
NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;
# S% X0 E& a" F7 d DRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;
' U* T: }9 n; F3 _: D0 k* r& x z8 U 上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;
9 z: m0 H5 E! n9 R# Z( p0 x% V. \AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
* U" D6 _) E7 F. f* g: G4 |7 z A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);
2 N9 m9 o! O0 U& |5 L% \, O6 m+ X% r AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;
: u2 e/ t8 q/ `3 S' @1 z& \: O; Z" c* nSTICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;4 [8 Q2 S% V# R
节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',1 n, `" C& l. b2 E/ J
IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',6 n" q- o/ j( }( l
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',0 [1 W/ [+ o3 Q7 O4 M0 n3 R) `
IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',
9 C( [$ W2 S& s4 v* N IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',; t, F8 O! ~3 G* C9 k
IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',
' ^( {( g% r8 ~0 B' R- t# \( ] DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;
4 F B: `+ g5 ` 月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',
6 P3 }5 ]# j$ L. f& E IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',
/ k" t4 [# p. Z IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',2 @0 |( M0 |, A# @5 w: ?/ Z }7 {
IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',# N: r# f" Q) C" m
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
: V5 v7 w4 S8 J3 X" l IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
- h- P6 W3 C2 _# ]; a( _ DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
j: K( K1 J$ G! z0 T, i: ]7 t" R 输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));7 n% r* {8 w( m( X7 `: P* s4 G$ Q2 \
DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;' T, O# b' j( l" f0 ~
! `- ^ v r4 P6 i+ ? |
|