大智慧换手分析未加密选股指标公式源码

大智慧换手分析未加密选股指标公式源码

源码正文：

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,180,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,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};
vol/CAPITAL{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};
DRAWTEXTABS(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{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% 股价属于成交怪异。'),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 ,'买股看时线' ){XG51};
bias1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*1000{XG51};
BIAS2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*1000{XG51};
BIAS3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*1000{XG51};
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6{XG51};
乖离:=MA(BIAS,3){XG51};
抄底:IF(乖离<-18 AND 乖离>=-27,-10,0), COLORred,LINETHICK0{XG51};
STICKLINE(乖离<-3 AND 乖离>=-9,2,0,6,0) , COLORred{XG51};
抄底二:IF(乖离<-9,15,0),ColorFF35FF,LINETHICK0{XG51};
STICKLINE(乖离<-120,15,0,6,0),Colorgreen{XG51};
STICKLINE(乖离<-53,9,0,6,0),Coloryellow{XG51};
STICKLINE(乖离<-13,4,0,6,0),ColorFF35FF{XG51};
Var1:=dma(CLOSE,VOL/MA(VOL,4)/4){XG51};
Var2:=DMA(CLOSE,VOL/MA(VOL,31)/31){XG51};
Var3:=(CLOSE-Var1)/Var1*100<-10{XG51};
Var4:=(Var1-Var2)/Var2*100<-16{XG51};
Var5:=(CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100<-23{XG51};
Var6:=SMA(MAX(CLOSE-REF(CLOSE,1),0),3,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),3,1)*100>16{XG51};
Var7:=100*(HHV(HIGH,27)-CLOSE)/(HHV(HIGH,27)-LLV(LOW,27)){XG51};
Var8:=INDEXC{XG51};
Var9:=MA(Var8,6){XG51};
VarA:=MA(Var8,24){XG51};
VarB:=MA(Var8,32){XG51};
VarC:=VarB>Var9*1.11 AND VarA>Var9*1.095{XG51};
sss:=(Var3 AND Var4 AND (OPEN-REF(CLOSE,1))/REF(CLOSE,1)>-0.07 OR Var5 AND Var6 AND crOSS(Var7,79) OR VarC AND CLOSE/COST(8)<=0.8)*100{XG51};
Varr1:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100{XG51};
Varr2:=ema(Varr1,24){XG51};
Varr3:=EMA(Varr2,10){XG51};
Varr4:=3*Varr2-2*Varr3{XG51};
Varr5:=EMA(Varr4,5)/10{X+G*5.1+C+N+{};

大智慧清醒买卖未加密选股指标公式源码

源码正文：

Var1:=BARSCOUNT(CLOSE){XG51};
Var2:=HHV(HIGH,200){XG51};
Var3:=LLV(LOW,200){XG51};
Var4:=(Var2-Var3)/40{XG51};
Var5:=HIGH+Var4{XG51};
stICKLINE(Var1/30=FLOOR(Var1/30),Var5,Var5+3*Var4,8,0){XG51};
STICKLINE(Var1/30=FLOOR(Var1/30),Var5,Var5+2*Var4,7,0){XG51};
Var7:=REF(CLOSE-OPEN,2){XG51};
Var8:=REF(CLOSE,1){XG51};
Var9:=REF(CLOSE,2){XG51};
VarA:=REF(CLOSE,3){XG51};
VarB:=REF(CLOSE,4){XG51};
VarC:=maX(MAX(MAX(CLOSE,Var8),Var9),VarA){XG51};
VarD:=MIN(MIN(MIN(CLOSE,Var8),Var9),VarA){XG51};
红色持股: STICKLINE(CLOSE=VarC AND (Var8>=Var9 OR Var8>=VarA) OR Var8=VarC AND (Var9=VarD OR VarA=VarD) AND CLOSE>=Var9 OR Var9=VarC AND VarA=VarD AND CLOSE>=Var8 OR VarA=VarC AND CLOSE>=Var8 AND CLOSE>=Var9,Var8,CLOSE,5,1){XG51};
品红变盘: STICKLINE(CLOSE=VarC AND Var8=VarD,Var9,CLOSE,5,1){XG51};
DRAWTEXTAbs(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{XG51};
黄色下跌: STICKLINE(CLOSE=VarD AND (Var8<Var9 OR Var8<VarA) OR Var8=VarD AND (Var9=VarC OR VarA=VarC) AND CLOSE<Var9 OR Var9=VarD AND VarA=VarC AND CLOSE<Var8 OR VarA=VarD AND CLOSE<Var8 AND CLOSE<Var9,Var8,CLOSE,5,0){XG51};
绿色买: STICKLINE(Var8=VarC AND CLOSE=VarD,Var9,CLOSE,5,0){XG51};
STICKLINE(Var8=VarD AND CLOSE>=Var9 OR (Var9=VarD AND Var8<=VarA OR VarA=VarD AND Var8<=Var9) AND Var9<VarB AND CLOSE>=Var8,Var8,Var9,5,0){XG51};
兰色抛售: STICKLINE(Var8=VarC AND CLOSE<Var9 OR (Var9=VarC AND Var8>VarA OR VarA=VarC AND Var8>Var9) AND Var9>=VarB AND CLOSE<Var8,Var8,Var9,5,1){XG51};
VarE:=SAR(5,1,5){XG51};
VarF:=ema(CLOSE,30){XG51};
Var10:=IF(CLOSE>450,8,IF(CLOSE>=20 AND CLOSE<150,0.2,IF(CLOSE<20 AND CLOSE>=10,0.07,IF(CLOSE<10,0.03,0.07)))){XG51};
变色龙: STICKLINE(CLOSE>VarE,VarF,VarF+Var10,6,0){XG51};
STICKLINE(CLOSE<VarE,VarF,VarF-Var10,6,0){XG51};
STICKLINE(crOSS(CLOSE,VarE),VarF,VarF-Var10,6,0){XG51};
STICKLINE(CROSS(VarE,CLOSE),VarF,VarF+Var10,6,0){XG51};
STICKLINE(RANGE(DAY,6,9) OR RANGE(DAY,27,30),VarF+0.01,VarF-0.01,6,0){XG51};
生命线: FORCAST(CLOSE,30), CIRCLEDOT{XG51};
支撑: MA(CLOSE,13)*0.955{X?G*5_1?C?N?{};