大智慧换手成交量未加密选股指标公式源码

大智慧换手成交量未加密选股指标公式源码

源码正文：

VARIABLE:K=1{XG51};
VAR1:=SUM(vol,0){XG51};
VAR2:=VAR1/CAPITAL{XG51};
N:=FLOOR(VAR2){XG51};
IF N=REF(N,1)+1 THEN BEGIN
stICKLINE(C,0,80,4,1){XG51};
DRAWTEXT(C,80,' 第'),ALIGN0,COLORCYAN{XG51};
DRAWTEXT(C,70,' '+NUMTOSTR( N)),ALIGN0,COLORWHITE{XG51};
DRAWTEXT(C,60,' 次'),ALIGN0,COLORCYAN{XG51};
DRAWTEXT(C,50,' 完'),ALIGN0,COLORCYAN{XG51};
DRAWTEXT(C,40,' 全'),ALIGN0,COLORCYAN{XG51};
DRAWTEXT(C,30,' 换'),ALIGN0,COLORCYAN{XG51};
DRAWTEXT(C,20,' 手'),ALIGN0,COLORCYAN{XG51};
DRAWTEXT(C,10,' '+NUMTOSTR( K)+'天'),ALIGN0,COLORCYAN{XG51};
K:=1{XG51};
END
ELSE
K:=K+1{XG51};
日换手:SUM(VOL,1)*100/CAPITAL,colorf0f000,LINETHICK0 {XG51};
五日换手:SUM(VOL,5)*100/CAPITAL,colorf0f000,LINETHICK0 {XG51};
十日换手:SUM(VOL,10)*100/CAPITAL,colorf0f000,LINETHICK0 {XG51};
二十日换手:SUM(VOL,20)*100/CAPITAL,colorf0f000,LINETHICK0 {XG51};
百日换手:SUM(VOL,100)*100/CAPITAL,colorf0f000,LINETHICK0 {XG51};
AA:=VOL/((HIGH-LOW)*2-Abs(CLOSE-OPEN)){XG51};
成交量（手）:VOL,ColorC700FF,LINETHICK0{XG51};
主动买盘:IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORred,
LINETHICK0{XG51};
主动卖盘:IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),color66ff00,
LINETHICK0{XG51};
REFLINE: 0, 25, 75, 100{XG51};
Var1:=IF(ma(CLOSE,88),1,0){XG51};
Var2:=1/WINNER(CLOSE){XG51};
Var3:=100-ABS((CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100){XG51};
HSL:=vol/capital*100{XG51};
量能:=SUM(HSL,N){XG51};
涨幅１:=100*(CLOSE-REF(CLOSE,N))/REF(CLOSE,N){XG51};
流通市值:=capital*c{XG51};
AH:=HHV(流通市值,N){XG51};
AL:=LLV(流通市值,N){XG51};
t1:=if(HSL<=2,1,0){XG51};
t2:=if(HSL>2 AND HSL<3,1,0){XG51};
t3:=if(HSL>3 AND HSL<5,1,0){XG51};
t4:=if(HSL>5 AND HSL<8,1,0){XG51};
t5:=if(HSL>8 AND HSL<15,1,0){XG51};
t6:=if(HSL>15 AND HSL<25,1,0){XG51};
t7:=if(HSL>=25,1,0){XG51};
sss:=100/4{XG51};
i:=0{XG51};
IF HSL<=2 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),'日换手率在1%--2%，股价属于成交低靡，属于冷门股。日换手率成交小于3%的成交额称为“成交无量”。'),Color00FFFF,ALIGN2; i:=i+1;
END
IF HSL>2 AND HSL<3 THEN BEGIN DRAWTEXT(c>0 and
DISPSTATUS=2,100-(sss*i),'日换手率在2%--3%，股价属于成交温和，属于备份股。'),Color00FFFF,ALIGN2{XG51};
i:=i+1;
END
IF HSL>3 AND HSL<5 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),' 日换手率在3%--5%，股价属于成交活跃，表示有庄家在积极活动，属于热门股。把10日平均换手率大于3%或大于5%，而后又缩量至换手率小于3%高度控盘的个股作为选股条件。'),Color00FFFF,ALIGN2; i:=i+1; END
IF HSL>5 AND HSL<8 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),' 日换手率在5%--8%, 大于7%，常常超过10%，属于股价成交带量，表明筹码在急剧换手。发生在低位或是通过第一阻力区，很可能是强庄积极进货。'),Color00FFFF,ALIGN2{XG51};
i:=i+1; END
IF HSL>8 AND HSL<15 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),' 日换手率大于8%--15%，股价属于成交放量。'),ColorFFFFF5,ALIGN2; i:=i+1; END
IF HSL>15 AND HSL<25 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),' 日换手率大于15%--25%，股价属于成交巨量，发生在高位或高位缩量横盘之后，很可能是庄家出货。'),Color00FFFF,ALIGN2{XG51};
i:=i+1; END
IF HSL>=25 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),' 日换手率大于25% 股价属于成交怪异；周换手率大于25% 属于成交活跃。'),ColorFFFFFF,ALIGN2; i:=i+1; END
IF 量能>3*N AND 涨幅１>3*N THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),'继续大涨'),ColorFF00FF,ALIGN2; i:=i+1; END
IF 量能<0.5*N AND 涨幅１<N THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),'继续小涨'),ColorFFFF00,ALIGN2; i:=i+1; END
IF 量能<0.5*N AND 涨幅１>-N AND 涨幅１>0 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),'继续小跌'),ColorFFFF00,ALIGN2; i:=i+1; END
IF 量能>3*N AND 涨幅１<-3*N THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),'继续大跌'),ColorFF00FF,ALIGN2; i:=i+1; END
IF ((量能>3*N AND 涨幅１<N) OR (量能<0.5*N AND 涨幅１>3*N)
OR (量能>3*N AND 涨幅１>-N AND 涨幅１<0) OR (量能<0.5*N AND 涨幅１<-3*N)) THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),'注意反转：股价高位向下反转，中位横盘杀跌，低位向上反转。'),ColorFFFFF5,ALIGN2{XG51};
i:=i+1; END
IF 涨幅１>0 and 流通市值<=AL THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),'流通市值减小，涨幅加大'),Color00FFFF,ALIGN2; i:=i+1; END
IF 涨幅１<=0 and 流通市值<=AL THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,100-(sss*i),'流通市值加大，涨幅减小'),Color00FFFF,ALIGN2; i:=i+1; END{XG51};
DRAWTEXTREL(20 ,50 ,'趋势看周线' ){XG51};
DRAWTEXTREL(20 ,200 ,'选股看日线' ){XG51};
DRAWTEXTREL(20 ,350 ,'买股看时线' ){X-G-5~1-C-N-{};

大智慧买卖四色主图未加密选股指标公式源码

源码正文：

M20:ma(C,20),COLOR0000ff,LINETHICK0;
DRAWTEXTAbs(10,5,'▓分水岭MA20: '+NUMTOstRN(MA(C,20),2)+'元'),Color0000FF,LINETHICK3{XG51};
DRAWTEXTABS(10,25,'▓十日内最高价: '+NUMTOSTRN(hhv(H,10),2)+'元'),Color0099FF,LINETHICK3{XG51};
DRAWTEXTABS(10,45,'▓十日内最低价: '+NUMTOSTRN(LLV(L,10),2)+'元'),ColorFF9900,LINETHICK3{XG51};
DRAWTEXTABS(10,65,'▓六十日最高价: '+NUMTOSTRN(HHV(H,60),2)+'元 ' ),Color00FFFF,LINETHICK3{XG51};
DRAWTEXTABS(10,85,'▓六十日最低价: '+NUMTOSTRN(LLV(L,60),2)+'元 ' ),Color00FF00,LINETHICK3{XG51};
乖离20:=ABS((2*C+H+L)/4-M20)/M20{XG51};
乖离线:dma(C,乖离20),COLORgray{XG51};
PARTLINE(乖离线 ,(乖离线>REF(乖离线,1))-1,rgb(0,255,0),1,rgb(255,0,0) ),DOTLINE,LAYER0{XG51};
止盈:乖离线*1.06,COLOR00ffff,LINETHICK1;
止损:乖离线*0.94,COLOR00ff00,LINETHICK1;
FILLRGN(止盈,乖离线,止盈>乖离线,RGB(0,0,255)),LAYER5{XG51};
FILLRGN(乖离线,止损,乖离线>止损,RGB(0,0,155)),LAYER5{XG51};
止盈*1.05,COLOR0077ff; 止损*0.95,COLORff9900{XG51};
FILLRGN(止盈,止盈*1.05,止盈<止盈*1.05,RGB(100,0,100)),LAYER7{XG51};
FILLRGN(止损,止损*0.95,止损>止损*0.95,RGB(0,80,0)),LAYER7{XG51};
Y5:cyc(5),COLORFFFFFF,LINETHICK1{XG51};
PARTLINE(Y5 ,(Y5>REF(Y5,1))-1,rgb(0,155,255),1,rgb(255,200,0) ),LINETHICK3,LAYER0{XG51};
LC:=REF(C,1){XG51};
RSI:((SMA(MAX((C - LC),0),3,1) / SMA(ABS((C - LC)),3,1)) * 100),LINETHICK0{XG51};
DRAWTEXT(crOSS(RSI,80) ,high*1.01,'RSI.'+NUMTOSTRN(RSI,0)+''),COLOR00ffFF,ALIGN1,LINETHICK1{XG51};
DRAWTEXT(DISPSTATUS=2,止盈*1.05,'【RSI:'+NUMTOSTRN(RSI,0)+'】'),COLOR0099FF,LINETHICK3,ALIGN1{XG51};
p:=BARSSINCE(DISPSTATUS=1)+1{XG51};
E:llvall(llv(l,p))*0.98{XG51};
成本:=SMA(COST(97),3,1){XG51};
成本R:=(成本-REF(成本,1))*4{XG51};
STICKLINE(成本R>0,E+成本R,E,6,0),Color0000FF{XG51};
STICKLINE(成本R<0,E-成本R,E,6,0),ColorFF9900;{XG51};
换手C:=SMA(DMA(C,vol/CAPITAL),3,1){XG51};
换手R:=(换手C-REF(换手C,1))*6{XG51};
STICKLINE(换手R>0,E-换手R,E,6,0),Color0598FF{XG51};
STICKLINE(换手R<0,E+换手R,E,6,0),Color00FF00{XG51};
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),LOW,HIGH,0.1,0),colorred{XG51};
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),LOW,HIGH,0.1,0),colorcyan{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR000066{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000088{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR0000AA{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR0000BB{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR0000CC{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000DD{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000EE{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000FF{X_G*5_1_C_N_{};