|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
1 ^/ B& P4 u/ t% k户均持股:=(FINANCE2(37)/帐户总数)*10000;- y+ v( X6 H8 g5 g9 _$ P
ZH3:=ref(帐户总数,3);: g) W# u; d" n- F6 W7 @. i
HJ3:=ref(户均持股,3);
- {# C8 E. L d( u8 {主动率:="卫东.主动率#day";
7 {5 P1 j/ T' ], s8 g: o1 Y单数比:="卫东.单数比#day";
2 n& n Q. z* A3 i9 m* k' }- H3 `通吃率:="卫东.通吃率#day";1 c; m. I, S% \1 O3 f
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
2 \$ W( V; L* W# R- DDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
G& p4 J8 p4 K f I; E+ FDRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
( R% s x& C9 D6 vDRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;0 v, c* p4 @& O5 ] p
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
* L4 K; P) A3 W# T: }; Q: @; H% jDRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;+ a( I! s$ y& \! }
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;$ T8 u y6 F7 N6 B' e+ C
DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
( Z( b; Q z B( r+ X连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
5 P7 [% ]8 f4 C" W- k连绿:LAST(CLOSE=REF(MA5,1);* E3 x! u" w- P ~# E6 N
H1:=MAX(MAX(MA5,MA10),MA30);
4 J7 c+ u: z. s( Y) c) hL1:=MIN(MIN(MA5,MA10),MA30);
. P6 k1 L# U1 t' X0 J2 wDRAWTEXT(H10 AND DDY>0) OR DDZ>400);3 ~6 C7 P* f2 i+ z. t7 C4 l- c
A2:="MACD.MACD"(26,12,9);! R8 b% f6 ?8 R! c
A1:=C/REF(C,1)REF(A2,1) ;: I. z3 D$ t. y( `) V Y$ ?9 F" N+ ?
A3:=COUNT(DDX>0.045,10)>2;
8 b7 R3 U+ Q$ j1 ~弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
9 f5 B$ O6 h/ b4 ~) [) mDRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;8 g8 r5 u& o- g9 e+ b
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;' o y6 _# Q% s& n! i, p
{资金}1 |* Q4 ~+ X" A1 l# [
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}5 I! |* ]5 L/ `
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}% O/ o' {, a: d' `' F& P. v! T
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;
0 O: |0 N' O5 c# \Ddmrs:=sum(Ddmr,0);- X3 j; f% O+ D2 r9 |9 p
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
5 b! v% }' ^& h6 b1 @% j2 KDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
+ C4 g6 B3 w( eZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
6 s+ X; N- l* P) B& L6 M# v4 S# bXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
: o, d A' W( u& _6 QChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;; c& z7 `1 b8 d) Q: W
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;0 H8 _' _8 v D
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
! u: B8 `; x% P: W2 i, T! kXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
; B3 l2 Z q/ R2 U; ^散资:=(xhb-xhs)/10000;
* }4 |) P0 m1 z中资:=(zhb-zhs)/10000;
/ Y' A% N$ n, `. I+ Q大资:=(dhb-dhs)/10000;
) @! d8 C' I" a1 Y$ S4 Q超资:=(chb-chs)/10000;
- n; W; D+ ?8 g$ f! U/ I超资增仓:=超资;/ h0 H0 F1 W1 |& L; z, S: Y
大资增仓:=大资;7 k/ d( L0 P! V1 w
中资增仓:=中资;; y7 ]$ o5 x/ |" m
散资增仓:=散资;
" N: t' f1 C b3 h$ f4 W2 `BBD净额:=(超资+大资);- i$ S: ^; \% h& u2 G; ]- c
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;. o0 h+ n2 C9 e, l' Y' j
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
' {) x1 k. ~1 l {% O- [DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;" v' |/ Z$ V9 d# \ ]7 J5 t
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
) V. x6 c' n3 q) y5 fDRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
' m* r5 c6 `) Q1 M: WDRAWRECTABS(0,118,270,0,1),COLOR00FF00;
6 _0 x# I# g% | R0 u+ F- K* k$ k Dzln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
6 b# |$ d8 K) k% X# |0 vzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
; m! A7 l/ ~4 W/ |# m8 vtdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
, v2 x: ^) R7 \( H; T* H J* _ mtdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);2 X: ]$ J! V3 t3 H
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
/ m$ _) L# ^- K# t( R3 Nddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0); j3 v5 x) e3 ^7 ]* B
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);! t8 E- l' |( K$ T% z
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
! O0 ?( f# G e( Q) p* R. F! z4 Ksdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);( N o. \+ j' D' S- |" a+ X# N
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0); J' b' u+ P4 ~1 v6 \4 x$ G
tdj:=tdn-tdm;
7 M: ?# k0 c. v7 Fddj:=ddn-ddm;
* D. A9 s4 N9 G! K( Tzdj:=zdn-zdm;, K$ r1 Q; [& u1 {5 w5 s
sdj:=sdn-sdm;
8 r* m _# k' o6 y! azlj:=zln-zlm;
, L9 ?9 y- o, D% E; R e+ P; ^DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
B6 L- E$ O- M* kDRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;- ~- \; O2 W! s4 y1 x4 T6 {
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;) ~: ~' N; `& ]2 C+ e" D. v
DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;8 L! f6 I9 H. n& Q" y. u+ l
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF; r6 j }4 G( N! c7 }
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
1 r5 ]$ a1 }* EDRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
4 x2 q2 C4 R X; k' cDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
* z) m- d k2 L1 L RDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;# U! d1 J+ g3 ~- {. P6 R9 b
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
7 R4 ?9 g/ p8 t& q8 ODRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;/ o7 x- a7 c( j, z( a6 T
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;2 {) o2 ?1 [ u" J# v
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
# h3 g# H$ Q1 ZDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07