TA的每日心情 | 开心 2022-5-24 11:38 |
---|
签到天数: 1563 天 [LV.Master]签到十一级
六段
 
- 积分
- 47180
|
MA5:MA(CLOSE,M1);4 v- z& v5 m W% a# d7 T% E g4 {
MA10:MA(CLOSE,M2);! f' |% ^1 X( X- K( K7 y
MA20:MA(CLOSE,M3);" U4 h; w W( H. `
MA55:MA(CLOSE,M4);: Q' k+ B% k9 g. e& O9 X/ _
MA89:MA(CLOSE,M5);
" N4 s9 A3 W& o% V* f8 @& ?MA144:MA(CLOSE,M6);
0 V0 E9 |! i' D# }9 x" @MA233:MA(CLOSE,M7);
4 e: U: } o/ NMA377:MA(CLOSE,M8);
) h2 p5 h; F0 Q5 P/ ZMA450:MA(CLOSE,M9);
8 E' p% c: W3 _! TMA610:MA(CLOSE,M10);
6 y! [6 P; H/ g* G* }1 r0 y) M0 e涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;2 m7 q; V' [. [& P, w
平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;
8 q, P; H f0 i% r3 s" K跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;: |9 J& j6 z7 x+ H+ |
DRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;. L( b$ t0 |( K' P7 ~; r
AB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');
7 Q4 i2 O+ V# t4 h: F. z) tDRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;3 U5 j6 z! O0 T6 u6 F% x9 `$ z
流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
. a1 a* f9 ] [+ p) @. F J% YDRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;5 m, \* b* c4 c* `0 R& X7 @: v
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
7 U9 A7 S- C# s% b. s" M9 W0 GC1:=REF(C,1);3 }6 j& b& G4 u+ l$ r! b
ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;
( F5 |2 E, @: A非ST涨停:=IF(1.1*C1-C<0.005,1,0);
( H- I. N- Q; U+ T1 z% C涨停:=ST涨停||非ST涨停;* P. c$ A& L; H2 @/ D( q4 R
STICKLINE(涨停,O,C,2,0),COLOR00FFFF;
: ?' }% p# ^- B- R3 R! B2 QSTICKLINE(涨停,H,L,0,0),COLOR00FFFF;
+ C6 P: m. ]9 }* x( G- \! A, tST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;' d; m" ~+ X! W: E- J' t- C
非ST跌停:=IF(C-0.9*C1<0.005,1,0);0 i4 ^' A- N" Z5 e* T# r
跌停:=ST跌停||非ST跌停;
$ p+ O: K% M1 I5 q- A; y$ T" jSTICKLINE(跌停,O,C,2,0),COLORGREEN;
% q# F: I7 M3 n8 L. ]7 \STICKLINE(跌停,H,L,0,1),COLORGREEN;
1 d! X2 I* S) L8 d! A半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);
) ^! |( B. b' h+ `4 J2 p半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);* K& N3 ^4 d' V3 m
JRS:=半涨1&&半涨2&&NOT(ST);
5 L- v5 x8 t! j0 s{STICKLINE(JRS,O,C,2,0),COLOR0066FF;
S! P5 |) g3 f6 t( I2 B. cSTICKLINE(JRS,H,L,0,0),COLOR0066FF;}
" u& z' w$ d6 L{涨停次序标注}2 S# {& T1 L& x6 ^( V
NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;
+ u( K& c; l% g9 H- u" mDRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;0 U/ }& q7 ]; s, o' ?
上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;
$ `& y& c" Y' }AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
% \7 b8 Q" J/ k w( c5 D: ?! r, ^A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);, t, n9 y) P) F" F# T
AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;
- W& M& @, [7 G6 H9 SSTICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
. k8 J; U% U% n' F6 y# G节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',' S: h5 T2 W$ N8 s3 Y* T
IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',5 J' z; R; _* ]) h4 t- W) ~" C
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',- ?+ a) D8 A" ?8 g" o
IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',
) O4 D" [: b' L5 ?# {: ]IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',
& l# ]9 w- T z( t' H. }/ X# zIF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',
' G7 h) D2 F1 ] U, Z5 P. M8 }DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;" }' d* K/ j1 j5 G7 X
月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日', I3 |4 V. n- ?# ]
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',
" e0 X h3 f* iIF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
) E" X, r* d2 ^& qIF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日', [0 R: r9 ~, Y0 R
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
; z2 |9 l0 E3 tIF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',% e. r1 E, Z% v
DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
, o0 r6 G6 U1 i5 l# O: U输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));
- F3 k# N0 E8 S7 p* K. EDRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;3 z7 A3 F2 p3 y6 E5 a6 E
|
|