|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
; j5 {% J) B7 h0 L户均持股:=(FINANCE2(37)/帐户总数)*10000;
n( k6 R( F C1 T: W( G! g9 R' U: BZH3:=ref(帐户总数,3);+ H% v% @" h* u, |' F& t0 }% u! p
HJ3:=ref(户均持股,3);
6 q8 R' F. _3 _& K: Y主动率:="卫东.主动率#day";# j1 u1 @4 q, D5 C$ p8 k
单数比:="卫东.单数比#day";% Y& }5 l. }, ~! u3 W! f
通吃率:="卫东.通吃率#day";3 p4 r( i: s8 a5 E# Z
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
2 a ]2 J& T, h% f7 E+ wDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;& `2 m0 ?3 t8 \) I" L
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;8 R% l+ x( ?& b5 g' M* U6 ]
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;+ k& r; w9 j% T7 t$ c, W
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;- l; K/ u( f7 N6 K; ^
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
7 q2 W8 {, b& k* T0 m/ `DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;) `( d% g# D7 R3 T: J8 p2 c( ?
DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
) ~ L" z1 h5 s* `" W N连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;3 _5 |- y. M: v5 v5 U' C
连绿:LAST(CLOSE=REF(MA5,1);
7 I$ r- w4 Q( y0 MH1:=MAX(MAX(MA5,MA10),MA30);
6 {* ]! K, j9 JL1:=MIN(MIN(MA5,MA10),MA30);
3 Y9 Z5 Z p- z: C/ F* t- |DRAWTEXT(H10 AND DDY>0) OR DDZ>400);
: T; g' E+ E! t- ^5 ]A2:="MACD.MACD"(26,12,9);- f+ u& Z" e, P6 G
A1:=C/REF(C,1)REF(A2,1) ;
9 S3 l) E9 Z ]& MA3:=COUNT(DDX>0.045,10)>2;0 u( H; S* f: Q, Q
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
" w$ X# {8 U. R: hDRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
N5 M' h9 y! `. n' N; ]2 FDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
" K" }6 A2 |# M; {{资金}
8 J! k( s0 l$ [TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
! u) L9 ~& M4 P$ V* e6 j9 Q; q{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}+ ?! F2 x$ }+ c# M# K& _' B
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;
6 S, n; Y" \& j4 k# T- `. X WDdmrs:=sum(Ddmr,0);3 G# @, S, M0 d
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;% j D; {$ f7 _
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;5 p6 C: i7 d; C' t; P
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;( f% c1 Q! h& ?" r: I' Q
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;3 f4 {, p! b( R1 r5 F1 w; i
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
8 x3 Q5 G+ ]& Y/ q. H7 TDhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;! u% j/ `! ^0 J0 j: e& b
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
" _, S9 T9 ~+ t8 }3 k8 w4 OXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;4 b2 g2 Z4 g: |
散资:=(xhb-xhs)/10000;; p. P5 `) [) F
中资:=(zhb-zhs)/10000;0 D0 A* t7 y1 [. y# Y
大资:=(dhb-dhs)/10000;
* S4 ]2 Q* ^ l" k# r超资:=(chb-chs)/10000;+ s2 Q* I/ H; T3 W- ~3 d
超资增仓:=超资;
0 c1 ? g. u( ?大资增仓:=大资;
* g$ ^) q/ n6 f% ^* Y0 V8 V中资增仓:=中资;
( L. r, ^0 {2 C/ J/ C4 C散资增仓:=散资;# z& s6 z9 i+ T$ S0 p( t5 i
BBD净额:=(超资+大资);9 l* s- e: ~3 }( s
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;2 \0 D+ d, }( \! I
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
9 W! c+ P. Q* O; YDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
: f1 E; W3 e- ~7 C! SDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
7 S, ]$ s; r) ^) |! f {2 c0 HDRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF; l: ^! y& k+ ]9 i8 n% w/ c; u
DRAWRECTABS(0,118,270,0,1),COLOR00FF00;. v1 b7 \+ j' G- z8 I+ w
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);- R F( Q$ s' F) `5 S B/ C
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);# U. k0 e/ M0 e9 V+ ~% M+ K' ~
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);7 X' |! s$ @1 g2 J( m7 j* R
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);% {% f J& }9 G8 D& J+ c
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
$ S+ ~9 R+ D! Y: W5 {ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);; d K0 E( K+ _6 f$ l3 J9 M% f
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);# ^' D# H7 U: S* Q$ A
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
. r3 W' R1 T% I+ j! e, v+ hsdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0); H- k, A* f4 n+ j" Y5 h
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
- ~6 b' ?$ w! y0 k* Qtdj:=tdn-tdm;
* q" |' T$ p7 K: w: @ h3 ~ddj:=ddn-ddm;2 V& E' D2 y+ n
zdj:=zdn-zdm;
9 |7 m1 X) S2 z$ }sdj:=sdn-sdm;
/ T$ D% p. K6 N; p/ n/ nzlj:=zln-zlm;
1 u* m' T7 f- z" {DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;) i' y' A- y" A1 i9 L. g* k, ~
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
4 U- X; K. D+ UDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
* W+ J6 Z2 X$ D$ v2 ~; tDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;7 q/ G# i$ W$ Q9 ]
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
# m% F# |% Z- C5 |: B5 uDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;/ k- r& S* W: k+ S0 ~ l- H
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;% q' ?" ?" U" Q" |* ~3 X1 S
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF; m& C8 |9 a/ [) v
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
- a& j# }1 O: R2 k0 U+ zDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;! a3 N' W- E$ M! J6 C
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
2 [ a" L1 r! G0 `1 lDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;/ E; ^6 v8 A n) d" i7 k
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;9 p0 d x! k1 f% a' a3 u) F" V
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07