|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
7 ]5 N/ F q8 G. J R户均持股:=(FINANCE2(37)/帐户总数)*10000;! ^5 ?) T6 H% ~4 p# K6 v
ZH3:=ref(帐户总数,3);
( x0 j' M, o9 \& x f5 ?HJ3:=ref(户均持股,3);
% I: p' s1 B' M主动率:="卫东.主动率#day";
: d# h9 V, [7 E0 y单数比:="卫东.单数比#day";
! H; J6 |& E. L" C通吃率:="卫东.通吃率#day";( O/ b1 k( W0 X H3 }+ H3 \& S
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;( h, M. H" ^& i- q% p% `5 ]
DRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
0 P8 c! V! X1 _! K3 WDRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;; O/ h7 [, b; E7 w" {$ f: h
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;6 L% E$ {# @6 `3 B$ w& [2 @
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
0 g, F; x0 V0 g8 bDRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;9 P' ~+ A0 m, V) d$ {: a
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;5 {2 e4 T2 x- U# y0 h3 h) n
DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
4 G( { m6 \6 d0 P+ j- F连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;# o1 r9 C3 o6 G0 m; i% [
连绿:LAST(CLOSE=REF(MA5,1);' I; Q! y4 U1 O8 o( i- z# C
H1:=MAX(MAX(MA5,MA10),MA30); I9 @6 z/ x2 I) V' v3 e2 o
L1:=MIN(MIN(MA5,MA10),MA30);; a2 x) A9 F) P
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);; f) z" c/ @1 E% H- n$ y
A2:="MACD.MACD"(26,12,9);2 G( A/ W( U3 q4 k2 [: x( a
A1:=C/REF(C,1)REF(A2,1) ;
9 f" U9 g' u! q' }A3:=COUNT(DDX>0.045,10)>2;
6 }7 e4 }: H- |( \8 N" o8 y' o& k) L弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;; B6 K$ T' ~; ^* [$ r
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;- _7 w' [ w J K
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;3 [( n: t1 g, p* h$ m; P
{资金}1 G& k2 X, F4 D, H
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}; C! @& O: t# D
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}. y8 Y: [) k# m7 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;6 n( }& M) d( D! x7 b; c+ u- e
Ddmrs:=sum(Ddmr,0);
7 W1 {. Z. z+ C. BChb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;. r* z3 h+ u% Z; o
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;0 c) ]" U) Z' Z' u0 A
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;; ~" Q! p$ ~) G1 u
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;/ ^/ o5 P; j. F' O+ `: O
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;- y# \5 f1 f, f. _6 d: w9 S1 A2 O( {
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
4 M2 ]' M9 U) V/ v8 @' d* DZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
; ]1 L0 [) U1 n3 d9 L* l# S( PXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;1 U {0 G. G- y( p
散资:=(xhb-xhs)/10000;" L7 N* G- w3 I! V( p8 [
中资:=(zhb-zhs)/10000;8 s8 ~# X, ~9 p8 Z. z( A
大资:=(dhb-dhs)/10000;8 f# U2 m5 X3 O; X$ A8 _! x( i. H
超资:=(chb-chs)/10000;+ y5 p/ p' z/ ?' w
超资增仓:=超资;
1 n/ ~8 j* c" g/ m# l5 F大资增仓:=大资;
4 ]/ z y K7 q2 X" j( H& h中资增仓:=中资;
% E e* v( X' p散资增仓:=散资;
$ E9 Y. I* G5 e" |( L# E! ^& dBBD净额:=(超资+大资);
9 B% ]$ c+ q7 Z2 d- IDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
% c, I4 y7 z5 eDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;4 U8 W. I, f5 B; F& R/ v& x
DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
! ^: A' F# |( M% NDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;& c# j9 ^& p& h
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
2 G7 B! N2 x1 y' H8 b2 c! J4 C- h1 ]DRAWRECTABS(0,118,270,0,1),COLOR00FF00;$ {9 i. d5 s, G9 \+ I+ c
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
: H, b1 a( x9 D# k7 T. Lzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);( H3 T$ H |7 E5 y+ E: N
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);: l7 j% j! e V+ m5 U: R/ v/ O
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);* {! D5 Y- R2 }2 Y9 \( m
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0); b4 _! O3 b7 w8 q3 y3 m8 A2 M7 M
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
2 H7 G/ Y3 k6 t- ]1 ?zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);! r3 J% q; i4 s0 ?3 x: m& [, p
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);( q+ y" q7 T5 i8 G* i$ Y
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);* o/ Y2 o+ L% o. q$ x$ l! F
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);* g" q9 c$ W! a& ~% K) N
tdj:=tdn-tdm;
5 [: p1 W l+ kddj:=ddn-ddm;6 p0 Q- N+ Q# Y% l- h' ^3 E
zdj:=zdn-zdm;' O* U+ V8 w5 S
sdj:=sdn-sdm;0 Q6 R( b; ?2 R0 U+ E( P6 `
zlj:=zln-zlm;
) O7 ~& E+ w' R4 {DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
, l# Z) I `! O: ~ d1 ~DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;( C0 s V8 k5 w, d
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;# I6 W: U4 z% y. k# y
DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
4 m1 ]+ E7 W! D4 y b4 NDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
& p' `+ [( S+ V3 h9 bDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
) R b( q: Q. `. J% oDRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW; `* M! ]! J- _# h @9 K
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
: ^/ o J9 H* C1 Y) z5 \6 \DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
, g9 f* R1 w6 A) ]9 RDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
: m" w$ b, J2 A& XDRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;8 f& W3 Z9 A. E2 o2 G
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
6 B$ A! P$ B' SDRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
0 p) n$ o* l. ^0 ]: ^DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07