最近做一个Director互动项目，需要统计总的脚本代码的行数。记得之前有人写过类似的工具。懒得去找了，自己顺手写了一个，特分享一下。如有bug欢迎指出。 

-- 代码总行数统计函数 getTotalScriptLines(tCast)

--tCast大于0时 ，返回指定编号 的演员库的总代码行数。 如：put getTotalScriptLines(1)

--tCast为字符串，返回指定名称 的演员库的总代码行数。 如：put getTotalScriptLines("TweenEngine")

--tCast等于0时 ，返回所有演员库的总代码行数。             如：put getTotalScriptLines(0)

on getTotalScriptLines tCast

  lineNum = 0

  if tCast > 0 then

    n = the number of members of castLib tCast

    repeat with i = 1 to n    

      if member(i, tCast).type = #script then      

        lineNum = lineNum + member(i, tCast).scriptText.line.count      

      end if    

    end repeat 

  else if tCast = 0 then

    --参数为0使用递归统计所有演员库的代码行数

    c = the number of castLibs

    repeat with i = 1 to c

      lineNum = lineNum + getTotalScriptLines(i)

    end repeat

  end if  

  return lineNum

end