主题：vbscript运行时错误

老师我是网上下载的，不知道谁编的，你能帮我修改一下吗？

bi:="ZSLX@BI1"(新笔3旧笔4);
BH1:="ZSLX@BH1"(1);
GD:="ZSLX@BH1"(2);
bg:="ZSLX@BG1";
bd:="ZSLX@BD1";
ZG:="ZSLX@ZSG";
ZD:="ZSLX@ZSD";
ZSKS:="ZSLX@ZSKS";
ZSJS:="ZSLX@ZSJS";
ZSLX1:="ZSLX@ZSLX1";
ZSLXDOT:="ZSLX@ZSLXDOT";

DZG:="ZSLX@GDJB"(1);
DZD:="ZSLX@GDJB"(2);
DZSKS:="ZSLX@GDJB"(3);
DZSJS:="ZSLX@GDJB"(4);
DZSLX:="ZSLX@GDJB"(5);
DGZS:="ZSLX@GDJB"(6);
{K线中枢}
QYKXZS:="ZSLX@SCKXSJ";{输出笔高}
KXZSKS:="ZSLX@KXZS"(1);
KXZSJS:="ZSLX@KXZS"(2);
KXZG:="ZSLX@KXZS"(3);
KXZD:="ZSLX@KXZS"(4);

{当下中枢}
DXZSZG:="ZSLX@DXZS"(13);
DXZSZD:="ZSLX@DXZS"(14);
DXZSZSKS:="ZSLX@DXZS"(15);
DXZSZSJS:="ZSLX@DXZS"(16);

{当下中枢}
DDXZSZG:="ZSLX@DXZS"(130);
DDXZSZD:="ZSLX@DXZS"(140);
DDXZSZSKS:="ZSLX@DXZS"(150);
DDXZSZSJS:="ZSLX@DXZS"(160);
zh:="ZSLX@SCZZ"(笔段背切换);

ZSLX:=IF(笔段背切换=0,ZSLX1,DZSLX);

 
DRAWTEXT(显示顶底分型=1 and GD=1,H,'顶'),colorred;
DRAWTEXT(显示顶底分型=1 and GD=-1,L,'底'),colorgreen;
 

{当下笔中枢}
  DRAWLINE( 隐藏笔中枢=0 AND  DXZSZSKS   ,DXZSZG,DXZSZSJS  ,DXZSZG,0),LINETHICK2,COLORMAGENTA;
  DRAWLINE(隐藏笔中枢=0 AND  DXZSZSKS  ,DXZSZD,DXZSZSJS  ,DXZSZD,0),LINETHICK2,COLORMAGENTA;
  STICKLINE(隐藏笔中枢=0 AND DXZSZSKS  ,DXZSZD,DXZSZG,1,0),COLORMAGENTA;
  STICKLINE(隐藏笔中枢=0 AND DXZSZSJS  ,DXZSZD,DXZSZG,1,0),COLORMAGENTA;
{当下段中枢}
  DRAWLINE(隐藏段中枢=0 AND  DDXZSZSKS,DDXZSZG,DDXZSZSJS ,DDXZSZG,0),LINETHICK2,COLORCYAN;
  DRAWLINE(隐藏段中枢=0 AND  DDXZSZSKS ,DDXZSZD,DDXZSZSJS  ,DDXZSZD,0),LINETHICK2,COLORCYAN;
  STICKLINE(隐藏段中枢=0 AND DDXZSZSKS,DDXZSZD,DDXZSZG,1,0),COLORCYAN;
  STICKLINE(隐藏段中枢=0 AND DDXZSZSJS,DDXZSZD,DDXZSZG,1,0),COLORCYAN;

STICKLINE(显示K线中枢=1 AND  kxzg>0,kxzg,kxzd,20,0),LINETHICK2,COLORBLUE;{COLORBROWN}

DRAWRECT(显示K线中枢=1 AND kxzsks ,kxzg ,显示K线中枢=1 AND kxzsjs ,kxzd ,true,colorblue ,1),colorblue;

drawline(隐藏笔=0 and bi=1, bg,隐藏笔=0 and  bi=-1, bd, 0),colorYellow, linethick1;
drawline(隐藏笔=0 and bi=-1, bd,隐藏笔=0 and bi=1, bg, 0),colorYellow, linethick1;

{画中枢}
DRAWLINE((隐藏笔中枢=0 OR 隐藏笔中枢=2)  AND  ZSKS,ZG,(隐藏笔中枢=0 OR 隐藏笔中枢=2) and ZSJS,ZG,0),LINETHICK2,COLORMAGENTA;{COLORMAGENTA}
DRAWLINE((隐藏笔中枢=0 OR 隐藏笔中枢=2)  AND  ZSKS,ZD,(隐藏笔中枢=0 OR 隐藏笔中枢=2) and ZSJS,ZD,0),LINETHICK2,COLORMAGENTA;{COLORCYAN}
STICKLINE((隐藏笔中枢=0 OR 隐藏笔中枢=2)  AND  ZSKS,ZG,ZD,0.5,0),LINETHICK2,COLORMAGENTA;
STICKLINE((隐藏笔中枢=0 OR 隐藏笔中枢=2)  AND  ZSJS,ZG,ZD,0.5,0),LINETHICK2,COLORMAGENTA;
{画中枢}
DRAWLINE((隐藏段中枢=0 OR 隐藏段中枢=2) AND DZSKS,DZG,(隐藏段中枢=0 OR 隐藏段中枢=2) AND DZSJS,DZG,0),LINETHICK2,COLORCYAN;{COLORMAGENTA}
DRAWLINE((隐藏段中枢=0 OR 隐藏段中枢=2) AND DZSKS,DZD,(隐藏段中枢=0 OR 隐藏段中枢=2) AND DZSJS,DZD,0),LINETHICK2,COLORCYAN;{COLORCYAN}
STICKLINE((隐藏段中枢=0 OR 隐藏段中枢=2) AND DZSKS,DZG,DZD,1,0),LINETHICK2,COLORCYAN;
STICKLINE((隐藏段中枢=0 OR 隐藏段中枢=2) AND DZSJS,DZG,DZD,1,0),LINETHICK2,COLORCYAN;

