大智慧主力诡计未加密选股指标公式源码

大智慧主力诡计未加密选股指标公式源码

源码正文：

mtm:=C-REF(C,1){XG51};
ZLGJ:100*ema(Ema(MTM,6),6)/EMA(EMA(Abs(MTM),6),6),COLORRED{XG51};
MAZL:MA(ZLGJ,4),COLORBLUE{XG51};
VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1){XG51};
VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1){XG51};
VAR3:=EMA(VAR2,10){XG51};
VAR4:=LLV(LOW,33){XG51};
VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3){XG51};
主力进场:IF(VAR5>REF(VAR5,1),VAR5,0),COLORWHITE{XG51};
stICKLINE(VAR5>REF(VAR5,1),0,VAR5,3,1 ),COLOR000055{XG51};
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,2.6,1),COLOR000077{XG51};
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,2.1,1 ),COLOR000099{XG51};
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,1.5,1 ),COLOR0000BB{XG51};
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,0.9,1),COLOR0000DD{XG51};
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,0.3,1 ),COLOR0000FF{XG51};
洗盘:IF(VAR5<REF(VAR5,1),VAR5,0),COLORCYAN{XG51};
DRAWTEXTABS(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,3,0),COLOR005500{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,2.6,0),COLOR007700{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,2.1,0),COLOR009900{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,1.5,0),COLOR00BB00{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,0.9,0),COLOR00DD00{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,0.3,0),COLOR00FF00{XG51};
VAR2L:=REF(LOW,1){XG51};
VAR3L:=SMA(ABS(LOW-VAR2L),3,1)/SMA(MAX(LOW-VAR2L,0),3,1)*110{XG51};
VAR4L:=EMA(IF(CLOSE*1.3,VAR3L*10,VAR3L/10),3){XG51};
VAR5L:=LLV(LOW,13){XG51};
VAR6L:=HHV(VAR4L,13){XG51};
VAR7L:=IF(MA(CLOSE,34),1,0){XG51};
VAR8L:=EMA(IF(LOW<=VAR5L,(VAR4L+VAR6L*2)/2,0),3)/618*VAR7L{XG51};
VAR9LL:=IF(VAR8L>110,110,VAR8L){XG51};
STICKLINE(VAR9LL<REF(VAR9LL,1),0,VAR9LL,2,0),COLORf00ff0,LINETHICK5{XG51};
VAR10:=100*(C-COST(10))/COST(10){XG51};
VAR6:=(CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100{XG51};
VAR7:=SMA(VAR6,4,1){XG51};
VAR8:=SMA(VAR7,2,1){XG51};
VAR9:=vol/CAPITAL*34{XG51};
VAR12:=REF(VAR9,1){XG51};
主力建仓: IF(VAR8<8.5 AND VAR7<11,-10,0),COLORf00ff0{X!G~5~1!C!N!{};

大智慧自用MACD未加密选股指标公式源码

源码正文：

input:p(12,1,100),s(26,1,100),m(9,1,50),N(0,0,1){XG51};
周macd:="maCD.MacD#WEEK"{XG51};
stICKLINE(周MACD>=0 AND DATATYPE=8,0,周MACD,11,0),Color000055{XG51};
STICKLINE(周MACD<0 AND DATATYPE=8,0,周MACD,11,0),Color515100{XG51};
difF:(ema(CLOSE,P) - EMA(CLOSE,S)),LINETHICK1{XG51};
DEA :EMA(DIFF,M),Color1AFFFF,LINETHICK1,LAYER0{XG51};
macd:(diff-dea)*2,COLORWHITE,LINETHICK0{XG51};
PARTLINE(DIFF,DIFF>=REF(DIFF,1),RGB(200,0,200),DIFF<REF(DIFF,1),RGB(0,200,200)),LAYER0;{XG51};
STICKLINE(macd>0 and macd>=REF(macd,1),macd,0,4,0),Color0000F2{XG51};
STICKLINE(macd>0 and macd<REF(macd,1),macd,0,4,1),Color0000F2{XG51};
STICKLINE(macd<0 and macd<REF(macd,1),macd,0,4,0),Color008000{XG51};
STICKLINE(macd<0 and macd>=REF(macd,1),macd,0,4,1),Color008000{XG51};
ES:=IF(N=0,REF(EMA(C,S),1),EMA(C,S)){XG51};
EP:=IF(N=0,REF(EMA(C,P),1),EMA(C,P)){XG51};
DI:=IF(N=0,REF(DIFF,1),DIFF){XG51};
零度价:=((P+1)*(S-1)*ES-(S+1)*(P-1)*EP)/(2*(S+1)-2*(P+1)){XG51};
IF N=0 AND REF(DIFF,1)<0 and barstatus=2 THEN BEGIN DRAWTEXTREL(5,10,'DIFF上穿零度对应的股价:'+NUMTOSTRN(零度价,2)+'元'),COLOR00D0D0;END{XG51};
IF N=1 AND DIFF<0 and barstatus=2 THEN BEGIN DRAWTEXTREL(5,10,'DIFF上穿零度对应的股价:'+NUMTOSTRN(零度价,2)+'元'),COLOR00D0D0;END{XG51};
DRAWTEXTAbs(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{XG51};
IF N=0 AND REF(DIFF,1)>0 and barstatus=2 THEN BEGIN DRAWTEXTREL(5,10,'DIFF下穿零度对应的股价:'+NUMTOSTRN(零度价,2)+'元'),COLORD0D0D0;END{XG51};
IF N=1 AND DIFF>0 and barstatus=2 THEN BEGIN DRAWTEXTREL(5,10,'DIFF下穿零度对应的股价:'+NUMTOSTRN(零度价,2)+'元'),COLORD0D0D0;END{XG51};
拐点价:=((P-1)*EP/(P+1)-(S-1)*ES/(S+1)-DI)*(S+1)*(P+1)/(2*(P+1)-2*(S+1)){XG51};
IF N=0 AND REF(DIFF,1)<REF(DIFF,2) and barstatus=2 THEN BEGIN DRAWTEXTREL(5,80,'DIFF向上拐点对应的股价:'+NUMTOSTRN(拐点价,2)+'元'),COLOR00D0D0;END{XG51};
IF N=1 AND DIFF<REF(DIFF,1) and barstatus=2 THEN BEGIN DRAWTEXTREL(5,80,'DIFF向上拐点对应的股价:'+NUMTOSTRN(拐点价,2)+'元'),COLOR00D0D0;END{XG51};
IF N=0 AND REF(DIFF,1)>REF(DIFF,2) and barstatus=2 THEN BEGIN DRAWTEXTREL(5,80,'DIFF向下拐点对应的股价:'+NUMTOSTRN(拐点价,2)+'元'),COLORD0D0D0;END{XG51};
IF N=1 AND DIFF>REF(DIFF,1) and barstatus=2 THEN BEGIN DRAWTEXTREL(5,80,'DIFF向下拐点对应的股价:'+NUMTOSTRN(拐点价,2)+'元'),COLORD0D0D0;END{X.G=5*1.C.N.{};