|
帐户总数:extradata(''散户线''),linethick0,PRECIS0; A- ^: v1 b& E# e; l4 f
户均持股:=(FINANCE2(37)/帐户总数)*10000;
( J" w& E$ ^( E- GZH3:=ref(帐户总数,3);
7 x. y5 {% m8 B5 i# ^( N# jHJ3:=ref(户均持股,3);' {8 E- O! l0 \* _
主动率:="卫东.主动率#day";) i8 Q8 q2 z8 j- k9 P
单数比:="卫东.单数比#day";
( N5 A; v/ W2 i% b% h" M通吃率:="卫东.通吃率#day";
0 m+ k2 I2 a/ {- d4 @- ~DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
, k _* U) H8 s" ^DRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;1 _5 J" W8 {! c/ j ~
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
3 B" p2 j; ?5 ~3 MDRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;3 F$ y: f" c1 o# ~
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;& z+ C$ _1 ]0 K& ]$ X8 p! S
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
1 Q C! ?% H4 h8 eDRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;1 Q& e) X9 I& o9 p R) s
DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff; o F* F1 j; \- W; c) s
连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
2 T$ @: o3 S3 k; b0 D- U$ w连绿:LAST(CLOSE=REF(MA5,1);2 E: Q0 R' j1 k% z. _4 X! J
H1:=MAX(MAX(MA5,MA10),MA30);- {# e# a/ z% W4 I* Z6 d- B
L1:=MIN(MIN(MA5,MA10),MA30);+ S; n6 L! d2 `, J, X/ C, z
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);3 H) }% u$ R h7 o7 X
A2:="MACD.MACD"(26,12,9);5 X4 ]; H2 c7 F* ^- B- S
A1:=C/REF(C,1)REF(A2,1) ;
( t( w1 I7 o0 } zA3:=COUNT(DDX>0.045,10)>2;* ?. X! N3 S+ Z# ~
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
" J) L3 S( ?8 q& C6 yDRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;3 Y8 S6 J* h+ z
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
3 A! M. V5 W! s0 @" a- t8 C{资金}
% t4 C6 T1 A/ lTODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
, M: _# L& G# C{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
% |0 P7 f4 y/ ^1 D& h6 s) B. E. fDdmr:=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;
# {' z) }$ s9 z. n7 k* o' K' \7 SDdmrs:=sum(Ddmr,0);. T% I: S# z5 N- M G) I6 N) ]
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;' k$ ]" Z h4 ?' c+ }
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;. M1 R4 j# a- Q; ?7 Y5 e0 A$ i9 H
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
; c" t1 \$ Y' j( z5 N E/ }Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
- p0 g/ N& X& x5 _3 x( m5 pChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
+ h H X/ I! ADhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
) p" {" l" `: B) g( BZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;; l9 m. C! `/ `( A
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;- f! O$ ]+ R* Q! U" O: g7 z; T" \
散资:=(xhb-xhs)/10000;$ V* j* c7 J6 F. V
中资:=(zhb-zhs)/10000;
, _, G! h/ r) R# p' _9 A$ z大资:=(dhb-dhs)/10000;& ~( S, \4 J" u5 b H' i
超资:=(chb-chs)/10000;
/ D" C! r. U: a7 x4 q超资增仓:=超资;1 j8 j5 P4 S& _& F" X2 {9 O3 K* O
大资增仓:=大资;0 X4 i# b6 {" R! K- @
中资增仓:=中资;
: M% r0 _, E0 i4 V" ~散资增仓:=散资;
) R. j3 b( G6 F- p% UBBD净额:=(超资+大资);
* T9 I) A1 {0 [3 zDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;$ u! h ]; O' d! ^" ]
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
) W: `$ e+ x& R( f& m( BDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
& s' P3 M; A( ~: ` W1 m) UDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;* D Z# ?( k4 \6 o$ N, \
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
; R! d5 P, k0 h! U% O2 m/ nDRAWRECTABS(0,118,270,0,1),COLOR00FF00; {2 t4 T: m5 r. H6 H) W; t; f
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
# j' d5 |& W. T% ?4 R4 Gzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);4 d4 Z. y# H* x5 O+ w+ P# @, J7 p
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);& S# }2 e# r. o+ S! o0 B
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
" R) ~6 A8 ]& f: V: {ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);, h3 t! O) |2 [' r7 \# h9 q
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
7 j0 e% J# ^, G' H% U. M7 y" i6 Azdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
: o. H, O( X( L. _# Czdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
# F, \( N" N( g9 K6 n# l4 R" ysdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);6 s: V) I w5 @5 s3 J5 M
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
" Y0 k) i6 K, Y4 v! ?tdj:=tdn-tdm;
! h% f, w9 k) X1 s ?5 m; yddj:=ddn-ddm;) J) i- k8 ]8 C7 q( K' Y2 O
zdj:=zdn-zdm;4 Q/ b5 e) O, i$ {8 c4 | n
sdj:=sdn-sdm;7 Y) @. `6 G/ X
zlj:=zln-zlm;
% s% `7 ~8 P* ^1 G i2 }/ f5 @# YDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;3 k2 Z! n; h% q4 T0 R& \
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
' g$ W" ^% D: d7 r/ m8 o. XDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
# R$ L1 H8 `7 ?" ~1 CDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
% I- s, D% m6 k8 z) U3 G, G" TDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;% b9 A0 C" _: {* C1 }0 H
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
0 U+ U c, O4 g! R+ tDRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;' a+ Q; E# u2 x, m* p. E1 X7 {
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;1 y( m1 K) q5 Z$ Z
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
3 M$ n; n0 U+ \* w6 y9 u# q+ l" hDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
/ {1 s8 j4 W4 M: [# \DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
; s- i; o* e! k ODRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;# V0 K8 m& t) X/ g7 D: I; M
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
' S! [: A+ `0 D7 ?DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07