|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
% X: l) \6 j0 h5 A% a户均持股:=(FINANCE2(37)/帐户总数)*10000;
2 s# ~& Y4 v3 s/ }ZH3:=ref(帐户总数,3);
" N4 e. {8 O9 R6 t1 `5 VHJ3:=ref(户均持股,3);( \* O8 |% p0 ?7 z8 j; n' r6 w
主动率:="卫东.主动率#day";7 R6 S5 N; Y$ d" W# w
单数比:="卫东.单数比#day";) A) U* B/ u% [* l; K1 i: L. h
通吃率:="卫东.通吃率#day";. l- \4 d E- J( q% O+ j4 H
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;' m8 Y+ A* I) ], \8 S M# x
DRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;* e6 \/ z" _# U* t
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
- d1 x, b; n& U9 P( Y5 ZDRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
& c2 {( Q7 b- _DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
) i$ D4 K( l: N7 E8 eDRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
9 E9 M5 S- x! K/ P8 {DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
$ L* P" ~5 s6 X- m4 ^DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
( {+ A- T* F: ?+ S连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;1 Q: [! |: K/ M+ K. D
连绿:LAST(CLOSE=REF(MA5,1);/ f+ t, Q0 q& d+ r* D1 y
H1:=MAX(MAX(MA5,MA10),MA30);
/ X1 |* T$ f/ b6 E7 C+ t3 |9 EL1:=MIN(MIN(MA5,MA10),MA30);
4 W/ i1 T: ]) J( z) LDRAWTEXT(H10 AND DDY>0) OR DDZ>400);
8 W0 E# J$ y% C0 |* |A2:="MACD.MACD"(26,12,9);; Y4 j1 ^8 V3 T+ B. [+ W$ k
A1:=C/REF(C,1)REF(A2,1) ;
6 }# l, S; m8 t; r( e: Y! s {A3:=COUNT(DDX>0.045,10)>2;- R1 k. a @# o: Z8 }- Z
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;) z9 D0 b. `( f1 ~. P4 Q7 F9 W
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;$ F7 m" a& e2 n: P% ?, {
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;9 @: Z9 m0 S: M3 _. n9 V6 x
{资金}
G* p+ i5 m/ d2 ~TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
& l! Q& P, V" U- k: ]# U# M{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}$ a+ U7 \: i* g9 d
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;
+ m* v$ B+ m9 r+ X" `5 rDdmrs:=sum(Ddmr,0);6 d/ j$ N8 X. a* L- M4 Z1 _8 [$ _
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
- O: {# A" a- ?8 z+ S4 Y: cDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
' _# w3 Z5 ~1 A& R3 ZZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;1 k0 p, y1 a( `# S0 _1 `) q
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
6 c+ ~$ M" M% U0 f, JChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;0 R! C# s; b, o4 {# h
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
4 m% R" \( F1 O% [. |1 hZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
* P1 e) ^) h$ |0 AXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
; ]+ g G2 A; R散资:=(xhb-xhs)/10000;) }. v+ m6 `, Q2 G! N
中资:=(zhb-zhs)/10000;4 S' S" v7 Z' h5 }0 C
大资:=(dhb-dhs)/10000; W6 F4 ^# x: d, a" E5 r/ t1 y
超资:=(chb-chs)/10000;2 J$ m; n q1 E5 H$ b
超资增仓:=超资;
) ?# ?- H4 t- e0 D- U大资增仓:=大资;
( x- }" Y1 s( I, h* }8 I中资增仓:=中资;. Z) y2 d- E% U# \
散资增仓:=散资;
4 X$ }9 K, O; U. I8 T6 s# Y# eBBD净额:=(超资+大资);
! M S& } h9 r6 p5 y9 M0 aDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
# G" w M8 ]7 h( O) rDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
W9 Z5 Z h# N) S0 iDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;' ~) G/ V& E+ w6 E U( `
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;' N1 @* N; S# r5 G( K. F$ v
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
6 V: r/ G" y5 Z; j- ~2 Q/ gDRAWRECTABS(0,118,270,0,1),COLOR00FF00;+ O6 m; J" `2 Q4 v
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);- r6 Z! H8 k% O; Z
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);2 z4 g0 O/ c7 n3 v( i- M7 {: i
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
- T& b) ]& a0 P9 Etdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);' S! n# c1 ?7 Z" G
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);1 `2 ~0 i- i* k, f8 R$ o
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);. R' N8 F) C/ H4 U% I$ p% z
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);6 v9 ?- Z8 d' Z. h Y$ v
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
) g4 L0 g0 q+ X# jsdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);- e( u: e: {' S0 U
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);( c' ~% a. W. v9 ?: X
tdj:=tdn-tdm;, M2 [# J" ~) D8 c8 M
ddj:=ddn-ddm;
, r; F* {) n4 A2 Mzdj:=zdn-zdm;# Q6 p& l* T6 O9 D
sdj:=sdn-sdm;
- Z- C, w* C ?6 ^4 I: N8 dzlj:=zln-zlm;
7 Z2 J3 A5 R6 `9 {2 G' PDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;3 |& ~. u0 t( k' y# o d) @* s
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
. l) p& |9 w4 \0 f( X/ FDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;. b: |' j/ P5 }- _/ \. l
DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
$ K9 C! U: Q% lDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
( l9 p5 f" W: A7 q0 k6 JDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
" U+ ^ v% g* o' FDRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
0 h M" n4 `' f0 f: V$ JDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;. I1 b. G) j- P" z' V7 d: T/ Y
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;1 U' k/ H. I- ?! ]$ A n Z0 G$ T
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
6 s, q7 V; E! f+ S, g- }DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
% J7 ? f" L) A GDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;1 @% G1 ]$ L/ f6 _' @1 P
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;6 k, t/ [4 i- M* x! H
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07