通达信大牛市主图+选股公式主图源码

M1:=10;

M2:=60;

涨跌停:=(C-REF(C,1))/REF(C,1)*100;

STICKLINE(涨跌停>9.8,O,C,3,0),COLORMAGENTA;

STICKLINE(涨跌停< -9.8,O,C,3,0),COLORGREEN;

HHJSJDA:=(3*CLOSE+OPEN+LOW+HIGH)/6;

HHJSJDB:(20*HHJSJDA+18*REF(HHJSJDA,1)+18*REF(HHJSJDA,2)+17*REF(HHJSJDA,3)+16*REF(HHJSJDA,4)+15*REF(HHJSJDA,5)+14*REF(HHJSJDA,6) +13*REF(HHJSJDA,7)+12*REF(HHJSJDA,8)+11*REF(HHJSJDA,9)+10*REF(HHJSJDA,10)+9*REF(HHJSJDA,11)+8*REF(HHJSJDA,12) +7*REF(HHJSJDA,13)+6*REF(HHJSJDA,14)+5*REF(HHJSJDA,15)+4*REF(HHJSJDA,16)+3*REF(HHJSJDA,17)+2*REF(HHJSJDA,18)+ REF(HHJSJDA,20))/210,COLORYELLOW;

HHJSJDC:MA(HHJSJDB,5),COLORRED;

EXP1:EMA(CLOSE,M1),DOTLINE,COLORLIBLUE;

EXP2:EMA(CLOSE,M2),DOTLINE,COLORYELLOW;

VAR1:=(C>REF(C,1) AND C>REF(C,2));

VAR2:=(REF(VAR1,1) AND C<=REF(C,1) AND C>=REF(C,2));

VAR3:=(REF(VAR2,1) AND C>=REF(C,1) AND C<=REF(C,2));

VAR4:=(REF(VAR3,1) AND C<=REF(C,1) AND C>=REF(C,2));

VAR5:=(REF(VAR4,1) AND C>=REF(C,1) AND C<=REF(C,2));

VAR6:=(REF(VAR5,1) AND C<=REF(C,1) AND C>=REF(C,2));

VAR7:=(REF(VAR6,1) AND C>=REF(C,1) AND C<=REF(C,2));

VAR8:=(REF(VAR7,1) AND C<=REF(C,1) AND C>=REF(C,2));

VAR9:=(REF(VAR8,1) AND C>=REF(C,1) AND C<=REF(C,2));

VARA:=(REF(VAR9,1) AND C<=REF(C,1) AND C>=REF(C,2));

VARB:=(REF(VARA,1) AND C>=REF(C,1) AND C<=REF(C,2));

VARC:=(REF(VARB,1) AND C<=REF(C,1) AND C>=REF(C,2));

VARD:=(C< REF(C,1) AND C< REF(C,2));

VARE:=(REF(VARD,1) AND C>=REF(C,1) AND C<=REF(C,2));

VARF:=(REF(VARE,1) AND C<=REF(C,1) AND C>=REF(C,2));

VAR10:=(REF(VARF,1) AND C>=REF(C,1) AND C<=REF(C,2));

VAR11:=(REF(VAR10,1) AND C<=REF(C,1) AND C>=REF(C,2));

VAR12:=(REF(VAR11,1) AND C>=REF(C,1) AND C<=REF(C,2));

VAR13:=(REF(VAR12,1) AND C<=REF(C,1) AND C>=REF(C,2));

VAR14:=(REF(VAR13,1) AND C>=REF(C,1) AND C<=REF(C,2));

VAR15:=(REF(VAR14,1) AND C<=REF(C,1) AND C>=REF(C,2));

VAR16:=(REF(VAR15,1) AND C>=REF(C,1) AND C<=REF(C,2));

VAR17:=(REF(VAR16,1) AND C<=REF(C,1) AND C>=REF(C,2));

VAR18:=(REF(VAR17,1) AND C>=REF(C,1) AND C<=REF(C,2));

VAR19:=((REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1)) AND VAR1);

VAR1A:=((REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1)) AND VARD);

DRAWICON(VAR19,L-0.1,1),COLOR33FFCC;