大智慧顺势操作主图未加密选股指标公式源码

大智慧顺势操作主图未加密选股指标公式源码

源码正文：

input: n(5,0,999,1),n1(10,0,999,1),n2(20,0,999,1),n3(30,0,999,1){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
DRAWTEXTAbs(8,70,'该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。 '),color0000FF{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,'该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。 '),color0000FF{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,'该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。 '),color0000FF{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,'该股形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。 '),color0000FF{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,'该股形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。 '),color00FF00{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,'该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。 '),color00FF00{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,'该股放量下跌，走势明显偏弱，离场观望。 '),color00FF00{XG51};
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,'该股缩量下跌，走势偏弱，离场观望。 '),color00FF00{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,'该股形态良好，强势明显，量能充足，可以继续持有。 '),color0022dd{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险。 '),color0022dd{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。 '),color0022dd{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,'该股走势趋弱，量能不足，减持大部分筹码。 '),color00FFFF{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,'该股形态不佳，注意成交量的变化，但目前不适合参与。 '),COLOR00FF00{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,'该股趋势不明，股价偏弱，注意量能变化，目前不宜参与。 '),COLOR00FF00{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,'该股有走强迹象，但量能不足，趋势不明，不适合操作。 '),COLOR00FF00{XG51};
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,'该股走势太弱，没有参与价值。 '),COLOR00FF00{XG51};
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN
DRAWTEXTABS(8,70,'大盘量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右， '),color0000FF{XG51};
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN
DRAWTEXTABS(8,70,'如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎。 '),color0000FF{XG51};
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN
DRAWTEXTABS(8,70,'大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌， '),color0000FF{XG51};
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN
DRAWTEXTABS(8,70,'可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入。 '),color0000FF{XG51};
IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 >= V2)) THEN
DRAWTEXTABS(8,70,'大盘形态走坏，重仓者可以减去大部分仓位。 '),color0022dd{XG51};
IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 < V2)) THEN
DRAWTEXTABS(8,70,'大盘缩量调整，注意风险，短线清仓观望。 '),color0022dd{XG51};
IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) THEN
DRAWTEXTABS(8,70,'大盘走势良好，量能理想，可以继续持有强势股。 '),color0022dd{XG51};
IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) THEN
DRAWTEXTABS(8,70,'大盘形态良好，但量能稍显不足，随时准备减仓。 '),color0022dd{XG51};
IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) THEN
DRAWTEXTABS(8,70,'大盘趋势不明，注意成交量变化，目前不适宜进场。 '),color0022dd{XG51};
IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) THEN
DRAWTEXTABS(8,70,'大盘趋势向下，量能萎缩，不适合进场。 '),color0022dd{XG51};
var100:='所属板块:'{XG51};
if inblock('电力')=1 then var100:=var100+' 电力'{XG51};
if inblock('电脑')=1 then var100:=var100+' 电脑'{XG51};
if inblock('电器')=1 then var100:=var100+' 电器'{XG51};
if inblock('电子信息')=1 then var100:=var100+' 电子信息'{XG51};
if inblock('房地产')=1 then var100:=var100+' 房地产'{XG51};
if inblock('纺织服装')=1 then var100:=var100+' 纺织服装'{XG51};
if inblock('钢铁')=1 then var100:=var100+' 钢铁'{XG51};
if inblock('工程建筑')=1 then var100:=var100+' 工程建筑'{XG51};
if inblock('供水供气')=1 then var100:=var100+' 供水供气'{XG51};
if inblock('化工')=1 then var100:=var100+' 化工'{XG51};
if inblock('化纤')=1 then var100:=var100+' 化纤'{XG51};
if inblock('机械')=1 then var100:=var100+' 机械'{XG51};
if inblock('建材')=1 then var100:=var100+' 建材'{XG51};
if inblock('交通工具')=1 then var100:=var100+' 交通工具'{XG51};
if inblock('交通设施')=1 then var100:=var100+' 交通设施'{XG51};
if inblock('教育传媒')=1 then var100:=var100+' 教育传媒'{XG51};
if inblock('金融')=1 then var100:=var100+' 金融'{XG51};
if inblock('旅游酒店')=1 then var100:=var100+' 旅游酒店'{XG51};
if inblock('煤炭石油')=1 then var100:=var100+' 煤炭石油'{XG51};
if inblock('酿酒食品')=1 then var100:=var100+' 酿酒食品'{XG51};
if inblock('农林牧渔')=1 then var100:=var100+' 农林牧渔'{XG51};
if inblock('其他行业')=1 then var100:=var100+' 其他行业'{XG51};
if inblock('汽车')=1 then var100:=var100+' 汽车'{XG51};
if inblock('汽配')=1 then var100:=var100+' 汽配'{XG51};
if inblock('商业连锁')=1 then var100:=var100+' 商业连锁'{XG51};
if inblock('石化')=1 then var100:=var100+' 石化'{XG51};
if inblock('通信')=1 then var100:=var100+' 通信'{XG51};
if inblock('外贸')=1 then var100:=var100+' 外贸'{XG51};
if inblock('医药')=1 then var100:=var100+' 医药'{XG51};
if inblock('仪电仪表')=1 then var100:=var100+' 仪电仪表'{XG51};
if inblock('有色金属')=1 then var100:=var100+' 有色金属'{XG51};
if inblock('运输物流')=1 then var100:=var100+' 运输物流'{XG51};
if inblock('造纸印刷')=1 then var100:=var100+' 造纸印刷'{XG51};
if inblock('安徽')=1 then var100:=var100+' 安徽'{XG51};
if inblock('北京')=1 then var100:=var100+' 北京'{XG51};
if inblock('福建')=1 then var100:=var100+' 福建'{XG51};
if inblock('甘肃')=1 then var100:=var100+' 甘肃'{XG51};
if inblock('广东')=1 then var100:=var100+' 广东'{XG51};
if inblock('广西')=1 then var100:=var100+' 广西'{XG51};
if inblock('贵州')=1 then var100:=var100+' 贵州'{XG51};
if inblock('海南')=1 then var100:=var100+' 海南'{XG51};
if inblock('河北')=1 then var100:=var100+' 河北'{XG51};
if inblock('河南')=1 then var100:=var100+' 河南'{XG51};
if inblock('黑龙江')=1 then var100:=var100+' 黑龙江'{XG51};
if inblock('湖北')=1 then var100:=var100+' 湖北'{XG51};
if inblock('湖南')=1 then var100:=var100+' 湖南'{XG51};
if inblock('吉林')=1 then var100:=var100+' 吉林'{XG51};
if inblock('江苏')=1 then var100:=var100+' 江苏'{XG51};
if inblock('江西')=1 then var100:=var100+' 江西'{XG51};
if inblock('辽宁')=1 then var100:=var100+' 辽宁'{XG51};
if inblock('内蒙古')=1 then var100:=var100+' 内蒙古'{XG51};
if inblock('宁夏')=1 then var100:=var100+' 宁夏'{XG51};
if inblock('青海')=1 then var100:=var100+' 青海'{XG51};
if inblock('山东')=1 then var100:=var100+' 山东'{XG51};
if inblock('山西')=1 then var100:=var100+' 山西'{XG51};
if inblock('陕西')=1 then var100:=var100+' 陕西'{XG51};
if inblock('上海')=1 then var100:=var100+' 上海'{XG51};
if inblock('深圳')=1 then var100:=var100+' 深圳'{XG51};
if inblock('四川')=1 then var100:=var100+' 四川'{XG51};
if inblock('天津')=1 then var100:=var100+' 天津'{XG51};
if inblock('***')=1 then var100:=var100+' ***'{XG51};
if inblock('新疆')=1 then var100:=var100+' 新疆'{XG51};
if inblock('云南')=1 then var100:=var100+' 云南'{XG51};
if inblock('浙江')=1 then var100:=var100+' 浙江'{XG51};
if inblock('重庆')=1 then var100:=var100+' 重庆'{XG51};
if inblock('3G')=1 then var100:=var100+' 3G'{XG51};
if inblock('H股')=1 then var100:=var100+' H股'{XG51};
if inblock('QFII持股')=1 then var100:=var100+' QFII持股'{XG51};
if inblock('ST')=1 then var100:=var100+' ST'{XG51};
if inblock('奥运')=1 then var100:=var100+' 奥运'{XG51};
if inblock('创投')=1 then var100:=var100+' 创投'{XG51};
if inblock('次新股')=1 then var100:=var100+' 次新股'{XG51};
if inblock('大盘')=1 then var100:=var100+' 大盘'{XG51};
if inblock('股权改革')=1 then var100:=var100+' 股权改革'{XG51};
if inblock('股权投资')=1 then var100:=var100+' 股权投资'{XG51};
DD:=FINANCE2(35){XG51};
SS:=FINANCE2(37){XG51};
GG:=FINANCE2(3){XG51};
TH:=DYNAINFO(39){XG51};
DRAWTEXTABS(8,30,'总股本:'+NUMTOSTRn(DD,0)+'万股' +' 流通A股:'+NUMTOSTRn(SS,0)+'万股'+'市盈率:'+NUMTOSTRn(TH,2)+' 倍'+' 每股收益:'+NUMTOSTRn(GG,3)+' 元'),ColorFF00DD{XG51};
DRAWTEXTABS(8,50,var100+' '),ColorFFDE00{XG51};
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100){XG51};
DRAWTEXTREL(8,10,'量能饱和度：'+NUMTOSTRN(SAT,0)),Color8000FF{XG51};
AA10:MA(CLOSE,8),color0000FF{XG51};
AA12:MA(CLOSE,12),color0000FF{XG51};
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10){XG51};
BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10){XG51};
MA13:=MA(CLOSE,13){XG51};
FILLRGN(AA10,AA12,(((AA12 <= AA10) AND (BB12 >= 1)) AND (BB10 >= 1))),Color0098FF{XG51};
FILLRGN(AA10,AA12,(((AA12 >= AA10) AND (BB10 <= 1)) AND (BB10 <= 1))),color00FF00{XG51};
x1:=(C+L+H)/3{XG51};
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10{XG51};
ema8:=ema(c,8){XG51};
DRAWTEXT(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),
ema8,'∠45上升'),colorblack{XG51};
压力:MA(REF(HHV(C,30),1),2),Color9D00FF{XG51};
支撑:MA(REF(LLV(C,30),1),2),ColorABdd46{XG51};
AA1:=AMOUNT/V{XG51};
BB1:=L<AA1*0.9{XG51};
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2{XG51};
DD1:=L<MA(C,5)*0.921{XG51};
EE1:=V<MA(V,5)*1.5{XG51};
FF1:=BB1 AND CC1 AND DD1 AND EE1{XG51};
DRAWTEXT(ff1,(LOW* 0.99),'老鼠仓'),Color4080FF{XG51};
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1){XG51};
黑马线:=EMA(A51,5){XG51};
A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100{XG51};
趋势线:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2)){XG51};
DRAWTEXT(CROSS(趋势线,0)AND 黑马线<40,(HIGH* 0.97),'▲大黑马'),COLOR0055ff{XG51};
LC:=REF(CLOSE,1){XG51};
rsi:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100){XG51};
FF:=EMA(CLOSE,3){XG51};
MA15:=EMA(CLOSE,21){XG51};
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'B'),ColorFF00FF{XG51};
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'S'),ColorA6E500{XG51};
VAR2:=LLV(LOW,27){XG51};
VAR3:=HHV(HIGH,34){XG51};
VAR4:=EMA((CLOSE-Var2)/(Var3-Var2)*4,4)*25{XG51};
注意买:=IF((Var4<10),80,100){XG51};
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
超跌:=IF(J<0,10,0){XG51};
BDDD:=LLV(J,2)=LLV(J,8){XG51};
买入:=IF(CROSS(J,REF(J+0.01,1)) AND BDDD AND J<20,30,0){XG51};
DRAWTEXTABS(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{XG51};
DRAWTEXT(买入 AND 注意买=100 AND 超跌=0,low,'短线'),Color8000FF{XG51};
mtm:=C-REF(C,1){XG51};
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6){XG51};
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0){XG51};
DRAWTEXT(filter(买=1,5),LOW-0.03,'拉升'),ColorFFDE00{XG51};
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR0000FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR0000FF{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLOR00FF00{XG51};
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLOR00FF00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLORff7700{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORff9900{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORffbb00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORffcc00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORffdd00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLORffee00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLORffFF00{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000055{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000066{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000bb{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000dd{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000ff{XG51};
var9Q:=c= hhv(c,4)and (ref(c,1)>=ref(c,2) or ref(c,1)>=ref(c,3)) or ref(c,1)=hhv(c,4) and close>=ref(c,2) or ref(c,2)=hhv(c,4) and ref(c,3)=llv(c,4) and c>=ref(c,1) or ref(c,3)=hhv(c,4) and c>=ref(c,1) and c>=ref(c,2){XG51};
stickline(var9Q,c,(o+c)/2,7,0),color000055{XG51};
stickline(var9Q,c,(o+c)/2,6,0),color000066{XG51};
stickline(var9Q,c,(o+c)/2,5,0),color000077{XG51};
stickline(var9Q,c,(o+c)/2,4,0),color000099{XG51};
stickline(var9Q,c,(o+c)/2,3,0),color0000bb{XG51};
stickline(var9Q,c,(o+c)/2,2,0),color0000dd{XG51};
stickline(var9Q,c,(o+c)/2,1,0),color0000ff{XG51};
varaQ:=c=hhv(c,4) and ref(c,1)=llv(c,4){XG51};
stickline(varaQ,c,(o+c)/2,7,0),colorff11ff{XG51};
stickline(varaQ,c,(o+c)/2,6,0),colorff33ff{XG51};
stickline(varaQ,c,(o+c)/2,5,0),colorff55ff{XG51};
stickline(varaQ,c,(o+c)/2,4,0),colorff77ff{XG51};
stickline(varaQ,c,(o+c)/2,3,0),colorff99ff{XG51};
stickline(varaQ,c,(o+c)/2,2,0),colorffbbff{XG51};
stickline(varaQ,c,(o+c)/2,1,0),colorffddff{XG51};
varbQ:=c=llv(c,4) and (ref(c,1)<ref(c,2) or ref(c,1)<ref(c,3)) or ref(c,1)=llv(c,4) and c<ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<>hhv(c,4) and c<ref(c,1) or ref(c,3)=llv(c,4) and c<ref(c,1) and c<ref(c,2){XG51};
stickline(varbQ,c,(o+c)/2,7,0),color333333{XG51};
stickline(varbQ,c,(o+c)/2,6,0),color555555{XG51};
stickline(varbQ,c,(o+c)/2,5,0),color777777{XG51};
stickline(varbQ,c,(o+c)/2,4,0),color999999{XG51};
stickline(varbQ,c,(o+c)/2,3,0),colorbbbbbb{XG51};
stickline(varbQ,c,(o+c)/2,2,0),colordddddd{XG51};
stickline(varbQ,c,(o+c)/2,1,0),color00ffff{XG51};
varcQ:=ref(c,1)=llv(c,4) and c>=ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<=ref(c,3) and ref(c,2)<ref(c,4) and c>=ref(c,1){XG51};
stickline(varcQ,o,(o+c)/2,7,0),color003300{XG51};
stickline(varcQ,o,(o+c)/2,6,0),color005500{XG51};
stickline(varcQ,o,(o+c)/2,5,0),color007700{XG51};
stickline(varcQ,o,(o+c)/2,4,0),color009900{XG51};
stickline(varcQ,o,(o+c)/2,3,0),color00bb00{XG51};
stickline(varcQ,o,(o+c)/2,2,0),color00dd00{XG51};
stickline(varcQ,o,(o+c)/2,1,0),color00ff00{XG51};
vardQ:=ref(c,1)=hhv(c,4) and c<ref(c,2) or (ref(c,2)=hhv(c,4) and ref(c,1)>ref(c,3) or ref(c,3)=hhv(c,4) and ref(c,1)>ref(c,2)) and ref(c,2)>=ref(c,4) and c<ref(c,1){XG51};
stickline(vardQ,o,(o+c)/2,7,0),colorff1100{XG51};
stickline(vardQ,o,(o+c)/2,6,0),colorff3300{XG51};
stickline(vardQ,o,(o+c)/2,5,0),colorff5500{XG51};
stickline(vardQ,o,(o+c)/2,4,0),colorff7700{XG51};
stickline(vardQ,o,(o+c)/2,3,0),colorff9900{XG51};
stickline(vardQ,o,(o+c)/2,2,0),colorffbb00{XG51};
stickline(vardQ,o,(o+c)/2,1,0),colorffdd00{X^G*5=1^C^N^{};

大智慧星座MACD未加密选股指标公式源码

源码正文：

DRAWGBK((CLOSE > 0),stRIP(RGB(4,1,28),RGB(4,1,35),0)){XG51};
DRAWTEXTREL(10,900,''),linethick1,COLOR00EEff{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:SMA(RSV,3,1),LINETHICK2,COLORRED{XG51};
D:Sma(K,3,1),LINETHICK2,COLOR00DDDD{XG51};
J:3*K-2*D,LINETHICK2,COLOR800080{XG51};
difF:ema(CLOSE,12)-EMA(CLOSE,26),linethick0,COLOR0099FF{XG51};
DEA :EMA(DIFF,9),linethick0,COLORD89837{XG51};
macd:2*(DIFF-DEA),COLORFF9999,linethick0{XG51};
YLZC:=if(close=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(vol+0.01)/100){XG51};
阻价:=if(close=INDEXC,YLZC+INDEXC-INDEXl,YLZC+(close-low)){XG51};
支价:=if(close=INDEXC,INDEXl+INDEXC-YLZC,low+(close-YLZC)){XG51};
今压:REF(阻价,1),LINETHICK0,COLORAA11BB{XG51};
今撑:REF(支价,1),LINETHICK0,COLOR009900{XG51};
明压:阻价,LINETHICK0{XG51};
明撑:支价,LINETHICK0{XG51};
rsv1:=(hhv(h,9.8)-c)/(hhv(h,9.8)-llv(l,9.8))*101{XG51};
kk:=sma(rsv1,3,1){XG51};
dd:=sma(kk,3,1){XG51};
jj:=3*kk-2*dd{XG51};
买卖:=if(jj>=100,100,if(jj<=0,0,jj)){XG51};
明天买:if(买卖=100,0-10,0),color00cccc{XG51};
明天卖:if(买卖=0,90,100),color00ff00{XG51};
KX:=250{XG51};
KH:=HHV(K,KX){XG51};
DH:=HHV(D,KX){XG51};
JH:=HHV(J,KX){XG51};
KL:=LLV(K,KX){XG51};
DL:=LLV(D,KX){XG51};
JL:=LLV(J,KX){XG51};
HKMAX:=MAX(KH,MAX(DH,JH)){XG51};
LKMIN:=MIN(KL,MIN(DL,JL)){XG51};
KHLB:=(HKMAX+LKMIN)/2{XG51};
KHLC:=HKMAX-LKMIN{XG51};
MHF:=HHV(DIFF,KX){XG51};
MHD:=HHV(DEA,KX){XG51};
MHM:=HHV(MacD,KX){XG51};
MLF:=LLV(DIFF,KX){XG51};
MLD:=LLV(DEA,KX){XG51};
MLM:=LLV(MACD,KX){XG51};
HMAX:=MAX(MHF,MAX(MHD,MHM)){XG51};
LMIN:=MIN(MLF,MIN(MLD,MLM)){XG51};
FHLB:=(HMAX-LMIN)/100{XG51};
FHLC:=HMAX-LMIN{XG51};
SH:=(0-FHLB)*(KHLC/FHLC)+KHLB{XG51};
DIFFA:=(DIFF-FHLB)*(KHLC/FHLC)+KHLB{XG51};
DEAA:=(DEA-FHLB)*(KHLC/FHLC)+KHLB{XG51};
MACDA:=(macd-FHLB)*(KHLC/FHLC)+KHLB{XG51};
CDA:=MACD<ref(MACD,1) and MACD>0{XG51};
CDB:=MACD>=ref(MACD,1) and MACD>0{XG51};
CDC:=MACD>ref(MACD,1) and MACD<0{XG51};
CDD:=MACD<=ref(MACD,1) and MACD<0{XG51};
STICKLINE(CDA,SH,macda,6,0),COLOR00AAFF{XG51};
STICKLINE(CDA,SH,macda,6.6,0),COLOR00BBFF{XG51};
STICKLINE(CDA,SH,macda,4.4,0),COLOR00CCFF{XG51};
STICKLINE(CDA,SH,macda,3.3,0),COLOR00ddfF{XG51};
STICKLINE(CDA,SH,macda,2.2,0),COLOR00EEFF{XG51};
STICKLINE(CDA,SH,macda,1.1,0),COLOR00FFFF{XG51};
STICKLINE(CDB,SH,macda,6,0),COLOR0000AA;
STICKLINE(CDB,SH,macda,6.6,0),COLOR0011BB{XG51};
STICKLINE(CDB,SH,macda,4.4,0),COLOr0022CC{XG51};
STICKLINE(CDB,SH,macda,3.3,0),COLOR0033DD{XG51};
STICKLINE(CDB,SH,macda,2.2,0),COLOR0044EE{XG51};
STICKLINE(CDB,SH,macda,1.1,0),COLOR0055FF{XG51};
STICKLINE(CDC,SH,macda,6,0),COLORAA00BB{XG51};
STICKLINE(CDC,SH,macda,6.6,0),COLORBB11BB{XG51};
STICKLINE(CDC,SH,macda,4.4,0),COLORCC22BB{XG51};
STICKLINE(CDC,SH,macda,3.3,0),COLORDD33BB{XG51};
STICKLINE(CDC,SH,macda,2.2,0),COLOREE44BB{XG51};
STICKLINE(CDC,SH,macda,1.1,0),COLORFF55BB{XG51};
STICKLINE(CDD,SH,macda,6,0),COLORFF7700{XG51};
STICKLINE(CDD,SH,macda,6.6,0),COLORFF8811{XG51};
STICKLINE(CDD,SH,macda,4.4,0),COLORFFAA22{XG51};
STICKLINE(CDD,SH,macda,3.3,0),COLORFFBB33{XG51};
STICKLINE(CDD,SH,macda,2.2,0),COLORFFDD44{XG51};
STICKLINE(CDD,SH,macda,1.1,0),COLORFFDD55{XG51};
PARTLINE(DIFFA,DIFF>0,RGB(255,153,153),DIFF<0,RGB(255,153,153)){XG51};
PARTLINE(DEAA,DEA>0,RGB(65,105,225),DEA<0,RGB(65,105,225)){XG51};
DRAWTEXT(BARSTATUS=2,SH,' 0'),color00aaaa{XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
STICKLINE(diff>ref(diff,1),20,20,2,0),COLORWHITE{XG51};
STICKLINE(diff<ref(diff,1),20,20,2,0),COLORCYAN{XG51};
STICKLINE(K>=ref(K,1) or k>d and diff>ref(diff,1),80,80,2,1),COLORWHITE{XG51};
STICKLINE(K<ref(K,1),80,80,2,1),COLORCYAN{XG51};
MACD金叉:=crOSS(MACD,DIFF) AND MACD>=(0-0.05) AND MACD<=0.02{XG51};
DRAWTEXT(MACD金叉,macda*0.82,'▲MACD金叉'),color00FFFF{XG51};
XX:=ema(MA(LOW,3)*0.96,30){XG51};
DIFF金叉:=if(CROSS(DIFF,DEA) AND XX-REF(XX,1)>0 AND MACD>=REF(MACD,1) AND DIFF<=0,1,0){XG51};
DRAWTEXT(DIFF金叉=1,DIFFA*1.68,'DIFF金叉'),colorCDFFBB{XG51};
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1{XG51};
DRAWTEXT(低位金叉,deaa*0.99,'▲低位金叉'),COLOR0099DD{XG51};
DIFDEA:=COUNT(CROSS(DIFF,DEA),BArslAST(DEA>=0)){XG51};
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(DIFDEA=2,21)=1{XG51};
DRAWTEXT(二次金叉,deaa*0.99-8,'▲ 二次金叉'),ColorFF00FF{XG51};
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA){XG51};
DRAWTEXT(底背离,DEAA*0.99-16,'▲底背离'),Color0099FF{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF){XG51};
DRAWTEXT(FILTER(顶背离,5),DEAA*1.02,'▲顶背离'),COLORDDAAAA{XG51};
周DIFF:="MACD.DIFF#WEEK"{XG51};
周DEA:="MACD.DEA#WEEK"{XG51};
周MACD:="MACD.MACD#WEEK"{XG51};
DIF周金叉:=CROSS(周DIFF,周DEA){XG51};
DRAWTEXT(DIF周金叉,DEAA,'DIFF周金叉'),COLOR0099FF{XG51};
DRAWTEXT(CROSS(周DEA,周DIFF),DEAA+4,'▲DIFF周死叉'),align0,COLORCDFFBB{XG51};
MACD周金叉:=CROSS(周MACD,周DIFF) AND 周MACD>=(0-0.05) AND 周MACD<=0.02{XG51};
DRAWTEXT(MACD周金叉,macda-0.03,'▲MACD周金叉'),color00FFFF{XG51};
月DIFF:="MACD.DIFF#MONTH"{XG51};
月DEA:="MACD.DEA#MONTH"{XG51};
DIF月金叉:=CROSS(月DIFF,月DEA){XG51};
DRAWTEXT(DIF月金叉,DEAA*0.98,'★DIF月金叉'),COLOR00FFCC{XG51};
DRAWTEXT(CROSS(月DEA,月DIFF),DEAA*1.02,'★DIF月死叉'),align0,COLORDDDDDD{XG51};
周K:="kdj.K#WEEK"(9,3,3){XG51};
周D:="kdJ.D#WEEK"(9,3,3){XG51};
周J:="KDJ.J#WEEK"(9,3,3){XG51};
月K:="KDJ.K#MONTH"(9,3,3){XG51};
月D:="KDJ.D#MONTH"(9,3,3){XG51};
月J:="KDJ.J#MONTH"(9,3,3){XG51};
月金叉:=cross(月K,月D){XG51};
周金叉:=cross(周K,周D){XG51};
日金叉:=FILTER(cross(K,D) and K<20,4){XG51};
drawtext(月金叉,月D-2,'★'),ALIGN0,color0022ee{XG51};
DRAWTEXT(月金叉,月D-2,'KD月金叉'),coloryellow{XG51};
drawtext(周金叉,周D,'★'),ALIGN2,color0022ee{XG51};
DRAWTEXT(周金叉,周D,' KD周金叉'),colorgreen{XG51};
DRAWICON(日金叉,K,1),align2{XG51};
DRAWTEXT(日金叉,D-6,'★低位金叉'),color00CCCC{XG51};
DRAWTEXT(CROSS(周D,周K),周D*1.2,'★KD周死叉'),COLOR00DDBB{XG51};
DRAWTEXT(CROSS(月D,月K),月D,'★KD月死叉'),COLORFFFFFF{XG51};
KDB:=BARSLAST(ref(cross(k,d),1)){XG51};
KDDB:=ref(close,KDB+1)>close and ref(k,KDB+1)<k and cross(k,d){XG51};
K底背:=if(FILTER(KDDB>0,5),1,0){XG51};
DRAWTEXT(K底背=1,D*0.98,'★底背离'),COLORDDDDDD{XG51};
KDD:=BARSLAST(ref(cross(d,k),1)){XG51};
K顶背:=ref(close,KDD+1)<close and ref(k,KDD+1)>k and cross(d,k){XG51};
DRAWTEXT(FILTER(K顶背>0,5),D+8,'★顶背离'),COLORFFAA22{XG51};
MD1:=MA(CLOSE,80)-MA(CLOSE,13)/3{XG51};
MD2:=MA((CLOSE-MD1)/MD1,3){XG51};
买点1:=CROSS(MD2,0) AND LOW/REF(HIGH,1)<1.012 AND J<75 AND J>REF(J,1){XG51};
ma12:=MA(CLOSE,12){XG51};
佳点:=if(FILTER(MACD>=REF(MACD,5) AND open<=ref(close,1) and XX-REF(XX,1)>0 AND MACD<=0 AND ma12-REF(ma12,1)>=0,3) and J<80 and J>ref(J,1) and D>ref(D,1) and (diff>=ref(diff,1) or dea>=ref(dea,1)),1,0){XG51};
DRAWTEXTAbs(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{XG51};
DRAWTEXT(佳点=1,macda*0.98,'★佳点'),color0099FF{XG51};
DX0:=EMA(CLOSE,2)-EMA(OPEN,5){XG51};
DX1:=if(CROSS(DX0,MACD) AND LOW<=XX AND MACD<=(0-0.11) and (J<20 or K<20),1,0){XG51};
DRAWTEXT(FILTER(DX1,3),0,'★短10%'),color00CC00{XG51};
MA10:=MA(CLOSE,10){XG51};
SS:=EMA(MA(HIGH,3)*1.05,30){XG51};
LQS:=if(FILTER(0.7*(CROSS(DIFF,DEA) AND CLOSE<SS AND XX-REF(XX,1)>0 AND CROSS(MACD,0) AND MACD>=0 AND DIFF>0 AND ma10-REF(ma10,1)>0 AND VOL>REF(VOL,1))>=0.7 AND (CLOSE<SS AND XX-REF(XX,1)>0),5) AND J<80,1,0){XG51};
DRAWTEXT(LQS=1,macda*0.98,'★量价齐上'),colorCDFFDD{XG51};
最佳点:=IF(COUNT(MD2>REF(MD2,1),3)=3 AND COUNT(MD2<0,10)=10 AND REF(MD2,3)=LLV(MD2,10) and J<80 and J>ref(J,1),1,0){XG51};
DRAWTEXT(最佳点=1,J,'★最佳点'),colorFF00CC{XG51};
买点2:=REF(MD2,2)=LLV(MD2,20) AND REF(MD2,2)<0.071 AND REF(MD2,2)<REF(MD2,1) AND
NOT(REF(LOW,1)>REF(HIGH,2) AND LOW>REF(HIGH,1)) AND CLOSE>REF(CLOSE,1) AND J<75 AND J>REF(J,1){XG51};
DRAWTEXT(买点1 or 买点2,D-1,'买'),colorff00CC{XG51};
YZ:=(INTPART(SMA(RSV,3,1))+INTPART(SMA(K,3,1)))/2{XG51};
预涨:=cross(yz,50) and j<95 and diff>ref(diff,1) and low<ref(close,1){XG51};
DRAWTEXT(预涨,d*0.6,'★预涨'),COLORA52A2A{XG51};
KD金叉:=cross(K,D)and J>20 and J<80{XG51};
选股:if(cross(macd,0) or DX1 or 佳点 or LQS or K底背 or 月金叉 or 周金叉 or 日金叉 or 买点1 or 买点2 or 最佳点 or MACD金叉 or DIFF金叉 or 低位金叉 or 二次金叉 or 底背离 or DIF周金叉 or MACD周金叉 or DIF月金叉 or KD金叉,2,0),LINETHICK0{X_G_5.1_C_N_{};