TA的每日心情 | 开心 2022-5-24 11:38 |
---|
签到天数: 1563 天 [LV.Master]签到十一级
六段
 
- 积分
- 47180
|
MA5:MA(CLOSE,M1);
, U, u( a$ B u3 n' D4 RMA10:MA(CLOSE,M2);
6 x( e1 T1 M/ j q) M/ rMA20:MA(CLOSE,M3);
( I- \9 C5 j$ r0 G5 _MA55:MA(CLOSE,M4);
d3 ~! o3 Z2 n! S! B% ~0 H3 PMA89:MA(CLOSE,M5);. y& l0 M; X2 W s
MA144:MA(CLOSE,M6);- G2 I f, `/ i2 S& l& G& u# H& x$ D
MA233:MA(CLOSE,M7);
7 |, h3 h6 s6 ?MA377:MA(CLOSE,M8);
+ j+ a6 F- N2 I1 W: W5 {MA450:MA(CLOSE,M9);
) i8 E* c7 X( l1 \9 LMA610:MA(CLOSE,M10);
: v7 @7 ]8 j0 E+ S4 s, ?+ l涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
- `" ^! C: q: t* } ~6 O+ h平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;2 z1 G( z$ o) m" x: k* D
跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;) B; Z, @2 G" M7 _# B* i+ }4 \$ ^
DRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;/ e) v. L- q$ W7 |0 E; Q
AB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');& f" V5 x. Y4 }; h
DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;
: c0 c8 u4 S; `: [7 d2 d9 U3 ]流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿'); E0 U& H% r. q0 i! _
DRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;
: W9 ]; S" a3 J$ W6 T/ YST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
3 y# c7 v7 @$ w0 O& W; tC1:=REF(C,1);
% M1 c3 E5 s& `4 q$ UST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;, `8 z# C' v0 R3 G4 E1 h
非ST涨停:=IF(1.1*C1-C<0.005,1,0);" l2 J: m1 S9 s5 K6 L1 T
涨停:=ST涨停||非ST涨停; P1 Z* i, m- w1 h* b# f4 f% }5 O9 H
STICKLINE(涨停,O,C,2,0),COLOR00FFFF;+ a2 q8 o- @( L+ |. I7 P
STICKLINE(涨停,H,L,0,0),COLOR00FFFF;
8 n8 z" x- p3 {% k# E& j, d0 R- RST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
+ E2 s: q- F8 h0 i非ST跌停:=IF(C-0.9*C1<0.005,1,0);3 Y4 K3 M1 T; S8 l, p
跌停:=ST跌停||非ST跌停;5 P$ f$ |, k6 \, g/ z& p- d0 S' k5 C
STICKLINE(跌停,O,C,2,0),COLORGREEN;4 u& M( z6 ]( m7 V! P: l. a
STICKLINE(跌停,H,L,0,1),COLORGREEN;
9 r1 `! y, L& Q3 W4 M& ?6 P. E+ \半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);' A$ z, L* z9 a" M7 j, w4 I
半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);: Y. q) r& b7 [: R
JRS:=半涨1&&半涨2&&NOT(ST);5 M6 u. q0 J$ P
{STICKLINE(JRS,O,C,2,0),COLOR0066FF;/ `' E+ v8 `* P7 ^0 S
STICKLINE(JRS,H,L,0,0),COLOR0066FF;}2 g6 V' J/ |) ~$ a6 I
{涨停次序标注}( C! B* i5 s0 r9 X8 B: p
NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;7 M3 l8 w! r& L( ^( g
DRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;
2 I0 ^! n$ ]2 ^" W上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;
7 A: n- K2 S, r6 ^) O5 p: {$ H" MAA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;9 t. N/ t( ^8 Q4 ^
A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);1 U8 m1 ?; M! F8 f
AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;6 R3 i, R* m ]" v! ^; }9 C
STICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
7 d. |" f( U" F C- Z4 I- S节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',
: q* z7 A6 [' j9 S5 LIF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',
! p8 t- H7 G7 t2 P. L% NIF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',
- q& E }; S |5 p' NIF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',8 b; N7 l z3 J" `9 L' Y( E, |5 _
IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',; z! P* |% p# q0 u
IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',* _: i: U3 T2 ^0 [
DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;
6 D& u4 K6 i. w4 M4 s月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',$ @9 E9 \! e& s5 A) f+ T: q
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',$ ?) P1 y6 ]7 q; S; J6 R2 L8 R9 t7 T* X
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
/ }% b0 q1 @* x7 }# e" SIF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',
; Y' l& M$ Q' TIF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
) W8 n7 a3 f# c9 W5 ^! h2 yIF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
7 f7 a: u6 J/ I" p; k. rDRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
# I; N9 c. ]# \8 k5 B. }+ K6 q. I输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));
! K9 s+ w* V; W8 v8 V4 k# SDRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;
# n# H0 ~6 }+ z) x# D1 `% A s
|
|