38 lines
621 B
Lua
38 lines
621 B
Lua
--Bad Apple!!
|
|
local gc=love.graphics
|
|
local back={}
|
|
|
|
local video
|
|
local X,Y,K
|
|
function back.init()
|
|
if not video then
|
|
video=gc.newVideo("parts/backgrounds/badapple.ogv",{false})
|
|
video:setFilter('linear','linear')
|
|
video:play()
|
|
end
|
|
back.resize()
|
|
end
|
|
function back.update()
|
|
if not video:isPlaying()then
|
|
video:seek(0)
|
|
end
|
|
end
|
|
function back.resize()
|
|
local W,H=SCR.w,SCR.h
|
|
if H/W>=36/48 then
|
|
K=W/48
|
|
X,Y=0,(H-W*36/48)*.5
|
|
else
|
|
K=H/36
|
|
X,Y=(W-H*48/36)*.5,0
|
|
end
|
|
end
|
|
function back.draw()
|
|
gc.clear(.1,.1,.1)
|
|
gc.setColor(1,1,1,.1)
|
|
gc.draw(video,X,Y,nil,K)
|
|
end
|
|
function back.discard()
|
|
video=nil
|
|
end
|
|
return back |