TA的每日心情 | 开心 2022-5-24 11:38 |
---|
签到天数: 1563 天 [LV.Master]签到十一级
六段
- 积分
- 47060
|
MA5:MA(CLOSE,M1);% {0 o0 g) [$ t5 U: R. u
MA10:MA(CLOSE,M2);; h' }+ w3 j d& P% E
MA20:MA(CLOSE,M3);
& V \: Z$ \# @$ T$ EMA55:MA(CLOSE,M4);
3 Q8 X6 f( o* o/ z" iMA89:MA(CLOSE,M5); c/ r* [ w" A% q3 G
MA144:MA(CLOSE,M6);7 y: p" P! a6 ~/ `
MA233:MA(CLOSE,M7);8 S0 ~: f, d5 Z7 N" V
MA377:MA(CLOSE,M8);
# o' q2 l4 d& R8 ^MA450:MA(CLOSE,M9);
# f3 u. i% g$ F+ Y! b$ a ZMA610:MA(CLOSE,M10);8 C" w$ |* C$ Z
涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;- E' l. Y4 c; b( W
平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;
7 T$ G+ Y. H+ [; D跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;
6 K% d1 U. H/ ^5 }9 U9 X: C* W5 mDRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;
2 t: H0 q2 W J0 MAB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');& a: U/ T5 f6 H! n- f5 Z' }5 w
DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;
/ [2 E/ _- P1 N流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');* L/ n( c# b I3 `3 k' g% W3 y @
DRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;; E$ @" n, A0 S' r7 i' T- ?9 G& `
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
% Z5 z" D! s. [# d* oC1:=REF(C,1);) D8 {9 N8 ~4 j# y3 h$ J$ X0 t/ f
ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;- O8 Q/ @& m% E0 }. E
非ST涨停:=IF(1.1*C1-C<0.005,1,0);: v, v" Q# u+ D7 t7 g
涨停:=ST涨停||非ST涨停;
+ |4 V, w$ {9 {; [' m0 ?; e) HSTICKLINE(涨停,O,C,2,0),COLOR00FFFF;( S3 F+ @' T# |1 I: G% x% o3 i" c
STICKLINE(涨停,H,L,0,0),COLOR00FFFF;
( P5 ?% r; i: O: @( C9 l; GST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;. y$ M1 w) }9 O( o$ i, |! C( t
非ST跌停:=IF(C-0.9*C1<0.005,1,0);
1 z) a5 m* ?! T, {8 m7 h# w跌停:=ST跌停||非ST跌停;8 M. b Y- U, p# o- ]" v
STICKLINE(跌停,O,C,2,0),COLORGREEN;
" J* Y# P9 \" u, U+ s7 l2 gSTICKLINE(跌停,H,L,0,1),COLORGREEN;
* \" p- A7 j' H% a! e+ \半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);* E1 D, ]6 U) H7 [
半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);- y" U' k! b+ ^6 l' c# A
JRS:=半涨1&&半涨2&&NOT(ST);
2 j6 B4 B! V% t2 O* m$ Y{STICKLINE(JRS,O,C,2,0),COLOR0066FF;
6 d' V7 w9 ]: z7 @) |6 ]STICKLINE(JRS,H,L,0,0),COLOR0066FF;}& Q' M9 w5 r* A, y
{涨停次序标注}
5 e* U' h' p; }: O8 `1 MNUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;$ G8 P& t/ H3 l. `5 H8 D2 l4 ~
DRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;
* H% [6 [- j E& o% S9 V上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;1 R: W( I7 N! q x) S+ K
AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
0 J3 l: e' R! V% O, L+ }& V6 mA节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);
3 A* w3 E2 `1 R* ]AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;
4 I$ S. h9 r9 k* \% W& qSTICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;# U8 A( w- F1 q. r$ Q9 h( e0 [
节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',
! Q% k# d0 ~$ sIF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满'," I C. A9 r; L+ l6 R6 \& t( L
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',
! f: U0 Q* l& I; _0 B# D5 IIF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',) A4 r6 r; | u; n5 u" a0 G
IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',, A+ c" e& a. y9 W
IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',
$ h' @7 P) z/ R( }" W4 tDRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;' U# x7 l$ |: \7 ?( o: O7 m J9 N
月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',) D: L; B' I; m6 v3 I+ b
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',
, X$ H1 P' R; L! ?9 c; e7 v" F& h- [! EIF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
1 a! Z; n8 t$ ?5 r' A5 NIF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',
) c1 ~; T. u# d; ~! v! h; }IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
' `- q2 Q( m+ a V0 ZIF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
% R) R2 F5 J1 V5 C) oDRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;$ e4 _& m: t% ~' ]1 z. Y- g
输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));, d' n, v; N; s8 X8 W, F
DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;: N0 b: A+ Y9 V: A, |
|
|