TA的每日心情 | 开心 2022-5-24 11:38 |
---|
签到天数: 1563 天 [LV.Master]签到十一级
六段
 
- 积分
- 47180
|
MA5:MA(CLOSE,M1);
! A6 w3 u: A1 {MA10:MA(CLOSE,M2);
/ K8 b0 S8 H7 P$ L8 e- W+ Y& FMA20:MA(CLOSE,M3);0 ^) L; L- ~2 a6 i
MA55:MA(CLOSE,M4);% X+ s8 ~' ?6 i8 _ P, F
MA89:MA(CLOSE,M5);
# M" E+ Z4 i$ _( T/ ]( AMA144:MA(CLOSE,M6);
- P* S. X- e3 ?; f" q! l0 LMA233:MA(CLOSE,M7);
5 v I* X+ Q& O* BMA377:MA(CLOSE,M8);
6 U' H7 I% Y2 r; s) r# MMA450:MA(CLOSE,M9);
; V' G/ B; C( V- u) QMA610:MA(CLOSE,M10);' R' U4 Z- U5 T: D( N7 [1 T
涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
' |8 W+ p5 q; w" L1 {" S平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;
* `( H5 K( ?( P, O3 Q) m跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;
/ v6 n7 @5 L+ V* R0 T$ ODRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;& {4 z& I+ R6 M9 a
AB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');
( I M$ ?( W: P `6 _# X t2 mDRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;
( |" b9 x2 F' |! T1 v( C* m流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
; e5 K- T2 }4 g: f8 pDRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;; R4 \; |8 T6 N2 Q% T' l1 V
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
# E- ~. e! D8 @$ f; w# OC1:=REF(C,1);8 C1 V2 i% X+ i
ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;
; o* ]0 I w& ]9 Y, u非ST涨停:=IF(1.1*C1-C<0.005,1,0);& v2 H- u5 n2 c# i% t' f& i
涨停:=ST涨停||非ST涨停;" W$ i$ k( R0 v- E# ]) G) m/ Q
STICKLINE(涨停,O,C,2,0),COLOR00FFFF;) `& V, B: N ~2 X2 ^9 ?0 @
STICKLINE(涨停,H,L,0,0),COLOR00FFFF;
/ _2 c$ G5 e3 n, X/ L+ RST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
& L2 |7 X) c1 P9 p' {非ST跌停:=IF(C-0.9*C1<0.005,1,0);
' v d) d9 o5 |( N" y* O+ G8 t6 \跌停:=ST跌停||非ST跌停;
0 I8 U3 Z2 E% x! USTICKLINE(跌停,O,C,2,0),COLORGREEN; @3 }2 C3 l2 Z8 k% e. [$ X
STICKLINE(跌停,H,L,0,1),COLORGREEN;
9 W A9 [1 u. f0 K8 F半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);# ?* X+ O8 ~; Q$ Z* X4 `8 E9 d' ^
半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);6 d( |, @; x1 Q" R3 x3 v# t! t
JRS:=半涨1&&半涨2&&NOT(ST);
7 c/ M5 O8 ?$ O: \6 Z1 {5 g{STICKLINE(JRS,O,C,2,0),COLOR0066FF;) ]. t _% l" k* d
STICKLINE(JRS,H,L,0,0),COLOR0066FF;}3 |5 L& n l3 u
{涨停次序标注}
' ?' s+ L7 A: l5 INUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;
7 y: m$ p' ~' s; a* JDRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;
# {" ^' r% o2 g上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;
& r! X' M! }6 T4 MAA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
6 t+ M3 X! e8 {/ h" vA节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);+ x# g# J) d) p
AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;6 y% v' \5 Y n9 D* s
STICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
# D% S/ z. b& }" C节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',
* R2 t) M0 A u1 A# t7 x) ZIF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',4 T/ `- D; w! o# u& ~
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',+ d( A% G- q! o4 K# d- E* V
IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',
. j9 |* R! k% ]5 G+ }' OIF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪'," L) ^5 b; d) D X: m
IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',. X5 p2 m2 E( y( j% P
DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;
" r2 ]* a$ d8 v- w( v月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',! x4 J5 f3 O s
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',/ x) J1 I7 v3 V2 A0 D+ X+ p
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
2 [/ l4 L" U/ G, M6 F) Q# MIF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',+ _% x8 P* Y1 |6 E
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
0 ~# q0 n# p+ v: KIF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
( S5 I8 w3 S# }7 QDRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
! {9 s k: U2 ]$ g4 p; s. p输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));
Y8 Q2 t w! [5 ZDRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;
7 H: I& w6 y3 E% L. e& J" W7 x
|
|