|
参数 p1=13 p2=34 p3=55 p4=89 p5=144 n=10 p=3% o- |, o" m9 t. k8 }7 {
$ B9 [0 o) D" N4 S. G2 X; `" r
DRAWGBK(CLOSE=CLOSE,COLORRGB(30,30,60),COLORRGB(30,30,60),1);: T/ x2 _% ]5 n0 v! V3 K' Z* n3 \
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;
: `/ u% s. I1 Y7 qVAR0:=IF(DATE0,0.0489,0.0965);. @" M9 U0 }& e1 F3 J0 D
板:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>板幅度 AND HIGH=CLOSE;2 }) p7 T9 @* |1 O0 ^" i0 |
VARVA:=板;
# t* D1 P( L' yDRAWTEXT(板,HIGH,''板''),ALIGN0,PXUP25,colorFF00;
# n' l5 u8 I+ U1 A; LVARS:=SYSPARAM(1);
% i, Y% O! P2 |& B: DVARSS:=SYSPARAM(3);7 ?# K5 ~3 w% Z1 m% Q, |) b
VARDATE:=DATE;
5 g# t8 n0 `4 M& d! c: O8 x- j光标年:=STRRIGHT(NUMTOSTR(VARDATE[VARS]/10000,0),2)+''年'';6 L" F: s& g p6 J: B& D
光标月:=STRLEFT(STRRIGHT(NUMTOSTR(VARDATE[VARS],0),4),2)+''月'';
0 B, K: e) l% g* |光标日:=STRRIGHT(NUMTOSTR(VARDATE[VARS],0),2)+''日'';( r+ \- [ h+ q* i; @. B
A:=VARSS-VARS;+ b, f8 m# b7 M. o+ B, o3 r$ h; O
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,光标年+光标月+光标日+''至今''),ALIGN4,PXDN4,colorFFFFFF;
5 W2 x9 F: S9 v. JDRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,''────────''),ALIGN5,PXDN15,colorFF;
# v! g3 {! r0 p3 I$ P& `7 L" G* u9 cDRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,'' 换手:''+NUMTOSTR(SUM(VOL,A+1)/(FINANCE(7)),2)+'' %''),ALIGN4,PXDN95,colorFF99CC;% m' L* g0 u7 T$ p
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,'' 资本:''+NUMTOSTR((SUM(IF(CLOSE=CLOSE,CLOSE,OPEN,6,0),colorFF9900;5 I8 O: Y% i9 x, S! V# K/ Z- ^
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),colorFFBB00;
! t2 Y! V$ B0 f' hSTICKLINE(OPEN>=CLOSE,CLOSE,OPEN,4,0),colorFFCC00;; M, a. Z6 \) ?6 ?
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),colorFFDD00;7 N9 l- M9 _: F3 K6 b
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2,0),colorFFEE00;2 y* J& p }( R4 o0 p3 F
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1,0),colorFFFF00;
0 g4 { S2 U5 p% l6 `STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0),color55;: ^) w8 R% v/ i1 v( c3 L2 G& N# j7 r& s
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0),color66;+ E' Q& R5 M6 M6 D: O, O2 K/ u
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0),color77;' y$ `( }6 n1 w; A
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0),color99;
& Y% r1 B% j4 r$ F- l1 N1 T) e lSTICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),colorBB;: m9 b# d. X3 V
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0),colorDD;: ]7 _ g6 b$ b+ q$ _2 A
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0),colorFF;
/ P9 q6 X3 A$ P: |/ vVAR9Q:=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);% j9 B$ l" p% g: l6 H) X0 @# Z
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,7,0),color55;
- ~. N' \" m- E) R# kSTICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,6,0),color66;3 \/ |1 j% j( u+ c
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,5,0),color77;
/ m7 ]8 V# s- |( T9 bSTICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,4,0),color99;
" k! X3 u6 q" \9 h9 ?4 ESTICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,3,0),colorBB;: Z) A1 f5 C5 B
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,2,0),colorDD;
8 T, n2 U& F6 X6 V2 W0 `# ASTICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,1,0),colorFF;- ~" B/ i# ]; T6 C
VARAQ:=CLOSE=HHV(CLOSE,4) AND REF(CLOSE,1)=LLV(CLOSE,4);' g# j5 y& H$ }7 M) [% f: \' m
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,7,0),colorFF11FF;3 i' ^' I4 B0 e# `
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,6,0),colorFF33FF;
. ?! ?( t! ~; ?9 B7 {# F8 M/ a, f# ESTICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,5,0),colorFF55FF;
' E8 ~' m6 Z; n0 V" q% ySTICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,4,0),colorFF77FF;
! v" _. q( w; p+ T9 Z2 [STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,3,0),colorFF99FF;
S! u( s2 C' s! n; u* h( ~" v8 NSTICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,2,0),colorFFBBFF;+ R9 N4 f* D( w0 h, ?+ T
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,1,0),colorFFDDFF;
2 q, B( ^- L1 ]" ZVARBQ:=CLOSE=LLV(CLOSE,4) AND (REF(CLOSE,1) |