• <ins id="pjuwb"></ins>
    <blockquote id="pjuwb"><pre id="pjuwb"></pre></blockquote>
    <noscript id="pjuwb"></noscript>
          <sup id="pjuwb"><pre id="pjuwb"></pre></sup>
            <dd id="pjuwb"></dd>
            <abbr id="pjuwb"></abbr>

            劍孤寒的小站

            人生的價(jià)值不是用時(shí)間,而是用深度去衡量的!
            posts - 75, comments - 290, trackbacks - 0, articles - 0

            在Lua中使用List

            Posted on 2008-10-26 11:06 劍孤寒 閱讀(6808) 評(píng)論(0)  編輯 收藏 引用 所屬分類: Lua
            《在Lua中使用List 》
            轉(zhuǎn)載請(qǐng)注明出處:http://groups.google.com/group/jianguhan


            在《Programming in Lua》一書中提到了一個(gè)雙端隊(duì)列的實(shí)現(xiàn)方法,我把它拿來改進(jìn)了一下用在了我正在制作的一個(gè)RPG游戲里,用起覺得 來還不錯(cuò),加了一個(gè)GetSize()來取得List的大小,這個(gè)在游戲制作中用處還是很大的^_^

            源代碼如下:
            CList = class()

            function CList:ctor()
                    self.m_list = { first = 0, last = -1 }
            end

            function CList:PushFront(value)
                    local first = self.m_list.first - 1
                    self.m_list.first = first
                    self.m_list[first] = value
            end

            function CList:PushBack(value)
                    local last = self.m_list.last + 1
                    self.m_list.last = last
                    self.m_list[last] = value
            end

            function CList:PopFront()
                    local first = self.m_list.first
                    if first > self.m_list.last then return nil end
                    local value = self.m_list[first]
                    self.m_list[first] = nil
                    self.m_list.first = first + 1
                    return value
            end

            function CList:PopBack()
                    local last = self.m_list.last
                    if self.m_list.first > last then return nil end
                    local value = self.m_list[last]
                    self.m_list[last] = nil
                    self.m_list.last = last - 1
                    return value
            end

            function CList:GetSize()
                    if self.m_list.first > self.m_list.last then
                            return 0
                    else
                            return math.abs(self.m_list.last - self.m_list.first) + 1
                    end
            end

            在最前面的那句CList = class() 這里使用了云風(fēng)寫的一個(gè)class函數(shù)創(chuàng)建一個(gè)類,
            這個(gè)函數(shù)可以在云風(fēng)的博客上找到,為了方便起見我就在這里先抄一下了:

            local _class={}

            function class(super)
                    local class_type={}
                    class_type.ctor=false
                    class_type.super=super
                    class_type.new=function(...)
                                    local obj={}
                                    do
                                            local create
                                            create = function(c,...)
                                                    if c.super then
                                                            create(c.super,...)
                                                    end
                                                    if c.ctor then
                                                            c.ctor(obj,...)
                                                    end
                                            end

                                            create(class_type,...)
                                    end
                                    setmetatable(obj,{ __index=_class[class_type] })
                                    return obj
                            end
                    local vtbl={}
                    _class[class_type]=vtbl

                    setmetatable(class_type,{__newindex=
                            function(t,k,v)
                                    vtbl[k]=v
                            end
                    })

                    if super then
                            setmetatable(vtbl,{__index=
                                    function(t,k)
                                            local ret=_class[super][k]
                                            vtbl[k]=ret
                                            return ret
                                    end
                            })
                    end

                    return class_type
            end

            麻豆久久| 久久中文骚妇内射| 国产成人精品三上悠亚久久| 精品人妻伦九区久久AAA片69| 亚洲国产精品高清久久久| 久久国产欧美日韩精品免费| 一级做a爰片久久毛片16| 人妻少妇久久中文字幕| 久久精品国产亚洲麻豆| 91亚洲国产成人久久精品网址| 色综合久久天天综线观看| AV无码久久久久不卡网站下载| 久久播电影网| 狠狠干狠狠久久| 久久综合亚洲色一区二区三区| 97久久超碰国产精品旧版| 亚洲国产精品综合久久网络| 999久久久国产精品| 久久综合狠狠综合久久| 理论片午午伦夜理片久久| 久久精品国产亚洲网站| 久久久国产视频| 欧美亚洲另类久久综合婷婷| 久久久精品免费国产四虎| 婷婷综合久久中文字幕蜜桃三电影| 精品久久久久一区二区三区| 久久精品中文字幕久久| 色诱久久久久综合网ywww| 伊人热热久久原色播放www | 欧美午夜精品久久久久久浪潮| 久久99国产精品一区二区| 久久久久久九九99精品| 亚洲va国产va天堂va久久| 伊人久久大香线蕉亚洲| 亚洲国产视频久久| 蜜桃麻豆WWW久久囤产精品| 中文字幕无码av激情不卡久久| 亚洲国产成人乱码精品女人久久久不卡 | 影音先锋女人AV鲁色资源网久久| 亚洲国产成人精品91久久久 | 精品久久无码中文字幕|