Programmming in Lua学习�W�记(边学�Ҏ��新ing。。�?

阵雨 — Wed, 16 Nov 2005 18:30:00 GMT

Programmming in Lua学习�W�记

author:阵雨 2005�q?1�?7�?:34:46

�W?�?序言

Lua所提供的机制是C不善于的�Q�高�U�语�a�、动态结构、简�z�，易于��试和调试�?BR>正因为如此，Lua��h��良好的安全保证，自动内存��理�Q�简便的字符串处理功�?BR>以及其他动态数据的改变�?BR>Lua��h��可扩展、简单、高效、跨�q�_��的特炏V�?/FONT>

�W?1 �?nbsp; ��L��

一个Chunk可以是一个语句，也可以是一�p�d��语句的组合，�q�可以是函数�Q�Chunk可以很大�Q�在Lua中几个Mbyte的Chunk
是很常见的�?/FONT>

全局变量不需要声明，�l�一个变量赋值后卛_��Z��q�个全局变量�Q�访问一个没有初始值的全局
变量也不会出错，只不�q�的得到的结果是:nil�?BR>如果惛_��除一个全局变量�Q�只需要将变量赋��gؓ nil.

�W?2 �?�c�d��和�?/FONT>

每个语句�l�尾的分�?';' 是可选的�Q�但是如果同一行有多个语句最好用' ; '来将光��开

Lua是动态类型语�a��Q�变量不要类型定义。lua中有8�U�基本类型分别�ؓ�Q?/FONT>

nil ,boolean ,number, string,userdata,function,thread,table

变量没有预定义的�c�d��Q�每一个变量都可能包含��M��U�类型的��|��例如�Q?/FONT>

print(type(a))  -->nil ('a' is not initialized)
a=10
print(type(a))  -->number
a="a string"
print(type(a))  -->string
a=print  -->yes ,this is valid!
a(type(a)) -->function

我们可以使用function像��用其它��g��样��?/FONT>

Nil
Lua中特�D�的�c�d��Q�它只有一个�?nil,一个全局变量没有被赋��g��前默认��gؓnil

Booleans 两个取�?false �?true ,但要注意Lua�?“所有的值”都可以用作为条�Ӟ��在控制结构的
条�g中除�?FONT color=#0000ff>false �?nil 为假�Q�其它值都为真�Q�所以Lua认�ؓ0和空�?/FONT>都是�?

Lua的字�W�串可以包含��M��数值的字符�Q�包括嵌入的0�Q�这意味着你可以存储�Q意的二进制数据在一个字�W�串里面�?BR>字符串是不可以修改的�Q�你可以创徏一个新的变量来存储你要的字�W�串
Lua可以高效率的处理长字�W�串�Q?M大小的string在Lua中是常见的�?BR>可以用单引号或者双引号来表�C�字�W�串 a="a lien" ,b='another line'
转义字符与C语言相同�?BR>可以在字�W�串中��?FONT color=#0000ff>\ddd (ddd��Z��位十�q�制数字) 方式来表�C�字�?BR>�q�可以��?FONT color=#0000ff>[[ ...]]来表�C�字�W�串�Q�这�U��Ş式的字符串可以包含多行，也可以嵌套，
而且不会解释转移字符�Q�如果第一个字�W�是换行�W�会被自动忽略掉�Q�这�U��Ş式的字符�?BR>用来包含一�D�代码是非常方便�?BR>�q�行�Ӟ��Lua会自动在string�?FONT color=#0000ff>numbers之间自动�q�行�c�d��转换�Q�当一个字�W�串使用��术
操作�W�时�Q�string会被转换成数�?BR>��管字符串和数字可以自动转换�Q�但是两者是不同的，比如 10 ~= "10".

Lua通过引用比较tables userdata functions ,也就是说当且仅当两者表�C�同一个对象时
他们才相同，nil只和nil相等。如果两个值类型不同，Lua则认��Z��们不�?/FONT>

�W?3 �?表达�?BR>

and �?or 的运��结果不是true或者false,而是和它的两个操作数相关.
a and b a or b 按照C语言的逻辑�q�算��序计算�Q�a、b两个表达式，计算到哪一个就�q�回哪一个的�?BR>例如�Q�a && b 如果 a为false,那么无须计算b 卛_��知表辑ּ�为false
所�?nbsp;a and b的结果是如果a为false,则返回a,否则�q�回b

一个很实用的技巧，x = x or v
C语言中的 a ? b:c �{��h于Lua中的 (a and b) or c

�q�算�W�的优先�U?可惜没有位运��?IMG height=19 src="http://www.shnenglu.com/Emoticons/cry_smile.gif" width=19 border=0>)�Q?/FONT>

^
not -(unary)
* /
+ -
..
< > <= >= ~= ==
and
or

除了^�?.. 之外所有的二元�q�算�W�都是左�q�接的�?/FONT>

Lua中的表可以用字符串和数字作�ؓindex,如tt={name="table",["size"]=2�Q�[3]="number"}
如果不��用数字表辑ּ��Q�Lua则自动从数字 1 开始作为index,�?FONT color=#0000ff>tt={"table",2} 那么tt[1]=="table,tt[2]==2
在构造函��C��,域分隔符逗号(,)是可以用分号(;)替代的，通常我们用分��h��分割不同�c�d��的表元素。如�Q?BR>tt={x=10,y=45 ; "one","two","three"}
The syntax var.NAME is just syntactic sugar for var["NAME"]:

阵雨 2005-11-17 02:30 发表评论

Lua实现�?位运��?模块

阵雨 — Thu, 10 Nov 2005 19:08:00 GMT

--[[
Description:
    FileName:bit.lua
    This module provides a selection of bitwise operations.
History:
    Initial version created by  阵雨 2005-11-10.
Notes:
  ....
]]
--[[{2147483648,1073741824,536870912,268435456,134217728,67108864,33554432,16777216,
        8388608,4194304,2097152,1048576,524288,262144,131072,65536,
        32768,16384,8192,4096,2048,1024,512,256,128,64,32,16,8,4,2,1}
        ]]

bit={data32={}}
for i=1,32 do
    bit.data32[i]=2^(32-i)
end

function bit:d2b(arg)
    local   tr={}
    for i=1,32 do
        if arg >= self.data32[i] then
        tr[i]=1
        arg=arg-self.data32[i]
        else
        tr[i]=0
        end
    end
    return   tr
end   --bit:d2b

function    bit:b2d(arg)
    local   nr=0
    for i=1,32 do
        if arg[i] ==1 then
        nr=nr+2^(32-i)
        end
    end
    return  nr
end   --bit:b2d

function    bit:_xor(a,b)
    local   op1=self:d2b(a)
    local   op2=self:d2b(b)
    local   r={}

    for i=1,32 do
        if op1[i]==op2[i] then
            r[i]=0
        else
            r[i]=1
        end
    end
    return  self:b2d(r)
end --bit:xor

function    bit:_and(a,b)
    local   op1=self:d2b(a)
    local   op2=self:d2b(b)
    local   r={}

    for i=1,32 do
        if op1[i]==1 and op2[i]==1  then
            r[i]=1
        else
            r[i]=0
        end
    end
    return  self:b2d(r)

end --bit:_and

function    bit:_or(a,b)
    local   op1=self:d2b(a)
    local   op2=self:d2b(b)
    local   r={}

    for i=1,32 do
        if  op1[i]==1 or   op2[i]==1   then
            r[i]=1
        else
            r[i]=0
        end
    end
    return  self:b2d(r)
end --bit:_or

function    bit:_not(a)
    local   op1=self:d2b(a)
    local   r={}

    for i=1,32 do
        if  op1[i]==1   then
            r[i]=0
        else
            r[i]=1
        end
    end
    return  self:b2d(r)
end --bit:_not

function    bit:_rshift(a,n)
    local   op1=self:d2b(a)
    local   r=self:d2b(0)

    if n < 32 and n > 0 then
        for i=1,n do
            for i=31,1,-1 do
                op1[i+1]=op1[i]
            end
            op1[1]=0
        end
    r=op1
    end
    return  self:b2d(r)
end --bit:_rshift

function    bit:_lshift(a,n)
    local   op1=self:d2b(a)
    local   r=self:d2b(0)

    if n < 32 and n > 0 then
        for i=1,n   do
            for i=1,31 do
                op1[i]=op1[i+1]
            end
            op1[32]=0
        end
    r=op1
    end
    return  self:b2d(r)
end --bit:_lshift

function    bit:print(ta)
    local   sr=""
    for i=1,32 do
        sr=sr..ta[i]
    end
    print(sr)
end

bs=bit:d2b(7)
bit:print(bs)
-->00000000000000000000000000000111
bit:print(bit:d2b(bit:_not(7)))
-->11111111111111111111111111111000
bit:print(bit:d2b(bit:_rshift(7,2)))
-->00000000000000000000000000000001
bit:print(bit:d2b(bit:_lshift(7,2)))
-->00000000000000000000000000011100
print(bit:b2d(bs))                      -->     7
print(bit:_xor(7,2))                    -->     5
print(bit:_and(7,4))                    -->     4
print(bit:_or(5,2))                     -->     7

--end of bit.lua

阵雨 2005-11-11 03:08 发表评论

欧美一级黄色网,国产精品免费网站,欧美区高清在线

Programmming in Lua学习�W�记(边学�Ҏ��新ing。。�?

Programmming in Lua学习�W�记

�W?�?序言

Lua实现�?位运��?模块