TA的每日心情 | 奋斗 2021-4-11 17:52 |
---|
签到天数: 847 天 [LV.10]签到十级
五段
 
- 积分
- 26580
|
MMA5:MA(CLOSE,M1);
q \! a. V, p; xMA10:MA(CLOSE,M2);
! ~2 d* J; A9 n _1 v8 E3 t. @2 GMA20:MA(CLOSE,M3);
9 C" b8 \7 R3 S4 h j* a7 XMA34:MA(CLOSE,M4);, V. n* |, j8 P1 u" q+ m
MA55:MA(CLOSE,M5);7 q! q y5 j, U5 m) @4 u: Y
MA89:MA(CLOSE,M6);( t* s+ R: q2 m! ^. @$ q: U+ Y& ]
MA144:MA(CLOSE,M7);
5 {! ?: @0 \$ H& UMA233:MA(CLOSE,M8);( Y. c" m" t8 |+ L5 V
MA377:MA(CLOSE,M9);
/ f& y2 j. t4 x% ^: pMA450:MA(CLOSE,M10);% d! f& Z4 H& M# B' R) }
MA610:MA(CLOSE,M11);
) \% j3 W+ k, Q6 \+ M% d涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
# M, ]4 ]- a0 z. c; V5 @平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;
* B! U( g6 W$ z" N跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;
; u3 m# g- A; J% `2 K& S' ODRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW; ) l! A7 ]; l/ W/ T G8 a( m" j
AB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');, j2 e2 C$ g6 z% m' B2 `
DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;
5 A1 g3 j& T$ @8 D1 Q( u$ J* @流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');& w! W: W" B, X
DRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;
|- N% w0 V$ KST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
f& h3 a C6 t C1:=REF(C,1);/ `4 r4 K! H# f2 `
ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;. R7 |9 R# H( d$ E4 J
非ST涨停:=IF(1.1*C1-C<0.005,1,0);* p9 D$ ^ G% f9 `1 l ]" E
涨停:=ST涨停||非ST涨停;+ q" f- W' X& j$ N
STICKLINE(涨停,O,C,2,0),COLOR00FFFF;
: Z' M" k4 X4 j: C$ e; c STICKLINE(涨停,H,L,0,0),COLOR00FFFF;
: @& K& \0 v7 ]2 p ST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
$ v; [( l6 C d0 n8 i1 o$ a& g 非ST跌停:=IF(C-0.9*C1<0.005,1,0);6 k8 x7 E [# @3 P$ M0 E% a
跌停:=ST跌停||非ST跌停;
1 \4 A7 Y: j3 |7 b STICKLINE(跌停,O,C,2,0),COLORGREEN;
4 a7 Z6 ?: @# m/ x7 Q3 G" s! } STICKLINE(跌停,H,L,0,1),COLORGREEN;
' a& L) @( P' K9 b, v. A 半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);
) z9 H3 ^+ f- U, D4 }# A 半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);
' T: S0 R0 _2 G JRS:=半涨1&&半涨2&&NOT(ST);' k1 q2 q, w6 y' W7 t
{STICKLINE(JRS,O,C,2,0),COLOR0066FF;
; u8 q4 L- a0 B5 z4 ]2 U* d STICKLINE(JRS,H,L,0,0),COLOR0066FF;}6 s0 @/ @ n. N0 _/ _' [5 P
{涨停次序标注}
% \6 l2 G$ f1 A- p NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;
4 X3 [* E q4 E& d# Y' h0 ? DRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;9 K& h. m2 o7 s% T& o
上市以来共涨停:NUMBER,NODRAW,COLORYELLOW; 9 A* r. h5 }3 s2 Q2 t
AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
4 _4 A0 T" s4 i: _+ T8 q3 \ A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);
) z2 x4 \" s2 X2 V' F$ C0 D8 F AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;* ~, p* d% L$ C9 M# q( Z l- A0 p0 E3 L
STICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;' n3 l: d5 }; \4 L2 Y, ?
节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',
- N. P4 ]- G' Z5 t+ A' X$ ` IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',
% ]' a* J. N+ E7 \ IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',; J8 F/ _4 @7 U* ?
IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',2 H1 e$ ?9 [8 y: c5 g; D J
IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',
; M# U, j. A0 q9 c, p IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒', R& E) ]. ?) f5 P& r0 C( g8 c A
DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;
, o6 i! q1 z$ X0 P 月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',
# Y% _, r! @4 r4 I3 q) { IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',5 `7 H+ F8 X' ]
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
& P+ W% J( q6 \9 H# u IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日', f( V0 c: b" R) ]( o# `: Y3 {
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
/ G- w; J! P9 A6 G( i IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
+ K& Y: w: R' s- N8 Q DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW; A* y2 M( b- D3 L
输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));- j" i b! Z+ w/ ]
DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;5 _/ A3 S- S. u1 O- {( O+ l( |6 B
' V$ P2 J- r; y7 i
|
|