lua学习笔记

备注：部分参考笨木头的博客（http://www.benmutou.com/archives/1844），很不错。

1、

-- 获取table的最小值
--function GetMin(theTable)
--  myString="minValue=math.min("
--  
--  for i,v in pairs(theTable) do
--    myString=string.format("%s%d%s",myString,v,",")
--  end
--  myString=string.sub(myString,1,string.len(myString)-1)
--  myString=string.format("%s%s",")")
--  
--  assert(loadstring(myString))()
--  return minValue
--end

--字符串替换
--myString="happy,hello,home"
--myString=string.gsub(myString,"h%a+","GG",2)
--print(myString)



--    function dieDaiQi(t)
--        local i = 0;
--        return function()
--            i = i + 1;            
--            return t[i];
--        end
--    end

--    function dieDaiQi(t)
--        local i = 0;
--        return function()
--            i = i + 1;   
--            if i>#t then 
--            return nil,nil
--            end         
--            return i,t[i];
--        end
--    end


--    local t = {"fdsd","445"};
--    for i,value in dieDaiQi(t) do
--        print(i..":"..value);
--    end



--local co=coroutine.create(function() print("hello") end)
--coroutine.resume(co)

--print(dofile("src/luaTex.lua"));





--------元表的操作---------------
local a={sex="boy"}
local b={sex="girl"}

local mt={}
--加法操作
mt.__add=function(a,b)
  if a.sex=="boy" and b.sex=="girl" then
    result="good"
  elseif a.sex=="girl" and b.sex=="girl" then
    result="so good"
  else
    result="shit"
  end
  return result
end
--保护元表
mt.__metatable="sorry,you can not change this model"

--查找不到的方法操作
--mt.__index=function(table,key)
--  print("给不了你要的:"..key)
--end

--备胎属性
mt.__index={
firstName="handsome",name="you are a bad boy"
}

----------------------------------
--这就是__newindex的规则：
--a.如果__newindex是一个函数，则在给table不存在的字段赋值时，会调用这个函数。
--b.如果__newindex是一个table，则在给table不存在的字段赋值时，会直接给__newindex的table赋值。
--用于监控更新
--mt.__newindex=function(table,key,value)
--  print(key.."不存在")
--end
local other={
--我们给a的name赋值的时候，实际上是给other的name赋值了。
  name="other name"
}
mt.__newindex=other

setmetatable(a,mt)
setmetatable(b,mt)


--print(getmetatable(a))

local result=a+b
print(result)

a.name="good boy..."
print(a.name)
--print(other.name)
--使用rawget和rawset可以忽略掉元表的__index和__newindex作用,相当于并不存在__index和__newindex元方法
print(rawget(a,"name"))
rawset(a,"name","after name..")
print(rawget(a,"name"))
print("----------------------------分水线------------------------")
print("nn")

print("---------------只读table----------------")
local readOnly=function(t)
  local newt={}
  local mt={
    __index=t,__newindex=function()
      error("只能读，不能改哦")
    end
  }
  setmetatable(newt,mt)
  return newt
end

local days=readOnly({"星期一","星期二","星期日"})
print(days[2])
--使用rawset,则打破了限制
rawset(days,2,"222")
print(days[2])
print("---------------只读table----------------")
print("nn")

print("----------------------------非局部变量和局部变量------------------------")
--    -- 定义一个全局变量
--    gName = "哎哟，很挫哦";
--    -- 将当前全局环境重新设置为新的table
--    setfenv(1,{g = _G});
--    -- 输出值
--    g.print(gName);
--    -- 再次定义一个全局变量
--    gName = "哎哟，有点错哦";
--    -- 再次输出值
--    g.print(gName);
--    -- 输出原来的值
--    g.print(g.gName);
--    g.print("----(1)----")

gName="哈哈"
local newG={}
setmetatable(newG,{__index=_G})
setfenv(1,newG)
for _,v in pairs(newG) do
  print("**"..v)
end
gName="哈哈..."
for _,v in pairs(newG) do
  print("**"..v)
