游戏算法中lua脚本详解

  此外,函数本身也是一个变量,比如:
  dp@dp:~ % cat test.lua
  local mylen={}
  mylen.len3=function (x,y,z)
  return math.sqrt(x*x+y*y+z*z)
  end
  mylen.len2=function (x,y)
  return math.sqrt(x*x+y*y)
  end
  print(mylen.len2(10,9))
  print(mylen.len3(10,9,-9))
  dp@dp:~ %
  dp@dp:~ % lua test.lua
  13.453624047074
  16.186414056239
  dp@dp:~ %
  可以定义闭包,将一个函数写在另一个函数之内,定义在内部的函数可以访问外部函数的局部变量,lua中称之为closure:
  dp@dp:~ % cat test1.lua
  function mysum(i)
  local sums=0
  return function()
  sums=sums+i
  return sums
  end
  end
  my_sum=mysum(2)
  print(my_sum())
  print(my_sum())
  print(my_sum())
  my_sum=mysum(9)
  print(my_sum())
  print(my_sum())
  print(my_sum())
  dp@dp:~ % lua test1.lua
  2
  4
  6
  9
  18
  27
  dp@dp:~ %

  可以使用loadfile与dofile将整个lua代码做为函数来执行:
  > dofile("test1.lua")
  2
  4
  6
  9
  18
  27
  > dofile("test.lua")
  13.453624047074
  16.186414056239
  > myf=loadfile("test.lua")
  > myf()
  13.453624047
074
  16.186414056239
  也可以通过loadstring定义一段语句
  然后将这段语句做为一个函数执行
  > myf=loadstring("x=x*2")
  > x=10
  > myf()
  > print(x)
  20
  > myff=loadstring("x=io.read();x=x+2;print(x)")
  > myff() www.tygj123.com
  234
  236
  检查条件,触发错误
  dp@dp:~ % cat mysum.lua
  mysum=0
  while true do
  print("请输入一个数(输入0退出计算)")
  num=assert(io.read("*number"),"非数字输入")
  print(num)
  if num==0 then break end
  end
  dp@dp:~ %
  dp@dp:~ % lua mysum.lua
  请输入一个数(输入0退出计算)
  asdf
  lua: mysum.lua:4: 非数字输入
  stack traceback:
  [C]: in function 'assert'
  mysum.lua:4: in main chunk
  [C]: in ?
  dp@dp:~ %
  或
  mysum=0
  while true do
  print("请输入一个数(输入0退出计算)")
  num=io.read("*number")
  if not num then error("非数字输入") end
  print(num)
  if num==0 then break end
  End
  运行后,输入非数字会触发错误而退出
  dp@dp:~ % lua mysum1.lua
  请输入一个数(输入0退出计算)
  1342
  1342
  请输入一个数(输入0退出计算)
  asf
  lua: mynum1.lua:5: 非数字输入
  stack traceback:
  [C]: in function 'error'
  mynum1.lua:5: in main chunk
  [C]: in ?
  dp@dp:~ %
  也可使用pcall调用可能发生错误的函数,然后进一步处理错误
  my_sum=0 www.yztrans.com
  function mysum()
  while true do
  print("请输入一个数(输入0退出计算)")
  num=io.read("*number")
  if not num then error("非数字输入") end
  if num==0 then break end
  my_sum=my_sum+num
  end
  end
  if pcall(mysum) then
  print("计算完毕,累加结果:"..my_sum)
  else
  print("只能输入数字,程序异常退出!")
  print("累加结果:"..my_sum)
  end
  dp@dp:~ % lua mysum.lua
  请输入一个数(输入0退出计算)
  234
  请输入一个数(输入0退出计算)
  -324
  请输入一个数(输入0退出计算)
  88
  请输入一个数(输入0退出计算)
  123
  请输入一个数(输入0退出计算)
  0
  计算完毕,累加结果:121
  dp@dp:~ % lua mysum.lua
  请输入一个数(输入0退出计算)
  234
  请输入一个数(输入0退出计算)
  -11
  请输入一个数(输入0退出计算)
  233
  请输入一个数(输入0退出计算)
  88
  请输入一个数(输入0退出计算)
  asdf
  只能输入数字,程序异常退出!
  累加结果:544

posted on 2014-04-10 08:53  程序点滴  阅读(607)  评论(0编辑  收藏  举报

全讯网   全讯网