|
参数 p1=13 p2=34 p3=55 p4=89 p5=144 n=10 p=3$ \ S# g& I1 e+ v, j2 l; s
8 p6 D. k3 d' F: @* B9 oDRAWGBK(CLOSE=CLOSE,COLORRGB(30,30,60),COLORRGB(30,30,60),1);* n; y+ k% c& A7 e2 j5 S c
DRAWTEXT(SYSPARAM(2)=BARPOS,CLOSE,''收益:''+NUMTOSTR(FINANCE(33),2)+''\n''+''净资:''+NUMTOSTR(FINANCE(34),2)+''\n''+''流畅:''+NUMTOSTR(FINANCE(7)/10000,2)+''亿''+''\n''+''流畅:''+NUMTOSTR(FINANCE(7)/FINANCE(1)*100,0)+'' %''+''\n''+''权益:''+NUMTOSTR(FINANCE(36),0)+'' %''+''\n''+''主营:''+NUMTOSTR(FINANCE(53),0)+'' %''+''\n''+''利润:''+NUMTOSTR(FINANCE(54),0)+'' %''+''\n''+''主营:''+NUMTOSTR(FINANCE(20)/10000,1)+''亿''+''\n''),ALIGN3,colorCCFFCC;
, x. _' Z* ^' d7 TVAR0:=IF(DATE0,0.0489,0.0965);- a/ v4 g' F a) V9 q
板:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>板幅度 AND HIGH=CLOSE;* T' S5 s) ]) E# d
VARVA:=板;, ]: w2 Z- }# J4 _% A8 @+ n
DRAWTEXT(板,HIGH,''板''),ALIGN0,PXUP25,colorFF00;
8 e0 K4 I9 I2 o' LVARS:=SYSPARAM(1);- m! b2 X6 \2 ]0 J
VARSS:=SYSPARAM(3);4 G3 |" V8 e' p% S( _4 n1 V
VARDATE:=DATE;
/ b5 P; T! j5 H, K- C: F2 m光标年:=STRRIGHT(NUMTOSTR(VARDATE[VARS]/10000,0),2)+''年'';
/ Z: g: g N; Y: p" ]光标月:=STRLEFT(STRRIGHT(NUMTOSTR(VARDATE[VARS],0),4),2)+''月'';9 N& ~( u( v) ?9 G$ f
光标日:=STRRIGHT(NUMTOSTR(VARDATE[VARS],0),2)+''日'';* r: ]" i5 X/ Z2 m% a0 G R
A:=VARSS-VARS;3 C! U, r6 K1 n% J
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,光标年+光标月+光标日+''至今''),ALIGN4,PXDN4,colorFFFFFF;7 y# m6 P% l. @
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,''────────''),ALIGN5,PXDN15,colorFF;
$ y# ~1 P7 z3 i: y4 X$ ` v* UDRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,'' 换手:''+NUMTOSTR(SUM(VOL,A+1)/(FINANCE(7)),2)+'' %''),ALIGN4,PXDN95,colorFF99CC;# w G* |' c: k" i
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,'' 资本:''+NUMTOSTR((SUM(IF(CLOSE=CLOSE,CLOSE,OPEN,6,0),colorFF9900;7 j+ S5 w# u2 u3 A, V2 m# W
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),colorFFBB00;
, a; g) L! x& @2 q8 w. D7 a: q, ?" NSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,4,0),colorFFCC00;
2 _5 e( O' j+ |STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),colorFFDD00;
4 c$ L" z) L: ~. |3 L3 D% X4 V# tSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2,0),colorFFEE00;4 P9 s3 E, b1 @" J
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1,0),colorFFFF00;
# h* a& v$ n5 ?2 Q% i5 h% w6 sSTICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0),color55;% w( X/ D( U1 y% Z* j0 P
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0),color66;+ H/ N4 s6 p5 h3 h7 k1 _! v) O2 y7 U
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0),color77;
, `% t i1 @# `- H" a! ]& jSTICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0),color99;9 C3 q0 I' d' t
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),colorBB;0 ~! L4 k- n0 t" `. {
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0),colorDD;/ z" ?5 f( {2 [, c, A
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0),colorFF;
1 H! k% H! u0 `' iVAR9Q:=CLOSE=HHV(CLOSE,4) AND (REF(CLOSE,1)>=REF(CLOSE,2) OR REF(CLOSE,1)>=REF(CLOSE,3)) OR REF(CLOSE,1)=HHV(CLOSE,4) AND CLOSE>=REF(CLOSE,2) OR REF(CLOSE,2)=HHV(CLOSE,4) AND REF(CLOSE,3)=LLV(CLOSE,4) AND CLOSE>=REF(CLOSE,1) OR REF(CLOSE,3)=HHV(CLOSE,4) AND CLOSE>=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
Z& ?3 B/ s7 m+ ?. c K l+ s& A1 j; ]STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,7,0),color55;% K9 D8 v( D6 L) ?& |
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,6,0),color66;
* ^+ w/ s m. q G9 |. ^0 ^STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,5,0),color77;4 Z) @% w9 z# A# ]7 A
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,4,0),color99;
& [6 n$ u! R$ p( s$ B* u8 nSTICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,3,0),colorBB;
' H8 X5 J, I% M& K4 |STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,2,0),colorDD;: I1 V) J" R+ b B
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,1,0),colorFF; I9 _" a* Y) {+ N' b
VARAQ:=CLOSE=HHV(CLOSE,4) AND REF(CLOSE,1)=LLV(CLOSE,4);
% T/ ]+ d; }" bSTICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,7,0),colorFF11FF;
! ]1 A6 Z& w# K" ]; e3 aSTICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,6,0),colorFF33FF; |& ~4 t% f# K4 E
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,5,0),colorFF55FF;/ v. y8 t' ]: | ]( E
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,4,0),colorFF77FF;: f- C# C% C j
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,3,0),colorFF99FF;" H. t) s0 V- Q' Y; N
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,2,0),colorFFBBFF;7 z% A; x8 V4 O0 o& A
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,1,0),colorFFDDFF;9 C$ H$ J3 z' n0 {( C* ^0 y
VARBQ:=CLOSE=LLV(CLOSE,4) AND (REF(CLOSE,1) |