通达信自编多股矩阵代码

{均线系统}
MA1:=MA(C,1);
MA2:=MA(C,2);
MA3:=MA(C,3);
MA5:=MA(C,5);
MA8:=MA(C,8);
MA13:=MA(C,13);
MA21:=MA(C,21);
MA34:=MA(C,34);
MA55:=MA(C,55);
MA89:=MA(C,89);
MA144:=MA(C,144);
MA233:=MA(C,233);

{CH均线强弱}
C1:=IF(C>MA5,1,0);
C2:=IF(C>MA13,1,0);
C3:=IF(C>MA21,1,0);
C4:=IF(C>MA34,1,0);
C5:=IF(C>MA55,1,0);
C6:=IF(C>MA89,1,0);
C7:=IF(C>MA144,1,0);
C8:=IF(C>MA233,1,0);

L1:=IF(L<MA5,0,1);
L2:=IF(L<MA13,0,1);
L3:=IF(L<MA21,0,1);
L4:=IF(L<MA34,0,1);
L5:=IF(L<MA55,0,1);
L6:=IF(L<MA89,0,1);
L7:=IF(L<MA144,0,1);
L8:=IF(L<MA233,0,1);

{突破均线}
LBC:=C1+C2+C3+C4+C5+C6+C7+C8;
LBL:=L1+L2+L3+L4+L5+L6+L7+L8;
突破L:MAX(LBC-LBL,LBC-REF(LBC,1));

站上均线数:=C1+C2+C3+C4+C5+C6+C7+C8;
站上均线期:=BARSLASTCOUNT(站上均线数=8);
站上均线:站上均线数+站上均线期/100;

MUP1:=IF(MA1>REF(MA1,1),1,-1);
MUP2:=IF(MA2>REF(MA2,1),1,-1);
MUP3:=IF(MA3>REF(MA3,1),1,-1);
MUP5:=IF(MA5>REF(MA5,1),1,-1);
MUP8:=IF(MA8>REF(MA8,1),1,-1);
MUP13:=IF(MA13>REF(MA13,1),1,-1);
MUP21:=IF(MA21>REF(MA21,1),1,-1);
MUP34:=IF(MA34>REF(MA34,1),1,-1);
MUP55:=IF(MA55>REF(MA55,1),1,-1);
MUP89:=IF(MA89>REF(MA89,1),1,-1);
MUP144:=IF(MA144>REF(MA144,1),1,-1);
MUP233:=IF(MA233>REF(MA233,1),1,-1);

均线1UP:=IF(MUP1=1,MUP1+BARSLASTCOUNT(MUP1=1)/100,MUP1-BARSLASTCOUNT(MUP1=-1)/100);
均线3UP:=IF(MUP3=1,MUP3+BARSLASTCOUNT(MUP3=1)/100,MUP3-BARSLASTCOUNT(MUP3=-1)/100);
均线5UP:IF(MUP5=1,MUP5+BARSLASTCOUNT(MUP5=1)/100,MUP5-BARSLASTCOUNT(MUP5=-1)/100);
均线8UP:=IF(MUP8=1,MUP8+BARSLASTCOUNT(MUP8=1)/100,MUP8-BARSLASTCOUNT(MUP8=-1)/100);
均线13UP:IF(MUP13=1,MUP13+BARSLASTCOUNT(MUP13=1)/100,MUP13-BARSLASTCOUNT(MUP13=-1)/100);
均线21UP:IF(MUP21=1,MUP21+BARSLASTCOUNT(MUP21=1)/100,MUP21-BARSLASTCOUNT(MUP21=-1)/100);
均线34UP:IF(MUP34=1,MUP34+BARSLASTCOUNT(MUP34=1)/100,MUP34-BARSLASTCOUNT(MUP34=-1)/100);
均线55UP:=IF(MUP55=1,MUP55+BARSLASTCOUNT(MUP55=1)/100,MUP55-BARSLASTCOUNT(MUP55=1)/100);
均线89UP:=IF(MUP89=1,MUP89+BARSLASTCOUNT(MUP89=1)/100,MUP89-BARSLASTCOUNT(MUP89=1)/100);
均线144UP:=IF(MUP144=1,MUP144+BARSLASTCOUNT(MUP144=1)/100,MUP144-BARSLASTCOUNT(MUP144=1)/100);
均线233UP:IF(MUP233=1,MUP233+BARSLASTCOUNT(MUP233=1)/100,MUP233-BARSLASTCOUNT(MUP233=1)/100);

