|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;0 X! k% G* q; K% U! u
户均持股:=(FINANCE2(37)/帐户总数)*10000;
. B# P2 {$ ?! `! J) lZH3:=ref(帐户总数,3);
' O1 v, {9 m& }1 s, wHJ3:=ref(户均持股,3);& K3 u$ Z3 o9 m& H, {4 O: \
主动率:="卫东.主动率#day";
& l, z% F7 ]) u7 ]( s单数比:="卫东.单数比#day";1 U: v4 }- h @7 ^) K
通吃率:="卫东.通吃率#day";( f4 b, b; I3 X
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
* R) B) W; e7 [! R8 iDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
! y' ?5 s3 H0 v e V# aDRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;* ]$ g u- m0 U. ?; Y- H
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;! V3 f) x ~# c- b; E- c$ t
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;0 n$ B, }% u8 ?
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
$ q. I) I9 p) bDRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
2 }6 }8 {# X0 d0 D* ?DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;3 s. F" U( T- q! ^2 f& P
连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;8 r F; j9 w# k5 @: m+ ~
连绿:LAST(CLOSE=REF(MA5,1);9 _$ _( `$ v9 H
H1:=MAX(MAX(MA5,MA10),MA30);
. o& n, Y* M* d! x' Y! ], f s! dL1:=MIN(MIN(MA5,MA10),MA30);
7 c" A) ?) r' R& gDRAWTEXT(H10 AND DDY>0) OR DDZ>400);- M; y/ c6 y8 g! [& |* y( h
A2:="MACD.MACD"(26,12,9);* H" ^( @9 c- T: Q8 o2 o& K2 X" q
A1:=C/REF(C,1)REF(A2,1) ;
: [ `! [# n' m# A- Z6 VA3:=COUNT(DDX>0.045,10)>2;/ g! X! M+ W+ {' d5 k L! T3 s
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
* `5 ~; r$ O7 {; b. T8 }DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;. C9 I2 _( F' `# X D; s
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;4 e8 E3 m8 z' u
{资金}3 r B, m1 u. l! Y/ ]( X
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}% a7 Q! q7 q8 z8 N5 l3 R8 K; k! j% e9 Z
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
# h# U9 R3 o; \) RDdmr:=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;
4 Z4 L6 b. |9 {. P7 Q9 BDdmrs:=sum(Ddmr,0);
' @( H+ `3 }$ w) i/ o8 ^1 }Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
7 a1 z2 p: {, O) PDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
& O1 Y! [9 D0 u# L) CZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;& r+ q* a: a1 {( a; g
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
+ I1 U! H4 @& D5 a/ [# s( l+ g+ WChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;; ~2 x% I% | s: S6 X
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;$ o8 _0 ]2 c. |" W. `+ ]' ~( W
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
# u4 Z' L2 o& `2 W/ IXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;' z/ k$ P5 e, Z- Q5 Y) Y
散资:=(xhb-xhs)/10000;
- a# u" a( r+ T1 a- o; @4 s- r% c中资:=(zhb-zhs)/10000;, {) t) n/ k+ K
大资:=(dhb-dhs)/10000;
- Z. i6 x: ]0 B超资:=(chb-chs)/10000;/ T" f0 H0 F. D0 N
超资增仓:=超资;! {( x& q1 e5 z- x' ~' Z0 O# l1 F
大资增仓:=大资; T- [. |5 B5 B- w9 ?6 r) B- [
中资增仓:=中资;
# J0 B9 V5 a$ S* h; O散资增仓:=散资;
8 Y, \( b v+ f+ E" N3 G' R: [. ZBBD净额:=(超资+大资);
+ w6 G; m9 c# hDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
7 i7 W% h+ k) yDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;! t; B! _# v. c- Q9 B
DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
* p. v/ N i+ N7 f; ~DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;" p" W f2 U& |6 I9 a9 v
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
$ t" w. `7 S9 M* mDRAWRECTABS(0,118,270,0,1),COLOR00FF00;3 e' w+ T; H# x/ K! Z2 m/ J" [
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);. {( q9 f; C: J# P0 i% T
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);$ B; }1 u% Y" _. `: F0 g# w
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);/ y1 v, T3 s ~' n6 n
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
& R4 Z# m9 Q7 [3 I1 J1 Lddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
1 A0 \& Q+ N! c+ Jddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);" N) a# K. A& _" `7 G: r7 Y7 f3 X' e
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);" n7 H' t1 A, a' K
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
4 N9 Q! S4 V) X4 Z: L5 `: U+ Hsdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
9 t5 R: t: d3 c6 @sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
' D- Z# l3 m* ^% u( Gtdj:=tdn-tdm;
& W' A# D: O, u3 uddj:=ddn-ddm;
- z7 q& ?; F3 g& ^. i7 vzdj:=zdn-zdm;
) B5 S. P9 O) Tsdj:=sdn-sdm; y3 I9 ~, n3 ^/ }' K O) B
zlj:=zln-zlm;1 F& F; |1 n) T) }& ^ j3 \) z$ A6 z& \
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
$ [% u$ H) S9 K1 q( k1 K. t/ K zDRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;" {# p: v& v' D
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
1 Y* p& ~& A& `8 X; ^+ a5 RDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
7 i1 E3 A6 ?. C5 R* B" A1 ODRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
5 z7 S% y6 c& p" q7 DDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
/ u. ]9 S: W/ b3 o: jDRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;4 X, s; \9 p/ c& Q: }: F
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
1 h& \# |* E3 ]. M% Q; Y; XDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
+ h9 e, `4 `5 z4 S& eDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;& x6 u. d2 [/ W) I" t! [
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;& @) Z& z k5 g/ @# Y' j$ c) Y
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;. `8 i9 {6 D# |9 l# [0 W* g
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
, s/ Y: e* e$ ?& f- B, IDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07