通达信麟龙四量决策选股指标公式源码

通达信麟龙四量决策选股指标公式源码

源码正文：

M3:=ma(CLOSE,3),COLORWHITE{XG51};
M13:=MA(CLOSE,13),COLORWHITE{XG51};
M34:=MA(CLOSE,34),COLORWHITE{XG51};
X:=BArslAst(REF(crOSS(C,MA(C,120)),1)) AND CROSS(MA(C,20),MA(C,120)){XG51};
STICKLINE(M3>=M13 AND M34>=REF(M34,1),8,9,1,1 ),COLORWHITE{XG51};
STICKLINE(M3<M13 AND M34>=REF(M34,1),8,9,1,1 ),COLORBLUE{XG51};
STICKLINE(M3<M13 AND M34<REF(M34,1),8,9,1,1 ),COLORCYAN{XG51};
STICKLINE(M3>=M13 AND M34<REF(M34,1),8,9,1,1 ),COLORLIMAGENTA{XG51};
XG:=(M3>=M13 AND M34<REF(M34,1))OR (M3>=M13 AND M34>=REF(M34,1))AND REF((M3<M13 AND M34<REF(M34,1)),1){XG51};
XG1:=(M3>=M13 AND M34>=REF(M34,1))AND REF((M3<M13 AND M34>=REF(M34,1)),1){XG51};
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6{XG51};
牛线:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORCYAN{XG51};
马线:=MA(牛线,6),COLORLIMAGENTA{XG51};
STICKLINE(C>牛线,6,7,2,0),COLORWHITE,LINETHICK2{XG51};
STICKLINE(C<马线,6,7,2,0),COLORCYAN,LINETHICK2{XG51};
STICKLINE(牛线>=C AND C>=马线,6,7,2,0),COLORCYAN,LINETHICK2{XG51};
A:=MAX(MA(C,60),MA(C,120)){XG51};
B:=MIN(MA(C,60),MA(C,120)){XG51};
STICKLINE(C>=A,4,5,2,0),COLORWHITE,LINETHICK2{XG51};
STICKLINE(C<=B,4,5,2,0),COLORCYAN,LINETHICK2{XG51};
STICKLINE(A>=C AND C>=B,4,5,2,0),COLORCYAN,LINETHICK2{XG51};
E:=MAX(MA(C,45),MA(C,90)){XG51};
F:=MIN(MA(C,45),MA(C,90)){XG51};
STICKLINE(C>E,2,3,2,0),COLORWHITE,LINETHICK2{XG51};
STICKLINE(C<F,2,3,2,0),COLORCYAN,LINETHICK2{XG51};
STICKLINE(E>=C AND C>=F,2,3,2,0),COLORCYAN,LINETHICK2{XG51};
J:=MAX(MA(C,30),MA(C,60)){XG51};
K:=MIN(MA(C,30),MA(C,60)){XG51};
STICKLINE(C>J,0,1,2,0),COLORWHITE,LINETHICK2{XG51};
STICKLINE(C<K,0,1,2,0),COLORCYAN,LINETHICK2{XG51};
STICKLINE(J>=C AND C>=K,0,1,2,0),COLORCYAN,LINETHICK2{XG51};
全绿:=((J>=C AND C>=K) OR C<K) AND ((E>=C AND C>=F) OR C<F) AND ((A>=C AND C>=B) OR  C<=B) AND
((牛线>=C AND C>=马线) OR C<马线){XG51};
全红:=C>J AND C>E AND C>=A AND C>牛线 AND (M3>=M13 AND M34>=REF(M34,1)){XG51};
RSV:=(CLOSE - LLV(LOW,18))/(HHV(HIGH,18) - LLV(LOW,18))*100;
KK:=ema(RSV,3);
D:=EMA(KK,3);
JJJ:=(3*KK-2*D);
kdj1:=REF(COUNT(JJJ<REF(JJJ,1),5)>=3,1) AND REF(JJJ,1)<20{XG51};
kdJ2:=JJJ>REF(JJJ,1);
JJ:=MAX(MA(C,30),MA(C,60)){XG51};
KKK:=MIN(MA(C,30),MA(C,60)){XG51};
全绿A:=((JJ>=C AND C>=KKK) OR C<KKK) AND ((E>=C AND C>=F) OR C<F) AND ((A>=C AND C>=B) OR  C<=B) AND
((牛线>=C AND C>=马线) OR C<马线){XG51};
全绿选股:IF(FILTER(KDJ1 AND KDJ2,3)AND 全绿A,10,-2),COLOR00FFFF,LINETHICK1{XG51};
DRAWICON(全绿选股=10,-1,1){XG51};
全红选股:IF(全红 AND REF(全红,1)=0,10,-2),COLORFF00FF,LINETHICK1{XG51};
DRAWICON(全红选股=10,-1,1){X*G!5~1*C*N*{};