帳戶總數:extradata(‘散戶線’),linethick0,PRECIS0;
戶均持股:=(FINANCE2(37)/帳戶總數)*10000;
ZH3:=ref(帳戶總數,3);
HJ3:=ref(戶均持股,3);
主動率:=”衛(wèi)東.主動率#day”;
單數比:=”衛(wèi)東.單數比#day”;
通吃率:=”衛(wèi)東.通吃率#day”;
DRAWTEXTREL(5,13,’帳戶總數(戶)：’+NUMTOSTRN(帳戶總數,0)),Color0000FF;
DRAWTEXTREL(139,13,’戶均持股(股)：’+NUMTOSTRN(戶均持股,0)),Color0000FF;
DRAWTEXTREL(290,13,’上漲家數：’+”衛(wèi)東.上漲家數#day”+’家’),COLOR0000FF;
DRAWTEXTREL(390,13,’平盤家數：’+”衛(wèi)東.平盤家數#day”+’家’),COLORFFFFFF;
DRAWTEXTREL(490,13,’下跌家數：’+”衛(wèi)東.下跌家數#day”+’家’),COLOR00FF00;
DRAWTEXTREL(590,13,’主動率：’+NUMTOSTRN(主動率,2)+’%’),COLOR0033FF;
DRAWTEXTREL(690,13,’單數比：’+NUMTOSTRN(單數比,2)+’%’),COLOR00FF00;
DRAWTEXTREL(790,13,’通吃率：’+NUMTOSTRN(通吃率,2)+’%’),COLOR00FFff;
連紅:LAST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
連綠:LAST(CLOSE M1:=5;M2:=10;M3:=20;M4:=30;M5:=60;M6:=120;
MA1:MA(CLOSE,M1);
MA2:MA(CLOSE,M2);
MA3:MA(CLOSE,M3);
MA4:MA(CLOSE,M4);
MA5:MA(CLOSE,M5);
MA6:MA(CLOSE,M6);
MA5:=EMA(C,5);
MA10:=EMA(C,10);
MA30:=EMA(C,30);
MA60:=EMA(C,60);
YCX:=MA5>=REF(MA5,1);
H1:=MAX(MAX(MA5,MA10),MA30);
L1:=MIN(MIN(MA5,MA10),MA30);
DRAWTEXT(H1REF(MA30,1) ,H*1.018,’【串串】’),COLORYELLOW;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,1000000,10000);
DD:=REF(LLV(CLOSE,120),1);
J:=”KDJ.J”;
DDZ:=DD*17;
DDY:=((QJ2+QJ4)-(QJ1+QJ3))/SUM(VOL,10)*100;
弄點錢玩:=CROSS(J,0) AND ((DDX>0 AND DDY>0) OR DDZ>400);
A2:=”MACD.MACD”(26,12,9);
A1:=C/REF(C,1)<1.099 AND A2>REF(A2,1) ;
A3:=COUNT(DDX>0.045,10)>2;
弄點錢玩2:=弄點錢玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
DRAWTEXT(弄點錢玩2>0,L*0.97,’【弄點錢玩玩】’),COLORYELLOW;
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,’短’),COLORMAGENTA;
{資金}
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判斷是否有理想數據}
{TODAY:=”ddx.ddx”=0;}{判斷是否有正版數據}
Ddmr:=IF(TODAY,(“DDEDATA@BIGORDER”(1,2)-“DDEDATA@BIGORDER”(2,2)),(bigorder(1,2)-bigorder(2,2)))*vol/capital*100;
Ddmrs:=sum(Ddmr,0);
Chb:=IF(TODAY,”DDEDATA@BIGORDER”(1,3),bigorder(1,3))*AMOUNT;
Dhb:=IF(TODAY,(“DDEDATA@BIGORDER”(1,2)-“DDEDATA@BIGORDER”(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
Zhb:=IF(TODAY,(“DDEDATA@BIGORDER”(1,1)-“DDEDATA@BIGORDER”(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
Xhb:=IF(TODAY,(1-“DDEDATA@BIGORDER”(1,1)),(1-bigorder(1,1)))*AMOUNT;
Chs:=IF(TODAY,”DDEDATA@BIGORDER”(2,3),bigorder(2,3))*AMOUNT;
Dhs:=IF(TODAY,(“DDEDATA@BIGORDER”(2,2)-“DDEDATA@BIGORDER”(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
Zhs:=IF(TODAY,(“DDEDATA@BIGORDER”(2,1)-“DDEDATA@BIGORDER”(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
Xhs:=IF(TODAY,(1-“DDEDATA@BIGORDER”(2,1)),(1-bigorder(2,1)))*AMOUNT;
散資:=(xhb-xhs)/10000;
中資:=(zhb-zhs)/10000;
大資:=(dhb-dhs)/10000;
超資:=(chb-chs)/10000;
超資增倉:=超資;
大資增倉:=大資;
中資增倉:=中資;
散資增倉:=散資;
BBD凈額:=(超資+大資);
DRAWTEXTREL(5,85,’BBD (萬)：’+NUMTOSTRN(BBD凈額,0)),LINETHICK1,Color0080FF;
DRAWTEXTREL(5,155,’超資(萬)：’+NUMTOSTRN(超資增倉,0)),LINETHICK1,COLORYELLOW;
DRAWTEXTREL(5,225,’大資(萬)：’+NUMTOSTRN(大資增倉,0)),LINETHICK1,Color62FFFF;
DRAWTEXTREL(5,295,’中資(萬)：’+NUMTOSTRN(中資增倉,0)),LINETHICK1,ColorACFFFF;
DRAWTEXTREL(5,365,’散資(萬)：’+NUMTOSTRN(散資增倉,0)),LINETHICK1,ColorFFFFFF;
DRAWRECTABS(0,118,270,0,1),COLOR00FF00;
zln:=REF(IF(TODAY,IF(TODAY,”DDEDATA@BIGORDER”(1,2),SELFDATA(‘特大買入 ‘)+SELFDATA(‘大單買入’)),bigorder(1,2)),0);
zlm:=REF(IF(TODAY,IF(TODAY,”DDEDATA@BIGORDER”(2,2),SELFDATA(‘特大賣出 ‘)+SELFDATA(‘大單賣出’)),bigorder(2,2)),0);
tdn:=REF(IF(TODAY,IF(TODAY,”DDEDATA@BIGORDER”(1,3),SELFDATA(‘特大買入 ‘)),bigorder(1,3)),0);
tdm:=REF(IF(TODAY,IF(TODAY,”DDEDATA@BIGORDER”(2,3),SELFDATA(‘特大賣出 ‘)),bigorder(2,3)),0);
ddn:=REF(IF(TODAY,IF(TODAY,(“DDEDATA@BIGORDER”(1,2)-“DDEDATA@BIGORDER” (1,3)),SELFDATA(‘大單買入’)),(bigorder(1,2)-bigorder(1,3))),0);
ddm:=REF(IF(TODAY,IF(TODAY,(“DDEDATA@BIGORDER”(2,2)-“DDEDATA@BIGORDER” (2,3)),SELFDATA(‘大單賣出’)),(bigorder(2,2)-bigorder(2,3))),0);
zdn:=REF(IF(TODAY,IF(TODAY,(“DDEDATA@BIGORDER”(1,1)-“DDEDATA@BIGORDER” (1,2)),SELFDATA(‘中單買入’)),(bigorder(1,1)-bigorder(1,2))),0);
zdm:=REF(IF(TODAY,IF(TODAY,(“DDEDATA@BIGORDER”(2,1)-“DDEDATA@BIGORDER” (2,2)),SELFDATA(‘中單賣出’)),(bigorder(2,1)-bigorder(2,2))),0);
sdn:=REF(IF(TODAY,IF(TODAY,1-(“DDEDATA@BIGORDER”(1,1)),1-(SELFDATA(‘特大買入 ‘)+SELFDATA(‘大單買入’)+SELFDATA(‘中單買入’))),1-(bigorder(1,1))),0);
sdm:=REF(IF(TODAY,IF(TODAY,1-(“DDEDATA@BIGORDER”(2,1)),1-(SELFDATA(‘特大賣出 ‘)+SELFDATA(‘大單賣出’)+SELFDATA(‘中單賣出’))),1-(bigorder(2,1))),0);
tdj:=tdn-tdm;
ddj:=ddn-ddm;
zdj:=zdn-zdm;
sdj:=sdn-sdm;
zlj:=zln-zlm;
DRAWTEXTREL(140,85,’占’+numtostrn(((zlj))*100,1)+’%’),Color0080FF;
DRAWTEXTREL(140,155,’占’+numtostrn((tdj)*100,1)+’%’),COLORYELLOW;
DRAWTEXTREL(140,225,’占’+numtostrn((ddj)*100,1)+’%’),Color62FFFF;
DRAWTEXTREL(140,295,’占’+numtostrn((zdj)*100,1)+’%’),ColorACFFFF;
DRAWTEXTREL(140,365,’占’+numtostrn((sdj)*100,1)+’%’),ColorFFFFFF;
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+’手’),Color0080FF;
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+’手’),COLORYELLOW;
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+’手’),Color62FFFF;
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+’手’),ColorACFFFF;
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+’手’),ColorFFFFFF;
DRAWTEXTREL(280,85,’倉 ‘+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+’%’),Color0080FF;
DRAWTEXTREL(280,155,’倉 ‘+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+’%’),COLORYELLOW;
DRAWTEXTREL(280,225,’倉 ‘+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+’%’),Color62FFFF;
DRAWTEXTREL(280,295,’倉 ‘+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(zdj),0),1)+’%’),ColorACFFFF;
DRAWTEXTREL(280,365,’倉 ‘+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(sdj),0),1)+’%’),ColorFFFFFF;