end
print(gName)
print("------(2)使用__index-------")


local game=require("src/luaTex")
game.say()

--冒号的作用就是：定义函数时，给函数的添加隐藏的第一个参数self；调用函数时，默认把当前调用者作为第一个参数传递进去。
--使用了冒号之后，就相当于我们刚刚使用点号时一样，只是我们不再需要显式地定义self参数以及主动地传递tmp_people参数。
people={
name="xm",age=25,--setInfo=function(self,n,a)
--  self.name=n
--  self.age=a
--end
}

function people:setInfo(n,a)
  self.name=n
  self.age=a
end

function people:getInfo()
  print("name:"..self.name.."    age:"..self.age)
end


--people.setInfo("datou",30)
--people.getInfo()



tmp_people=people
--print(people.name)
--tmp_people.name="xxx"
--print(people.name)

people=nil
print(tmp_people:getInfo())

--面向对象
People={
x=0,y=0
}

function People:setPosition(x,y)
  self.x=x
  self.y=y
end

function People:new()
  o={}
--  setmetatable(o,{__index=self})
--  进行优化，避免每次都创建元表
    setmetatable(o,self)
    self.__index=self
  return o
end


--使用People进行new,所以self存的是People
local p1=People:new()
local p2=People:new()
p1:setPosition(11,22)
p2:setPosition(33,44)
print(p1.x.."   "..p1.y)
print(p2.x.."   "..p2.y)
--函数的重载
function p1:setPosition(x,y)
  print("p1的重写函数")
end
p1:setPosition(8,8)
print(p1.x.."   "..p1.y)
print("----------------------")

--使用p1进行new,所以self存的是p1
local p1_1=p1:new()
p1_1:setPosition(88,99)
print(p1_1.x.."   "..p1_1.y)

--多继承

--（1）多继承之在多个类(即table)中查找一个字段
function search(classes,key)
  for i=1,#classes do
    local value=classes[i][key]
    if value~=nil then
      return value
    end
  end
end

local t1={name="xx"}
local t2={name="oo",age=25}
--print(search({t1,t2},"name"))
print(search({t1,"age"))


--(2)多继承之创建继承多个类的子类
function createExtendsClass(...)
  local parents={...}
  local child={}

--设置类元素(也就是从多个继承类中查找一个元素)
setmetatable(child,{
__index=function(table,key)
  return search(parents,key)
end
})

--给类增加创建对象的方法
function child:new()
  o={}
  setmetatable(o,child)
  child.__index=child
  return o
end

  return child
end




tt1={name="kitty"}
function tt1:hello()
  print("hello,everyone")
end
function tt1:new()
  o={}
  setmetatable(o,self)
  self.__index=self
  return o
end



tt2={name="tom"}
function tt2:fire()
  print("hello,start fire")
end
function tt2:new()
  o={}
  setmetatable(o,self)
  self.__index=self
  return o
end

--继承两个类的子类
local extendsT=createExtendsClass(tt1,tt2)
--子类对象
local tmp_extend=extendsT:new()
tmp_extend:hello()
tmp_extend:fire()
print(tmp_extend.name)


print("-------------弱引用table----------------")
--t={}
--key2 = {name = "key2"}
--t[key2] = 1
--for i,v in pairs(t) do
--print(i.name..":"..v)
--end

t = {};
-- 给t设置一个元表，增加__mode元方法，赋值为“k”
setmetatable(t,{__mode = "k"});
-- 使用一个table作为t的key值
key1 = {name = "key1"};
t[key1] = 1;
    --key值弱引用
    key1 = nil;
    --value值弱引用
    --t[key1]=nil    
    --key和value值弱引用
    -- setmetatable(t,{__mode = "kv"});   

-- 又使用一个table作为t的key值
key2 = {name = "key2"};
t[key2] = 1;
key2 = nil;
-- 强制进行一次垃圾收集
collectgarbage();
for key,value in pairs(t) do
  print(key.name .. ":" .. value);
end