TA的每日心情 | 开心 2022-5-24 11:38 |
---|
签到天数: 1563 天 [LV.Master]签到十一级
六段
- 积分
- 47060
|
MA5:MA(CLOSE,M1);- ^' I% _4 \% E2 ^9 Y2 @1 w& X
MA10:MA(CLOSE,M2);, K. Q$ T8 F, B9 C
MA20:MA(CLOSE,M3);* n& Y" y2 _5 I& i$ P
MA55:MA(CLOSE,M4);( z6 o0 F1 E7 p8 P4 n( G
MA89:MA(CLOSE,M5);6 j- y+ h+ B) D* }- R2 Q) j
MA144:MA(CLOSE,M6);
" g3 p3 p6 S( q' `1 D' D: EMA233:MA(CLOSE,M7);+ `' S. U. E" p/ d' X [
MA377:MA(CLOSE,M8);
7 I+ T: L! x0 n N \* oMA450:MA(CLOSE,M9);
' i' [( F6 z! @' XMA610:MA(CLOSE,M10);6 ?' N2 s b3 t( t9 f# g# v
涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
' t/ X8 M6 t4 d: C7 B0 T0 [, f+ p平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;4 x6 K% F- e- c! {* W
跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;
4 I. C6 a- c( X% r6 g. YDRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;
3 S% _0 e6 Z" k6 U( k, j; pAB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿'); W6 S# D' n! O. B
DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;$ W6 l' j/ T4 v' T1 |2 p, J
流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿'); s* r' }* d/ z% z8 M$ i
DRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;# R1 `$ z$ h; n0 c
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
% H7 u: x5 h7 s( p- HC1:=REF(C,1);# E. q7 `9 b3 v; s( o4 a9 C$ G1 Q
ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;. r) c7 d0 s q! t8 }' a. f
非ST涨停:=IF(1.1*C1-C<0.005,1,0);
o6 D0 }- V4 C5 [6 j涨停:=ST涨停||非ST涨停;
: Q. z$ A' g m- {, ]( l$ J, \* L0 kSTICKLINE(涨停,O,C,2,0),COLOR00FFFF;
6 F) q! W0 y5 A/ w, c# NSTICKLINE(涨停,H,L,0,0),COLOR00FFFF;, \! W J. J0 t5 `+ X/ u5 P
ST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
+ i0 U. a9 L7 u) E非ST跌停:=IF(C-0.9*C1<0.005,1,0);' f% @+ q( v2 U" B4 M4 T# }: r6 E
跌停:=ST跌停||非ST跌停;# ?; d" n3 z" n( R3 C8 I
STICKLINE(跌停,O,C,2,0),COLORGREEN;% B2 [- A, [5 ~7 `, |
STICKLINE(跌停,H,L,0,1),COLORGREEN;
6 s V3 B+ ^4 X5 [: W半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);3 M6 Y) T4 i; p) |6 Q. [
半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);
, m' R( i% g8 d, C2 r! _5 o1 L* qJRS:=半涨1&&半涨2&&NOT(ST);: L* q$ d1 u/ g+ n3 y/ s
{STICKLINE(JRS,O,C,2,0),COLOR0066FF;' P- p d) s& b3 l. ]
STICKLINE(JRS,H,L,0,0),COLOR0066FF;}
: k+ f7 _9 _4 p% \{涨停次序标注}% t& d9 W+ y# ], U' A
NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;* S1 B& r7 G' P+ Q/ v; `& L4 K5 J
DRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;
, ^! e# F7 H1 i( {' l# o上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;' B, M5 S; R- r. L0 b! g9 _
AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
5 Y g/ k: w+ S, U7 z+ }- | WA节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);
+ U1 a% m; b- eAHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;
9 Q2 b( [( ~8 lSTICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;+ l i7 h# A' s7 h" t1 Z
节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',( ?; b) |; I5 j! w" C) D$ v! [) ?& j
IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',
# g$ ~9 o' H Y* a, gIF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',
3 y- P @/ P0 m! H( bIF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',
* _# p( [& P! A* d" o" [/ \IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',
9 K7 x# @: E/ S( g" N0 B( k# ~2 fIF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',
) v* z1 r( s* ? H: wDRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;0 V( d o- w2 H V. \( r
月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',1 R: t0 e4 F- b, Q* N
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',7 W( D/ |9 A9 A
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日'," x+ |7 E0 A& Q& k+ k- R9 ?
IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',
9 D9 u: b6 b/ p" y+ q' a" V1 qIF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
2 }; Y0 o0 V# p" xIF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
* K/ O% k# s0 C) w+ VDRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
8 S7 s8 E% \ Z输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));
; Y5 J0 x/ U) p. tDRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;* t# X. g- C4 H4 t/ O: H4 W
|
|