TA的每日心情 | 奋斗 2021-4-11 17:52 |
---|
签到天数: 847 天 [LV.10]签到十级
五段
 
- 积分
- 26580
|
MMA5:MA(CLOSE,M1);
. G: p8 C) M! k8 g. f- I. s: eMA10:MA(CLOSE,M2);/ z7 M" q& X6 E& u& L5 K$ Q
MA20:MA(CLOSE,M3);6 Z7 k" k0 r' O- W1 Y) R
MA34:MA(CLOSE,M4); `5 `( J5 a# q, I: |
MA55:MA(CLOSE,M5);4 E' o/ l2 j, n: W4 c: @: M6 c, _
MA89:MA(CLOSE,M6);& B1 T( B! [7 a
MA144:MA(CLOSE,M7);. ?6 g+ }; l4 X* J. _0 |4 I
MA233:MA(CLOSE,M8);
3 V3 M7 z2 {' EMA377:MA(CLOSE,M9);
. `4 m4 J L& F d( LMA450:MA(CLOSE,M10);
& Q3 G( k- m hMA610:MA(CLOSE,M11);
8 V1 m3 R; V/ V& q涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
6 H P" d2 a9 K. V( w$ T平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;1 E' h! g9 E; r
跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;
" S0 o9 e7 `& f0 H" |% uDRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW; 1 T* _ {* D' R$ N: s' J
AB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');
8 J7 u. r4 Y5 |DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;2 p* M; C- ^4 t2 ~& g( \0 }
流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');9 u5 u3 @# l- y8 L0 U- {
DRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE; " |8 h1 F* M! q. i
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');6 K9 E4 L' [/ M. D0 j
C1:=REF(C,1);
2 l, r% s$ P/ \. [2 {3 j/ M+ h2 L ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;
4 m# ~; O M4 R! Z: t( W; e 非ST涨停:=IF(1.1*C1-C<0.005,1,0);
4 b1 e$ W) U: e' ` f$ C1 f! V 涨停:=ST涨停||非ST涨停;
% L* t# V3 d) P, g STICKLINE(涨停,O,C,2,0),COLOR00FFFF;
2 U# w; E' |' I. f4 h5 @4 E% O STICKLINE(涨停,H,L,0,0),COLOR00FFFF;6 y5 S8 e7 O* x/ f# V3 u% H6 S) J) n
ST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
& J! k8 ~. u1 x2 r6 w0 ?9 L 非ST跌停:=IF(C-0.9*C1<0.005,1,0);6 w5 Y6 b, L4 i, j' P
跌停:=ST跌停||非ST跌停;
; i5 ?5 ~; P' E3 ~8 k STICKLINE(跌停,O,C,2,0),COLORGREEN;
; `% S, c. }" E' @. i STICKLINE(跌停,H,L,0,1),COLORGREEN;
1 s. T( D6 E. Y+ W0 G: _( ^/ } 半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);
' i, p$ S* b( S6 y3 u 半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);
1 B2 M( x4 k- }& ~; R; i( ^- S, z$ \ JRS:=半涨1&&半涨2&&NOT(ST);
( E. ~2 ?6 C) S7 d {STICKLINE(JRS,O,C,2,0),COLOR0066FF;
2 \# X+ P1 B6 k5 T: Y STICKLINE(JRS,H,L,0,0),COLOR0066FF;}3 ]( C: b. ?8 T1 M/ p
{涨停次序标注}" J4 D: U, ]( p
NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;
& b. b* y, \) i4 I `- n8 D$ ~# C DRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;
. M" I4 H" R# `6 Q 上市以来共涨停:NUMBER,NODRAW,COLORYELLOW; : I1 L# ~" d* i
AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;5 L3 l6 b, ?& g) H8 M+ U& H
A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);
8 c" ?2 g- f1 v% o8 i b5 u0 j AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;1 l, ]# I- @; Z! S y$ _$ n2 I7 s, n
STICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
, ?- t: t- o0 O1 f3 O- u 节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',. S2 R5 C5 u2 H! d3 h+ Y- q9 O
IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',% q7 y4 m( N4 H! @
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',; t* q% Z4 J5 r: v
IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',) ~! o9 p9 q/ B# \* q- M5 C% t
IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',
6 P8 R: |% @1 G* V8 K; i8 c IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',9 t$ b$ w# Z: d4 e- [
DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;
3 m4 s! j0 D) b" c0 j 月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',6 M) g, i0 r V V K2 g: o6 u
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',
3 q& m) E2 m3 k E# i" p6 e; U3 y0 _ IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
: p& a, G! w* j5 d4 y# l1 c9 ~ IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',
. z- }/ m' e) ]1 u. M( H2 e% l2 b IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',3 P+ d, Z/ X n1 c, o
IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
8 m' \. g, d$ w DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
0 H; E. L1 ^' W9 t3 r 输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));9 p4 K5 P( M& R( `' W1 Y i2 A
DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;
5 y+ l a/ M4 e1 K
/ W* ~+ l: b3 r$ x C3 }5 q- O T1 L
|
|