大智慧能量对比分析未加密选股指标公式源码

大智慧能量对比分析未加密选股指标公式源码

源码正文：

本公式有3条线：个股能量线（红色）、大盘能量线（黄色）和行业能量线（绿色），如果行业线在大盘线之上，且能量线上穿行业线或大盘线时为买入点；如果配合公式的买点信号（白色），便得到捕捉龙头股的最佳点！！
公式源码如下：

INPUT:N(70,1,999),M(5,1,120){XG51};
ZSC:=IF(INBLOCK('工程建筑'),"991002$CLOSE",IF(INBLOCK('电力 '),"991003$CLOSE",IF(INBLOCK('计算机'),"991004$CLOSE",
IF(INBLOCK('电子信息'),"991006$CLOSE",IF(INBLOCK('房地产 '),"991007$CLOSE",IF(INBLOCK('纺织服装'),"991008$CLOSE",
IF(INBLOCK('钢铁'),"991009$CLOSE",IF(INBLOCK('供水供气 '),"991010$CLOSE",IF(INBLOCK('化工化纤'),"991011$CLOSE",
IF(INBLOCK('电器'),"991014$CLOSE",IF(INBLOCK('交通设施 '),"991016$CLOSE",IF(INBLOCK('银行类'),"991017$CLOSE",
IF(INBLOCK('旅游酒店'),"991018$CLOSE",IF(INBLOCK('煤炭石油 '),"991019$CLOSE",IF(INBLOCK('酿酒食品'),"991020$CLOSE",
IF(INBLOCK('农林牧渔'),"991021$CLOSE",IF(INBLOCK('商业连锁 '),"991023$CLOSE",IF(INBLOCK('建材'),"991024$CLOSE",
IF(INBLOCK('其他行业'),"991025$CLOSE",IF(INBLOCK('汽车类 '),"991026$CLOSE",IF(INBLOCK('机械'),"991027$CLOSE",
IF(INBLOCK('医药'),"991028$CLOSE",IF(INBLOCK('外贸 '),"991031$CLOSE",IF(INBLOCK('教育传媒'),"991032$CLOSE",
IF(INBLOCK('仪电仪表'),"991033$CLOSE",IF(INBLOCK('有色金属 '),"991034$CLOSE",IF(INBLOCK('造纸印刷'),"991035$CLOSE",
IF(INBLOCK('券商'),"991036$CLOSE",IF(INBLOCK('电力设备 '),"991037$CLOSE",IF(INBLOCK('通信'),"991135$CLOSE",
IF(INBLOCK('运输物流'),"991136$CLOSE",IF(INBLOCK('保险 '),"991255$CLOSE",0)))))))))))))))))))))))))))))))){XG51};
ZSH:=IF(INBLOCK('工程建筑'),"991002$HIGH",IF(INBLOCK('电力 '),"991003$HIGH",IF(INBLOCK('计算机'),"991004$HIGH",
IF(INBLOCK('电子信息'),"991006$HIGH",IF(INBLOCK('房地产 '),"991007$HIGH",IF(INBLOCK('纺织服装'),"991008$HIGH",
IF(INBLOCK('钢铁'),"991009$HIGH",IF(INBLOCK('供水供气 '),"991010$HIGH",IF(INBLOCK('化工化纤'),"991011$HIGH",
IF(INBLOCK('电器'),"991014$HIGH",IF(INBLOCK('交通设施 '),"991016$HIGH",IF(INBLOCK('银行类'),"991017$HIGH",
IF(INBLOCK('旅游酒店'),"991018$HIGH",IF(INBLOCK('煤炭石油 '),"991019$HIGH",IF(INBLOCK('酿酒食品'),"991020$HIGH",
IF(INBLOCK('农林牧渔'),"991021$HIGH",IF(INBLOCK('商业连锁 '),"991023$HIGH",IF(INBLOCK('建材'),"991024$HIGH",
IF(INBLOCK('其他行业'),"991025$HIGH",IF(INBLOCK('汽车类 '),"991026$HIGH",IF(INBLOCK('机械'),"991027$HIGH",
IF(INBLOCK('医药'),"991028$HIGH",IF(INBLOCK('外贸 '),"991031$HIGH",IF(INBLOCK('教育传媒'),"991032$HIGH",
IF(INBLOCK('仪电仪表'),"991033$HIGH",IF(INBLOCK('有色金属 '),"991034$HIGH",IF(INBLOCK('造纸印刷'),"991035$HIGH",
IF(INBLOCK('券商'),"991036$HIGH",IF(INBLOCK('电力设备 '),"991037$HIGH",IF(INBLOCK('通信'),"991135$HIGH",
IF(INBLOCK('运输物流'),"991136$HIGH",IF(INBLOCK('保险 '),"991255$HIGH",0)))))))))))))))))))))))))))))))){XG51};
ZSL:=IF(INBLOCK('工程建筑'),"991002$LOW",IF(INBLOCK('电力 '),"991003$LOW",IF(INBLOCK('计算机'),"991004$LOW",
IF(INBLOCK('电子信息'),"991006$LOW",IF(INBLOCK('房地产 '),"991007$LOW",IF(INBLOCK('纺织服装'),"991008$LOW",
IF(INBLOCK('钢铁'),"991009$LOW",IF(INBLOCK('供水供气 '),"991010$LOW",IF(INBLOCK('化工化纤'),"991011$LOW",
IF(INBLOCK('电器'),"991014$LOW",IF(INBLOCK('交通设施 '),"991016$LOW",IF(INBLOCK('银行类'),"991017$LOW",
IF(INBLOCK('旅游酒店'),"991018$LOW",IF(INBLOCK('煤炭石油 '),"991019$LOW",IF(INBLOCK('酿酒食品'),"991020$LOW",
IF(INBLOCK('农林牧渔'),"991021$LOW",IF(INBLOCK('商业连锁 '),"991023$LOW",IF(INBLOCK('建材'),"991024$LOW",
IF(INBLOCK('其他行业'),"991025$LOW",IF(INBLOCK('汽车类 '),"991026$LOW",IF(INBLOCK('机械'),"991027$LOW",
IF(INBLOCK('医药'),"991028$LOW",IF(INBLOCK('外贸'),"991031$LOW",IF(INBLOCK(' 教育传媒'),"991032$LOW",
IF(INBLOCK('仪电仪表'),"991033$LOW",IF(INBLOCK('有色金属 '),"991034$LOW",IF(INBLOCK('造纸印刷'),"991035$LOW",
IF(INBLOCK('券商'),"991036$LOW",IF(INBLOCK('电力设备 '),"991037$LOW",IF(INBLOCK('通信'),"991135$LOW",
IF(INBLOCK('运输物流'),"991136$LOW",IF(INBLOCK('保险 '),"991255$LOW",0)))))))))))))))))))))))))))))))){XG51};
Var12:=(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))*100{XG51};
能量线:SMA(Var12,3,1)*(-1)+100,colorRED,linethick2{XG51};
KNX:=Sma(Var12,3,1){XG51};
MK:=MA(KNX,M){XG51};
买点:IF(KNX>N AND crOSS(MK , KNX),50,0),COLORRED,LINETHICK1{XG51};
Var13:=(HHV(ZSH,34)-ZSC)/(HHV(ZSH,34)-LLV(ZSL,34))*100{XG51};
行业线:SMA(Var13,3,1)*(-1)+100,colorgreen,linethick1{XG51};
Var11:=(HHV(INDEXH,34)-INDEXC)/(HHV(INDEXH,34)-LLV(INDEXL,34))*100{XG51};
大盘线:SMA(Var11,3,1)*(-1)+100,colorYELLOW,linethick1{XG51};
板块:=IFS(INBLOCK('工程建筑'),'工程建筑',IFS(INBLOCK('电力'),'电力',IFS(INBLOCK('计算机 '),'计算机',IFS(INBLOCK('电子信息'),'电子信息',
IFS(INBLOCK('房地产'),'房地产',IFS(INBLOCK('纺织服装'),'纺织服装',IFS(INBLOCK('钢铁'),'钢铁',IFS(INBLOCK('供水供气'),'供水供气',
IFS(INBLOCK('化工化纤'),'化工化纤',IFS(INBLOCK('电器'),'电器',IFS(INBLOCK('交通设施'),'交通设施',IFS(INBLOCK('银行类'),'银行类',
IFS(INBLOCK('旅游酒店'),'旅游酒店',IFS(INBLOCK('煤炭石油'),'煤炭石油',IFS(INBLOCK('酿酒食品 '),'酿酒食品',IFS(INBLOCK('农林牧渔'),'农林牧渔',
IFS(INBLOCK('商业连锁'),'商业连锁',IFS(INBLOCK('建材'),'建材',IFS(INBLOCK('其他行业'),'其他行业',IFS(INBLOCK('汽车类'),'汽车类',
IFS(INBLOCK('机械'),'机械',IFS(INBLOCK('医药'),'医药',IFS(INBLOCK('外贸'),'外贸 ',IFS(INBLOCK('教育传媒'),'教育传媒',IFS(INBLOCK('仪电仪表'),'仪电仪表',
IFS(INBLOCK('有色金属'),'有色金属',IFS(INBLOCK('造纸印刷'),'造纸印刷',IFS(INBLOCK('券商 '),'券商',IFS(INBLOCK('电力设备'),'电力设备',
IFS(INBLOCK('通信'),'通信',IFS(INBLOCK('运输物流'),'运输物流',IFS(INBLOCK('保险'),'保险 ','')))))))))))))))))))))))))))))))){XG51};
DRAWTEXTAbs(10,5,'所属: '+板块+'指数'),COLORBLUE{X+G^5_1+C+N+{};

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

源码正文：

DRAWTEXTREL(480,65,'〖操盘专用〗'),color9acD32{XG51};
DRAWTEXTREL(340,130,'高开高走为一根红柱，高开低走收红为黄柱，高开低走收绿为上黄下绿柱，'),Color8285FF{XG51};
DRAWTEXTREL(340,165,'低开低走收绿蓝色，低开高走收绿淡蓝色柱，低开高走收红下淡蓝上红柱。'),Color8285FF{XG51};
DRAWTEXTREL(16,950,stKLABEL+' ※'+STKNAME+' '+BKNAME),LINETHICK2,COLOR00FFFF;

工作14日线:ema(CLOSE,14),colorgreen,linethick1{XG51};
持股35日线:Ema(CLOSE,35),colorred,linethick2;

IF BARSTATUS=2 and v>ref(v,1) and ma(v,5)>ref(ma(v,5),1) THEN
DRAWTEXTREL(698,950,'※ 今日成交量大于昨日,且有继续增大趋势！'),LINETHICK2,Color8285FF{XG51};
IF BARSTATUS=2 and v<ref(v,1) and ma(v,5)>ref(ma(v,5),1) THEN
DRAWTEXTREL(698,950,'※ 今日成交量小于昨日，但有放大迹象！'),LINETHICK2,Color8285FF{XG51};
IF BARSTATUS=2 and v>ref(v,1)and ma(v,5)<ref(ma(v,5),1) THEN
DRAWTEXTREL(698,950,'※ 今日成交量大于昨日, 但有缩小迹象！'),LINETHICK2,Color8285FF{XG51};
IF BARSTATUS=2 and v<ref(v,1)and ma(v,5)<ref(ma(v,5),1) THEN
DRAWTEXTREL(698,950,'※ 今日成交量小于昨日，且有缩小迹象！'),LINETHICK2,Color8285FF;

X1:=(C+L+H)/3{XG51};
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*5.1416*10{XG51};
EMA8:=EMA(C,8){XG51};
DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),EMA8,'∠45上升'),COLORRED;

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.96),'老鼠仓'),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,(LOW * 0.96),'▲大黑马'),COLORBLUE{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.96),'底背离'),COLORA6E500{XG51};
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.04),'顶背离'),COLOR1880FF{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};
DRAWTEXT(买入 AND 注意买=100 AND 超跌=0,LOW*0.96,'短线'),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.96,'拉升'),COLORFFDE00;

