|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;. e0 `" n# F# R& R& J3 \
户均持股:=(FINANCE2(37)/帐户总数)*10000;$ J; i& y; I6 \. y! G; Q
ZH3:=ref(帐户总数,3);
# `. j3 Y9 a; G2 a; ]HJ3:=ref(户均持股,3);4 W3 B; A, K4 T
主动率:="卫东.主动率#day";; n- E4 U0 F3 k5 E
单数比:="卫东.单数比#day";& F' o& L: O" Z) p
通吃率:="卫东.通吃率#day";# M% C, v4 ]; G3 o
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF; }$ w' K: o, G6 i0 ~0 l/ Z
DRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
; ^$ P7 U/ }& |2 \0 O' v5 JDRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
7 r( j X+ o$ D( v: o6 {DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;4 F; h1 {" A I+ a. [
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
: j7 L! D; W3 {9 A, e( cDRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;/ u. N" s T: i1 W$ i. ?1 |
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
' L) V8 R) R3 H+ A2 `DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;6 o7 b0 T( T3 B1 }' O& n
连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
- a- I2 X9 D2 m: c连绿:LAST(CLOSE=REF(MA5,1);
# t2 x6 m2 l3 F' T3 {( j9 xH1:=MAX(MAX(MA5,MA10),MA30); P7 F; g- l' d3 A- W. A: l9 n
L1:=MIN(MIN(MA5,MA10),MA30);
0 b7 _0 e, p9 c: y9 X. d9 c) GDRAWTEXT(H10 AND DDY>0) OR DDZ>400);
; Y3 C6 D& n2 F! R% \A2:="MACD.MACD"(26,12,9);5 B3 l3 v& z( b- R- Q/ Q
A1:=C/REF(C,1)REF(A2,1) ;
M7 H6 N9 m6 HA3:=COUNT(DDX>0.045,10)>2;
; i8 M" t- H- v2 {弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
. ~! {- d9 J8 Z0 UDRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
$ N: f, r7 S: w; @/ ?! s. hDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;8 A5 [8 B8 S) r' d3 |$ y" e
{资金}" ^: s: ]. |2 \
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
1 j) `! |, g2 r' h{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
, ~6 T/ B; \- G3 o* eDdmr:=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;
" J: i7 ]$ A/ r. M9 H6 SDdmrs:=sum(Ddmr,0);: O: ^ g+ \8 A3 z* [1 h- c
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
3 Q' a& O! d* U! |Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;3 U- B/ T4 Q% ~# x
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
) L# v4 L# C O% |4 V( LXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;# ]4 g7 o# z7 z [
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
' C2 n2 x! `( B! x. c8 P6 HDhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;& u- J3 b/ x3 `0 ?* S( ~+ Z, J
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;$ i" \& G8 e4 I1 D, Z) |) d* K
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;8 Z4 ~% V0 g. R' u
散资:=(xhb-xhs)/10000;
5 C4 e( Z- f/ `# a中资:=(zhb-zhs)/10000;
' M8 Q0 C6 o% g( F大资:=(dhb-dhs)/10000;
: l0 N; o9 ^1 ~) l3 P8 Z9 W% t超资:=(chb-chs)/10000;
5 r7 i$ |2 p5 {( Y/ U/ u超资增仓:=超资;3 a. _ N6 A) M, I6 D6 ^1 ] i H
大资增仓:=大资;9 R1 f' B8 @0 a. P; h8 H) W9 Q
中资增仓:=中资;
) f/ N' j# u0 e$ g3 K散资增仓:=散资;
* w/ Y( ~" M% l/ X$ P7 M: _BBD净额:=(超资+大资);
3 F. }# U g1 s* D: @# o7 `DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
" V& h; _3 @& g/ H$ j5 n8 f& @( MDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;3 n1 [! k6 k* \% w* {
DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;$ C0 W; V& }: ` _
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;5 q* d6 }* H% h; D: j
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
+ h$ v# A/ t9 t3 T9 |/ P* R/ a0 ]DRAWRECTABS(0,118,270,0,1),COLOR00FF00;2 h; T) d( J! k$ x
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);3 v" _# ~+ ?, I8 D4 q. T( e4 h
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
! q7 S$ d" C% Ptdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);( e! K- d8 r$ F; o6 ~9 q
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);" g! H# v4 _% R# Q( q" T0 ?
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);/ j, \& O! j# e: A6 C4 H
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
7 z/ Y: u! c; l1 ~4 y4 a9 Vzdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
( x/ R* ]+ u0 n6 [$ l. j; nzdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);: s" W9 K4 T" G; Q- {
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);) d9 r. ?% H7 N6 d" s! Q/ g. T( O
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
1 @" g& \ @5 M" M9 F6 btdj:=tdn-tdm;
) e* `$ Z* W% F# e+ Q& d% M2 qddj:=ddn-ddm;; r( [* h+ ~% M1 }0 K0 [
zdj:=zdn-zdm;
/ ~( f5 p8 F; ^sdj:=sdn-sdm;
0 B- H! \/ k; K% ^4 Y4 Qzlj:=zln-zlm;* I; f) L4 @3 i& I
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
2 Y4 M9 Q& [. Q. l( CDRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;6 g7 m6 q+ X8 {% p+ n
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;3 S8 W) _8 h, w( S, J" W
DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;! Q* H5 t2 Q$ Z* W4 K+ D
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;7 D# S" ?/ M# l9 t3 y T2 N8 N/ ?7 f
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
# F, k0 q& }% n6 n' l9 o$ O$ ~/ \DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;; {, T6 l0 U0 M5 C( n0 C- h/ O& J
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
$ m, l/ g. u8 r( y5 vDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;8 u6 I1 s0 y: W' W- x
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;6 a! C; A9 a+ i
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;$ _& v3 {, t& y* L5 a+ v9 e& q) c
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;6 [, c: \) G6 l; v7 K
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
, V0 [, O; Q" Q' F& H& B5 ]1 I0 o. BDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07