Aller au contenu


Submitter

File Information

  • Submitted: juil. 08 2009 17:23
  • Last Updated: juil. 08 2009 17:23
  • File Size: 247,56 Ko
  • Views: 16
  • Downloads: 1

Download Homer Soundboard

- - - - -



pink = Color.new(255, 102, 0)

screen:print(194, 136, "Loading: 0%", pink)
screen.flip()

square = Sound.load("sounds/square.wav")
circle = Sound.load("sounds/circle.wav")
triangle = Sound.load("sounds/triangle.wav")

screen:clear()
screen:print(194, 136, "Loading: 20%", pink)
screen.flip()

cross = Sound.load("sounds/cross.wav")
left = Sound.load("sounds/left.wav")

screen:clear()
screen:print(194, 136, "Loading: 40%", pink)
screen.flip()

right = Sound.load("sounds/right.wav")
up = Sound.load("sounds/up.wav")
down = Sound.load("sounds/down.wav")

screen:clear()
screen:print(194, 136, "Loading: 60%", pink)
screen.flip()

rbutton = Sound.load("sounds/rbutton.wav")
lbutton = Sound.load("sounds/lbutton.wav")

screen:clear()
screen:print(194, 136, "Loading: 80%", pink)
screen.flip()

introimage = Image.load("intro.png")
background = Image.load("background.png")

screen:clear()
screen:print(194, 136, "Loading: 100%", pink)
screen.flip()
screen.waitVblankStart(60)

screen:blit(0, 0, introimage, false)
screen.flip()
screen.waitVblankStart(240)

while true do
screen:blit(0, 0, background, false)
pad = Controls.read()
screen.flip()

if pad:square() then
square:play()
screen.waitVblankStart(60)
end

if pad:circle() then
circle:play()
screen.waitVblankStart(62)
end

if pad:triangle() then
triangle:play()
screen.waitVblankStart(60)
end

if pad:cross() then
cross:play()
screen.waitVblankStart(120)
end

if pad:up() then
up:play()
screen.waitVblankStart(120)
end

if pad:down() then
down:play()
screen.waitVblankStart(120)
end

if pad:left() then
left:play()
screen.waitVblankStart(600)
end

if pad:right() then
right:play()
screen.waitVblankStart(60)
end

if pad:l() then
lbutton:play()
screen.waitVblankStart(120)
end

if pad:r() then
rbutton:play()
screen.waitVblankStart(60)
end

if pad:select() then screen:save("screenshot.tga") end

if pad:start() then
break
  end
  
end






Other files you may be interested in ..





  • 4 892 Total Files
  • 401 Total Categories
  • 13 Total Authors
  • 328 743 Total Downloads
  • WiiMC Latest File
  • Pass_Code Latest Submitter