|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;7 d0 e% s. P) O5 S: Z l
户均持股:=(FINANCE2(37)/帐户总数)*10000;( f# F Z, y8 R' e
ZH3:=ref(帐户总数,3);
$ m7 l! _7 a/ v4 t- K t: K3 P+ bHJ3:=ref(户均持股,3);8 ?1 T) \' K" V) u0 I5 @9 s% c; z5 d
主动率:="卫东.主动率#day";
4 s1 \2 d- v- d8 p7 Q. z$ B( i单数比:="卫东.单数比#day";
. Z8 H2 N1 ~! q+ `通吃率:="卫东.通吃率#day";
% F3 e4 v u( pDRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
7 c: E3 E5 U! RDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;4 V2 y: b: ?& A& h( J8 {
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
5 ^+ Y6 ]! o: o" z' a. g7 b- ?: wDRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;; ~* V0 P' D) o7 Q8 c" y1 D% H l$ ]
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
3 k1 N6 i) @/ t8 L* V" BDRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;6 B& j) J2 Q) a. z
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
* J( w/ Y; S W' q) O. J3 i: eDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
1 W; J$ v5 [: _' ]+ ^5 x7 b. P连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
: ^8 S. i/ H% d1 f9 F连绿:LAST(CLOSE=REF(MA5,1);
# O8 n1 s% I/ V0 I8 Z T; A% \H1:=MAX(MAX(MA5,MA10),MA30);
, G+ @ Y9 Z* F2 \6 cL1:=MIN(MIN(MA5,MA10),MA30);. T" B5 i& a3 C+ T
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);
! m+ @0 @# A5 P6 J5 J% i/ Q5 H- iA2:="MACD.MACD"(26,12,9);
. x5 g( f+ ~+ t0 r# j% P5 AA1:=C/REF(C,1)REF(A2,1) ;6 Y! B3 Q" D) W' U
A3:=COUNT(DDX>0.045,10)>2;$ C0 j, C+ D8 {* m# l
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;/ Z& ]6 X8 m8 h- q" p6 h: {
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;7 w7 T$ [: i0 i9 h6 i
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
Z6 K' K% w$ L; K6 J0 |{资金}
+ I0 v! {; D" v% E$ l8 ]TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}, K! _* Q" p/ U/ q! M/ y
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
9 T: v8 I, ?0 X1 Y# _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;
' b. r# M9 X) f1 a1 {$ i- c9 {, {Ddmrs:=sum(Ddmr,0);3 [8 f* Q% V; E+ f. O0 m2 A
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;+ v" p- u2 F% {
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;/ F$ v: N1 r$ Y
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
8 |$ q; c( ?# x. f" pXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
% W6 @7 T1 w' ~5 F7 Z- }* uChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;5 B8 \$ I/ u5 F5 x& [- z) O& G
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
: S, j+ `( `0 a" I$ L! @; N9 _3 AZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;6 s9 {) G1 G( a* ]. K$ V2 f! \) F
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;4 k7 w; V/ @+ B4 z
散资:=(xhb-xhs)/10000;
* d+ F+ F$ p3 i8 o' q中资:=(zhb-zhs)/10000;6 v' m: u9 i3 f
大资:=(dhb-dhs)/10000;% q: Q+ y: k! g$ W$ A! r* D
超资:=(chb-chs)/10000;
) A9 L: G$ I) s# m) a2 {0 |- @超资增仓:=超资;
) `7 e6 {7 D) {. M* K. ^+ f$ n大资增仓:=大资;, Z7 C) t* j' k) e
中资增仓:=中资;/ b3 N, x% v' W, C
散资增仓:=散资;2 Y Z9 X; f; g7 U
BBD净额:=(超资+大资);+ b' y( g' X& c$ a! L' P' G
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;" g7 H, x. O5 Q6 a' c6 M
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
" ~; \5 v7 {! {8 _ q$ fDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;( D) O: H& B2 [' A
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;1 G0 ` r) v8 k6 ^/ A
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
8 `6 \( k# m3 k% P- n# v# `3 KDRAWRECTABS(0,118,270,0,1),COLOR00FF00;% H, F" }1 D J1 N$ |# P" n
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
Y! |: q8 D/ L. x1 a% m" Qzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
. k$ @: w8 G/ g Q# x$ Ytdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);/ @) [- i8 `; W8 Y, G& g
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);+ C" Y: Q1 @' X6 [( o; ^7 G3 i
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
+ r) ^4 T0 y$ Eddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);$ g- V& d4 r. q0 R- {; [: ]
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);" ]. P" E4 k. W4 Y; {9 s& P" E7 R
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);( B1 w9 v9 @/ o
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
" g( S& {" a3 M ^0 k: nsdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);8 {3 y/ p% Z) [" c; [
tdj:=tdn-tdm;, M: ]7 o8 n' L2 `
ddj:=ddn-ddm;, d8 o5 w2 m' P& K, g; A3 z/ C1 G d
zdj:=zdn-zdm;
% e: s! O. }) E: L& O, n* v+ f( {sdj:=sdn-sdm;
7 i1 u+ ]$ j" |; s, {! s& fzlj:=zln-zlm;
4 J7 g$ J, Q( r I" ?& P- q' O( w( ?DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
: ~$ A5 C6 Y1 c2 }' F5 \DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
8 o5 n" p, D9 B1 N$ d; D, l$ ]DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
0 ~0 d- z; W" _, w: i* [DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;9 |$ ~- O1 V6 H- D" r
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;( e N: R4 f- T
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
/ M: n+ l7 f& q# NDRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
2 ?+ l1 r6 k0 ]1 H, }5 `DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
7 q5 s, h L* lDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
0 Y' I0 i8 B7 m4 ]DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;# u+ D) h' K% y
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;5 g" v6 ]5 n4 y- c- [
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;' H- |% Y" U% g v* _
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;3 {. l' Z/ j2 F# p# [5 L) d
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07