|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;' B1 m1 |6 O5 J7 l0 k3 G" {$ ^1 T+ m4 w0 z: H
户均持股:=(FINANCE2(37)/帐户总数)*10000;) G. ?2 o n m; R
ZH3:=ref(帐户总数,3);
5 v; ?% h" I( K; v ^) WHJ3:=ref(户均持股,3);
7 m* R$ i6 `: }. p7 \5 O8 f) p主动率:="卫东.主动率#day";
+ R* q8 S8 V# U+ u+ L单数比:="卫东.单数比#day";8 `) k$ F) f+ Q, b
通吃率:="卫东.通吃率#day";2 k% W+ i f2 T/ t
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
# K1 D" H: N6 jDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
o- ?. k% Y- R' {5 J: l3 T5 @DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
3 u6 C8 M$ d1 ZDRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
8 c" t7 I& r) m5 U" jDRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
/ J$ {! h* r& a( ~DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
5 J3 P( }4 _9 T/ f0 F, U& y0 \8 ADRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
4 ]. Q, Q" t/ [6 R4 F YDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;3 f6 i5 w% Q ^; \* s9 T D$ Y
连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
* M2 D0 o$ f d9 W \连绿:LAST(CLOSE=REF(MA5,1); L$ I) _+ k3 W3 o: S% h7 i+ o
H1:=MAX(MAX(MA5,MA10),MA30);9 s( n$ s7 d$ ]& S& X. n" W
L1:=MIN(MIN(MA5,MA10),MA30);
% p, Q6 l( j1 M0 e9 iDRAWTEXT(H10 AND DDY>0) OR DDZ>400);% w/ n5 j+ k n
A2:="MACD.MACD"(26,12,9);" ~4 n! h5 b/ j! {
A1:=C/REF(C,1)REF(A2,1) ;9 h. F, U, V I/ |5 X; h9 ^
A3:=COUNT(DDX>0.045,10)>2;+ p8 ]( [; W2 Q, Q* P2 x2 ?# U' S6 z
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
7 |4 W$ A, b0 F* l4 _+ |DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
' S& {4 W8 S# W4 ]7 B6 q) LDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;" `3 g8 b7 {: v( `( K8 r1 X
{资金}1 M) `# d3 {" c
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
& @/ I: s1 L& ^/ o' X{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
6 X% r" ~- E& vDdmr:=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;
0 _7 d2 w! j" aDdmrs:=sum(Ddmr,0);
& c; U: q# ~7 W8 ~$ \; w. g3 JChb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
$ h |. P0 G u/ |/ XDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;1 s; Q6 N* x/ x% z' K- W% C" m
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;3 ]$ o$ j7 D9 |4 z" \
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
; A% h$ N4 z/ q+ G) A6 j7 UChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
/ i5 b9 S) Y* H, b, F8 S; m4 ]7 t) O- ]Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;# J( f" P$ y, V8 o J
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;: P5 ~: Y' b- [
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;8 P' ]( W. C y5 w
散资:=(xhb-xhs)/10000;( `: }0 \# ]7 Q e
中资:=(zhb-zhs)/10000;
9 c1 Q( J, ~5 q* g: ~) h大资:=(dhb-dhs)/10000;! a) u& r& L( n( W9 p' N. r# W
超资:=(chb-chs)/10000;& f$ B; B) F# e
超资增仓:=超资;
0 P. S- z n) b大资增仓:=大资;
$ t; C2 ^2 H: S; \: [( p中资增仓:=中资;
/ f/ z6 E5 }9 e& c0 [) b# ~散资增仓:=散资;/ C6 s1 T) `8 d- f
BBD净额:=(超资+大资);
4 r6 _& T4 v2 O7 fDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
& X9 S8 o2 j8 X) T$ y* `8 aDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
! s2 L- P: S5 K9 ?( \* JDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;/ q$ O. d" P/ z
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;5 u# n( g' c* M r6 {/ {
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
3 [' L1 ~: o$ k. z! qDRAWRECTABS(0,118,270,0,1),COLOR00FF00;5 W6 `, Y& Z6 [+ z& c0 m
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
, z% I4 ? r/ A: N! h+ B# L+ {zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);% C8 b9 ?+ X* Y6 ]/ O) X/ N9 B% g
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
0 {7 v# B5 v8 k2 v1 ~tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0); S X' c k+ h( S, }( _
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
- S+ q. b3 D0 C7 y8 Fddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
' E. C7 `7 d" l& Q# W+ l3 lzdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);( ~6 d$ ?& ]4 V9 v9 Y; d
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);+ x5 Q5 _" ]. h
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);4 C( m# u$ D- A
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
! A. B3 ~3 x% I3 [* s6 z2 R: Jtdj:=tdn-tdm;
- `/ K) L: b, U" ^ddj:=ddn-ddm;
% ?; [2 z% ^1 R9 G* |/ M) R, qzdj:=zdn-zdm;
* q# Y. C/ l5 X- ?sdj:=sdn-sdm;
Q* R, o8 B" n) ?zlj:=zln-zlm;
' y$ O0 L1 s2 x+ rDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;% ~0 @! x1 H2 m' _. `
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;6 Y' s6 }+ t. ~+ y& m
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
/ }8 c7 D K: }* Q2 M5 P! @. EDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;+ }- E7 R3 n+ D% V% g( |% h
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
/ Y9 ~. f: T2 _! ]2 DDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;4 [0 v, _. F% Q9 T! s9 B( n
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
* u& W7 h8 p2 o# ]3 vDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;1 J" \* \ d D$ }1 J; v4 c0 ]
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
+ Y+ t4 q U# S4 z4 G3 EDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
5 \- |/ ?; S4 v8 Z$ l1 [7 [0 WDRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;& a* P5 X* Q3 O2 W- a9 m4 ~
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
2 }) O$ N" ]. _6 x$ B; m- u1 U5 ADRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
& x0 M: n$ n. K# X. y hDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07