|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;- y8 a1 A% x. }; a& T+ I# v
户均持股:=(FINANCE2(37)/帐户总数)*10000;
2 m! a% P2 d) m/ z1 Q5 _& gZH3:=ref(帐户总数,3);% e5 ^- c9 I1 E
HJ3:=ref(户均持股,3);
' f( U% Z8 q4 M1 O- ]4 j% W9 S主动率:="卫东.主动率#day";
- A: L8 {5 S/ F9 c5 [2 n, o# O. g单数比:="卫东.单数比#day";9 V0 I7 ~ O$ E
通吃率:="卫东.通吃率#day";; s$ a4 Z3 n& Y( X! z! J9 m3 ~
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
" w; Z! P: K) G& S3 k! vDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
0 b& p0 F' w: jDRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;* C. ]$ \: a8 U; V$ ]
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;# N* p; M R; |) E% G( h* K
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
2 p2 M4 g9 ~, o; ?DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
6 ]: W# e0 a: s8 C* L2 K7 RDRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
. d/ E& n* ^" G0 G3 c7 YDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
, G9 V) `' g' B2 u7 Z连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
! e# ?0 z& Z2 u$ q+ v, |连绿:LAST(CLOSE=REF(MA5,1);( t6 i/ S/ T# k
H1:=MAX(MAX(MA5,MA10),MA30);" G4 E- K" \1 v6 ~2 e" b6 n/ ~
L1:=MIN(MIN(MA5,MA10),MA30);
2 _5 b8 q3 b$ z2 yDRAWTEXT(H10 AND DDY>0) OR DDZ>400);/ b% e% | p9 f8 D/ ?. [
A2:="MACD.MACD"(26,12,9);
8 \* T0 e$ w( e4 p5 s, R. |A1:=C/REF(C,1)REF(A2,1) ;5 R' S& r. x0 ?1 e7 ^5 J
A3:=COUNT(DDX>0.045,10)>2; i! [ \7 D8 x* c8 w: B
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;& {8 A* G5 g; s
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
5 p& r( _/ P8 M' EDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
' S+ U& @8 L, E, t+ _4 W{资金}, Q6 _' [% Z2 x2 X" W5 ?( S
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}8 L- }/ q" H2 E9 R$ j" G
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
# N U2 _9 Y5 u0 ]3 ?# yDdmr:=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;- \4 H1 E& ~8 p% M: J# g' j; e2 K
Ddmrs:=sum(Ddmr,0);
1 @8 i) ]* k# J2 L: @Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;: D. E6 J5 A- N6 B7 `- x! L% z% t5 ?
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;' c! k2 M, f6 A5 g M- i( x! v
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;' c3 w7 q4 F1 F$ T6 `8 L
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
2 F+ o/ j, O) SChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;( c1 r* E3 ~% T/ @2 Z
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;2 S5 `2 L9 e6 T/ U1 C i# _
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;2 o2 ?! | k. P% r
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
- c2 a( |% P7 v散资:=(xhb-xhs)/10000;/ r5 j K5 \) s, s/ E1 N" n
中资:=(zhb-zhs)/10000;
q7 M0 y2 |( F. ~, d& B ~& Y# t: @大资:=(dhb-dhs)/10000;
5 C2 z2 U! a- K2 V( _/ Q; E/ i* Z: B超资:=(chb-chs)/10000;
; M6 f" S9 m$ E+ P/ l超资增仓:=超资;) _. @1 \6 h/ b" Q: V
大资增仓:=大资;; _ x- v0 m- `- Y6 m
中资增仓:=中资;% z/ s. B, s ~* y, D# z1 y* {
散资增仓:=散资;- V6 [6 a- R1 l0 T* Z H5 T
BBD净额:=(超资+大资);
6 Q' U( D* n# nDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
; t' V# V4 T# i$ NDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;2 l7 J9 w. |- b. S( P
DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;* M: c" W2 O! a' G& z5 d
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;# R3 m' {+ `7 C
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
- y" v$ G' H6 s7 k2 _& eDRAWRECTABS(0,118,270,0,1),COLOR00FF00;0 q9 [7 f0 W# C( V9 W% @7 R
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
1 c7 u6 R x) j/ h: b" G& R, E7 U; fzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
0 s. o- q5 Y% X' Ttdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);2 q; D& j3 r( d* G8 E$ @5 B: O
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);, V( v; M0 t# T+ `1 v
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
! p% f- b7 m, N: s- ^ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);( }: m* k) c, z/ h7 U" o4 J
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
8 T2 Z1 _7 v) t8 p+ U# l0 b2 o2 W% l0 Jzdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);3 n6 s8 ?, k0 a* y, a' o
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);4 K' G4 J& K+ [8 c4 |! G! D# l* ?
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
- ~' \3 I5 f5 z# Htdj:=tdn-tdm;/ {$ v% J) g! H0 Z: n5 U5 {
ddj:=ddn-ddm;7 S1 U( R- z7 j
zdj:=zdn-zdm;
- j; U, e3 J' J. s) ~& B- }' d ssdj:=sdn-sdm;" ^* Y: b$ P8 e2 i; x8 p# o
zlj:=zln-zlm;: l6 T, r' B4 J( D
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;4 y. n0 a( \, b* N' k8 @5 ^
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
5 m, i0 o. J" b2 J/ DDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
$ ]/ h7 v, G- y9 T. ADRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
. L1 P( x- B% f0 J/ T7 WDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
7 @/ `; C- H: J7 h, sDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;- m+ }3 x {% T) G' F8 x8 G
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
8 R1 d1 a; ~2 F/ @) ZDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
4 M5 I7 ?4 Z; L# gDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;5 w/ P- m9 ^* C1 I7 o
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;: y; k/ e4 C+ N4 C
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;0 J, Y5 ]& X) O9 E
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
7 L% n6 ~. U! U. FDRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
* [6 g% |& p2 T- k/ d g6 [' fDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07