大智慧解盘主图未加密选股指标公式源码

大智慧解盘主图未加密选股指标公式源码

源码正文：

N:=20{XG51};
DRAWTEXTAbs(10,10,stKLABEL+' '+STKNAME+' '+BKNAME),COLORCYAN{XG51};
均价:=(3*C+H+L+O)/6{XG51};
VAR1:=(8*均价+7*REF(均价,1)+6*REF(均价,2)+5*REF(均价,3)+4*REF(均价,4)+3*REF(均价,5)+2*REF(均价,6)+REF(均价,8))/36{XG51};
VAR2:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3{XG51};
SZ1:=REF(VAR1,1)=REF(VAR2,1) AND VAR1>VAR2 AND CLOSE>VAR1{XG51};
SZ2:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1) AND H/VAR1<1.1 AND L>VAR2 AND CLOSE>VAR1{XG51};
SZ3:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>=REF(VAR2,1) AND H/VAR1>1.1{XG51};
SZ4:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1) AND CLOSE>VAR2 AND CLOSE<VAR1{XG51};
SZ5:=(VAR1>VAR2 AND VAR2>REF(VAR2,1) AND VAR1<>REF(VAR1,1) AND CLOSE<VAR2) OR (VAR1>VAR2 AND VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1) AND CLOSE<VAR2);{XG51};
SZ6:=REF(VAR1,1)>REF(VAR2,1) AND VAR1=VAR2 AND CLOSE<VAR2{XG51};
XD1:=VAR1=VAR2 AND CLOSE<VAR2 OR (VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1) AND REF(VAR1,1)=REF(VAR2,1) AND CLOSE<VAR2){XG51};
XD2:=VAR1=VAR2 AND CLOSE>VAR1;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N)){XG51};
量能饱和度:=IF(SAT>1,1,SAT)*100{XG51};
IF BARSTATUS=2 AND SZ1 THEN BEGIN
DRAWTEXTABS(320,25,'调整结束短线介入'),COLORWHITE{XG51};
END
ELSE
IF BARSTATUS=2 AND SZ2 THEN BEGIN
DRAWTEXTABS(320,25,'上升通道走势良好'),COLORWHITE{XG51};
END
ELSE
IF BARSTATUS=2 AND SZ3 THEN BEGIN
DRAWTEXTABS(320,25,'股价偏离注意调整'),COLORWHITE{XG51};
END
ELSE
IF BARSTATUS=2 AND SZ4 THEN BEGIN
DRAWTEXTABS(320,25,'上升通道调整洗盘'),COLORCYAN{XG51};
END
ELSE
IF BARSTATUS=2 AND SZ5 THEN BEGIN
DRAWTEXTABS(320,25,'转向特征注意离场'),COLORCYAN{XG51};
END
ELSE
IF BARSTATUS=2 AND SZ6 THEN BEGIN
DRAWTEXTABS(320,25,'通道改变坚决离场'),COLORCYAN{XG51};
END
ELSE
IF BARSTATUS=2 AND XD1 THEN BEGIN
DRAWTEXTABS(320,25,'下跌通道只宜观望'),COLORCYAN{XG51};
END
ELSE
IF BARSTATUS=2 AND XD2 THEN BEGIN
DRAWTEXTABS(320,25,'短期底部准备进入'),COLORBLUE{XG51};
END{XG51};
AB1:=COST(0.33){XG51};
AB2:=COST(5){XG51};
AB3:=COST(15){XG51};
AB4:=COST(55){XG51};
AB5:=COST(97){XG51};
AA1:=COST(90){XG51};
AA2:=COST(70){XG51};
AA3:=COST(30){XG51};
AA4:=COST(10){XG51};
获利:=WINNER(CLOSE)*100{XG51};
套牢:=100-WINNER(CLOSE)*100{XG51};
DRAWTEXTABS(15,25,'量能饱和度:'+NUMTOSTRN(量能饱和度,2)+'%'),COLOR00FFFF{XG51};
DRAWTEXTABS(15,40,'90成本:'+NUMTOSTRN(AA1,2)),COLOR00FFFF{XG51};
DRAWTEXTABS(15,55,'70成本:'+NUMTOSTRN(AA2,2)),COLOR00FFFF{XG51};
DRAWTEXTABS(15,70,'30成本:'+NUMTOSTRN(AA3,2)),COLOR00FFFF{XG51};
DRAWTEXTABS(15,85,'10成本:'+NUMTOSTRN(AA4,2)),COLOR00FFFF{XG51};
DRAWTEXTABS(15,100,'底出击:'+NUMTOSTRN(AB1,2)),COLOR00FFFF{XG51};
DRAWTEXTABS(520,25,'建仓:'+NUMTOSTRN(AB2,2)),COLOR00FFFF{XG51};
DRAWTEXTABS(600,25,'整固:'+NUMTOSTRN(AB3,2)),COLOR00FFFF{XG51};
DRAWTEXTABS(675,25,'升浪:'+NUMTOSTRN(AB4,2)),COLOR00FFFF{XG51};
DRAWTEXTABS(520,40,'获利:'+NUMTOSTRN(获利,2)+'%'),COLOR00FFFF{XG51};
DRAWTEXTABS(600,40,'套牢:'+NUMTOSTRN(套牢,2)+'%'),COLOR00FFFF{XG51};
DRAWTEXTABS(675,40,'预测:'+NUMTOSTRN(AB5,2)),COLOR00FFFF{XG51};
AAA:=量能饱和度<=10;
BBB:=量能饱和度>10 AND 量能饱和度<=20{XG51};
CCC:=量能饱和度>20 AND 量能饱和度<=30;
DDD:=量能饱和度>30 AND 量能饱和度<=50{XG51};
EEE:=量能饱和度>50 AND 量能饱和度<=70{XG51};
FFF:=量能饱和度>70 AND 量能饱和度<=80{XG51};
GGG:=量能饱和度>80 AND 量能饱和度<=90{XG51};
HHH:=量能饱和度>90{XG51};
IF BARSTATUS=2 AND AAA THEN BEGIN DRAwrECTREL(0,350,15,380,RGB(255,0,0)){XG51};
END
ELSE
IF BARSTATUS=2 AND BBB THEN BEGIN DRAWRECTREL(0,320,15,380,RGB(255,0,0)){XG51};
END
ELSE
IF BARSTATUS=2 AND CCC THEN BEGIN DRAWRECTREL(0,290,15,380,RGB(255,0,0)){XG51};
END
ELSE
IF BARSTATUS=2 AND DDD THEN BEGIN DRAWRECTREL(0,230,15,380,RGB(255,0,0)){XG51};
END
ELSE
IF BARSTATUS=2 AND EEE THEN BEGIN DRAWRECTREL(0,170,15,380,RGB(255,0,0)){XG51};
END
ELSE
IF BARSTATUS=2 AND FFF THEN BEGIN DRAWRECTREL(0,140,15,380,RGB(255,0,0)){XG51};
END
ELSE
IF BARSTATUS=2 AND GGG THEN BEGIN DRAWRECTREL(0,110,15,380,RGB(255,0,0)){XG51};
END
ELSE
IF BARSTATUS=2 AND HHH THEN BEGIN DRAWRECTREL(0,85,15,380,RGB(255,0,0)){XG51};
END{XG51};
rsi1预设:=5000{XG51};
RSI2预设:=5000{XG51};
RSI3预设:=5000{XG51};
LC:=REF(CLOSE,1){XG51};
RSI1:=SMA(maX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100{XG51};
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100{XG51};
RSI3:=SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100{XG51};
A:=SMA(MAX(CLOSE-LC,0),24,1){XG51};
B:=SMA(ABS(CLOSE-LC),24,1){XG51};
A1:=SMA(MAX(CLOSE-LC,0),6,1){XG51};
B1:=SMA(ABS(CLOSE-LC),6,1){XG51};
YCJ1:IF(C>LC,(REF(A1,1)*5-REF(B1,1)*5*RSI1预设/10000)/(RSI1预设/10000-1)+LC,LC+REF(B1,1)*5-REF(A1,1)*5/(RSI1预设/10000)){XG51};
A2:=SMA(MAX(CLOSE-LC,0),12,1){XG51};
B2:=SMA(ABS(CLOSE-LC),12,1){XG51};
YCJ2:IF(C>LC,(REF(A2,1)*11-REF(B2,1)*11*RSI2预设/10000)/(RSI1预设/10000-1)+LC,LC+REF(B2,1)*11-REF(A2,1)*11/(RSI1预设/10000)){XG51};
YCJ3:IF(C>LC,(REF(A,1)*23-REF(B,1)*23*RSI3预设/10000)/(RSI3预设/10000-1)+LC,LC+REF(B,1)*23-REF(A,1)*23/(RSI3预设/10000)){XG51};
A74:=MA(CLOSE,20){XG51};
A75:=(CLOSE > MA(CLOSE,5)){XG51};
A76:=(MA(CLOSE,5) > MA(CLOSE,10)){XG51};
A77:=(CLOSE > MA(CLOSE,10)){XG51};
A78:=(MA(CLOSE,5) > MA(CLOSE,20)){XG51};
A79:=(CLOSE > MA(CLOSE,20)){XG51};
A710:=REF(A74,1){XG51};
A711:=(A74 > A710){XG51};
AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10))) + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10))){XG51};
DSLX:=(CLOSE / INDEXC){XG51};
DSLX1:=MA(DSLX,5){XG51};
DSLX2:=MA(DSLX,10){XG51};
V1:=MA(vol,5){XG51};
V2:=MA(VOL,10);T := BArslAST(DISPSTATUS=1)+1{XG51};
T := BARSLAST(DISPSTATUS=1)+1{XG51};
HHg := HHV(H, T){XG51};
ddg := LLV(L, T){XG51};
IF BARSTATUS=2 and c<200 and ((crOSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,'的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。 '),color0000FF,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,'虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。 '),color0000FF,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,'量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。 '),color0000FF,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,'形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。 '),color0000FF,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,'形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。 '),color00FF00,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,'随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。 '),color00FF00,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,'放量下跌，走势明显偏弱，离场观望。 '),color00FF00,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,'缩量下跌，走势偏弱，离场观望。 '),color00FF00,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,'形态良好，强势明显，量能充足，可以继续持有。 '),color00FFFF,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,'上行趋势不变，强势依然，但量能开始转弱，注意风险。 '),color00FFFF,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,'仍然具备上涨潜力，但股性偏弱，可考虑减仓。 '),color00FFFF,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,'走势趋弱，量能不足，减持大部分筹码。 '),color00FFFF,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,'形态不佳，注意成交量的变化，但目前不适合参与。 '),COLOR00FF00,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,'趋势不明，股价偏弱，注意量能变化，目前不宜参与。 '),COLOR00FF00,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,'有走强迹象，但量能不足，趋势不明，不适合操作。 '),COLOR00FF00,LINETHICK1{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,'走势太弱，没有参与价值。 '),COLOR00FF00,LINETHICK1{XG51};
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN
DRAWTEXTREL(360,960,'大盘量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右， '),color0000FF,LINETHICK1{XG51};
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN
DRAWTEXTREL(360,960,'如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎。 '),color0000FF,LINETHICK1{XG51};
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN
DRAWTEXTREL(360,960,'大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌， '),color0000FF,LINETHICK1{XG51};
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN
DRAWTEXTREL(360,960,'可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入。 '),color0000FF,LINETHICK1{XG51};
IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 >= V2)) THEN
DRAWTEXTREL(360,960,'大盘形态走坏，重仓者可以减去大部分仓位。 '),color00FF00,LINETHICK1{XG51};
IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 < V2)) THEN
DRAWTEXTREL(360,960,'大盘缩量调整，注意风险，短线清仓观望。 '),color00FF00,LINETHICK1{XG51};
IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) THEN
DRAWTEXTREL(360,960,'大盘走势良好，量能理想，可以继续持有强势股。 '),color00FFFF,LINETHICK1{XG51};
IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) THEN
DRAWTEXTREL(360,960,'大盘形态良好，但量能稍显不足，随时准备减仓。 '),color00FFFF,LINETHICK1{XG51};
IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) THEN
DRAWTEXTREL(360,960,'大盘趋势不明，注意成交量变化，目前不适宜进场。 '),COLOR00FF00,LINETHICK1{XG51};
IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) THEN
DRAWTEXTREL(360,960,'大盘趋势向下，量能萎缩，不适合进场。 '),COLOR00FF00,LINETHICK1{XG51};
E:=(HIGH+LOW+OPEN+2*CLOSE)/5{XG51};
明日阻力:=2*E-LOW{XG51};
明日支撑:=2*E-HIGH{XG51};
明日突破:=E+(HIGH-LOW){XG51};
明日反转:=E-(HIGH-LOW){XG51};
今日阻力:=REF(明日阻力 , 1){XG51};
今日支撑:=REF(明日支撑 , 1){XG51};
DRAWTEXTREL(100,100,'今日阻力=：'+NUMTOSTRN(今日阻力,2 )+''),Color00FFFF{XG51};
DRAWTEXTREL(100,140,'今日支撑=：'+NUMTOSTRN(今日支撑,2 )+''),Color00FF00{XG51};
DRAWTEXTREL(100,180,'明日突破=：'+NUMTOSTRN(明日突破,2 )),ColorFF00FF{XG51};
DRAWTEXTREL(100,220,'明日阻力=：'+NUMTOSTRN(明日阻力,2 )),ColorFFFF00{XG51};
DRAWTEXTREL(100,260,'明日支撑=：'+NUMTOSTRN(明日支撑,2 )),COLORWHITE{XG51};
DRAWTEXTREL(100,300,'明日反转=：'+NUMTOSTRN(明日反转,2 )),COLORCYAN{X.G*5~1.C.N.{};

大智慧顶到底未加密选股指标公式源码

源码正文：

V1:=(C+H+L+O)/4;
V2:=SUMBARS(vol,CAPITAL);
V3:=HHV(V1,V2);
V4:=LLV(V1,V2);
V5:=(2*V1-V4-REF(V4,1))/(V3-V4);
V6:=(V1-V4)/(V3-V4);
V7:=IF(V1<= V4,V5*60,V6*60);
顶到底:= IF(V7> 0,V7+20,20);
V8:=600*(ema(C,3)-Ema(L,30))/EMA(L,30);
V9:=EMA(V8,7);
VA:=(WINNER(120*C/100)-WINNER(100*C/100))*100;
VB:=(-100)*(WINNER(120*C/100)-WINNER(100*C/100))+5;
底买入: IF(VA+VB< 7 AND crOSS(V8,V9) AND V9< -18 AND V9< VB,60,50);
VC:=(2*C+H+L)/4;
VD:=LLV(L,34);
VE:=HHV(H,34);
VF:=LLV(L,21);
V10:=HHV(H,21);
V11:=EMA((VC-VF)/(V10-VD)*100,5);
V12:=EMA((VC-VD)/(VE-VD)*100,8);
X:V11,colorwhite;
顶区:V12;
S01:V11>V12{XG51};
S02:stICKLINE(V11-V12+20>=20 ,V11-V12+20 ,20 ,5 ,0 ),COLORF000FF{XG51};
S03:20{XG51};
S04:2{XG51};
S05:0{XG51};
V13:=EMA(V12,5);
S11:V12>0 AND (V12-V13)>=0{XG51};
S12:79{XG51};
S13:80{XG51};
S14:6{XG51};
S15:0{XG51};
S21:V12>0 AND (V12-V13)< 0{XG51};
S22:79{XG51};
S23:80{XG51};
S24:6{XG51};
S25:1{XG51};
S31:V12>0 AND (V12-V13)>= 0{XG51};
S32:19{XG51};
S33:20{XG51};
S34:6{XG51};
S35:0{XG51};
ST41:V12>0 AND (V12-V13)< 0{XG51};
ST42:19{XG51};
ST43:20{XG51};
ST44:6{XG51};
ST45:1{XG51};
ST51:(V12-V13)>0{XG51};
FLOATRGN(V12,(V13-V12)*5,(V12-V13)>0,RGB(255,0,0),(V12-V13)< 0,RGB(0,255,0)){XG51};
ST52:V12{XG51};
ST53:V13{XG51};
ST54:8{XG51};
ST55:1{X*G!5~1*C*N*{};