TA的每日心情 | 开心 2022-5-24 11:38 |
---|
签到天数: 1563 天 [LV.Master]签到十一级
六段
- 积分
- 47060
|
MA5:MA(CLOSE,M1);
8 i+ L' e1 A) hMA10:MA(CLOSE,M2);
3 B9 @6 b6 v5 I& DMA20:MA(CLOSE,M3);# _& L, u2 H5 O5 \) M7 E/ L& V
MA55:MA(CLOSE,M4);' V+ t6 N# S# H( G0 C3 A* c
MA89:MA(CLOSE,M5);! [9 y* i ^4 ~8 x7 B+ q W
MA144:MA(CLOSE,M6);/ l, W6 H' M u" }
MA233:MA(CLOSE,M7);
! \5 I6 H; b' S: {# IMA377:MA(CLOSE,M8);
' i+ O- p8 Z5 T! H! }. pMA450:MA(CLOSE,M9);
9 m/ }0 R0 g p2 D/ bMA610:MA(CLOSE,M10);
0 A+ b2 G3 q! t3 J5 x) t/ e涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;! |; Y% p+ |/ \
平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;
6 [3 f+ k- Z9 e% d5 Q% l跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;5 n% ^) k( M! q3 s
DRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;. X" u6 ^8 h* D
AB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');
- d! ^5 {4 s7 i9 H! Y3 SDRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;# a O6 O* }3 r6 m
流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
8 \, x7 w$ j! J5 b( hDRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;
' ^/ t! W0 J* |6 [% T. d4 bST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');( K8 o# T! W L$ T3 }
C1:=REF(C,1);
|, s/ R0 t; T. v. yST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;
+ c" w) f+ w" B& f8 C5 A+ {; H0 N# T6 v6 S非ST涨停:=IF(1.1*C1-C<0.005,1,0);8 X1 g- i$ _3 q0 V& _& p* r! m
涨停:=ST涨停||非ST涨停;
+ G* V. [* i) k! c2 kSTICKLINE(涨停,O,C,2,0),COLOR00FFFF;
7 S! F. O+ E. |) ~$ C$ s% NSTICKLINE(涨停,H,L,0,0),COLOR00FFFF;& U, |' [0 q* Y; B* }1 V
ST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;3 Z. E$ D/ n) H
非ST跌停:=IF(C-0.9*C1<0.005,1,0);
/ z/ g& m; p/ ^' w跌停:=ST跌停||非ST跌停;' C; b8 ^( Z) `# p
STICKLINE(跌停,O,C,2,0),COLORGREEN;
4 D/ I4 B; X/ x5 ~& ]8 ]STICKLINE(跌停,H,L,0,1),COLORGREEN;6 h2 d( p1 E1 w0 ~* T1 d* H" J6 ?
半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);
. V! C( Z' g n. N# ]% O) a半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);
+ v8 O4 i1 x" h0 W s* i" ?/ \JRS:=半涨1&&半涨2&&NOT(ST);! b3 r- b; K& H& P% q9 w
{STICKLINE(JRS,O,C,2,0),COLOR0066FF;+ H+ t% M" r% F$ W
STICKLINE(JRS,H,L,0,0),COLOR0066FF;}% k. ~+ m' k6 e4 J5 H$ d! |, U
{涨停次序标注}
" g( b) v4 k: T0 ~2 QNUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;5 F ?1 o$ ?7 i. G1 S* u
DRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;& k/ b! E h# M5 t5 O+ H7 h
上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;
0 y8 D! G6 y6 Z$ W* }& wAA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;" n# m. E9 G4 m
A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);, c9 e1 T5 o" E, o! V6 W& h2 S
AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;
( Y0 G% R- I/ ?, w1 M7 u# OSTICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
6 ^: P$ P- J- ?. b1 m节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',; D1 [9 X& l/ K
IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',' H" D4 {; o# R# N
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',/ _' o" x2 C! _ R% r
IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',
7 M$ K/ w% P2 NIF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',# l8 T9 {0 y0 z: W
IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',; D6 I% m5 K y6 b
DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;4 Z% r; f! b- E& ~! }& d
月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',
+ Q6 [- F: ]3 `0 Z' e; b$ M( O8 E& vIF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',1 U7 f& y; Y% Z5 w8 Q _
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
5 |: {4 [, I7 ~4 Y- K7 pIF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',2 h* _& T) O7 ^- k8 w" Q
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
6 \8 w' ^# Z: S" W1 q3 F" ?IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',4 O/ ~/ G3 S3 r( g0 @5 _4 G
DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;% X' c. | p" T5 v. ]
输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));' b/ J, P/ x# f. I
DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;4 e8 K& p8 R9 W- I1 S) B! H& Y4 b
|
|