|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
5 e+ h6 \8 F2 r! w户均持股:=(FINANCE2(37)/帐户总数)*10000;
4 x! f5 z" s1 ?# o {3 M2 }; e* j) TZH3:=ref(帐户总数,3);
$ o, |) Z1 m7 _7 QHJ3:=ref(户均持股,3);
$ r5 [. L3 B( i& u- U主动率:="卫东.主动率#day";
. [/ o; L" u; ?; i9 N7 p+ q! m& O单数比:="卫东.单数比#day";
: W$ _0 F/ n: t) X# y$ }7 }通吃率:="卫东.通吃率#day";
( t: R% V) g$ U X9 B- ]% ^; RDRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
. H) t: i9 r4 }- ]4 LDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;( q. y |4 f* ?, X
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;/ g2 U1 m% b1 q- n' C
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;/ _8 Y) p9 j X( d4 u
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
, X. U3 M5 @$ w9 BDRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;5 L% v, O7 b& I5 n
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
4 j+ h) z2 \6 I3 y! ~DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
7 Y' T6 L7 B. ~- Q, F连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;: n. _2 o7 e" _5 V# a/ Q4 d2 s
连绿:LAST(CLOSE=REF(MA5,1);
7 g! J4 u4 c, z+ FH1:=MAX(MAX(MA5,MA10),MA30);
: l }0 y9 U' ], |L1:=MIN(MIN(MA5,MA10),MA30);
6 m, Z2 R/ f5 P9 ?1 U' J6 VDRAWTEXT(H10 AND DDY>0) OR DDZ>400);$ r. o d. m4 C+ |9 b7 E
A2:="MACD.MACD"(26,12,9);4 s0 W1 n* n1 J8 _% ~: w- [& I
A1:=C/REF(C,1)REF(A2,1) ;
; w" n x1 Z/ y/ z; V9 pA3:=COUNT(DDX>0.045,10)>2;" Y( B4 i) S0 ?3 q; i. m, P. h. r
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
# `2 t6 x. U) o4 C8 G: ]- Q, q3 pDRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;1 }9 _ w# Q" `$ ^7 s6 m
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;; J8 o8 S5 R- s! `% H \
{资金}' r$ b, ^3 G7 R' Y1 K8 t! l
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
" |2 U( v9 ]* V" }/ v4 K. v Z{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}$ O9 E' p3 W! r) P/ P
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;7 Y) O9 h0 g9 p! q) E k9 d
Ddmrs:=sum(Ddmr,0);
. `. ]/ L/ ^9 p% Z6 oChb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
4 y4 |, N0 W* v0 G$ d' k9 aDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;( z& Z6 `3 Y7 u7 T; ]3 ^
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;" [: ^9 w! y, L
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
# h* h8 D3 D9 ^* k) ?Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
/ m9 B/ Z8 V N6 o$ BDhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;- E8 i# {8 Z# g$ n0 F( s$ W2 T
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
! s: m" }1 Y( f/ F2 fXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;/ X. E8 o2 [3 v- t1 t9 i! O
散资:=(xhb-xhs)/10000;5 X) o9 D: ^* O& I* |9 Z
中资:=(zhb-zhs)/10000;' c/ u, Y$ x) f
大资:=(dhb-dhs)/10000;
( i% u0 O4 t0 u, o! v; }+ _超资:=(chb-chs)/10000;& r! U" B) \7 Z
超资增仓:=超资;
" \5 H& Z/ q0 \: }大资增仓:=大资;
( w7 E: k4 Y3 O R. \: b中资增仓:=中资;
5 n0 J- a. m% v! ~/ t散资增仓:=散资;" l; X0 T7 X" {
BBD净额:=(超资+大资);& v8 e/ f( H/ b H/ I! V
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
& u. v* v; b8 C# t. dDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;' k- T5 }( s/ d$ N
DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
, }9 C: I/ e3 U4 D+ MDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;% J3 ]4 f# T. ~) j) n# k4 \! S
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;- Q9 L. N0 I) Q+ @
DRAWRECTABS(0,118,270,0,1),COLOR00FF00;& x# G4 U5 D- j* n6 ?& e
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);" E% ?# i, c5 a5 T w
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
( h6 U! c0 R& O5 d8 Otdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);- b6 _3 x+ X. P8 m- J2 m3 Y
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
4 K, x+ }" K/ m' ]$ \# @3 Hddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
& [5 R8 F; ~8 ]& k) |8 Oddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
( U. h5 f5 K% b8 f1 }zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);9 p+ J0 P9 t: i$ ? \
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);# @3 m5 y; X, A: L' d1 y S) ^
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
* Y+ d5 ^" c0 P1 ?* V3 W0 @sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
5 |$ {$ j7 d; ^0 ctdj:=tdn-tdm;, J) r9 ^0 l# ~& Q
ddj:=ddn-ddm;
& w( s c) f! z% ^7 `- a& v( t# Zzdj:=zdn-zdm;
4 T( M2 d9 u( F1 x8 K+ _& W# Ksdj:=sdn-sdm;: ]4 N. Z3 I; q8 z8 C
zlj:=zln-zlm;- Q/ S* B* o1 G% S" H, x8 C+ J* \
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;" g7 h1 O; j8 e' l
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
3 k# V+ n8 C- d* K' s t2 QDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
% P4 ^% s4 k; n7 k4 ~DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;+ J9 b" p3 B/ k- C* D' S
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;8 X/ i* k+ ]- A% {
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;+ {" y% F+ x/ b/ V% f. Y
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
# D0 i- Z# n, f8 n8 Z! aDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF; z# q5 [/ w3 H0 O4 L' a, @
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;( T* C7 s$ H& B5 e; Y
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;& b0 d2 T& o8 P" _' f b) W+ r
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
5 R" V2 z/ O/ |+ U) L! p: \$ i/ cDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
2 |3 R4 Z! j0 W/ aDRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
' F2 V/ M5 ?: X m7 B5 w9 |! cDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07