|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;1 q- _1 q% R* b: u$ F
户均持股:=(FINANCE2(37)/帐户总数)*10000;
% s- y$ c {4 N' H* T4 {ZH3:=ref(帐户总数,3);
' o1 f% y8 Q8 T, ^3 I6 xHJ3:=ref(户均持股,3);
1 c; y I- B! U3 r# _主动率:="卫东.主动率#day";
2 r( m6 Z# {; o6 S$ {" s( k8 q8 Q单数比:="卫东.单数比#day";9 `- [5 s; K/ r: z% v2 v2 F
通吃率:="卫东.通吃率#day";2 j/ ^. P0 ~, R* d" r
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
2 t) J$ T7 J( T0 h7 }3 TDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;5 \' l, W" w* S7 s- |
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
& J$ ?4 `2 i+ h2 kDRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;0 M2 Q; [$ }! I6 J5 p ^ o
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
; f2 Y# j" n2 YDRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF; m) t& V$ W: {
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;6 Q8 T0 x6 W0 m. x9 F7 A
DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
$ }7 W( p. e1 W$ b a/ A9 T ]连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
9 c6 z) `: }6 H# S8 S; y. l7 y% N连绿:LAST(CLOSE=REF(MA5,1);/ A. g( m/ A5 B* O* a* L# d8 G
H1:=MAX(MAX(MA5,MA10),MA30);# Y; F3 |! {) V1 ~( g
L1:=MIN(MIN(MA5,MA10),MA30);
, m/ C2 g, X$ n0 vDRAWTEXT(H10 AND DDY>0) OR DDZ>400);
% S+ f5 R# U. W K# N" zA2:="MACD.MACD"(26,12,9);
' y5 m0 A. s1 N8 {A1:=C/REF(C,1)REF(A2,1) ;
. n5 S) N3 \, ~. Y3 g; KA3:=COUNT(DDX>0.045,10)>2;2 ~2 `, ?/ B- Q
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;5 z; W& r6 ^8 a/ N6 v2 J& B5 A
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;# k4 b9 B6 d+ v) I3 K5 D; B; X
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
$ q' z3 `/ N5 t) T9 w7 s' j{资金}
" K9 Z7 u/ f( @1 A% f0 B0 _* gTODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
5 I$ V8 y8 q0 \8 d6 o{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
2 b) k/ H Q' qDdmr:=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;
( r3 w6 w, x% c) `9 K' `* `' `. EDdmrs:=sum(Ddmr,0);
3 U. o6 q8 I: j6 d# gChb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;) G# d7 F: ~0 s5 g
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;0 E1 P& U8 P8 O4 k3 [6 X
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;: o% C8 E, L$ @- p# E; z
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
$ |+ F% |) W6 {' EChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;; e6 l9 k- R1 ~- m1 a. }: b
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
8 b0 l+ A) L. y' w1 h# n7 {. J& hZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
$ @, z3 X3 G$ w, a1 X0 `% FXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
b4 a8 | Q0 k散资:=(xhb-xhs)/10000;* \* F# ?1 f0 Y% [3 m+ u+ N
中资:=(zhb-zhs)/10000;
. o) b% y" A( ?( ]1 X大资:=(dhb-dhs)/10000;
1 u: T( T6 ]( @; X超资:=(chb-chs)/10000;
N* @- X- n' V+ Z; L# w超资增仓:=超资;
" S2 K" Z% h/ O# u7 `) ~, x! V大资增仓:=大资;7 D$ s. G% c2 G
中资增仓:=中资;
, w* ?/ X/ a# o散资增仓:=散资;6 x) A& [6 f7 r, E/ W
BBD净额:=(超资+大资);
; I- q: o9 R$ `# \, `9 k% M* gDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;/ \, h! C- W' } V7 w1 Q! j
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
u9 ]$ M6 l/ }3 q9 gDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
( E- f/ m2 v& G' G( sDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
! z0 n$ x9 |' g; {DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
4 W' n; r: Y7 r" f4 _6 oDRAWRECTABS(0,118,270,0,1),COLOR00FF00;
# O* }& o; {5 U- nzln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);) a, r$ r9 U/ A2 M1 ]% O0 V
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);2 \: t+ |7 d7 U0 x3 Y$ \
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
/ e$ }6 p( j4 E& g4 }tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);2 R: k5 x, O% l6 ]+ K7 T
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);7 N- w2 b, D4 l2 u, _
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
3 w+ Z7 L. X/ L5 x, D( @# ~$ _zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);- L1 ~! g! W8 _! s9 _
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
+ Y' p; i) l. w7 rsdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);9 f. H/ T9 f( X' ~) T% l
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);6 A/ j5 s5 ?; S) R+ o. b, w
tdj:=tdn-tdm;
: y5 G, V. ~( M6 dddj:=ddn-ddm;. s% v; m- }* @9 T3 n7 C4 U
zdj:=zdn-zdm;/ f: U- p8 p; N, R! B
sdj:=sdn-sdm;, m+ X; ^2 e" N, ?$ T( c
zlj:=zln-zlm;3 m5 L$ T* o9 E' d+ j* v
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
" u! _: \, z9 X2 j( {2 [1 V$ dDRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
# x8 o7 ?) T2 X( \DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
: Z# ]" K7 y/ H3 KDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;: w$ V- q2 a* ~) o$ ]
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
' \0 M) b5 `6 ~DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;+ J/ E `1 e+ |" b
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
; w" ~ @5 M. _8 Y: @8 q* R) r7 YDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
: r. S( M" F7 \, wDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
9 @8 B6 B# S/ w' W$ p' IDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;9 |2 g$ m, v& H% r, o9 \$ X
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;6 I& s* M8 _% r& X& ?4 @- ^' Q
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;7 L5 z M( P% T' V* a9 I5 F$ A- E
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
) y1 k) U+ |8 E# E& GDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07