|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
1 E0 J5 J" c! B. o户均持股:=(FINANCE2(37)/帐户总数)*10000;
' Q+ n! T. R! C0 c5 `* p3 H9 q3 K% OZH3:=ref(帐户总数,3);( c; A( F/ Z F: V
HJ3:=ref(户均持股,3);+ `, @" z/ i8 h/ o7 x8 ~& t
主动率:="卫东.主动率#day";
, h3 g9 G" i* @单数比:="卫东.单数比#day";
% m% x$ b a7 z! n& }1 @5 [+ \3 ^通吃率:="卫东.通吃率#day";$ W# V" C# W6 B2 r4 C
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
* ~1 }$ _# o' D) d. r tDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
- X/ ]8 Y, F2 D7 m! J* S3 zDRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;: B4 S9 y* M3 ?
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
2 a* w d" K( n. b& P: {: p1 z" LDRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;9 r/ b. r% H( I. z& @, m$ ~2 E
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
! I8 O, r' W; q3 x) y7 UDRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
6 t% a2 _1 T" J- [0 U/ B; B, yDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
! ^9 W4 H; C& [2 Q' s6 T5 P' h- q连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
1 `8 P$ n2 D1 w5 d$ J连绿:LAST(CLOSE=REF(MA5,1);
( l$ @8 c- T( i4 Z' rH1:=MAX(MAX(MA5,MA10),MA30);
5 w# e6 g* u" J- a! nL1:=MIN(MIN(MA5,MA10),MA30);) P" l3 V2 g# ?2 m0 Q# Q
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);
' [* W8 } g6 q& M- Z4 n% `A2:="MACD.MACD"(26,12,9);
/ L5 L0 N, c7 xA1:=C/REF(C,1)REF(A2,1) ;' {5 j8 b- X0 {2 }; k- N) }& B
A3:=COUNT(DDX>0.045,10)>2;
! C( D/ s, ~6 D1 l弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;( Q# e6 W) B* \5 b3 T
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
3 g3 M" T% }1 }2 Z, b& Y: p+ sDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;4 J! C! D3 T2 b
{资金}6 g: r7 q! I( S$ [( d
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
" ~& K9 |. I, U{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
/ X8 ^, u d& LDdmr:=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;
- @: w6 m8 Y, UDdmrs:=sum(Ddmr,0);: }/ t5 Z3 p3 t4 S2 ^+ s' }
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
# E2 Z2 m+ n( w6 p2 gDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;. f) `3 g9 c, ~1 U1 X
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
- x2 q, D, [ W lXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;! x0 x) q z* I9 ]
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
7 d4 s" g5 |8 DDhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;) o/ C- M2 i: f! {. Q7 y& V
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
# P Q4 b5 w5 O. N. z$ R& a& V$ j: PXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;1 _$ ^9 [- b1 b; z# L; E# s
散资:=(xhb-xhs)/10000;
2 r0 B+ s, [3 S0 D! A4 j中资:=(zhb-zhs)/10000;. D8 R& x2 A( w7 w( h
大资:=(dhb-dhs)/10000;- o% m M: T' r( D: D! g/ c
超资:=(chb-chs)/10000;
: R2 n2 U0 ?# x2 @超资增仓:=超资;1 C" O' T6 y( l& a' o
大资增仓:=大资; N8 p1 t5 T& e7 C: s5 ^
中资增仓:=中资;
0 v8 v4 f# S& U% G0 L散资增仓:=散资;4 m0 H& l; e+ m' s8 |9 x
BBD净额:=(超资+大资);
+ i' J3 [) z9 t1 }2 }! KDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;( m1 C# R; [0 |1 \# m. @9 d, Z d9 h
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW; H% ?* ?" j, g. m) w9 ~) |/ k
DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF; {' a) X2 j! p& ^
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;9 R0 }; V( O3 T/ q \8 C
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
; o7 F f+ d1 v, N/ t: {DRAWRECTABS(0,118,270,0,1),COLOR00FF00;' P1 x5 I$ K3 ]/ V. [5 f7 D+ _9 B
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
; I$ O6 _+ {0 dzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);" G8 `4 i1 F5 a
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);6 o: S/ c* X! g
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);0 R% {( h7 a, b; O8 o
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);! u2 V% ]5 Y! b
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
6 @9 w( ~& a$ J( T8 [3 A8 azdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
* f- W# ?/ I* R. M Z: szdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);8 u2 w5 r5 v5 p
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);+ d( u! t3 a/ z6 n2 U3 M/ _) a+ h
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);+ p1 {1 O# w! K
tdj:=tdn-tdm;- u' p" i a. L4 l6 t
ddj:=ddn-ddm;
2 G+ ?9 l( \/ y* [! b# V& uzdj:=zdn-zdm;$ R4 e! O5 X$ W
sdj:=sdn-sdm;7 ] q) F5 Y) c7 x; v+ v0 b
zlj:=zln-zlm;
$ e' r; x% {/ XDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;+ W6 k! Z$ C' h) ]6 J
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
, W4 m" ~8 f/ y. I! b# RDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;5 q( R: ~" }7 t: R1 f& ~* V- f
DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
) y3 n4 M& f& IDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
2 D3 ]8 E2 D- k3 f, s' N. ?4 ^$ GDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
2 _ d- z6 Z, }$ `- B' a" @0 eDRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
& ^1 M) _8 T+ V; J0 n4 I7 _DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
a' B8 c3 O- L. cDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;& I# t+ d; R% ]
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;' D6 k1 V- l, R V7 D9 Y8 s
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;" Z) i" f% O, { R/ m
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;0 R9 {/ ~9 c/ w) H* \4 m4 y
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
9 ~. w, u9 o! R/ {6 QDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07