TA的每日心情 | 开心 2022-5-24 11:38 |
---|
签到天数: 1563 天 [LV.Master]签到十一级
六段
 
- 积分
- 47180
|
MA5:MA(CLOSE,M1);
9 f* z- e+ B. q- C3 y, XMA10:MA(CLOSE,M2);9 d" X- C0 a. Z5 ^0 v3 q
MA20:MA(CLOSE,M3);) L- a0 f) b8 H! Z2 k2 a
MA55:MA(CLOSE,M4);
; p B# n" r8 ?- @6 p: mMA89:MA(CLOSE,M5);
' Z) ~, R, j9 ~3 i( I! y" jMA144:MA(CLOSE,M6);8 j$ O, ~5 i O$ {% l
MA233:MA(CLOSE,M7);& G! `5 N/ o: {% o2 B% G. N/ F' r
MA377:MA(CLOSE,M8);4 M" C, e! Z6 S( L {( o
MA450:MA(CLOSE,M9);* R- E# g3 \4 Y8 W
MA610:MA(CLOSE,M10);
+ b! f a9 g/ L7 m/ D涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
/ D3 L7 z5 j% L' [3 l/ G平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLOR00FFFF,LINETHICK2;
; {# F# t' d) \跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORBLUE,LINETHICK2;
6 j, J" k2 U" c4 t+ ~9 ?2 p- SDRAWTEXT_FIX(1,0,0,0,'严格遵守520法则,破5日线减1/3, 破10日再减1/3,破20日线清仓'),COLORYELLOW;
- ~6 Y' s' e5 Y! W i( z' T; t* UAB股总市值:=STRCAT(STRCAT('AB股总市值:',CON2STR(FINANCE(41)/100000000,2)),'亿');2 H! S3 ]+ O1 |' }) T: c& |2 A
DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,AB股总市值),COLORWHITE;& s- @1 u" ^9 s) e' n |, g
流通股市值:=STRCAT(STRCAT('流通股市值:',CON2STR(FINANCE(40)/100000000,2)),'亿');
' R0 \& |( n2 \1 CDRAWTEXT_FIX(ISLASTBAR,0,0.4,0,流通股市值),COLORWHITE;
+ a( j- }; w% R: k: yST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');* i* W; \# A3 I8 Q# j( Y
C1:=REF(C,1);
u2 f+ b0 R# N( K* [! k0 r" DST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;3 A0 R' K/ v* R6 F0 X2 L$ ?' H3 q
非ST涨停:=IF(1.1*C1-C<0.005,1,0);
, \ A; x* m) d* F! y- G. \涨停:=ST涨停||非ST涨停;
* E- r2 G4 b4 Z& VSTICKLINE(涨停,O,C,2,0),COLOR00FFFF;; z; U4 Q7 h, D1 p/ B' P
STICKLINE(涨停,H,L,0,0),COLOR00FFFF;
: H1 v- g8 e, X2 d- }2 M/ PST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
& I) ]8 e8 t3 q% R' C& W8 G$ g3 O5 O非ST跌停:=IF(C-0.9*C1<0.005,1,0);! ~) s) g- }2 [3 S
跌停:=ST跌停||非ST跌停;: t' ~& _" w7 B( w) [
STICKLINE(跌停,O,C,2,0),COLORGREEN;8 y: B& t: Y4 k" A( Q
STICKLINE(跌停,H,L,0,1),COLORGREEN;
8 ?3 [- ^! U1 T半涨1:=IF((C-C1)*100/C1>=(5-0.01*100/C1),1,0);
4 O P( M3 q$ c% C4 f5 Z7 d: [6 h半涨2:=IF((C-C1)*100/C1<(10-0.01*100/C1),1,0);
! u% [2 b8 [$ B( l: z$ eJRS:=半涨1&&半涨2&&NOT(ST);4 i' F, |' {- R# X& `0 x
{STICKLINE(JRS,O,C,2,0),COLOR0066FF;# y' C7 X6 G/ x5 |" V* n
STICKLINE(JRS,H,L,0,0),COLOR0066FF;}
6 n5 K5 }* V% C" i{涨停次序标注}
: w8 ?- n% C2 @& m, H0 l# R* \NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORYELLOW;: g! j8 C4 _$ x4 z0 V) u( d% j
DRAWNUMBER(非ST涨停,H*1.04,NUMBER),COLORWHITE;
! k6 ]+ G/ V) _$ E. T- Y$ K上市以来共涨停:NUMBER,NODRAW,COLORYELLOW;
) g( X0 b2 R, t, J8 C7 eAA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;' [5 S1 ^/ J. d" z0 p/ g! [
A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);
6 q4 `5 {( ]% |, f% T+ n7 |, ZAHZ:=HHV(H,200);ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;
9 f( `3 X9 s( a9 hSTICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
! C K) h K# V Z) G6 t节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',
& ?5 |& G5 [1 c. ?$ H; `1 ~; V6 D, SIF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',, q$ u2 H/ e+ H' D6 p& i" w. H
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',* ^$ B6 L, Y$ T9 B) K" K" R# Q8 j
IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',
: ~; Z! U* h$ j, n, oIF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',
% [1 a! t2 d! E' mIF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',
& B( u3 H, f& [, D/ k) V7 YDRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;7 l$ a" v% G* S- e L7 ^
月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',
8 L5 q# k4 d+ ?, e/ j- b3 nIF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',0 O& L- D) I% E: q7 W+ t. t
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',! n+ h. M' ], J
IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',
- Q/ k. ?5 a# I3 `" T: G$ @" RIF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
# V/ s; U: h$ _9 |IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',9 T' b+ |% V2 m/ N& G
DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;5 {0 J! F. T$ j# |. W {
输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));4 U( z& U. v: O# [+ l
DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;) V4 k( ?; a8 b6 m, D
|
|