TA的每日心情 | 开心 2022-5-24 11:38 |
---|
签到天数: 1563 天 [LV.Master]签到十一级
六段
 
- 积分
- 47180
|
MA5:MA(CLOSE,M1);
( V# n0 i5 V- v. h& kMA10:MA(CLOSE,M2);1 e( H3 n# x: E! K5 A- o3 ?1 I0 _
MA20:MA(CLOSE,M3);
3 k1 h, i5 [; ~2 Q% ^* iMA55:MA(CLOSE,M4);( W3 s8 w; U( W( o; G0 F' t
MA89:MA(CLOSE,M5);
$ c5 H' x/ T0 u- `! CMA144:MA(CLOSE,M6);
, B7 q, ?8 C3 [MA233:MA(CLOSE,M7);# c' l v4 O! H8 X
MA377:MA(CLOSE,M8);
# |& {# R' U& u' }MA450:MA(CLOSE,M9);
3 f- S7 d+ P. s9 c8 CMA610:MA(CLOSE,M10);
& x+ c8 F6 Q8 e6 w, X9 u涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
; @* V2 N# ?" F6 Q% H平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;
! C3 j5 j" {9 }# R跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;! g8 h, s8 B& ~
DRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;& Z7 [6 s. J L/ G! m! B
AB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');
; G( W `3 b2 n' [# tDRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;
* Q1 c% x& N& u; t- f流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
* ?4 N4 C9 V, k: tDRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;1 B* l( h2 _' p2 a8 m2 }% b/ K
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');: ]3 A* q: ]0 C& T% F
C1:=REF(C,1);
2 [0 \, t, m0 \9 C' e1 x9 sST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;
( t0 \" r q0 U' X非ST涨停:=IF(1.1*C1-C<0.005,1,0);
5 G3 h: v# ~& M* ?/ S8 R涨停:=ST涨停||非ST涨停;6 R0 M- `: O' w0 f6 @
STICKLINE(涨停,O,C,2,0),COLOR00FFFF;
3 P* a: s' k( b) U: A; X7 \, ^STICKLINE(涨停,H,L,0,0),COLOR00FFFF;
. P i _" D1 O6 T% tST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;& s/ y6 |2 h' N( |! {; L0 G
非ST跌停:=IF(C-0.9*C1<0.005,1,0);/ e9 o, P3 H3 l! F2 n
跌停:=ST跌停||非ST跌停;# w" e4 m" U5 U8 w9 Q
STICKLINE(跌停,O,C,2,0),COLORGREEN;
( ]+ w( F- A1 \/ KSTICKLINE(跌停,H,L,0,1),COLORGREEN;+ X# T; I# J! s3 I
半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);& N% R3 x ^6 e6 M& I7 J3 e4 Z! A! F
半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);
j# F4 J5 F: O; u+ i. G/ JJRS:=半涨1&&半涨2&&NOT(ST);
9 x4 L% i/ R1 ~" l9 Z- c{STICKLINE(JRS,O,C,2,0),COLOR0066FF;% [' t1 e) [, K7 H( q4 ?, g
STICKLINE(JRS,H,L,0,0),COLOR0066FF;}
- r4 J4 L# K7 j9 i{涨停次序标注}
/ E& R% ^0 Z% FNUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;
4 H; B/ }* r& vDRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;+ v, [2 W' A/ `! x2 u/ D
上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;3 w1 [4 Q7 H4 x8 |' D
AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;) p+ _7 _# y5 e. `) O9 j/ c
A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);, P7 y+ h6 A. u* S& C `
AHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;; g1 C4 M( f6 A& L7 U$ L2 D
STICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
6 b; m Y2 \ Z6 G节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',
* j2 ^4 T& f' S/ w8 y1 y" SIF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',5 f1 U2 x8 R9 ]/ q5 v
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',
f. F, p7 Y+ |3 rIF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',7 I ]3 H6 y2 s# t) o6 k
IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',
" E$ k" C% O0 Z5 {% G) z$ T5 ZIF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',! X; s+ S7 d9 k6 x; i' e
DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;
' ?. C( v$ m; _& N Q! Y月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',5 h* U2 j* G# o% R9 f7 C& r
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',, r! U; R. |- v u# S& ^- v6 P' ?, @
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
5 x3 j0 Q* ~, n) G! }$ X) KIF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',
B; @* q/ l2 ]- P E6 KIF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
9 Z( x& ^# J/ O+ T; u: LIF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
8 O4 e) m( [: h6 R r" g4 \DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;$ D# l6 n, c; B6 ?& M2 s
输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));
1 W4 R- D8 k( ~% ~DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;- ]+ a, u9 R, n1 X; k6 P. z
|
|