TA的每日心情 | 开心 2022-5-24 11:38 |
---|
签到天数: 1563 天 [LV.Master]签到十一级
六段
 
- 积分
- 47180
|
MA5:MA(CLOSE,M1);9 a9 n8 F* M; G$ O" Q; V
MA10:MA(CLOSE,M2);
7 n8 O' P& I5 n1 ?- G- k2 k5 BMA20:MA(CLOSE,M3);3 E: |- T# _7 D& J. _- M9 V* H y
MA55:MA(CLOSE,M4);* `& _$ j M/ g/ Y+ v+ a( y
MA89:MA(CLOSE,M5);: r- d3 J! \+ Q4 x7 Y$ d& l
MA144:MA(CLOSE,M6);
4 L9 _( \+ M: n Z+ [$ G' ^MA233:MA(CLOSE,M7);
8 W$ z. }+ |8 }) L0 u R, o$ lMA377:MA(CLOSE,M8);1 s& G( ]" x( T3 A* t
MA450:MA(CLOSE,M9);9 X) X: ^) }, }! B, O
MA610:MA(CLOSE,M10);/ E' P& D+ F( I! W
涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
) Y2 K% R3 i) v5 H平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;
. Y4 k9 [: V( }0 ?/ ~# ?跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;* d/ s: F R2 \" f4 ^; Y8 F6 l; m
DRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;+ w! k5 C& e* J5 l' b
AB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');
1 Y5 J1 `- Y- f) s6 y* ODRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;1 P( \* l5 ^# e* m9 r1 q; `8 |
流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
! G0 E. K. g8 |' z( {DRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE; r% `$ X0 j8 G6 R# c" m. f, r5 L
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');" J& t' R0 h6 }+ G) o0 r
C1:=REF(C,1);
" w% Q5 b) s) ^- p IST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;
: X6 f7 U# k5 }" s# ]$ x非ST涨停:=IF(1.1*C1-C<0.005,1,0);
* _4 X- w7 y& T* Y涨停:=ST涨停||非ST涨停;- j2 u8 J- Y! o( b# N }
STICKLINE(涨停,O,C,2,0),COLOR00FFFF;0 Q2 @. A' U# w
STICKLINE(涨停,H,L,0,0),COLOR00FFFF;$ j' o) u1 U0 T/ e: j% a3 [
ST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;1 s( v; i( }( j3 V8 S1 C
非ST跌停:=IF(C-0.9*C1<0.005,1,0);5 O/ I, W2 D* C* n* @4 N
跌停:=ST跌停||非ST跌停;
0 P1 q8 F2 b# K/ o- ASTICKLINE(跌停,O,C,2,0),COLORGREEN;
2 @8 S3 J, l- A: G& B& W; N- a8 ySTICKLINE(跌停,H,L,0,1),COLORGREEN;+ e* @4 V; U/ z1 _3 p3 ~' X
半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);
7 a6 l) i4 H& a9 {半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);
" M0 f7 z7 Q; \4 GJRS:=半涨1&&半涨2&&NOT(ST);
' Q/ ^8 C$ @ }. p) h' K+ {{STICKLINE(JRS,O,C,2,0),COLOR0066FF;
" C$ l, G; J6 q0 [6 N! ^; V" M7 X: `STICKLINE(JRS,H,L,0,0),COLOR0066FF;}
5 L6 J1 |! ^3 @& O{涨停次序标注}
1 w6 H, h3 A! ~/ c& Z* uNUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;
W9 j# b( h S( g2 h; j& f4 A$ A9 RDRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;
( F7 w% j( n: Z- V \# r上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;2 T' E5 a% x0 `3 I. U7 ]% h
AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
& @& X1 c: r; u I( W: e5 gA节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);% M# i% y. z. Q* l+ ]# Z# F
AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;4 c2 N, {4 ?( r3 q. ?. _! [# `
STICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
1 K1 l1 @3 c0 N# A4 u( x* u9 O节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',. S5 T X* r: U
IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',9 p j2 l% k1 {! W, p
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',
& u$ u/ K: j' ~! sIF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',, {; k5 A8 O9 i0 p5 K7 V- y
IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',- x' U5 ?- M3 j: W( Z
IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',+ l, h' s* _) U+ ]' |! C# T
DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;/ `$ I) @! Q( R, P c. [0 O
月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',
0 l2 @1 o: v* F; i7 H4 F+ _IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',6 N+ n: M5 ~8 e* ~; s. P" r- v" s T
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
; [, i7 \4 @8 t9 NIF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',& e# |/ l1 ]6 w7 e# q3 A) N
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',$ F; m! t6 C2 q3 n
IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
: ^- V: c! d# O* z) Q* L" N; u, w/ cDRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
! z4 X. z }# i$ K3 H) r输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));
8 G$ N+ [! ~! @5 O' m+ A- [2 xDRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;
/ I' Q7 Z6 A$ ?* f% C0 P
|
|