{包含关系底分型}
DOWN:=L<REF(L,1) AND H<REF(H,1);{下降K线}
T:=BARSLAST(DOWN);{至下降K线形成后的区间周期数T}
LH:=LLV(H,T+1);{区间的最低的最高价,T+1包含了下降K线2}
LL:=LLV(L,T+1);{区间的最低的最低价,T+1包含了下降K线2}
DI:=H>REF(LH,1) AND L>REF(LL,1);{当天最高价大于LH并且最低价大于LL}
强势底分型:=DI AND COUNT(DI,T)=1  AND C>MA5 AND C>=MAX(MAX(REF(H,1),REF(H,2)),REF(H,3));{当天最高价大于LH并且最低价大于LL,并且是区间第一次，形成底分型}{ AND C>MA5}

{标准底分型}
HH1:=REF(H,1)<MIN(REF(H,2),H);{昨天的最高价小于前天与今天最高价的较小值)}
LL1:=REF(L,1)<MIN(REF(L,2),L);{昨天的最低价小于前天与今天最低价的较小值)}
强势底分型2:=HH1 AND LL1 AND C>MA5 AND C>=REF(H,2);{昨天最高价和最低价都是最小的}{ AND C>MA5}

{穿头破脚底分型}
穿头破脚底分型:=C>=MAX(REF(H,1),REF(H,2)) AND L<MIN(REF(L,1),REF(L,2)) AND MA5>REF(MA5,1);

底分型:强势底分型+穿头破脚底分型;

底分强度:IF(底分型>=1, 底分型+突破L+站上均线,0);

{均线粘合}
MAX3L:=MAX(MAX(MA5,MA13),MA21);
MIN3L:=MIN(MIN(MA5,MA13),MA21);
均线3L粘合度:=(MAX3L-MIN3L)/MIN3L<0.011;
均线3L粘合期:=BARSLASTCOUNT(均线3L粘合度);
均线3L粘合:均线3L粘合度+均线3L粘合期/100;

MAX4L:=MAX(MAX(MAX(MA5,MA13),MA21),MA34);
MIN4L:=MIN(MIN(MIN(MA5,MA13),MA21),MA34);
均线4L粘合度:=(MAX4L-MIN4L)/MIN4L<0.02;
均线4L粘合期:=BARSLASTCOUNT(均线4L粘合度);
均线4L粘合:均线4L粘合度+均线4L粘合期/100;

MAX6L:=MAX(MAX(MAX(MAX(MAX(MA5,MA13),MA21),MA34),MA55),MA89);
MIN6L:=MIN(MIN(MIN(MIN(MIN(MA5,MA13),MA21),MA34),MA55),MA89);
均线6L粘合度:=(MAX6L-MIN6L)/MIN6L<0.012;
均线6L粘合期:=BARSLASTCOUNT(均线6L粘合度);
均线6L粘合:=均线6L粘合度+均线6L粘合期/100;

中期均线多头:=MA5>MA21 AND MA13>MA21 AND MA21>MA34 AND MA34>MA233;
均线2134UP:=均线21UP>=1 AND 均线34UP>=1.2;

底分选股:底分型>=1 AND C>MA34 AND 中期均线多头 AND 均线2134UP;

长期均线多头:=MA34>MA55 AND MA55>MA89 AND MA89>MA144 AND MA144>MA233;
粘合选股:均线4L粘合>=1 AND 底分型>=1 AND 长期均线多头;