|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;7 B6 l* E5 M" n: f, q- y+ z" B7 {! c* l
户均持股:=(FINANCE2(37)/帐户总数)*10000;5 h7 T9 N: f0 O& p% X% [6 e
ZH3:=ref(帐户总数,3);8 K2 C, t4 i$ e! o+ p8 M/ }6 {
HJ3:=ref(户均持股,3);0 d7 V* }( c' [. I, x3 J
主动率:="卫东.主动率#day";
g: K: A5 I( q% B5 i" Q单数比:="卫东.单数比#day";
; l: p# h# _# Z/ ^# U' \- Q8 `$ b通吃率:="卫东.通吃率#day";* y; W( `* E; p5 A' I4 D
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
( }) p$ z/ h# Z3 a4 YDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
$ _$ k- H* Z0 jDRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
# o* b$ |4 g) m( n) ?DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
' m7 |; f) v. P6 B" Y1 U- a6 KDRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;6 N" H+ K2 q }% g5 ` {# T# O& ~& I
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;: Z& E+ x6 L! k* s
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
5 f! y5 h m6 p. EDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;5 {# d% h6 Z$ y9 g# p2 z
连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
9 f) p) U- z/ j' p, E/ Q! P T, Z$ W连绿:LAST(CLOSE=REF(MA5,1);5 X* |( L l* L) Q
H1:=MAX(MAX(MA5,MA10),MA30);
, H3 z/ K/ h0 @( W AL1:=MIN(MIN(MA5,MA10),MA30);
6 Y3 |9 r' r9 r8 ?$ `/ `DRAWTEXT(H10 AND DDY>0) OR DDZ>400);# q4 ?4 ~* B5 y" ?: ^8 F; E: O8 T
A2:="MACD.MACD"(26,12,9);
3 x& H, _) @/ @+ k6 ^! i- ?A1:=C/REF(C,1)REF(A2,1) ;# D F [9 G/ L9 c* |
A3:=COUNT(DDX>0.045,10)>2;
: \9 c3 ^8 N7 l6 k8 z" v弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;9 L8 [! D! W& l7 x& A% f+ B3 y' I
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;/ J" \8 D5 ^; i. t, M1 D
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
9 ~9 o/ |+ }, \! m0 v( w{资金}( w8 j* v p3 y8 ~- T
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
' r' @" j8 ~5 `1 F l! L% J. Z{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}$ Z& D- X$ t7 P. u+ E, i$ h& y# g) @* v
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;. ^1 d) s* ~6 K# V
Ddmrs:=sum(Ddmr,0);
0 L. G. i t7 m3 iChb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
2 U1 f* Q8 F* m7 RDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;# [; R" F8 U8 Q3 @# M: ?
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
- d0 a4 R# J% L! Y$ H" rXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;3 ]+ d1 p; V1 y$ u
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
! J; c. m8 y& o: a TDhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
3 O* P, h$ g3 T" E7 w" O# J# h$ tZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
( o2 f& c7 {, U3 Q9 @Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;! g8 J. `8 ] h, E
散资:=(xhb-xhs)/10000;2 }3 S3 g- L0 _( |) j
中资:=(zhb-zhs)/10000;! k# C# p; C# G' o
大资:=(dhb-dhs)/10000; `1 A( M( X: ]& U) D2 k
超资:=(chb-chs)/10000;: z/ p |! }( O9 F
超资增仓:=超资;
5 O$ P" f, V4 ?' v7 a, s7 ~大资增仓:=大资;
2 B0 X4 Q9 d4 ^; N6 `/ B中资增仓:=中资;
1 {- _ e+ p9 o散资增仓:=散资;
7 W1 j+ c; k$ j+ o' i5 B+ dBBD净额:=(超资+大资);' O' u$ F" Y! Y8 N% ]7 r
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;4 C9 v/ P5 B+ W% z. r
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
& T+ e" i: g. K+ _$ iDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;. g8 M/ F5 \7 U2 s2 M# p
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
7 {9 h. { P9 v' [DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
1 h) N" l* i$ @* QDRAWRECTABS(0,118,270,0,1),COLOR00FF00;0 z9 R4 x! }! f, V. _$ R5 V
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
2 g3 ^$ A+ \6 t6 g3 yzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0); r2 `/ v, h3 S' V
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);" p- h3 m7 Y/ u2 o: x' z8 U5 W! b
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);: r5 S/ F/ V) H' t& B
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);3 \' @! X- s" P& O8 Y3 Q8 n, R$ Q
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);& b5 s! S: L. E1 l1 ^% C% u+ {8 e
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);6 b* `! K$ P# J( L
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);* e3 c. w$ A( ?
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
/ Z. A5 S3 L3 V7 ?8 @# \- tsdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
2 p4 l* T( t; ?( \: r0 Ntdj:=tdn-tdm;! \. I, o) y/ w2 |, ^
ddj:=ddn-ddm;' B1 r3 y2 I) d( f: {# t. \1 e# F
zdj:=zdn-zdm;! g$ |5 Z2 K$ O+ d2 j$ x/ U
sdj:=sdn-sdm;
' Z7 D% Z Y8 u* }6 U7 lzlj:=zln-zlm;
9 c9 j2 F# j$ a/ O7 jDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
/ K) N% \- g/ k: oDRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
% F1 n' ?: @6 ?+ `DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
% T* t$ w# e& RDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
' R8 T7 y% [" N9 UDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
* }, f) ^8 ]+ i+ N) G/ @1 ~DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
0 q$ u4 }# h# E4 Q2 K* i3 G4 DDRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
% y( m( u$ r% h. J9 a1 `DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
8 v7 s3 h2 {, L2 u: GDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;3 _/ N6 s5 `2 X
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
) e, w7 M7 i! H EDRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;9 z7 u* `, m5 k) e: m
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
. a3 G' { m' _2 E1 i7 DDRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
) f0 F/ M6 \9 T5 w+ D# GDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07