通达信均线交叉算法主图未加密选股指标公式源码

源码正文：

N:=5{XG51};
P:=20{XG51};
MN:ma(C,N),COLORRED{XG51};
MP:MA(C,P),COLORBLUE{XG51};
RN:=REF(MN,1){XG51};
RP:=REF(MP,1){XG51};
A1:=N*P*(RP-RN){XG51};
A2:=P*REF(C,N)-N*REF(C,P){XG51};
JC:IF(CURRBARSCOUNT<=20,(A1+A2)/(P-N),DRAWNULL),COLORFFFF00,DOTLINE{X!G-5^1!C!N!{};

源码正文：

日线锁定:=(PERIOD==4){XG51};
数量:=23{XG51};
dmadif:=ma(C,10)-MA(C,50){XG51};
DMAAMA:=MA(DMADIF,10);
DMAX:=DMADIF>DMAAMA{XG51};
P01:=DMAX{XG51};
dmiTR:=EXPMema(MAX(MAX(H-L,Abs(H-REF(C,1))),ABS(REF(C,1)-L)),14){XG51};
DMIHD:=H-REF(H,1){XG51};
DMILD:=REF(L,1)-L{XG51};
DMIDMP:=EXPMEMA(IFF(DMIHD>0 AND DMIHD>DMILD,DMIHD,0),14){XG51};
DMIDMM:=EXPMEMA(IFF(DMILD>0 AND DMILD>DMIHD,DMILD,0),14){XG51};
DMIpdi:=DMIDMP*100/DMITR{XG51};
DMImdi:=DMIDMM*100/DMITR{XG51};
DMIX:=DMIPDI>DMIMDI{XG51};
P02:=DMIX{XG51};
dpoDPO:=C-REF(MA(C,20),20/2+1){XG51};
DPOMADPO:=MA(DPODPO,6){XG51};
DPOX:=DPODPO>DPOMADPO{XG51};
P03:=DPOX{XG51};
emvvolUME:=MA(V,14)/V{XG51};
EMVMID:=100*(H+L-REF(H+L,1))/(H+L){XG51};
EMVEMV:=MA(EMVMID*EMVVOLUME*(H-L)/MA(H-L,14),14){XG51};
EMVMAEMV:=MA(EMVEMV,9){XG51};
EMVX:=EMVEMV>EMVMAEMV{XG51};
P04:=EMVX{XG51};
macddiF:=EMA(C,12)-EMA(C,26){XG51};
macddeA:=EMA(MACddiF,9){XG51};
MACDX:=MACDDIF>MACDDEA{XG51};
P05:=MACDX{XG51};
trixTR:=EMA(EMA(EMA(C,12),12),12){XG51};
TRIXTRIX:=(TRIXTR-REF(TRIXTR,1))/REF(TRIXTR,1)*100{XG51};
TRIxmaTRIX:=MA(TRIXTRIX,9){XG51};
TRIXX:=TRIXTRIX>TRIXMATRIX{XG51};
P06:=TRIXX{XG51};
WVADWVAD:=SUM((C-O)/(H-L)*V,24)/10000{XG51};
WVADMAWVAD:=MA(WVADWVAD,6){XG51};
WVADX:=WVADWVAD>WVADMAWVAD{XG51};
P08:=WVADX{XG51};
JSJS:=100*(C-REF(C,5))/(5*REF(C,5)){XG51};
JSMAJS1:=MA(JSJS,5){XG51};
JSX:=JSJS>JSMAJS1{XG51};
P09:=JSX{XG51};
CYEMAL:=MA(C,5){XG51};
CYEMAS:=MA(MA(C,20),5){XG51};
CYECYEL:=(CYEMAL-REF(CYEMAL,1))/REF(CYEMAL,1)*100{XG51};
CYECYES:=(CYEMAS-REF(CYEMAS,1))/REF(CYEMAS,1)*100{XG51};
CYEX:=CYECYEL>CYECYES{XG51};
P10:=CYEX{XG51};
JLHBVAR1:=(C-LLV(L,60))/(HHV(H,60)-LLV(L,60))*80;
JLHBB:=SMA(JLHBVAR1,7,1);
JLHBVAR2:=SMA(JLHBB,5,1){XG51};
JLHBX:=JLHBB>JLHBVAR2{XG51};
P11:=JLHBX{XG51};
cycJJJ:=IFF(DYnaINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3)){XG51};
CYCDDD:=(DYNAINFO(5)<0.01