|
|
| Line 1: |
Line 1: |
| − | -- EXF: Example Framework
| |
| − | --
| |
| − | -- This should make examples easier and more enjoyable to use.
| |
| − | --这个东西神奇就神奇在可以把所有的例子都放到一个文件里面调用
| |
| − | --注意需要给文件起名字时候起名格式为 "e"..tostring(0099)..".lua"就是"e"+四位数+".lua"后缀 注意四位数从大于0开始到9999中间不能重复
| |
| − | -- All examples in one application! Yaay!
| |
| − | --
| |
| − | -- Updated by Dresenpai
| |
| | | | |
| − | exf = {}
| |
| − | exf.current = nil
| |
| − |
| |
| − | exf.available = {}
| |
| − |
| |
| − | function love.load()
| |
| − |
| |
| − | exf.list = List:new()
| |
| − | exf.smallfont = love.graphics.newFont(love._vera_ttf,12)
| |
| − | exf.bigfont = love.graphics.newFont(love._vera_ttf, 24)
| |
| − | exf.list.font = exf.smallfont
| |
| − |
| |
| − | exf.bigball = love.graphics.newImage("images/love-big-ball.png")
| |
| − |
| |
| − | -- Find available demos.
| |
| − | local files = love.filesystem.enumerate("")
| |
| − |
| |
| − | for i,v in ipairs(files) do
| |
| − | local unused1, unused2, n = string.find(v, "e(%d%d%d%d)%.lua")
| |
| − | if n then
| |
| − | table.insert(exf.available, v);
| |
| − | local file = love.filesystem.newFile(v, love.file_read)
| |
| − | file:open("r")
| |
| − | local contents = love.filesystem.read(v,100)
| |
| − | local s, e, c = string.find(contents, "Example: ([%a%p ]-)[\r\n]")
| |
| − | file:close(file)
| |
| − | if not c then c = "Untitled" end
| |
| − | local title = exf.getn(n) .. " " .. c
| |
| − | exf.list:add(title)
| |
| − |
| |
| − | end
| |
| − | end
| |
| − |
| |
| − | exf.list:done()
| |
| − | exf.resume()
| |
| − | end
| |
| − |
| |
| − | function love.update(dt) end
| |
| − | function love.draw() end
| |
| − | function love.keypressed(k) end
| |
| − | function love.keyreleased(k) end
| |
| − | function love.mousepressed(x, y, b) end
| |
| − | function love.mousereleased(x, y, b) end
| |
| − |
| |
| − | function exf.empty() end
| |
| − |
| |
| − | function exf.update(dt)
| |
| − | exf.list:update(dt)
| |
| − | end
| |
| − |
| |
| − | function exf.draw()
| |
| − | love.graphics.setBackgroundColor(54, 172, 248)
| |
| − |
| |
| − | love.graphics.setColor(255, 255, 255)
| |
| − | love.graphics.setFont(exf.bigfont)
| |
| − | love.graphics.print("Example Browser", 50, 50)
| |
| − | love.graphics.print("Usage", 500, 50)
| |
| − |
| |
| − | love.graphics.setFont(exf.smallfont)
| |
| − | love.graphics.print("Browse and click on the example you \nwant to run. To return the the example \nselection screen, press escape.\n\nIf you would like to add an \nexample, please contact us! ^.^)/", 500, 80)
| |
| − |
| |
| − |
| |
| − |
| |
| − | love.graphics.draw(exf.bigball, 800 - 256, 600 - 192)
| |
| − |
| |
| − | exf.list:draw()
| |
| − | end
| |
| − |
| |
| − | function exf.keypressed(k)
| |
| − | end
| |
| − |
| |
| − | function exf.keyreleased(k)
| |
| − | end
| |
| − |
| |
| − | function exf.mousepressed(x, y, b)
| |
| − | exf.list:mousepressed(x, y, b)
| |
| − | end
| |
| − |
| |
| − | function exf.mousereleased(x, y, b)
| |
| − | exf.list:mousereleased(x, y, b)
| |
| − | end
| |
| − |
| |
| − | function exf.getn(n)
| |
| − | local s = ""
| |
| − | n = tonumber(n)
| |
| − | local r = n
| |
| − | if r <= 0 then error("Example IDs must be bigger than 0. (Got: " .. r .. ")") end
| |
| − | if r >= 10000 then error("Example IDs must be less than 10000. (Got: " .. r .. ")") end
| |
| − | while r < 1000 do
| |
| − | s = s .. "0"
| |
| − | r = r * 10
| |
| − | end
| |
| − | s = s .. n
| |
| − | return s
| |
| − | end
| |
| − |
| |
| − | function exf.intable(t, e)
| |
| − | for k,v in ipairs(t) do
| |
| − | if v == e then return true end
| |
| − | end
| |
| − | return false
| |
| − | end
| |
| − |
| |
| − | function exf.start(item)
| |
| − | local e_id = string.sub(item, 1, 4)
| |
| − | local e_rest = string.sub(item, 5)
| |
| − | local file = "e" .. e_id .. ".lua"
| |
| − |
| |
| − | if exf.intable(exf.available, file) then
| |
| − | if not love.filesystem.exists(file) then
| |
| − | print("Could not load game .. " .. file)
| |
| − | else
| |
| − |
| |
| − | -- Clear all callbacks.
| |
| − | love.load = exf.empty
| |
| − | love.update = exf.empty
| |
| − | love.draw = exf.empty
| |
| − | love.keypressed = exf.empty
| |
| − | love.keyreleased = exf.empty
| |
| − | love.mousepressed = exf.empty
| |
| − | love.mousereleased = exf.empty
| |
| − |
| |
| − | love.filesystem.load(file)()
| |
| − | exf.clear()
| |
| − |
| |
| − | love.graphics.setCaption(e_rest)
| |
| − |
| |
| − | -- Redirect keypress
| |
| − | local o_keypressed = love.keypressed
| |
| − | love.keypressed =
| |
| − | function(k)
| |
| − | if k == "escape" then
| |
| − | exf.resume()
| |
| − | end
| |
| − | o_keypressed(k)
| |
| − | end
| |
| − |
| |
| − | love.load()
| |
| − | end
| |
| − | else
| |
| − | print("Example ".. e_id .. " does not exist.")
| |
| − | end
| |
| − | end
| |
| − |
| |
| − | function exf.clear()
| |
| − | love.graphics.setBackgroundColor(0,0,0)
| |
| − | love.graphics.setColor(255, 255, 255)
| |
| − | love.graphics.setLine(1, "smooth")
| |
| − | love.graphics.setColorMode("replace")
| |
| − | love.graphics.setBlendMode("alpha")
| |
| − | love.mouse.setVisible(true)
| |
| − | end
| |
| − |
| |
| − | function exf.resume()
| |
| − | load = nil
| |
| − | love.update = exf.update
| |
| − | love.draw = exf.draw
| |
| − | love.keypressed = exf.keypressed
| |
| − | love.keyreleased = exf.keyreleased
| |
| − | love.mousepressed = exf.mousepressed
| |
| − | love.mousereleased = exf.mousereleased
| |
| − |
| |
| − | love.mouse.setVisible(true)
| |
| − | love.graphics.setCaption("LOVE Example Browser")
| |
| − |
| |
| − | end
| |
| − |
| |
| − | function inside(mx, my, x, y, w, h)
| |
| − | return mx >= x and mx <= (x+w) and my >= y and my <= (y+h)
| |
| − | end
| |
| − |
| |
| − |
| |
| − | ----------------------
| |
| − | -- List object
| |
| − | ----------------------
| |
| − |
| |
| − | List = {}
| |
| − |
| |
| − | function List:new()
| |
| − | o = {}
| |
| − | setmetatable(o, self)
| |
| − | self.__index = self
| |
| − |
| |
| − | o.items = {}
| |
| − |
| |
| − | o.x = 50
| |
| − | o.y = 70
| |
| − |
| |
| − | o.width = 400
| |
| − | o.height = 500
| |
| − |
| |
| − | o.item_height = 23
| |
| − | o.sum_item_height = 0
| |
| − |
| |
| − | o.bar_size = 20
| |
| − | o.bar_pos = 0
| |
| − | o.bar_max_pos = 0
| |
| − | o.bar_width = 15
| |
| − | o.bar_lock = nil
| |
| − |
| |
| − | return o
| |
| − | end
| |
| − |
| |
| − | function List:add(item)
| |
| − | table.insert(self.items, item)
| |
| − | end
| |
| − |
| |
| − | function List:done()
| |
| − |
| |
| − | self.items.n = #self.items
| |
| − |
| |
| − | -- Recalc bar size.
| |
| − | self.bar_pos = 0
| |
| − |
| |
| − | local num_items = (self.height/self.item_height)
| |
| − | local ratio = num_items/self.items.n
| |
| − | self.bar_size = self.height * ratio
| |
| − | self.bar_max_pos = self.height - self.bar_size - 3
| |
| − |
| |
| − | -- Calculate height of everything.
| |
| − | self.sum_item_height = (self.item_height+1) * self.items.n + 2
| |
| − |
| |
| − | end
| |
| − |
| |
| − | function List:hasBar()
| |
| − | return self.sum_item_height > self.height
| |
| − | end
| |
| − |
| |
| − | function List:getBarRatio()
| |
| − | return self.bar_pos/self.bar_max_pos
| |
| − | end
| |
| − |
| |
| − | function List:getOffset()
| |
| − | local ratio = self.bar_pos/self.bar_max_pos
| |
| − | return math.floor((self.sum_item_height-self.height)*ratio + 0.5)
| |
| − | end
| |
| − |
| |
| − | function List:update(dt)
| |
| − | if self.bar_lock then
| |
| − | local dy = math.floor(love.mouse.getY()-self.bar_lock.y+0.5)
| |
| − | self.bar_pos = self.bar_pos + dy
| |
| − |
| |
| − | if self.bar_pos < 0 then
| |
| − | self.bar_pos = 0
| |
| − | elseif self.bar_pos > self.bar_max_pos then
| |
| − | self.bar_pos = self.bar_max_pos
| |
| − | end
| |
| − |
| |
| − | self.bar_lock.y = love.mouse.getY()
| |
| − |
| |
| − | end
| |
| − | end
| |
| − |
| |
| − | function List:mousepressed(mx, my, b)
| |
| − | if self:hasBar() then
| |
| − | if b == "l" then
| |
| − | local x, y, w, h = self:getBarRect()
| |
| − | if inside(mx, my, x, y, w, h) then
| |
| − | self.bar_lock = { x = mx, y = my }
| |
| − | end
| |
| − | end
| |
| − |
| |
| − | local per_pixel = (self.sum_item_height-self.height)/self.bar_max_pos
| |
| − | local bar_pixel_dt = math.floor(((self.item_height)*3)/per_pixel + 0.5)
| |
| − |
| |
| − | if b == "wd" then
| |
| − | self.bar_pos = self.bar_pos + bar_pixel_dt
| |
| − | if self.bar_pos > self.bar_max_pos then self.bar_pos = self.bar_max_pos end
| |
| − | elseif b == "wu" then
| |
| − | self.bar_pos = self.bar_pos - bar_pixel_dt
| |
| − | if self.bar_pos < 0 then self.bar_pos = 0 end
| |
| − | end
| |
| − | end
| |
| − |
| |
| − | if b == "l" and inside(mx, my, self.x+2, self.y+1, self.width-3, self.height-3) then
| |
| − | local tx, ty = mx-self.x, my + self:getOffset() - self.y
| |
| − | local index = math.floor((ty/self.sum_item_height)*self.items.n)
| |
| − | local f = self.items[index+1]
| |
| − | if f then
| |
| − | exf.start(f)
| |
| − | end
| |
| − | end
| |
| − | end
| |
| − |
| |
| − | function List:mousereleased(x, y, b)
| |
| − | if self:hasBar() then
| |
| − | if b == "l" then
| |
| − | self.bar_lock = nil
| |
| − | end
| |
| − | end
| |
| − | end
| |
| − |
| |
| − | function List:getBarRect()
| |
| − | return
| |
| − | self.x+self.width+2, self.y+1+self.bar_pos,
| |
| − | self.bar_width-3, self.bar_size
| |
| − | end
| |
| − |
| |
| − | function List:getItemRect(i)
| |
| − | return
| |
| − | self.x+2, self.y+((self.item_height+1)*(i-1)+1)-self:getOffset(),
| |
| − | self.width-3, self.item_height
| |
| − | end
| |
| − |
| |
| − | function List:draw()
| |
| − | love.graphics.setLine(1, "rough")
| |
| − | love.graphics.setFont(self.font)
| |
| − |
| |
| − | love.graphics.setColor(48, 156, 225)
| |
| − |
| |
| − | local mx, my = love.mouse.getPosition()
| |
| − |
| |
| − | -- Get interval to display.
| |
| − | local start_i = math.floor( self:getOffset()/(self.item_height+1) ) + 1
| |
| − | local end_i = start_i+math.floor( self.height/(self.item_height+1) ) + 1
| |
| − | if end_i > self.items.n then end_i = self.items.n end
| |
| − |
| |
| − |
| |
| − | love.graphics.setScissor(self.x, self.y, self.width, self.height)
| |
| − |
| |
| − | -- Items.
| |
| − | for i = start_i,end_i do
| |
| − |
| |
| − | local x, y, w, h = self:getItemRect(i)
| |
| − | local hover = inside(mx, my, x, y, w, h)
| |
| − |
| |
| − | if hover then
| |
| − | love.graphics.setColor(72, 131, 168)
| |
| − | else
| |
| − | love.graphics.setColor(48, 156, 225)
| |
| − | end
| |
| − |
| |
| − | love.graphics.rectangle("fill", x, y, w, h)
| |
| − |
| |
| − | if hover then
| |
| − | love.graphics.setColor(255, 255, 255)
| |
| − | else
| |
| − | love.graphics.setColor(197, 232, 255)
| |
| − | end
| |
| − |
| |
| − | local e_id = string.sub(self.items[i], 1, 5)
| |
| − | local e_rest = string.sub(self.items[i], 5)
| |
| − |
| |
| − | love.graphics.print(e_id, x+10, y+2) --Updated y placement -- Used to change position of Example IDs
| |
| − | love.graphics.print(e_rest, x+50, y+2) --Updated y placement -- Used to change position of Example Titles
| |
| − |
| |
| − | end
| |
| − |
| |
| − | love.graphics.setScissor()
| |
| − |
| |
| − | -- Bar.
| |
| − | if self:hasBar() then
| |
| − | local x, y, w, h = self:getBarRect()
| |
| − | local hover = inside(mx, my, x, y, w, h)
| |
| − |
| |
| − | if hover or self.bar_lock then
| |
| − | love.graphics.setColor(72, 131, 168)
| |
| − | else
| |
| − | love.graphics.setColor(48, 156, 225)
| |
| − | end
| |
| − | love.graphics.rectangle("fill", x, y, w, h)
| |
| − | end
| |
| − |
| |
| − | -- Border.
| |
| − | love.graphics.setColor(72, 131, 168)
| |
| − | love.graphics.rectangle("line", self.x+self.width, self.y, self.bar_width, self.height)
| |
| − | love.graphics.rectangle("line", self.x, self.y, self.width, self.height)
| |
| − |
| |
| − | end
| |
