|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;9 M k& T8 R: H" i
户均持股:=(FINANCE2(37)/帐户总数)*10000;6 _* h! z6 Q4 Q% i' S$ |
ZH3:=ref(帐户总数,3);
8 n- g, E; X0 s+ PHJ3:=ref(户均持股,3);
& E: c1 H% Q& I: s( Q$ D主动率:="卫东.主动率#day";
& Z9 S9 l( t. z1 p( l; _7 _ t单数比:="卫东.单数比#day";
6 z$ v- @; v; {: g: e' h5 l通吃率:="卫东.通吃率#day";4 v/ F. j) G6 B
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
) x! p0 r% J! K. o( Z. a- xDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;1 G2 B8 B: U4 r* X" k. z; \4 O
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
& Z8 A X& W) @, F$ j0 VDRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;- Z) |6 C. _9 W- K+ A# [
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;( D1 F" v9 x0 c1 r
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
4 H, g3 |/ j! @' ^, \% b# ]DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
# [8 p( `) w/ Z, Z1 X) r% KDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
" E1 g5 [9 V6 m2 ^/ s连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;% w$ ]1 y* i$ m% G' f- z
连绿:LAST(CLOSE=REF(MA5,1);1 I. K f- ]9 F) \
H1:=MAX(MAX(MA5,MA10),MA30);# h3 Q. ]6 f7 r6 B' d! f) P' u* {* R! n
L1:=MIN(MIN(MA5,MA10),MA30);, Y$ @; R' z7 m. V, \
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);0 ?7 \4 r* t+ D4 q, A
A2:="MACD.MACD"(26,12,9);
& q* D, B- C( _+ d$ Y. fA1:=C/REF(C,1)REF(A2,1) ;: J9 C* l! g. H8 H9 \( ?
A3:=COUNT(DDX>0.045,10)>2;3 ?) Z' i5 T( B4 {5 D7 S
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
5 u8 F! m* D4 H; vDRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;3 b+ v# G( Z( ^ ^8 L
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
! j" n) J6 @, w7 `' g" u+ W( n{资金}
! n+ d6 n1 T2 p' ~, ], z' OTODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
# _* m6 Y2 k5 ]: ^! k. A( T7 M4 A{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}. w" h* \1 W9 A$ @* Q
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;
* R* n! A; J4 e, w3 p8 s0 MDdmrs:=sum(Ddmr,0);# g4 A) e4 V+ x5 ?. U% n% G
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
; E3 y) W5 x2 o" s& a: M4 WDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
1 E- T3 _ C. D8 A0 L: @ m; KZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
" C1 h/ T% Q' @/ wXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
; T) y* E& F2 B3 h' d7 GChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;& o# ~; Z0 j1 r$ @; Z
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
9 x8 b# J0 ]. P6 W SZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
( w% b1 n- k* O6 [: Y7 b, oXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;4 R/ z) y1 A* b9 v& ^
散资:=(xhb-xhs)/10000;
0 a, I: t# Y6 g: @2 l# s中资:=(zhb-zhs)/10000;7 s8 r# D" _; E4 X
大资:=(dhb-dhs)/10000;
! x8 n8 v4 l4 W4 @4 G" Q超资:=(chb-chs)/10000;
. D9 w o! K2 N1 v9 V超资增仓:=超资;
" a% Q6 z/ Y9 L2 R大资增仓:=大资;& `* g" s( l: c0 k
中资增仓:=中资;. {! ~8 N5 g* g- j: V
散资增仓:=散资;9 b1 H) W. @6 Q2 \( u
BBD净额:=(超资+大资);. J L& m6 f- p- }2 s
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;4 f% G, R( Y; t- W% n5 I- ~( ]
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;5 ] U& A: V9 _& F/ s
DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;- [. X. O( y4 N
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
7 ]0 r v K* v- gDRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;. ^& [2 o& X; P
DRAWRECTABS(0,118,270,0,1),COLOR00FF00;
' p+ T/ H; k4 [, s/ z) {zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
/ ^2 l9 d% D. q3 @2 tzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
2 ^0 R" ?) U' a+ T0 a1 z# Ktdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0); J1 \% S% r% P" g2 {
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
- G T/ ]% I! ~% Vddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);& d: W/ a$ V* {6 B
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
7 U, |+ T9 k2 p- Gzdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
4 a8 [4 t, `# l D Z: _* K7 Ezdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
$ o z6 ~5 d, v" Bsdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
; k6 I( ^; A% z- v r" t2 X$ ^4 Ksdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
0 v7 P, }* T' \6 j7 Y% R. Utdj:=tdn-tdm;
w8 p$ s$ ~' g; g+ b a8 mddj:=ddn-ddm;
1 S/ H. n9 ?8 _# F6 K! p4 w8 g8 Mzdj:=zdn-zdm;6 l: Y& Y( s" i' W
sdj:=sdn-sdm;8 `8 ~- x- D% B3 k
zlj:=zln-zlm;
* E1 `, K. Y- hDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;9 O. [: h' l# c; C: Y1 ^9 t9 ^; F
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;$ y7 |6 \: U2 u; F+ N: K* ?
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;- Z, i8 m( I: r$ j0 J& F( ]+ g
DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
; ~7 C/ G# C# Y! {8 L9 _DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;; L m$ z$ I# ~9 H8 j$ B. s
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
- [0 Z5 \3 s/ e" XDRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;3 G2 {$ N6 e) @* {
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
4 x7 @' x- X3 K! g6 y) MDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;& W+ m! A$ {& L9 }% b' w
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;) G" _% Z% y" v n5 F: h1 ]' @; _
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
( V1 R8 A( k5 `; Z! K! VDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;/ K! Y/ w/ E3 l
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
2 d' @/ S' a/ ]! N! s! aDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07