TA的每日心情 | 奋斗 2021-4-11 17:52 |
---|
签到天数: 847 天 [LV.10]签到十级
五段
- 积分
- 26580
|
MMA5:MA(CLOSE,M1);1 o- `/ d4 u% a) I$ @
MA10:MA(CLOSE,M2);
7 x# g7 D8 q h# tMA20:MA(CLOSE,M3);
, g4 r( A- N4 k* zMA34:MA(CLOSE,M4);! f# h& a Q1 ?5 g; p& ^
MA55:MA(CLOSE,M5);
7 @& B) g7 y/ ~$ _% R( MMA89:MA(CLOSE,M6);
$ k3 f) V/ s% m# k) ~( [$ OMA144:MA(CLOSE,M7);
! q6 B9 @5 J; G. b$ ]6 s9 ]MA233:MA(CLOSE,M8);0 T2 v) N* C' r( p
MA377:MA(CLOSE,M9);5 F' I% Y& E, Z u6 R, i8 F7 |
MA450:MA(CLOSE,M10);
4 h0 x: Q1 B4 g' a9 B. h8 yMA610:MA(CLOSE,M11); 5 a: k' d6 ]7 @0 j/ Z2 x4 R
涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;+ O, u9 t' G/ ^, A. h
平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;
# A0 d8 J; W7 y- k J& A% c跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;
$ p: `3 S5 T4 h5 b! CDRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW; 8 B- A9 e/ {& T7 y' ^' |0 n
AB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');
& y+ X8 k" B4 ?1 aDRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;2 i- X! P/ {* s! Z5 w% K$ {% O
流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
; B$ a7 E: O; nDRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;
" ]5 K0 _, X7 BST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
! o. }. w: b3 c5 \- i4 o" u C1:=REF(C,1);
5 @2 Z8 l4 M: ?: A' z1 Z% X1 H ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;# q! Q/ l! X5 v5 u
非ST涨停:=IF(1.1*C1-C<0.005,1,0);
# Z+ P5 H2 o# D- |% v 涨停:=ST涨停||非ST涨停;: y1 a$ J& N0 _ o7 k- x$ f/ f
STICKLINE(涨停,O,C,2,0),COLOR00FFFF;
3 u; U. d% r1 O- ?7 `, } STICKLINE(涨停,H,L,0,0),COLOR00FFFF;& e4 }* H X( ~, ^6 m
ST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;' a8 r$ {: N: V
非ST跌停:=IF(C-0.9*C1<0.005,1,0);; z+ J; W) ?7 L2 i7 \
跌停:=ST跌停||非ST跌停;, _# ^/ j& o& j( U; [; X4 O& g
STICKLINE(跌停,O,C,2,0),COLORGREEN;
. r% p6 ?) U- r) D- o. Z STICKLINE(跌停,H,L,0,1),COLORGREEN;
+ @8 X; j/ G$ P5 B- i 半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);% S* h. @1 ^8 r; N4 k C! k
半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);3 f9 J7 Z: `; V- z: C% j- F! `4 H
JRS:=半涨1&&半涨2&&NOT(ST);) R/ ?# K( h6 ^9 F! C5 M) W6 i
{STICKLINE(JRS,O,C,2,0),COLOR0066FF;5 B! e) Z- p0 C4 }
STICKLINE(JRS,H,L,0,0),COLOR0066FF;}6 Y+ e" l7 O2 n* W1 N
{涨停次序标注}9 U7 E2 w6 h5 e) d( A
NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;
8 T0 ~+ x1 n2 p2 h4 S$ ~4 O DRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;9 u) w/ g* A. M
上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;
2 h; R$ D# ?) m/ X5 y' xAA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
% Q, n2 ?; ~' j0 a4 h9 o1 `$ y. y# z A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);
% a% j9 q, H0 M2 u8 R AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;
2 \7 ?8 \3 j( N) g5 z2 d& FSTICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
/ }6 E5 l2 U6 V: t a* q2 q 节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',) Q2 z1 P! I' Y% W% g
IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',
5 H6 J, C, g% r9 K IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',
5 T0 B/ O4 j+ T; p( B" r7 n IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',
9 p8 m) b/ X9 a' U5 } IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',/ j7 y. z6 ?; K" B9 |. F
IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',/ t. G. r1 h- N+ J5 `( K) p
DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;9 U2 J. ~5 a$ \' g& G& o( g9 Q& B A. s
月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',: `7 m2 h/ F0 Y% b/ _
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',5 S1 n8 f( m4 {1 ]- ?* o
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',- z Z$ U% H& b7 s# }$ C
IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',5 x* D) O; T. O) ^4 W5 A ?
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',' _- Y5 ]5 c. o: h9 k$ D: A6 `0 U
IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
8 l: M/ q) z: s$ ?; h DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
l: t! z% U- e" s, h" A$ ~ 输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));
* d0 F) F/ ^9 u6 W3 ?; c" c DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;
+ p6 W& j- b0 x
2 u. k) ], b1 \/ E) f
|
|