|
帐户总数:extradata(''散户线''),linethick0,PRECIS0; G/ ?7 q2 L* R3 y2 r, ?- A
户均持股:=(FINANCE2(37)/帐户总数)*10000;
, l4 Z. o3 r% g, y6 t( Z; ~3 k; MZH3:=ref(帐户总数,3);
X/ r4 ]7 D* D" D" o+ U* RHJ3:=ref(户均持股,3);
1 h9 c5 x. Y2 f( O5 X" p主动率:="卫东.主动率#day";9 g6 e6 v" H% R7 F
单数比:="卫东.单数比#day";" ^* x, a- I# m$ x. a- B! `
通吃率:="卫东.通吃率#day";1 I N5 Y+ k3 r6 U# ?% h
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;! P' H) M1 X3 ]- r& v% l" q
DRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
! L* g; j- @$ _DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;) w. h" b; o5 r) |: ?7 t7 n
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;( F* M8 f" A" o1 _0 e/ o. P# l
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;& X Y4 t* a: I/ a' U4 ^. K: C+ z) s
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
/ _. I0 b' ?& I" N+ FDRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
. w( @1 d8 z( }* ?) h- C2 m v/ ?DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;; ~2 v" K9 v' e: H% p! J
连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;3 g9 R9 ~- [( K: W
连绿:LAST(CLOSE=REF(MA5,1); L2 E4 [& u, ~, Y% y
H1:=MAX(MAX(MA5,MA10),MA30);
2 s4 [ o+ |: O' D3 w2 LL1:=MIN(MIN(MA5,MA10),MA30);2 f% ]! z+ T% M" T) J$ D
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);
2 H/ a) }: |0 ?5 c( w/ AA2:="MACD.MACD"(26,12,9);- o) P, {7 g2 h/ j0 [* W
A1:=C/REF(C,1)REF(A2,1) ;1 }3 {& q N( Z# @5 O$ R8 m6 n. y
A3:=COUNT(DDX>0.045,10)>2;
) ~4 ^) _6 [7 [/ l3 l8 o, k- L. \弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;! m; q2 ^0 ?* @" `& K N2 B
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
, c; w: _; e/ c' h, K* x, W! O( TDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;; ~1 W2 L' Z& G! O N! S8 q
{资金}& `7 m5 Q: \/ E% g4 I. i
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
2 ]$ {. F( L$ k7 W{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
+ F( q! `) K2 J$ |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;+ n6 S' s6 }$ P% M$ ?1 B- r
Ddmrs:=sum(Ddmr,0);; ^( p5 ]/ N) o# @
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
7 N3 f. j b) ?# ^Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;$ i4 V. p4 V" F6 X2 a/ S" L
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
9 E( O% b: F0 e. r7 m' V& uXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
4 p% r! o; l5 F% O: L& EChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
4 {, b- j# |! L/ r# fDhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;. X2 Q2 n# T5 K9 ~
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;9 Y* ]0 X8 h0 v9 F
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
0 U2 Q1 d, W3 m- @6 K散资:=(xhb-xhs)/10000;* P- R5 j4 W1 T" X t5 m
中资:=(zhb-zhs)/10000;* r( M7 @+ S3 j) |. C9 ]; \; F
大资:=(dhb-dhs)/10000;& v' N4 ~& [# w- Y% P
超资:=(chb-chs)/10000;: K# n6 c& B, x
超资增仓:=超资;
7 S2 j6 p' Q) V: G, `大资增仓:=大资;
$ s. C; P [# P2 `中资增仓:=中资;* w }# d4 A, i
散资增仓:=散资;% p2 g1 B- Q1 w: d( N
BBD净额:=(超资+大资);- a( j) z9 L6 i u8 ?" V
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;2 F4 v3 E5 Y, @6 W
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
/ A1 p2 ^/ F! J4 T1 dDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
+ }1 Q/ |2 z6 ?0 Z1 CDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
$ m% e& \4 ^* b! G' EDRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
2 s; E! r7 ~; U0 u; X7 lDRAWRECTABS(0,118,270,0,1),COLOR00FF00;
1 I8 h' |! c$ ?zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);1 _2 s2 e) p# c; P) l; c
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);5 `3 H/ x0 _' J8 l0 [! x' Q
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
6 Q) q# `/ s- j9 f8 htdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
$ D; a4 O- [3 P7 W; R1 dddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
; l0 Y, X, T: W# J8 Yddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
0 t( E5 J5 `4 S$ \# Y( ^4 fzdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
) `3 ?) _ m; I: f/ azdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
1 s! g# P, T+ E. k+ }sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);% n; F5 L9 j6 ?# s' j, E! v7 p+ b
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
0 C: L6 f0 L9 U3 R+ l) O# b, ]. \tdj:=tdn-tdm;
& E, O. W' T" V& O8 sddj:=ddn-ddm;
! ^- y8 d% u5 k- K6 Rzdj:=zdn-zdm;! O$ L- T5 N! ]$ l+ }7 s' Q' W" Y
sdj:=sdn-sdm;- o w/ S/ ?" P: q1 d
zlj:=zln-zlm;( H3 W/ j! V& O" U( W7 Y
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;/ R& [: z2 `1 c
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
5 I' S0 r9 h' K" H% S( E! UDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
$ W4 _" Z: o6 h* SDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
6 \) [( x5 y: ~( T" |8 i9 UDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
5 r* v4 u& I" t) Q4 d; d% ?" ^DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
" u- m) c8 U5 n. a6 k; V+ ADRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
4 v& W$ Y# G. V& d5 M9 R( V. wDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;" A/ G; q" t& _/ ^' {1 x
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
- W% u& u$ q% p/ m/ WDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;% Z# _. O+ w! V* ]/ ?( T F* A
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
& I' Z+ a# O8 z$ J4 Q9 gDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;- g+ e# H$ Z, P
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
. ?) o# P/ x; aDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07