TA的每日心情 | 奋斗 2021-4-11 17:52 |
---|
签到天数: 847 天 [LV.10]签到十级
五段
- 积分
- 26580
|
MMA5:MA(CLOSE,M1);
9 F* h: U7 J9 B3 o! C' JMA10:MA(CLOSE,M2);1 e1 A- b4 v S# c6 J4 A7 d# s
MA20:MA(CLOSE,M3);* }, E, E. Y4 F5 I: j J, X) Y
MA34:MA(CLOSE,M4);
5 ^, ^) i1 C8 |' ~+ L4 WMA55:MA(CLOSE,M5);
+ \2 ^7 R& [& b5 {MA89:MA(CLOSE,M6);
3 q/ F% a+ ?5 Z: x0 Z ^MA144:MA(CLOSE,M7);
8 Z+ Q1 I' {" H( f! sMA233:MA(CLOSE,M8);" w! r$ o3 }' m' F6 C) E1 M
MA377:MA(CLOSE,M9);
# X( Y# \/ A% r6 W* H& [5 BMA450:MA(CLOSE,M10);
' c3 F; K6 n4 IMA610:MA(CLOSE,M11); ! }/ j& h) i, e: t, M0 k
涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;! S: |) x. ? }; O6 u
平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;( U$ \5 `) M9 V5 n1 Z
跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;
' Q2 ]& k* g f7 A2 pDRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;
1 A- w8 X( R* \0 m6 lAB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');
) g% n3 t0 `; R u; [DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;$ }+ c6 g9 |4 O+ t+ q
流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
8 G3 A' h5 x1 iDRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;
' ?' n ]: B i/ a2 gST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
3 Z4 V2 W/ C7 }1 x6 y- R9 f C1:=REF(C,1);
# y# L$ k* h) w" L$ b: _ _ ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;
% U8 |- M# `! H* y! g 非ST涨停:=IF(1.1*C1-C<0.005,1,0);9 l( ?9 T3 J) [. b$ J% ~' d- ]# g
涨停:=ST涨停||非ST涨停;8 m3 V$ j' r0 a! C% I
STICKLINE(涨停,O,C,2,0),COLOR00FFFF;* F( Y( U5 Z* T! F
STICKLINE(涨停,H,L,0,0),COLOR00FFFF;- z" f# b& @" S9 @) w
ST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;) Q( B K+ @# L7 t$ s0 o( J: f
非ST跌停:=IF(C-0.9*C1<0.005,1,0);" H3 f/ n/ ]1 s) c
跌停:=ST跌停||非ST跌停;) l( G4 u- p t" Z. n% Z% X$ G
STICKLINE(跌停,O,C,2,0),COLORGREEN;: l. L/ I( s% D$ w% n1 z* V' N$ p0 |
STICKLINE(跌停,H,L,0,1),COLORGREEN;7 @+ j7 b% K, L9 P6 X J" q1 K
半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);4 J* c8 F8 i$ }; Q! k+ C) o7 H0 ~
半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);
! b7 q+ {! p. ~9 } JRS:=半涨1&&半涨2&&NOT(ST);5 o' |, c; D& z5 W% {
{STICKLINE(JRS,O,C,2,0),COLOR0066FF;
9 _1 x# m8 ], \& ` STICKLINE(JRS,H,L,0,0),COLOR0066FF;}
2 A4 O/ \ \8 Z {涨停次序标注}
: K- a7 \1 r8 P$ O NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;
% \" x Q; Y3 `4 ?, E5 J DRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;/ ~ Q d( D" r3 J
上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;
7 x9 i4 {4 M# Q4 ]/ ]% p6 r7 mAA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
" a X1 n+ e. y" R% Z# L# c+ B9 ^( ] A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);) O7 L' ?4 e. M
AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;
- @- z, ?: y/ U! o) ~* x$ r4 B9 zSTICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
. n1 y p* ^& @* F0 s e4 z 节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',
4 _1 k/ V1 ]& w1 v+ u3 @( N0 L IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',/ Y4 E, H/ b8 X" \
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',/ P+ E! H% v! N: l0 G4 q
IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',* z, V+ |+ j7 L6 s0 A, L
IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',: E& \; O1 U) a9 I9 _3 [
IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',
- Q7 p, s6 z: h8 E+ i% G DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;* M8 i. V! p& E% D5 Z9 K% i. D9 |
月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',/ ^0 _' D7 \( I- P; z
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',
3 y0 n/ s$ f+ m2 e IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',' s) m7 i+ ~. c, B. S4 N
IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',
# t* S; ] Y- m/ r! Q- x IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日'," K/ K/ i: t4 \
IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
# m% L3 ?+ B f* L DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
' r) a: }" o' Q 输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));( m5 a8 a. |$ E2 ?, Q4 K
DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;
y2 z' ^% R0 f- n7 a1 |3 P! H& o, O+ y' ]/ S* K
|
|