I added a:
Code: Select all
require = "INSERT_WEAPON_NAME_HERE"
to the main.lua write after the fireball require for all of the other weapons.
I added a:
Code: Select all
objects["INSERT_WEAPON_NAME_HERE"] = {}
to the game.lua after the fireball object for all the other weapons as well.
I added this to the if statement that starts around line 2714 in the game.lua.:
Code: Select all
elseif "tab" == key then
objects["player"][i]:chooseweapon()
I added this to the end of mario:init() in the mario.lua:
Code: Select all
self:setquad()
weapons = {}
weapons[self.playernumber] = {fireball, "fireball", bomb, "bomb", contragun, "contragun", megabuster, "megabuster"}
curweapon = {}
curweapon[self.playernumber] = 1
I added this above the mario:fire() function in the mario.lua:
Code: Select all
function mario:chooseweapon()
if curweapon[self.playernumber] + 2 <= #weapons[self.playernumber] then
curweapon[self.playernumber] = curweapon[self.playernumber] + 2
elseif curweapon[self.playernumber] + 2 > #weapons[self.playernumber] then
curweapon[self.playernumber] = 1
end
end
I replaced the mario:fire() function in the mario.lua with this:
Code: Select all
function mario:fire()
if not noupdate and self.controlsenabled and self.size == 3 then
if self.fireballcount < maxfireballs then
local dir = "right"
if upkey(self.playernumber) and downkey(self.playernumber) == false then
if rightkey(self.playernumber) and leftkey(self.playernumber) == false then
dir = "up-right"
elseif rightkey(self.playernumber) == false and leftkey(self.playernumber) then
dir = "up-left"
else
dir = "up"
end
elseif upkey(self.playernumber) == false and downkey(self.playernumber) then
if self.falling == false and self.jumping == false then
if rightkey(self.playernumber) and leftkey(self.playernumber) == false then
dir = "down-right"
elseif rightkey(self.playernumber) == false and leftkey(self.playernumber) then
dir = "down-left"
else
if self.pointingangle > 0 then
dir = "crouch-down-left"
elseif self.pointingangle <= 0 then
dir = "crouch-down-right"
end
end
elseif self.falling or self.jumping then
if rightkey(self.playernumber) and leftkey(self.playernumber) == false then
dir = "down-right"
elseif rightkey(self.playernumber) == false and leftkey(self.playernumber) then
dir = "down-left"
else
dir = "down"
end
end
else
if self.pointingangle > 0 then
dir = "left"
elseif self.pointingangle <= 0 then
dir = "right"
end
end
table.insert(objects[""..weapons[self.playernumber][curweapon[self.playernumber]+1]..""], weapons[self.playernumber][curweapon[self.playernumber]]:new(self.x, self.y, dir, self))
self.fireballcount = self.fireballcount + 1
self.fireanimationtimer = 0
self:setquad()
playsound(fireballsound)
end
end
end
Then I this from fireball.lua's fireball:init():
Code: Select all
if dir == "right" then
self.speedx = fireballspeed
self.x = x+6/16
else
self.speedx = -fireballspeed
self.x = x
end
with this:
Code: Select all
if dir == "right" then
self.speedx = fireballspeed
self.x = x+6/16
elseif dir == "left" then
self.speedx = -fireballspeed
self.x = x
elseif dir == "up" then
self.speedx = fireballspeed
self.x = x
elseif dir == "up-right" then
self.speedx = fireballspeed
self.x = x+6/16
elseif dir == "up-left" then
self.speedx = -fireballspeed
self.x = x
elseif dir == "down-right" then
self.speedx = fireballspeed
self.x = x+6/16
elseif dir == "down-left" then
self.speedx = -fireballspeed
self.x = x
elseif dir == "crouch-down-right" then
self.speedx = fireballspeed
self.x = x+6/16
self.y = y+6/16
elseif dir == "crouch-down-left" then
self.speedx = -fireballspeed
self.x = x
self.y = y+6/16
elseif dir == "down" then
self.speedx = fireballspeed
self.x = x
end
Then I created a bomb.lua file whose content is:
Code: Select all
bomb = class:new()
function bomb:init(x, y, dir, v)
--PHYSICS STUFF
self.y = y+4/16
self.speedy = -math.sqrt(2*yacceleration*3.5)
if dir == "right" then
self.speedx = fireballspeed
self.x = x+6/16
elseif dir == "left" then
self.speedx = -fireballspeed
self.x = x
elseif dir == "up" then
self.speedx = fireballspeed
self.x = x
elseif dir == "up-right" then
self.speedx = fireballspeed
self.x = x+6/16
elseif dir == "up-left" then
self.speedx = -fireballspeed
self.x = x
elseif dir == "down-right" then
self.speedx = fireballspeed
self.x = x+6/16
elseif dir == "down-left" then
self.speedx = -fireballspeed
self.x = x
elseif dir == "crouch-down-right" then
self.speedx = fireballspeed
self.x = x+6/16
self.y = y+6/16
elseif dir == "crouch-down-left" then
self.speedx = -fireballspeed
self.x = x
self.y = y+6/16
elseif dir == "down" then
self.speedx = fireballspeed
self.x = x
end
self.drawable = true
self.width = 8/16
self.height = 8/16
self.active = true
self.static = false
self.category = 13
self.mask = { true,
false, true, false, false, true,
false, true, false, true, false,
false, true, false, true, false,
true, true, false, false, false,
false, true, false, false, true,
false, false, false, false, true}
self.destroy = false
self.destroysoon = false
--self.gravity = 40
--IMAGE STUFF
self.graphic = fireballimg
self.quad = fireballquad[1]
self.offsetX = 4
self.offsetY = 4
self.quadcenterX = 4
self.quadcenterY = 4
self.fireballthrower = v
self.rotation = 0 --for portals
self.timer = 0
self.quadi = 1
self.explosiontimer = 0
end
function bomb:update(dt)
self.explosiontimer = self.explosiontimer + dt
if self.explosiontimer >= 2 then
self:explode()
end
--rotate back to 0 (portals)
self.rotation = 0
--animate
self.timer = self.timer + dt
if self.destroysoon == false then
while self.timer > staranimationdelay do
self.quadi = self.quadi + 1
if self.quadi == 5 then
self.quadi = 1
end
self.quad = fireballquad[self.quadi]
self.timer = self.timer - staranimationdelay
end
else
while self.timer > staranimationdelay do
self.quadi = self.quadi + 1
if self.quadi == 8 then
self.destroy = true
self.quadi = 7
end
self.quad = fireballquad[self.quadi]
self.timer = self.timer - staranimationdelay
end
end
if self.x < xscroll-1 or self.x > xscroll+width+1 or self.y > 15 and self.active then
self.fireballthrower:fireballcallback()
self.destroy = true
end
if self.destroy then
return true
else
return false
end
end
function bomb:leftcollide(a, b)
if a ~= "tile" and a ~= "portalwall" then
self:hitstuff(a, b)
end
self.speedx = 0
return false
end
function bomb:rightcollide(a, b)
if a ~= "tile" and a ~= "portalwall" then
self:hitstuff(a, b)
end
self.speedx = 0
return false
end
function bomb:floorcollide(a, b)
if a ~= "tile" and a ~= "portalwall" then
self:hitstuff(a, b)
end
self.speedx = self.speedx/2
self.speedy = -self.speedy/2
return false
end
function bomb:ceilcollide(a, b)
if a ~= "tile" and a ~= "portalwall" then
self:hitstuff(a, b)
end
self.speedy = -self.speedy/2
end
function bomb:passivecollide(a, b)
self:ceilcollide(a, b)
return false
end
function bomb:hitstuff(a, b)
if a == "tile" or a == "bulletbill" or a == "portalwall" or a == "spring" then
self:explode()
playsound(blockhitsound)
elseif a == "goomba" or a == "koopa" or a == "hammerbro" or a == "plant" or a == "cheep" or a == "bowser" or a == "squid" or a == "cheep" or a == "flyingfish" or a == "lakito" then
if a ~= "koopa" or b.t ~= "beetle" then
b:shotted("right")
if a ~= "bowser" then
addpoints(firepoints[a], self.x, self.y)
end
end
self:explode()
end
end
function bomb:explode()
self.offsetX = -18
self.offsetY = 22
self.width = 1000/16
self.height = 1000/16
self.graphic = fireballimg
self.quad = fireballquad[7]
for i,v in pairs(objects["goomba"]) do
if v.x >= self.x - 3 and v.x <= self.x + 3 and v.y <= self.y + 3 and v.y >= self.y - 3 then
v:shotted()
end
end
for i,v in pairs(objects["squid"]) do
if v.x >= self.x - 3 and v.x <= self.x + 3 and v.y <= self.y + 3 and v.y >= self.y - 3 then
v:shotted()
end
end
for i,v in pairs(objects["flyingfish"]) do
if v.x >= self.x - 3 and v.x <= self.x + 3 and v.y <= self.y + 3 and v.y >= self.y - 3 then
v:shotted()
end
end
for i,v in pairs(objects["cheep"]) do
if v.x >= self.x - 3 and v.x <= self.x + 3 and v.y <= self.y + 3 and v.y >= self.y - 3 then
v:shotted()
end
end
for i,v in pairs(objects["bomb"]) do
if v.x >= self.x - 3 and v.x <= self.x + 3 and v.y <= self.y + 3 and v.y >= self.y - 3 and v.hit == false then
v:shotted()
end
end
for i,v in pairs(objects["hammerbro"]) do
if v.x >= self.x - 3 and v.x <= self.x + 3 and v.y <= self.y + 3 and v.y >= self.y - 3 then
v:shotted()
end
end
love.audio.stop(shotsound)
if self.active then
self.fireballthrower:fireballcallback()
self.destroysoon = true
self.quadi = 5
self.quad = fireballquad[self.quadi]
self.active = false
end
end
and a contragun.lua with:
Code: Select all
contragun = class:new()
function contragun:init(x, y, dir, v)
--PHYSICS STUFF
self.x = x
self.y = y-1/16
self.speedy = 0
self.speedx = 0
if dir == "right" then
self.speedx = fireballspeed
self.x = x+6/16
elseif dir == "left" then
self.speedx = -fireballspeed
self.x = x
elseif dir == "up" then
self.speedy = -fireballspeed
self.x = x
elseif dir == "up-right" then
self.speedx = fireballspeed
self.speedy = -fireballspeed
self.x = x+6/16
elseif dir == "up-left" then
self.speedx = -fireballspeed
self.speedy = -fireballspeed
self.x = x
elseif dir == "down-right" then
self.speedx = fireballspeed
self.speedy = fireballspeed
self.x = x+6/16
elseif dir == "down-left" then
self.speedx = -fireballspeed
self.speedy = fireballspeed
self.x = x
elseif dir == "crouch-down-right" then
self.speedx = fireballspeed
self.x = x+6/16
self.y = y+6/16
elseif dir == "crouch-down-left" then
self.speedx = -fireballspeed
self.x = x
self.y = y+6/16
elseif dir == "down" then
self.speedy = fireballspeed
self.x = x
end
self.width = 16/16
self.height = 16/16
self.active = true
self.static = false
self.category = 13
self.gravity = 0
self.mask = { true,
true, true, false, false, true,
true, true, true, true, true,
true, true, true, true, false,
true, true, true, false, false,
true, true, false, true, true,
false, true, false, false, true}
self.destroy = false
self.destroysoon = false
--self.gravity = 40
--IMAGE STUFF
self.drawable = true
self.graphic = fireballimg
self.quad = fireballquad[1]
self.offsetX = 8
self.offsetY = 8
self.quadcenterX = 6
self.quadcenterY = 2
self.fireballthrower = v
self.rotation = 0 --for portals
self.timer = 0
self.quadi = 1
end
function contragun:update(dt)
--rotate back to 0 (portals)
self.rotation = 0
--animate
self.timer = self.timer + dt
if self.destroysoon == false then
while self.timer > staranimationdelay do
self.quadi = self.quadi + 1
if self.quadi == 5 then
self.quadi = 1
end
self.quad = fireballquad[self.quadi]
self.timer = self.timer - staranimationdelay
end
else
while self.timer > staranimationdelay do
self.quadi = self.quadi + 1
if self.quadi == 8 then
self.destroy = true
self.quadi = 7
end
self.quad = fireballquad[self.quadi]
self.timer = self.timer - staranimationdelay
end
end
if self.x < xscroll-1 or self.x > xscroll+width+1 or self.y > 15 or self.y < 0 and self.active then
self.fireballthrower:fireballcallback()
self.destroy = true
end
if self.destroy then
return true
else
return false
end
end
function contragun:leftcollide(a, b)
self.x = self.x-.5
self:hitstuff(a, b)
return false
end
function contragun:rightcollide(a, b)
self:hitstuff(a, b)
return false
end
function contragun:floorcollide(a, b)
if a ~= "tile" and a ~= "portalwall" then
self:hitstuff(a, b)
end
end
function contragun:ceilcollide(a, b)
self:hitstuff(a, b)
end
function contragun:passivecollide(a, b)
self:ceilcollide(a, b)
return false
end
function contragun:hitstuff(a, b)
if a == "tile" or a == "bulletbill" or a == "portalwall" or a == "spring" then
playsound(blockhitsound)
elseif a == "goomba" or a == "koopa" or a == "hammerbro" or a == "plant" or a == "cheep" or a == "bowser" or a == "squid" or a == "cheep" or a == "flyingfish" or a == "lakito" then
if a ~= "koopa" or b.t ~= "beetle" then
b:shotted("down")
if a ~= "bowser" then
addpoints(firepoints[a], self.x, self.y)
end
end
end
end
function contragun:explode()
if self.active then
self.fireballthrower:fireballcallback()
self.destroysoon = true
self.quadi = 9
self.quad = fireballquad[self.quadi]
self.active = false
end
end
and a megabuster.lua with this:
Code: Select all
megabuster = class:new()
function megabuster:init(x, y, dir, v)
--PHYSICS STUFF
self.x = x
self.y = y+4/16
self.speedy = 0
self.speedx = fireballspeed
self.width = 16/16
self.height = 16/16
self.active = true
self.static = false
self.category = 13
self.gravity = 0
self.mask = { true,
true, true, false, false, true,
true, true, true, true, true,
true, true, true, true, false,
true, true, true, false, false,
true, true, false, true, true,
false, true, false, false, true}
self.destroy = false
self.destroysoon = false
--self.gravity = 40
--IMAGE STUFF
self.drawable = true
self.graphic = fireballimg
self.quad = fireballquad[1]
self.offsetX = 8
self.offsetY = 8
self.quadcenterX = 6
self.quadcenterY = 2
self.fireballthrower = v
self.rotation = 0 --for portals
self.timer = 0
self.quadi = 1
end
function megabuster:update(dt)
--rotate back to 0 (portals)
self.rotation = 0
--animate
self.timer = self.timer + dt
if self.destroysoon == false then
while self.timer > staranimationdelay do
self.quadi = self.quadi + 1
if self.quadi == 5 then
self.quadi = 1
end
self.quad = fireballquad[self.quadi]
self.timer = self.timer - staranimationdelay
end
else
while self.timer > staranimationdelay do
self.quadi = self.quadi + 1
if self.quadi == 8 then
self.destroy = true
self.quadi = 7
end
self.quad = fireballquad[self.quadi]
self.timer = self.timer - staranimationdelay
end
end
if self.x < xscroll-1 or self.x > xscroll+width+1 or self.y > 15 or self.y < 0 and self.active then
self.fireballthrower:fireballcallback()
self.destroy = true
end
if self.destroy then
return true
else
return false
end
end
function megabuster:leftcollide(a, b)
self.x = self.x-.5
self:hitstuff(a, b)
return false
end
function megabuster:rightcollide(a, b)
self:hitstuff(a, b)
return false
end
function megabuster:floorcollide(a, b)
if a ~= "tile" and a ~= "portalwall" then
self:hitstuff(a, b)
end
end
function megabuster:ceilcollide(a, b)
self:hitstuff(a, b)
end
function megabuster:passivecollide(a, b)
self:ceilcollide(a, b)
return false
end
function megabuster:hitstuff(a, b)
if a == "tile" or a == "bulletbill" or a == "portalwall" or a == "spring" then
playsound(blockhitsound)
elseif a == "goomba" or a == "koopa" or a == "hammerbro" or a == "plant" or a == "cheep" or a == "bowser" or a == "squid" or a == "cheep" or a == "flyingfish" or a == "lakito" then
if a ~= "koopa" or b.t ~= "beetle" then
b:shotted("down")
if a ~= "bowser" then
addpoints(firepoints[a], self.x, self.y)
end
end
end
end
function megabuster:explode()
if self.active then
self.fireballthrower:fireballcallback()
self.destroysoon = true
self.quadi = 7
self.quad = fireballquad[self.quadi]
self.active = false
end
end