STICKLINE(open>=CLOSE and close>=REF(CLOSE,1),close,open,8,0),color0033ff{XG51};
STICKLINE(open>=CLOSE and close>=REF(CLOSE,1),close,open,7,0),color0066ff{XG51};
STICKLINE(open>=CLOSE and close>=REF(CLOSE,1),close,open,5.8,0),color0099ff{XG51};
STICKLINE(open>=CLOSE and close>=REF(CLOSE,1),close,open,4.4,0),color00bbff{XG51};
STICKLINE(open>=CLOSE and close>=REF(CLOSE,1),close,open,2.8,0),color00ddff{XG51};
STICKLINE(open>=CLOSE and close>=REF(CLOSE,1),close,open,1,0),color00ffff;

STICKLINE(open>=REF(CLOSE,1) and close>=REF(CLOSE,1) and open<=close,open,close,8,0),color000055{XG51};
STICKLINE(open>=REF(CLOSE,1) and close>=REF(CLOSE,1) and open<=close,open,close,7,0),color000077{XG51};
STICKLINE(open>=REF(CLOSE,1) and close>=REF(CLOSE,1) and open<=close,open,close,5.8,0),color000099{XG51};
STICKLINE(open>=REF(CLOSE,1) and close>=REF(CLOSE,1) and open<=close,open,close,4.4,0),color0000bb;
STICKLINE(open>=REF(CLOSE,1) and close>=REF(CLOSE,1) and open<=close,open,close,2.8,0),color0000dd;
STICKLINE(open>=REF(CLOSE,1) and close>=REF(CLOSE,1) and open<=close,open,close,1,0),color0000ff{X-G-5~1-C-N-{};