【生死金葫芦永久主图+金葫芦资金流】指标，无限制电脑手机均可使用

{生死葫芦线永ZT}

{========= 有效期设置：自己改日期 =========}
有效截止日期:=1990627;  { 1260904 = 2026-09-04 }
有效:=DATE<有效截止日期;

{均线}
MA11:IF(有效,MA(C,13),DRAWNULL);
MA22:IF(有效,MA(C,55),DRAWNULL);

DRAWBAND(IF(有效,MA11,DRAWNULL),RGB(200,20,10), IF(有效,MA22,DRAWNULL),RGB(10,100,200));
DRAWKLINE(H,O,L,C);

BB:=IF(有效,CROSS(C,MA11),0);
SS1:=IF(有效,CROSS(1.1,C/MA(C,55)),0);
SS2:=IF(有效,CROSS(1.2,C/MA(C,55)),0);
SS3:=IF(有效,CROSS(1.3,C/MA(C,55)),0);
SS4:=IF(有效,CROSS(1.4,C/MA(C,55)),0);
SS5:=IF(有效,CROSS(1.5,C/MA(C,55)),0);
SS6:=IF(有效,CROSS(1.6,C/MA(C,55)),0);
SS7:=IF(有效,CROSS(1.7,C/MA(C,55)),0);
SS8:=IF(有效,CROSS(1.8,C/MA(C,55)),0);
SS9:=IF(有效,CROSS(1.9,C/MA(C,55)),0);

DRAWICON(FILTER(BB,10) AND 有效,L*0.98,18);
DRAWICON(FILTER(SS1,5) AND 有效,H*1.02,17);
DRAWICON(FILTER(SS2,5) AND 有效,H*1.02,17);
DRAWICON(FILTER(SS3,5) AND 有效,H*1.02,17);
DRAWICON(FILTER(SS4,5) AND 有效,H*1.02,17);
DRAWICON(FILTER(SS5,5) AND 有效,H*1.02,17);
DRAWICON(FILTER(SS6,5) AND 有效,H*1.02,17);
DRAWICON(FILTER(SS7,5) AND 有效,H*1.02,17);
DRAWICON(FILTER(SS8,5) AND 有效,H*1.02,17);
DRAWICON(FILTER(SS9,5) AND 有效,H*1.02,17);

金叉天数:=BARSLAST(CROSS(MA11,MA22));
XG:=IF(有效,COUNT(C>MA11,金叉天数)=金叉天数 AND MA11>MA22 AND REF(C,1)/MA11>1 AND REF(C,1)/MA11<1.01 AND C>O AND REF(C,1)<REF(O,1),0);

DRAWICON(FILTER(XG,5) AND 有效,L,26);

昨收除MA11:IF(有效,REF(C,1)/MA11,DRAWNULL),NODRAW;
偏:IF(有效,C/MA(C,55),DRAWNULL),NODRAW;

DRAWTEXT_FIX(1,0,0,0,'所属风格:'),COLORCYAN;
DRAWTEXT_FIX(1,0.04,0,0,FGBLOCK),COLORCYAN;
DRAWTEXT_FIX(1,0,0.06,0,'所属概念:'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.04,0.06,0,GNBLOCK),COLORMAGENTA;
DRAWTEXT_FIX(1,0,0.12,0,'所属板块:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.04,0.12,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.1,0.12,0,HYBLOCK),COLORYELLOW;

X1:=IF(MA(C,5)>MA(C,10),20,0);
X2:=IF(MA(C,20)>MA(C,60),10,0);
X3:=IF(kdj.J>KDJ.K,10,0);
X4:=IF(MACD.DIF>MACD.DEA,10,0);
X5:=IF(MACD.MACD>0,10,0);
X6:=IF(V>MA(V,60),10,0);
X7:=IF(WINNER(C)>0.5,10,0);
X8:=IF(C/REF(C,1)>1.03,10,0);
XX:=(X1+X2+X3+X4+X5+X6+X7+X8);
DRAWTEXT_FIX(V>O,0.18,0.12,0,STRCAT('趋势评分： ',STRCAT(CON2STR(XX,2),' '))),COLORRED;

{========= 含有涨幅、涨停数的板块 =========}; 

N_MAX := HHVBARS(V, 120);
BS_MAX := BACKSET(ISLASTBAR, N_MAX + 1);
IS_MAX_V := BS_MAX AND (REF(BS_MAX, 1) = 0 OR BARSSINCE(BS_MAX) = 0);
CUR_MAX_H   := CONST(REF(H, BARSLAST(IS_MAX_V)));
CUR_MAX_VOL := CONST(REF(V, BARSLAST(IS_MAX_V)));

DRAWKLINE(H, O, L, C);

STICKLINE(IS_MAX_V AND C>O, O, C, 3, 0), COLORFF00FF;
STICKLINE(IS_MAX_V AND C<=O, O, C, 3, 0), COLORGREEN;
STICKLINE(IS_MAX_V AND C>O, H, L, 0, 0), COLORFF00FF;
STICKLINE(IS_MAX_V AND C<=O, H, L, 0, 0), COLORGREEN;

AFTER_MAX := BARSLAST(IS_MAX_V) > 0;
BREAK_COND := AFTER_MAX AND (C > O) AND (C > CUR_MAX_H);
FIRST_BREAK := BREAK_COND AND (COUNT(BREAK_COND, BARSLAST(IS_MAX_V)) = 1);

SUO_LIANG := FIRST_BREAK AND V < (CUR_MAX_VOL * 2 / 3);
FANG_LIANG := FIRST_BREAK AND V >= (CUR_MAX_VOL * 2 / 3);
STICKLINE(SUO_LIANG, O, C, 3, 0), COLORBLUE; 
STICKLINE(SUO_LIANG, H, L, 0, 0), COLORBLUE; 
STICKLINE(FANG_LIANG, O, C, 3, 0), COLORRED; 
STICKLINE(FANG_LIANG, H, L, 0, 0), COLORRED; 

DRAWLINE(IS_MAX_V, H, BARSLAST(IS_MAX_V)=1, REF(H, 1), 1), COLORFF00FF, LINETHICK2;
DRAWICON(FANG_LIANG, H*1.03, 25), COLORRED, LINETHICK4;
DRAWICON(SUO_LIANG, H*1.03, 24), COLORBLUE, LINETHICK4;
DRAWTEXT(IS_MAX_V, L*0.96, '量王'),COLORYELLOW, LINETHICK2;
DRAWTEXT(SUO_LIANG, L*0.97, '缩量突破'), COLORYELLOW;
DRAWTEXT(FANG_LIANG, L*0.97, '放量突破'), COLORYELLOW;

{金葫芦资金流}
X_1:=DATE<1370530;
X_2:=CLOSE/INDEXC*1000000;
X_3:=SUM(X_2,52)/52;
资金动能:IF(X_1,(X_2/X_3-1)*10,DRAWNULL),NODRAW,COLORRED;
强:0.5,DOTLINE;
极强:1.5,DOTLINE;
DRAWBAND(资金动能,RGB(255,0,0),0,RGB(0,170,0));