-- 单行注释
--[[
????[多行注释]
--]]
?
----------
- 1. 变量 & 控制流
----------
num = 23 -- 数字都是双精度
str = 'aspythonstring' -- 像 Python 一样不可变
str = "aspythonuse" -- 可以双引号
str = [[
????????像 Python 的多行注释可用于
????????表示多行字符串一样
????????方便
????]]
?
bol = nil -- 未定义；支持垃圾回收
?
-- 缩进只为易读性，像 Matlab 一样以 end 结尾
while num < 50 do
????num = num + 1 -- 没有 ++ 或 += 自增操作符号
end
?
-- IF 条件开关
if num > 40 then
????print('> 40')
elseif s ~= 'aspython' then -- ~= 表示 !=
????io.write('s is not aspython') -- 风骚的标准输出
else
????thisIsGlobal = 5 -- 驼峰式命名
????-- 显示声明局部变量（像 Javascript 一样）
????local line = io.read()
?
????-- .. 作为字符串连接符
????print('凛冬将至' .. line)
end
?
-- 引用未定义变量将返回 nil ，这不是错误
foo = anUnknownVariable? -- 等价于 foo = nil
?
aBoolValue = false
-- 只有 nil 与 false 为逻辑假； 数字 0 与空字串 '' 为真！
if not aBoolValue then print('false') end
?
-- 像 Python 一样运用 'or' 和 'and'
-- 得到 C 语言中 a ? b : c 的效果；需注意 b = false 或 nil 的情况
ans = aBoolValue and 'yes' or 'no'
?
karlSum = 0
for i = 1,100 do -- 像 Matlab 一样的递增语法，包括两端，如同数学中[1,100]
????karlSum = karlSum + i
end
?
-- Step 为 2 递减的方式 '100,1,-2'
for j = 100,1,-2 then print(j) end
?
-- 综上，范围可表示为 "begin,end [,step]"
?
-- 另一个循环控制
num = 23
repeat
????print('凡人必有一死')
????num = num - 1
until num == 0
?
?
----------
- 2. 函数
----------
function fib(n)
????if n < 2 then return 1 end
????return fib(n - 2) + fib(n - 1)
end
?
-- Javascript 一样的匿名函数与闭包
function adder(x)
????-- 返回一个函数
????-- 闭包内封存 x 值
????return function (y) return x + y end
end
a1 = adder(9)
a2 = adder(36)
print(a1(16))? --> 25
print(a2(64))? --> 100
?
-- 遇到不匹配的列表长度时
-- 过长的变量将被赋予 nil
-- 过长的值将被忽略
?
x,y,z = 1,2,3,4 -- 4 将被忽略
function bar(a,b,c)
????print(a,c)
????return 4,8,15,16,23,42
end
=
bar('zaphod')? --> "zaphod? nil nil"
-- x = 4,y = 8,其余值被忽略
?
-- 函数与其他类型一样为一等公民
-- 同样有 local/global 之分
-- 像 Javascript 一样定义
function f(x) return x * x end
f = function (x) return x * x end
?
print 'Hello World!' -- 只有一个`字符串`参数时可省略括号
?
----------
- 3. 表(Table)
----------
-- 表是 Lua 中唯一的复合类型
-- 像 PHP 中的数组或 Javascript 中的 Object 一样
-- 可用作 list/dict/map
?
-- 默认以字符串作为 key
t = {key1 = 'value1',key2 = false}
-- 像 Javascript 一样以 . 取值
print(t.key1) --> "value1"
t.key3 = {} -- 加入新的键值对
t.key2 = nil -- 销毁一组键值对
?
-- 理论上任何非 nil 的变量都可以作为 key
u = {['@!#'] = 'qbert',[{}] = 1729,[6.28] = 'tau'}
print(u[6.28])? --> "tau"
a = u['@!#'] -- a = 'qbert'
b = u[{}] -- b = nil；像 Javascript 一样 {} 会创建新的对象
??????????-- 因此不要用蛋疼的 key 值，老老实实用字串或数字
?
-- 同字符串一样，只有一个表作为函数的参数时可以省略括号
-- 为了一个括号增加阅读难度，得不偿失
function h(x) print(x.key1) end
h{key1 = 'Sonmi~451'}? --> "Sonmi~451"
?
for key,val in pairs(u) do? -- 像 Python? 一样的键值迭代
????print(key,val)
end
?
-- 像 Javascript 一样的全局作用域 _G
print(_G['_G'] == _G) --> true
?
-- 省略 key 之后即可变身为 list
-- 实际上是以递增自然数为 key
v = {'value1','value2',1.21,'gigawatts'}
#v do? -- 像 Bash 一样，#v 表示列表长度
????print(v[i])? -- 像 Matlab 一样，列表索引从 1 开始
end
?
----------
- 3.1 Metatables & metamethods
----------
-- 元表(metatable)就是表的表，像 Javascript 的原型(prototype)一样
-- 为表重载一些元方法(metamethods)
?
f1 = {a = 1,b = 2}
f2 = {a = 2,b = 3}
-- s = f1 + f2 为错
?
mm = {}
function mm.__add(x,y)
??sum = {}
??sum.a = x.a + y.a
??sum.b = x.b + y.b
??return sum
end
?
setmetatable(f1,mm)
setmetatable(f2,mm)
?
-- 实际调用 f1 的 metatable 中的 __add(f1,f2)
-- 只为 f1 设置元表也可以
s = f1 + f2 -- s = {a = 3,b = 5}
?
-- s2 = s + s 为错，s 未定义元表
?
-- __index 元方法重载表中 key 的提取符号 `.`
defaultFavs = {animal = 'gru',food = 'donuts'}
myFavs = {food = 'pizza'}
setmetatable(myFavs,{__index = defaultFavs})
food = myFavs.food
?
-- Lua 中的值都具有元方法，只有 Table 可以重载
-- 所有元方法如下
?
-- __add(a,b)???????????????????? for a + b
-- __sub(a,b)???????????????????? for a - b
-- __mul(a,b)???????????????????? for a * b
-- __div(a,b)???????????????????? for a / b
-- __mod(a,b)???????????????????? for a % b
-- __pow(a,b)???????????????????? for a ^ b
-- __unm(a)??????????????????????? for -a
-- __concat(a,b)????????????????? for a .. b
-- __len(a)??????????????????????? for #a
-- __eq(a,b)????????????????????? for a == b
-- __lt(a,b)????????????????????? for a < b
-- __le(a,b)????????????????????? for a <= b
-- __index(a,b)? <fn or a table>? for a.b
-- __newindex(a,c)???????????? for a.b = c
-- __call(a,...)????????????????? for a(...)
?
----------
- 3.2 类风格的 Table 与继承
----------
?
-- 像 Javascript 一样并没有内置 Class
-- 但可以通过 Table `{}` 实现
?
Dog = {}??????????????????????????????? -- 1.
function Dog:new()????????????????????? -- 2.
????newObj = {sound = 'woof'}?????????? -- 3.
????self.__index = self???????????????? -- 4.
????return setmetatable(newObj,self)?? -- 5.
end
function Dog:makeSound()??????????????? -- 6.
????print('I say ' .. self.sound)
end
?
mrDog = Dog:new()?????????????????????? -- 7.
mrDog:makeSound() --> "I say woof"
?
-- 1. Dog 像类但实际是 Table
-- 2. Dog:new(...) := Dog.new(self,...)
-- 3. newObj 作 Dog 的实例
-- 4. self 是 Lua 中默认的参数，在这里 self = Dog
--??? 继承的时候可以改变
--??? self.__index 与 self 的元方法 __index 不是一回事
--??? self = {__index = self,metatable = {__index = ...}}
-- 5. setmetatable(newObj,self) 相当于 setmetatable(newObj,{__index = self})
--??? 赋予实例所有类方法
-- 6. 同 2.
-- 7. mrDog = Dog.new(Dog)
?
-- 继承
LoudDog = Dog:new()
function LoudDog:makeSound()
????s = self.sound .. ' '
????print(s .. s .. s)
end
seymour = LoudDog:new()
seymour:makeSound() --> "woof woof woof"
?
----------
- 4. 模块
----------
?
-- 以下来自文件 mod.lua
local M = {}
?
local function sayMyName()
????print('Hrunkner')
end
?
function M.sayHello()
????print('Why hello there')
????sayMyName()
end
return M
-- 以上
-- 回到主文件
local mod = require('mod') -- 运行 mod.lua 中的代码
-- 操作同下
local mod = (function()
????-- 像 Javascript 一样
????--[[
????????mod.lua 中的代码
????]]--
end)()
?
mod.sayHello() --> "Why hello there"
mod.sayMyName() --> 错！sayMyName() 是 mod.lua 中的局部变量
?
-- require 返回的值将被缓存
-- 即使多次调用 require 被调用文件也只运行一次
?
-- mod2.lua 包含 print("mod2")
local a = require("mod2") --> "mod2"
local b = require("mod2") -- 不输出， 实际为 b = a
?
-- dofile 是不缓存的版本的 require
dofile("mod2") --> "mod2"
dofile("mod2") --> "mod2"
?
-- loadfile 读取文件但不执行
-- 勘误：f = loadfile('mod2')，需加后缀名，否则找不到文件
f = loadfile('mod2.lua')
f() --> "mod2"
?
-- loadstring 读取代码字符串
f = loadstring("print('Lua is cool!')")
f() --> "Lua is cool!"
?
----------
- 5. 参考，略
----------