|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;5 z7 h& L# y. x2 L, {3 n
户均持股:=(FINANCE2(37)/帐户总数)*10000;6 f! ]; g1 w7 p4 r
ZH3:=ref(帐户总数,3);
5 X. I# R" I! k2 ^1 rHJ3:=ref(户均持股,3);
3 R0 t; w2 N, Y7 ]( A: J3 r主动率:="卫东.主动率#day";
! s5 P) V" ^. z7 ~ b& w+ ~3 l1 k单数比:="卫东.单数比#day";
1 Y9 L) j2 i$ V+ Z. \0 n通吃率:="卫东.通吃率#day";- P" R6 Q+ X2 y
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;3 ?% M! W9 i3 T% u. {. `6 j
DRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;! s' Y8 `; o* N4 e s: A- m( F
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;' I9 k) _9 Q3 q/ u2 z! C
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
: D9 k' A5 X. `, i( h% rDRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;; R9 k" y5 W& \/ |$ o' n, m; j
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;8 i6 b* u8 |7 b4 B6 y7 \+ }% |
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
* |) C- ^; I4 p4 WDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;3 T6 j& G' f$ ~8 ]7 z, E: z. X
连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;6 _6 C: @: L4 ^$ P% F. E
连绿:LAST(CLOSE=REF(MA5,1);% ]* `5 h- T8 [/ n( F: J. }8 d" x" O
H1:=MAX(MAX(MA5,MA10),MA30);' @' j4 d4 s3 ?3 d" L+ [
L1:=MIN(MIN(MA5,MA10),MA30);
6 }. I: f, o/ X5 Z% g% R3 |DRAWTEXT(H10 AND DDY>0) OR DDZ>400);( U/ E6 V5 S9 C+ h# X0 w( G6 t
A2:="MACD.MACD"(26,12,9);9 {+ R2 ]; T5 Y$ q: R1 b* K: B
A1:=C/REF(C,1)REF(A2,1) ;. E4 O, P- n. d6 F
A3:=COUNT(DDX>0.045,10)>2;1 \0 e3 w6 ?& |! |
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3; x8 f# f5 _/ G2 x
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;% {" v& {+ e& i2 ?9 I% \4 C) r. \
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;2 k( X6 `0 e. w& H2 k4 [0 R" V
{资金}& H( y& p! W$ p* X# A d b+ y
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
7 P; E+ `7 F/ d% f' X( r# V{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
# e& U- i" C- B$ b, y( U6 z/ y: L2 @Ddmr:=IF(TODAY,("DEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(2,2)),(bigorder(1,2)-bigorder(2,2)))*vol/capital*100''>DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(2,2)),(bigorder(1,2)-bigorder(2,2)))*vol/capital*100;. }( ^7 o# ^: J4 \* P1 U% C
Ddmrs:=sum(Ddmr,0);# m$ A9 ?4 i( j9 ~3 H% [+ @7 \- t
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
/ X0 ^* g9 V' A PDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
& @& H1 h0 r, X( s3 Z! n( @% FZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;8 e w$ E1 X' m1 O* I2 J
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;" i: s4 M; j7 k7 `- [8 V
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
8 T" n- y1 A' M3 z$ o: B* ~0 t. pDhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
4 C1 i1 O) |8 H) X7 w8 rZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;; R+ J) ^. l. S! I. b: j& u, X" f
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;; s* M9 n( Y& ]+ M+ z! S
散资:=(xhb-xhs)/10000;# \+ _, F0 A* N- L0 j9 z
中资:=(zhb-zhs)/10000;/ W" V+ Y6 e5 w. I9 \& R
大资:=(dhb-dhs)/10000;" h% \! C; Q' Z" Z* h0 B" F
超资:=(chb-chs)/10000;
+ | J' r0 y5 S' L! Q( g超资增仓:=超资;" [# R8 @: O+ U. ?2 N
大资增仓:=大资;; T) ]: N! l! }' Q# z
中资增仓:=中资;
( Z2 g# D. E; U7 _0 N1 Q( @散资增仓:=散资;
4 @* j! a/ b' U& n6 uBBD净额:=(超资+大资);* G: Y) g- b6 B1 y* Y
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
' O; k% c" X/ F) S0 Z7 D8 _DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
4 G2 S2 D+ F0 u$ ADRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
8 y3 H/ o) F# R4 VDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
7 F& x; }0 _% ?DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;0 V5 k% f. E% p' \6 k1 q
DRAWRECTABS(0,118,270,0,1),COLOR00FF00;
3 k7 o. }3 y6 _9 F) t$ u2 xzln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
. f' I$ K& r- ~* uzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
( t3 Q. D+ a* K' j1 ^7 Z1 ^( `tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);$ k, \0 U9 H6 W% X( x
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
/ h- @! v& v& v/ l; Y# G4 m8 J5 \1 tddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
9 }1 G% N" h* |5 O2 _' X' Zddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);! p2 \% {* a9 T7 H" T1 C
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);3 h, x1 F X; w
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);+ r% a, k7 O9 b9 J# c4 x* Y
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
9 o3 V3 I4 U; o6 zsdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);( j7 ?1 V; L8 _+ N& o, e/ f5 v: }
tdj:=tdn-tdm;
b' E" k4 @3 Z1 n% d$ t) ]" lddj:=ddn-ddm;
; b: Y5 U5 Y; D! [zdj:=zdn-zdm;
! i4 a5 E0 c/ I7 _5 Asdj:=sdn-sdm;
% T8 k8 J+ I! \. W4 qzlj:=zln-zlm;# x5 s+ T8 x' h) x% P
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;3 P! ]2 Q3 |; P/ p8 Z
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
- p5 s0 C2 V1 I+ [# P" NDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;; j- c7 P0 m2 q: B
DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
: P* Z: u& d2 l/ tDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
. _! U: I- s' L: @9 F" {" Z8 c! Z. qDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;) b8 L) P6 ^9 {! Y5 V" o: L
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
$ e8 a8 D! O/ S3 i( W9 h- C4 gDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;+ v* _2 x8 |5 f( G; [4 F5 A, A# s
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
v( L0 }( K2 i2 X/ FDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;: r% u D/ F" q: @; s2 @( k$ s
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
5 x( F2 b8 Z! k" YDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;' j/ n4 L" V5 z
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
& \4 _: |' l$ ]/ T0 TDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07