TA的每日心情 | 开心 2022-5-24 11:38 |
---|
签到天数: 1563 天 [LV.Master]签到十一级
六段
 
- 积分
- 47180
|
MA5:MA(CLOSE,M1);- `$ s- @$ `/ U$ v" j: V$ T
MA10:MA(CLOSE,M2);( q% X o2 B: F" |) R- |1 [8 l
MA20:MA(CLOSE,M3);4 z. l8 h H$ l% Y O
MA55:MA(CLOSE,M4);
8 {8 U' K( _+ X( }MA89:MA(CLOSE,M5);4 ]' d& w) r4 F
MA144:MA(CLOSE,M6);
6 M2 n3 A& F& ?MA233:MA(CLOSE,M7);; e6 S: j, a5 @* t' c5 Y
MA377:MA(CLOSE,M8);8 c* v/ z0 n1 U& {, n P1 k( S
MA450:MA(CLOSE,M9);
3 v |0 b- ]6 q/ v$ h: U- uMA610:MA(CLOSE,M10);
' W! _; D; W3 q涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;: g' F+ J+ e, @% g" V
平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;
4 n" j4 N" O5 _8 g2 A! T6 j跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;( N5 M# c8 @/ K: g
DRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;
7 Q2 t9 H# W, n7 ~, R; S( wAB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');/ k( z Q7 ]- D" E
DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;
3 U% l4 ^4 x1 B5 I$ H, t流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
3 e1 a. _) J! [/ J& w- b2 F0 UDRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;- D8 C6 u; @9 ]) R8 g2 j, @2 f" v
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');" x/ `' J" @/ q, ?3 n
C1:=REF(C,1);
8 T. v( {' B. b0 f; n: J+ sST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;2 J! |: d8 w0 [5 w/ E
非ST涨停:=IF(1.1*C1-C<0.005,1,0);2 R( p y ~ b, _% D$ w
涨停:=ST涨停||非ST涨停;
7 t8 a. ^1 ?6 fSTICKLINE(涨停,O,C,2,0),COLOR00FFFF;
* T G4 {5 p& t. Y5 }+ e; cSTICKLINE(涨停,H,L,0,0),COLOR00FFFF;
' J: ^. c8 m7 ?& E9 D% l8 QST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;4 ~+ K1 ]! `/ J7 `: X+ j9 f7 a
非ST跌停:=IF(C-0.9*C1<0.005,1,0);
- f! O* c3 Z( P0 T: o8 ~) w4 t& W跌停:=ST跌停||非ST跌停;
0 P0 ]# w# G6 l7 GSTICKLINE(跌停,O,C,2,0),COLORGREEN;% C( o- \0 X/ I/ C
STICKLINE(跌停,H,L,0,1),COLORGREEN;, {* T/ p$ Y. z; m' `, j0 r. x
半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);# q7 f6 O9 F1 Q! g1 w
半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);) r7 k. j; A. ?0 d9 X) g
JRS:=半涨1&&半涨2&&NOT(ST);: M1 |3 D3 |8 |6 S, y4 z
{STICKLINE(JRS,O,C,2,0),COLOR0066FF;
; P; K5 B% E( C9 m3 fSTICKLINE(JRS,H,L,0,0),COLOR0066FF;}8 [2 Y5 L) W& \4 {
{涨停次序标注}2 I* Y' G2 c( L9 y0 J; a& U
NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;
6 H* @7 v5 k5 k8 G+ r0 c/ a9 sDRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;
) D2 X& {3 |! x上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;/ u9 `4 H X* U6 Q7 H
AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
4 J2 J3 x/ X- HA节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);
& A, J7 s1 r' W* @AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;; H& B+ {: @ `* r! H# y( U
STICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
; T3 Y9 k. N" {; ?节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',4 K$ f% w- o8 y. J
IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',6 `2 g8 V/ y- u* R
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',$ F# [( b* l, d9 w+ F
IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',) l3 }8 P1 J$ m' e# {
IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',
( T3 o4 Y7 Z7 r& D% a" KIF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',
) K+ o! f1 T1 o3 m. ?DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;
5 o) ?1 |: F: A1 U! M( g月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',
4 B3 i) ]! b! Y% X6 f+ c" x0 XIF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',# h, ^# C% F9 t5 r& S3 i, D( R
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
& m- Y5 g5 Q! }2 @, Y5 ]IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',
/ R" m* | D6 N& mIF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
- y; ~6 l N5 z/ V- b# i; rIF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',, L6 |3 o; G |4 C, C# c- M
DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
. w5 G: X" @$ l$ o输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));6 @, a& u% {- q8 T) T1 v( S1 }2 V8 A
DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;
+ y0 x3 q' U: w2 V" ? o
|
|