|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;! ^+ X. |% x2 t# K, y7 v" J
户均持股:=(FINANCE2(37)/帐户总数)*10000;
8 J4 ~$ m3 ~- Q. ^, |( {( pZH3:=ref(帐户总数,3);2 b6 k7 V7 n6 I1 l# L
HJ3:=ref(户均持股,3);
# z+ u0 z/ V# v9 u& W主动率:="卫东.主动率#day";
" ?) {# N. ]. k单数比:="卫东.单数比#day";% R* r0 H+ K! D7 L9 @" `) L
通吃率:="卫东.通吃率#day";
0 O. s2 g& L1 g& JDRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
3 x9 q- T7 d3 y' {+ l8 n! dDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;7 m) u* \; W" l/ q c" b
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF; m) b, Q2 b/ k2 ?4 Q6 e. N
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
: C1 e5 I! j' f# @1 v; jDRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;0 f9 g; _, G+ o5 B8 a/ u. t
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;* s- M& z1 r7 q) ?9 s
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00; e) S- _/ {! p/ u
DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
# i B& v* D& K+ W; _' K连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
, z2 Z3 d- l! g6 `+ `连绿:LAST(CLOSE=REF(MA5,1);
, G' I. u6 X# \/ z3 c+ A- W2 uH1:=MAX(MAX(MA5,MA10),MA30);; r" T: T& C0 S$ Q( q8 l
L1:=MIN(MIN(MA5,MA10),MA30);
% U+ r G6 K3 w: O7 d8 aDRAWTEXT(H10 AND DDY>0) OR DDZ>400);# @ |$ [% y* ] M
A2:="MACD.MACD"(26,12,9);
L; w$ _4 H+ ~; I5 s, m( S8 |A1:=C/REF(C,1)REF(A2,1) ;
) a, e- n8 B/ R7 I( G z* A" N4 B3 [A3:=COUNT(DDX>0.045,10)>2;2 k5 I" |9 v1 m- [
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;3 Q/ Y' Y+ \6 K( r% _/ K
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
" g. }4 u Y6 X1 r/ KDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
6 S( {8 |* ]8 W+ ?{资金}0 n9 a( |5 O/ E# N% _' {9 f, N# H4 k* ?: P
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
5 ` f: H/ D i* r2 u m) \{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}- ]8 n# J) t( B& w u! y
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;
9 u1 ? S: a1 w1 F1 A. ?Ddmrs:=sum(Ddmr,0);
/ I2 j ~% t/ k6 u) D( c! [2 X4 JChb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;9 i. T' @2 A& C# ^$ j0 T
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;& _+ F5 ]3 W0 {# z5 X, V% \
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
8 i8 q$ Q: _: \( M- U( X5 hXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;* N3 C9 F1 A! Q( a
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;+ d; n& ^: r2 m) N( E; F+ q% c
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;; U) r# w* G0 X
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
6 t8 b$ e7 _2 j- ~' sXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
! m4 s; p3 ^* X4 }) G6 b/ b散资:=(xhb-xhs)/10000;
5 }- L) @2 u; e' P中资:=(zhb-zhs)/10000;6 J/ c9 U A1 c6 h, k# \
大资:=(dhb-dhs)/10000;
+ \8 c! e6 ]; v& _; `( O超资:=(chb-chs)/10000;
' {3 J# @# u. U$ d超资增仓:=超资;
' X3 ?& b6 g, ~大资增仓:=大资;
% B+ M+ d# {: i& D7 } _中资增仓:=中资;, c% L9 y( ]( h* l
散资增仓:=散资;+ s" J2 c0 t2 g, h7 o y
BBD净额:=(超资+大资);$ G# }( o- ~) I& b Q3 ]
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
/ e- P) o. k! BDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;! o; h5 L3 {' L& J. _ ]
DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
5 L' n3 T! x5 D/ [% FDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
; u0 V/ K0 Q! z0 |. PDRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
; g: F0 A6 J+ X( ~! V1 g3 A+ CDRAWRECTABS(0,118,270,0,1),COLOR00FF00;
' ]) `9 I0 F0 H* j+ U2 n& ozln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
3 `& s/ Y( q0 h6 k$ B3 ?6 vzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
9 ]9 |9 k4 x5 L6 `: |tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);) ?) w/ a( Y( J6 u8 f3 Y4 v
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
) k% h- L% Z1 D% z; f4 e9 J/ i% ~% Oddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);$ Y3 u3 l( m! M! e6 d
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
. h9 I8 `9 L8 R9 f: u) dzdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);! R. s4 o% b A
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);0 J/ Z% L9 l8 ~1 v1 P- a
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
1 R7 Y. E8 U7 P3 {- r$ s8 nsdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);0 k+ C7 _6 n3 M' p8 I
tdj:=tdn-tdm;" Y! t. L1 r" G& w" n8 k2 L$ m
ddj:=ddn-ddm;6 V- G4 x6 B, g* V% Y4 N5 N5 C' u
zdj:=zdn-zdm;) Z/ d9 l0 y: {% S$ o; l5 ~
sdj:=sdn-sdm;
' Q* |. T) a" G" }, g6 izlj:=zln-zlm;
( e( T2 Y! u' c$ v/ k3 IDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
1 V3 e( E! ^; xDRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
) t" ?0 R- L, g' xDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
" H1 {- L& j+ u+ L# p+ N8 y3 fDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;, e/ F W) _9 `; V) N
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;& w$ c, L/ Q2 }2 q
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;% O0 _* C% U; B: f
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
1 x/ S# T2 X5 B# TDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
8 T6 f( O( m* CDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
! W u/ I* x+ GDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;: h8 }. E% @# Y4 i. ^
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
1 A/ W2 f7 ~5 d; g6 F" EDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
2 h, U& p$ }% A% k5 n8 O gDRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;* f9 {: {2 O0 y# d9 \ O$ Q
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07