{画走势类型}
DRAWLINE(隐藏段=0 and ZSLXDOT=1,BG,隐藏段=0 and ZSLXDOT=-1,BD,0),LINETHICK3,COLORRED;{输出含中枢走势类型}
DRAWLINE(隐藏段=0 and ZSLXDOT=-1,BD,隐藏段=0 and ZSLXDOT=1,BG,0),LINETHICK3,COLORRED;{输出含中枢走势类型}
DRAWLINE(隐藏大级别=0 and DGZS=1,BG,隐藏大级别=0 and DGZS=-1,BD,0),LINETHICK3,COLORBLUE;{输出含中枢走势类型}
DRAWLINE(隐藏大级别=0 and DGZS=-1,BD,隐藏大级别=0 and DGZS=1,BG,0),LINETHICK3,COLORBLUE;{输出含中枢走势类型}

{中枢监视器}
DRAWLINE(隐藏笔中枢=0 and ZSKS,(ZG+ZD)/2,ZSJS,(ZG+ZD)/2,0),LINETHICK2,COLORYELLOW;

{九段升级监控}
DRAWTEXT(ZSJS<>0 AND COUNT(BI<>0, BARSLAST(ZSKS<>0)+1) >=10,ZG,'九段升级'),COLORYELLOW;

DRAWTEXT(隐藏走势判断=0 and ZSLX=1,BG,'盘整'),COLORYELLOW;{输出走势类型}
DRAWTEXT(隐藏走势判断=0 and ZSLX=2,BG,'趋势'),COLORRED;{输出走势类型}
DRAWTEXT(隐藏走势判断=0 and ZSLX=3,BG,'扩张'),COLORCYAN;{输出走势类型}
DRAWTEXT(隐藏走势判断=0 and ZSLX=4,BG,'大级别盘整'),COLORWHITE;{输出走势类型}
DRAWTEXT(隐藏走势判断=0 and ZSLX=-1,BD,'盘整'),COLORYELLOW;{输出走势类型}
DRAWTEXT(隐藏走势判断=0 and ZSLX=-2,BD,'趋势'),COLORRED;{输出走势类型}
DRAWTEXT(隐藏走势判断=0 and ZSLX=-3,BD,'扩张'),COLORCYAN;{输出走势类型}
DRAWTEXT(隐藏走势判断=0 and ZSLX=-4,BD,'大级别盘整'),COLORWHITE;{输出走势类型};

{DRAWLINE(DZSKS,DZG,DZSJS,DZG,0),LINETHICK2,COLORCYAN;
DRAWLINE(DZSKS,DZD,DZSJS,DZD,0),LINETHICK2,COLORCYAN;
STICKLINE(DZSKS,DZG,DZD,0.5,0),LINETHICK2,COLORCYAN;
STICKLINE(DZSJS,DZG,DZD,0.5,0),LINETHICK2,COLORCYAN;}

{附加功能}
{显示包含K线}
STICKLINE(显示包含=1 AND BH1<>0,BG,BD,1,0),COLORYELLOW;

{2}

DRAWTEXT(显示笔高低=1 AND BI=1,BG,NUMTOSTR( BG,3)),COLORYELLOW;
DRAWTEXT(显示笔高低=1 AND BI=-1,BD,NUMTOSTR( Bd,3)),COLORWHITE;

{3}
DF:=(REF(BG,BARSLAST(BI=1))-BD)/REF(BG,BARSLAST(BI=1))*100;
ZF:=(( BG-REF(BD,BARSLAST(BI=-1)))/BG )*100  ;
 
DRAWTEXT(笔涨跌幅=1 AND BI=-1,BD,    NUMTOSTR(DF,2)+'%' ) ,COLORYELLOW;
DRAWTEXT(笔涨跌幅=1 AND BI= 1,BG,    NUMTOSTR(ZF,2)+'%'  ),COLORYELLOW;

{每笔包含处理后K线数量，默认隐藏，把下面两行的大括号拿掉就可以了}

DRAWTEXT( 包含K线数量=1 AND BI=-1,BD,NUMTOSTR(COUNT(BH1<>0 , BARSLAST(BI=1)+1),1) ) ,COLORMAGENTA;
DRAWTEXT( 包含K线数量=1 AND BI= 1,BG,NUMTOSTR(COUNT(BH1<>0 , BARSLAST(BI=-1)+1),1)),COLORMAGENTA;

DRAWTEXT(隐藏背离提示=0 AND zh=-3,L,'双背处'),COLORYELLOW;
DRAWTEXT(隐藏背离提示=0 AND zh=-2,L,'背驰'),COLORYELLOW;
DRAWTEXT(隐藏背离提示=0 AND zh=-1,L,'背离'),COLORYELLOW;

 
DRAWTEXT(隐藏背离提示=0 AND zh=3,L,'双背处'),COLORGREEN;
DRAWTEXT(隐藏背离提示=0 AND zh=2,L,'背驰'),COLORGREEN;
DRAWTEXT(隐藏背离提示=0 AND zh=1,L,'背离'),COLORGREEN;