TA的每日心情 | 开心 2022-5-24 11:38 |
---|
签到天数: 1563 天 [LV.Master]签到十一级
六段
 
- 积分
- 47180
|
MA5:MA(CLOSE,M1);* I% O; N& r! h
MA10:MA(CLOSE,M2);
6 E2 y c* ~5 s: T6 U- [MA20:MA(CLOSE,M3);
9 T" D+ U7 j2 ?, S' y+ f' k: r9 HMA55:MA(CLOSE,M4);
$ f9 R! m: B3 a+ O9 m+ K3 {$ JMA89:MA(CLOSE,M5);
; z; P. W7 D+ J+ @9 gMA144:MA(CLOSE,M6);% I' Y2 b* M+ Q# c8 T, G
MA233:MA(CLOSE,M7);0 y. V/ O4 d$ J, ?) B* r; d
MA377:MA(CLOSE,M8);$ B8 e/ K5 }6 W/ z0 Y
MA450:MA(CLOSE,M9);9 n' j' S) d6 H, T
MA610:MA(CLOSE,M10);! i* d9 O' k9 P+ u( N# _
涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;6 E: j+ c) ?6 f2 J/ V! P
平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;+ L. I" O! s* B. |3 F7 t4 h1 R$ w8 K
跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;) E! L, d- u; O2 Q' X
DRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;8 U4 ^* U/ [/ t
AB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');
, C& ]- K! ]$ ^0 `. ]DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;& y9 n( V# n/ i! y6 {& ~
流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
* K" S, S$ w/ }7 bDRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;3 v6 A2 ^: l: w, K l
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');! H. V+ y+ d% E* F7 U
C1:=REF(C,1);
! V% V+ i0 ?) cST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;; `0 K0 R: y% m
非ST涨停:=IF(1.1*C1-C<0.005,1,0);
; k1 b1 o7 v0 m# {5 i" i7 e9 F涨停:=ST涨停||非ST涨停;, y& w6 W2 k0 y$ q
STICKLINE(涨停,O,C,2,0),COLOR00FFFF;
& ^' q; s! X* U# z' D2 O0 e5 WSTICKLINE(涨停,H,L,0,0),COLOR00FFFF;
; }5 l1 _; [% [0 a1 N ?9 Y9 m/ HST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
/ i. x5 j+ S% d* c, K, L非ST跌停:=IF(C-0.9*C1<0.005,1,0);( w7 H( L5 }# z0 s t
跌停:=ST跌停||非ST跌停;
! P T0 e9 C' f! C6 VSTICKLINE(跌停,O,C,2,0),COLORGREEN;
3 t: Q! W$ R3 f$ d5 ?9 ?5 tSTICKLINE(跌停,H,L,0,1),COLORGREEN;5 N) E& h/ I2 C c
半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);
& H6 p/ U& j' r0 {! e: |$ z7 `, Q半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);* r& g: Z, h* I- q
JRS:=半涨1&&半涨2&&NOT(ST);
/ I) ]3 o4 f5 J{STICKLINE(JRS,O,C,2,0),COLOR0066FF;
3 O; U/ N6 ~- M2 oSTICKLINE(JRS,H,L,0,0),COLOR0066FF;}
9 ]5 z+ x+ J) Z5 d% z2 k, G{涨停次序标注}! p. y6 u6 H$ h, U2 b6 A0 h
NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;; K9 z, Q, J# B4 q
DRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;/ ~4 }: ?2 I6 T1 g+ S
上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;
# d% {; t( P0 {AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;+ v7 z4 Q6 R& p( t u4 U
A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);
$ U$ h0 ?; Q/ u2 B: @AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;
4 u4 h: C, @& [4 J, bSTICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;1 x. \4 M1 Z. f- i/ A+ |
节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',
9 R- G7 { M# v4 F( CIF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',
5 p$ v* u/ M) ~6 ~9 \7 LIF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',
+ h: V/ ^! ~/ oIF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',
$ C4 {) }8 {. }IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',( s9 J/ l# D# D$ Y1 O/ B
IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',' K- s/ f4 }% C0 R/ K- H2 A8 L
DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;
6 |2 \( a8 u. V3 T0 C( P" _月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',
& q" H9 X6 k+ C8 X* [7 qIF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',
S' w' R( y/ N D# Q4 FIF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',) y4 }& u$ `' [( U# O
IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',0 L; ~! I+ G$ B6 w* ]/ ?! Q0 c0 _
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',2 v4 C5 m$ `; _ W4 v1 z
IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
; B8 z1 M( u! yDRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
6 o3 w! G" k& l9 v! Z输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));* t/ }% P8 z4 @/ g
DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;: |% j6 K9 J" Q, j! v
|
|