TA的每日心情 | 开心 2022-5-24 11:38 |
---|
签到天数: 1563 天 [LV.Master]签到十一级
六段
 
- 积分
- 47180
|
MA5:MA(CLOSE,M1);
) B$ b n. e, Z) [5 \, MMA10:MA(CLOSE,M2);
0 w- J5 e( D& P* E' k+ {$ x cMA20:MA(CLOSE,M3);3 [- @& J# l9 R$ Q- z
MA55:MA(CLOSE,M4);& M* |2 C& k6 B. x. Q; k& F
MA89:MA(CLOSE,M5);2 H0 ~- F% F2 v2 O+ j0 \+ o
MA144:MA(CLOSE,M6);
& \7 o# J9 m3 Q( ^- xMA233:MA(CLOSE,M7);% E7 R- L; r6 x3 _- A2 Y
MA377:MA(CLOSE,M8);6 ^- b/ l5 e5 c+ P
MA450:MA(CLOSE,M9);( |- m7 `# M; ^% K3 }
MA610:MA(CLOSE,M10);: M* i6 Z k C3 I0 N5 ^# X
涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;/ O% X; R3 Y! u
平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;
+ c/ ^! c- x; T跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;
5 y' @/ t( E! O6 j0 Q# SDRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;1 K Y4 q2 P+ x" Q
AB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');
6 z4 `3 H6 r6 T) t! v/ w0 Z: z6 LDRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;9 s* v0 |2 R' l1 J+ K9 a3 i0 R' Z
流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
5 ~4 _) j+ k, Z& }5 D' xDRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;8 t1 _3 v; _1 D' ^' K( `
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');9 U) |. F9 B# [# R& b, m) b2 y
C1:=REF(C,1);5 \6 [# v/ H4 z
ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;2 Z& j% T% n; ]2 |( q# n8 G
非ST涨停:=IF(1.1*C1-C<0.005,1,0);2 ?- j0 r* e" H H0 K* ?
涨停:=ST涨停||非ST涨停;
$ a2 q | A, N& u* G+ {4 mSTICKLINE(涨停,O,C,2,0),COLOR00FFFF;8 T% u% ]4 o& T( B5 [
STICKLINE(涨停,H,L,0,0),COLOR00FFFF;
, c4 @8 ^8 x# l* [+ fST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;5 \, E4 ~' a$ ~) E7 F7 y; o5 O
非ST跌停:=IF(C-0.9*C1<0.005,1,0);
9 ]! ~! h4 V" ?( _% w5 m跌停:=ST跌停||非ST跌停;
% |4 u) \! P/ o5 O, zSTICKLINE(跌停,O,C,2,0),COLORGREEN;5 b* ], {" q5 ]6 o8 z4 R5 G
STICKLINE(跌停,H,L,0,1),COLORGREEN;
. \/ b, V e7 }, e# \, A半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);
( l+ a7 l0 ]! s+ Q半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);
' E' W" t. a3 p: y- fJRS:=半涨1&&半涨2&&NOT(ST);
4 t7 S# w6 x: p* W0 }{STICKLINE(JRS,O,C,2,0),COLOR0066FF;
3 X) T# h9 H" M7 bSTICKLINE(JRS,H,L,0,0),COLOR0066FF;}' b* S% U2 _: }. l. N/ M
{涨停次序标注}
+ g/ D8 |7 W' ^1 K* P' u( z+ s: S9 {NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;
) ?+ w4 X2 N3 a0 SDRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;
% u4 f% `$ S+ q+ O X7 ]上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;
% G- j/ k& B# I$ RAA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
$ V5 ? ~; Q6 v* Q0 B/ VA节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);5 b4 R7 L+ H4 g% C
AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;
3 ]2 p9 T8 i: a I# p& WSTICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
" J) H0 p( f0 _6 t" ^节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',
$ y. S y+ H; jIF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',
! w4 v$ d; M: Z- iIF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',
$ U" [ [1 P2 fIF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',
8 v+ S( ~* h3 OIF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',6 X0 n6 u; K8 D8 D1 O
IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒', y! s( W. O. k+ H0 Q
DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;+ Q* D, S$ @% T4 S
月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',
4 C# a1 ~( w dIF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',
" {/ ^+ ^& T/ o/ |9 P/ rIF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',& s0 ^" \& v: t7 w* D: }8 ?! {7 q& l
IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',- d/ \# N# \8 h
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
7 U1 p4 ~. o0 p) YIF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
- J9 d% T8 H! C* n+ k) E5 r- q4 f F1 `DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;# K+ f7 n) ^) x7 A
输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));
" L$ L. u1 ~5 Q* w+ [DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;
7 C$ p6 p% k' Y j+ ~$ l: w
|
|