|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
2 d* z1 ^/ I" v% J( Z+ v户均持股:=(FINANCE2(37)/帐户总数)*10000;+ j U( @+ Y) A
ZH3:=ref(帐户总数,3);4 U3 f+ O. B3 h' F4 v) u% B7 `
HJ3:=ref(户均持股,3);6 |' u( ^; j. o, n! F# A
主动率:="卫东.主动率#day";
4 r5 C0 Q% C% F9 k* X2 f单数比:="卫东.单数比#day";) G4 {2 c" k" q2 j" v
通吃率:="卫东.通吃率#day";
' T% q6 E( x% PDRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;6 x3 i" `8 {" m% a# i g
DRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;6 [% I; G- V" B6 S9 L
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;) C: `& _% H1 ]8 G. \
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
" }8 w2 H% m: u/ N& x `- sDRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
1 ]. s0 T1 k+ N& _DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;/ Y, s0 j5 ?$ E. l- y/ f n- o
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;3 ]6 `1 y/ j. e: L0 ?
DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
" ^% P8 ]! P- h连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
/ S" T. c# ^9 n9 j. z连绿:LAST(CLOSE=REF(MA5,1);+ z& m) u! k1 k) P8 \1 O& F# B, Q
H1:=MAX(MAX(MA5,MA10),MA30);7 g2 X U z( e5 [' ?" @
L1:=MIN(MIN(MA5,MA10),MA30);
+ r/ ]" ?( S( `2 ]DRAWTEXT(H10 AND DDY>0) OR DDZ>400);: R& N' t8 |% w% \/ o8 V/ x% h
A2:="MACD.MACD"(26,12,9);
3 @% { A4 i! \4 CA1:=C/REF(C,1)REF(A2,1) ;: L N, {( i6 ]! r
A3:=COUNT(DDX>0.045,10)>2;# D# k- X- [- f& t! H) m8 n
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;6 N* m7 O, f6 B8 a# F+ z
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
0 \+ H: e% Z" C& n' o$ RDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
% E6 G9 O% [9 E. N- Q' r& \{资金}7 o* H7 p, w' C/ x# }
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}- g3 T9 r1 V1 g2 P+ }- B% }7 w
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}, K$ W: |7 l. \4 _, h; B
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;
" [3 H# e5 C, i, Y' N+ Y) b. WDdmrs:=sum(Ddmr,0);
# {2 I6 q/ R7 K: }Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
/ @5 _- ~5 Z. c7 p* |Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
# g- a6 Y+ T3 KZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
. s) }2 m$ e, ?5 x$ O8 T" HXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
9 I) M' X' v5 x3 g6 D2 qChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
% g5 n& u: O" h9 q! y( T9 u: ?Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
! ^7 l @. h$ ?Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
# p+ M0 F6 w+ z$ D0 |Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
6 v6 ~9 M+ c8 J) v3 C散资:=(xhb-xhs)/10000;% F4 n Y! |( u& ]! [5 B; d, i# o0 B
中资:=(zhb-zhs)/10000;
* ?8 \) r( t8 k% G! x) f大资:=(dhb-dhs)/10000;
$ H) I+ c. A+ O1 j. F; V. D" b超资:=(chb-chs)/10000;3 D4 d& ^3 j9 J# P% {
超资增仓:=超资;# N0 S9 v8 u7 @# p
大资增仓:=大资;
0 {2 v& D6 [. V3 C0 E中资增仓:=中资;
! O, x$ N1 V7 f/ e: i# @散资增仓:=散资;' A- T6 w' l. P% J0 C2 g+ [
BBD净额:=(超资+大资);
* f$ K' [- e- C* lDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;: ], }, K$ c9 g W
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
7 ^% |5 l# [0 V% vDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
# l4 U' f" @$ Z% j; ]DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;0 }1 d/ ]2 p M; U. q6 F* \
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
4 a" E8 H/ ]' ^/ XDRAWRECTABS(0,118,270,0,1),COLOR00FF00;. E* M2 B2 m! c, f- w, Q2 V
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
( p! z" e, |) n/ Pzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
: a& f6 f( K5 u! u2 B9 h; |2 _tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
2 u; r. M( I# p! N* a- l) E6 X8 Stdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);% N7 G! w# H) i( `2 p- v& ?
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
' W( `, Y5 V( X4 |7 tddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);: k6 ?# x5 j$ s2 W
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);: _" G+ a; i& x# ~! X
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);, _# J" Y+ q* x! O% D/ P
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);( ]/ ]1 F. ^1 _# o( O
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
7 d6 k- j* l% T8 S, `tdj:=tdn-tdm;
; V6 S3 Y s# ?3 u3 O) o( Bddj:=ddn-ddm;
8 ^$ \! ^ v7 n {$ `7 Jzdj:=zdn-zdm;
) s/ h9 _$ r2 v4 ^sdj:=sdn-sdm;
" \* o5 m8 Z7 O. bzlj:=zln-zlm;
1 J4 l5 g2 K+ H8 k uDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
0 {' Z; M' e/ G, a# L5 t+ P- RDRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;) P2 |( w) p- p( ^9 {
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;$ Y* q: l4 R5 W
DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
/ Z" C/ V) y3 Z JDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;- D ~5 O% q9 r! n' F6 {1 r
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;; X5 y* J8 P9 y# F
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
% B" k, F( @0 \: e4 jDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
/ j: @! {! v; W* r$ |( Z9 HDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
8 Q C- Y1 i; S' n8 C/ m5 {DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
+ a8 Z1 s( c+ Y! t5 F1 ]5 |DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;% }. n$ |3 \8 x: z, |
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;6 Q- M, t$ h+ L8 E5 @- C: e- Y
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
3 t' Q% F* R' s. M: _6 v# jDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07