|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
6 K: w3 Q- s5 R9 O ~户均持股:=(FINANCE2(37)/帐户总数)*10000;( C9 w' |. S$ O" a* p' d' r
ZH3:=ref(帐户总数,3);
9 y( d, s0 `0 V3 qHJ3:=ref(户均持股,3);; r* E" p2 Q6 @" m2 N1 b+ o
主动率:="卫东.主动率#day";: r$ ~) L/ G- \) y5 A( P2 ?5 g
单数比:="卫东.单数比#day";6 H5 o% a$ F/ g# j
通吃率:="卫东.通吃率#day";6 b6 O2 I b2 d/ Q5 g1 Q
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
# T9 q" M0 f% r+ [4 CDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
. o. x" L. V6 m3 r9 b+ V+ N' u. CDRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;3 X( w4 b- v- I/ J. F
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
) B) G( N* g; E4 ADRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;1 H" G) x! X3 V ]" m8 w
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
2 i/ L& H+ u k1 u J& qDRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;0 u+ R$ y S; K3 X: S: X$ w: d- p
DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
; k: G; X$ ~7 y! S" C8 L! w连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;8 P# Y8 X/ `, X/ ?+ R% q
连绿:LAST(CLOSE=REF(MA5,1);% U7 d4 r) ]$ L4 N! l+ Y+ F U
H1:=MAX(MAX(MA5,MA10),MA30);
/ W1 n1 }" W$ |: X6 {% ?7 NL1:=MIN(MIN(MA5,MA10),MA30);
9 Z7 M5 I2 V( A* h; t+ wDRAWTEXT(H10 AND DDY>0) OR DDZ>400);- `, { }9 p, C6 o0 i
A2:="MACD.MACD"(26,12,9);0 q: ?( y$ H, U( e
A1:=C/REF(C,1)REF(A2,1) ;* ?5 l. J. C: G
A3:=COUNT(DDX>0.045,10)>2;
, ~4 ]5 V' n! T. Q弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
3 t4 r9 O! @( DDRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;. @. I. K( }6 C) \+ O- I( t) F. @' @+ ]
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
" y2 l4 K" T/ k4 e! b{资金} G- N7 k: I3 X* P+ I' g1 _, e0 U+ c
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}+ F+ @1 @7 u9 h$ K2 N
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}4 @( q' f0 _& r0 P! D
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;
! k- F# s$ m% x: |+ ]4 [8 RDdmrs:=sum(Ddmr,0);
7 ~; ~0 r4 }3 WChb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
" ?3 c5 m3 |, ]0 i8 L3 K, X( nDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;, t8 p+ u$ z1 G( n: ?. b) U8 |
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
5 |( T& M2 [/ o: F+ q( [4 g' l+ IXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
& B R e/ R0 s% X$ `: OChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;5 z6 |' _, W# b8 Y, O
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
8 k* V; Z/ Y3 S' Z/ OZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;, l! X6 T W' u% N: ~0 }
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
4 {4 k# w: J5 C. b! }, E k: b散资:=(xhb-xhs)/10000;2 L6 g8 S6 Y) ?* j# |
中资:=(zhb-zhs)/10000;5 Z% }+ z' Y" ^5 T* f
大资:=(dhb-dhs)/10000;1 |# p# T k. C) L" r
超资:=(chb-chs)/10000;
- K. x$ {1 T) ~# `: @. t超资增仓:=超资;7 E* e4 s4 A5 V7 `
大资增仓:=大资; {' j% ]( F2 w
中资增仓:=中资;
7 J/ r0 n7 v" X6 _0 ^0 J散资增仓:=散资;
8 ^+ T2 d) t) w2 J) L4 VBBD净额:=(超资+大资);5 I& l" _# Z9 B% [: _ F
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;$ z# W- P8 \4 p+ ?) ] Y
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
* U9 n) }4 e9 m+ kDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;1 _1 l% w) ?$ g, L8 _9 a9 o0 I
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;* X, _8 f2 l" F$ g t+ Q) P
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
/ P* }5 s# ?) y6 `3 m' sDRAWRECTABS(0,118,270,0,1),COLOR00FF00;/ F; a) F: U5 s
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);* W9 s' w& g1 ^5 H' y9 @
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);+ V' B& z* T$ J4 J V
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
/ N' p8 E+ M& ~tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);# m ^" y% Y! o
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
& D! s C+ m: w6 n/ G/ Tddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
. M+ q" h! j/ H- ~6 Gzdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);7 Q! J6 U% r6 A( F: ^ I8 [* r
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);/ R' h1 J2 ~! j# j, g9 Y7 d4 f
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);8 g/ Y, `# ?; H S! v% p& V
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
; v8 E1 f8 K" ? H$ rtdj:=tdn-tdm;$ a/ e6 e' y, x) q0 J
ddj:=ddn-ddm;. U8 u3 P2 d8 b5 Y# t# O. H
zdj:=zdn-zdm;# g/ P/ E0 a0 f2 `1 }1 ]
sdj:=sdn-sdm;/ O" B9 {+ b) g$ n2 G
zlj:=zln-zlm;
; K- {7 `$ v+ Z5 f z L3 pDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;& v0 z3 c( \- K+ V7 I$ N
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
9 w8 R+ V7 G' W2 IDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
2 b3 p( x0 Y4 o2 R6 p% [DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
0 v; N3 }# b, F1 |4 a& v$ ~DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
" n' {9 F3 c) D8 v: I9 zDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;! Z# ~( \& U& G/ J; G9 D) m
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
' t' t' P5 u" F" U4 s( I; v8 {- TDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;# x, U# i0 ~( F1 T6 k% N( F
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
1 G( J' j9 l" C c1 u. k* a& R) [. g9 EDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;! F4 t v! ]$ f% `% H }0 W4 r
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;# Z4 l; r+ @' f# k; d; {
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
9 \$ d6 N4 z" E( e" N; ~0 lDRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
/ G9 u/ T1 G, _- z T0 zDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07