1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
|
alwaysfire = false
players = {}
function addplayer(x, y, sprite, bulletsprite)
local player = {
health = 3,
x = x,
y = y,
w = 8,
h = 8,
--sprite = sprite,
--bulletsprite = bulletsprite,
ymov = 0,
inv = 2,
id = #players,
shootcooldown = 0.0,
particlecooldown = 0.0,
shootspeed = 0.25,
shoot3 = false
}
function player:draw()
-- print(player.health)
--draw a different sprite when moving, and blink when hurt
if (player.inv < 0 or flashtime == 1) and player.health > 0 then
if (player.ymov == 0) then
spr(sprite, player.x, player.y)
elseif (player.ymov == 1) then
spr(sprite+1, player.x, player.y)
elseif (player.ymov == -1) then
spr(sprite+1, player.x, player.y, 1, 1, false, true)
end
end
end
function player.shot()
--when the player is shot, reduce health and make temporarily invincible
--also remove any powerups, shake the screen, and spawn an explosion.
player.health -= 1
player.inv = 1
player.shootspeed = 0.25
player.shoot3 = false
shake = 9
sfx(10, 1)
explosion(player.x, player.y)
if isgameover() then --FUCK, GAME OVER YOU DIED!
gameover = true -- gameover set to true
respawntimer = 5 --respawns all players in 5 seconds
player.inv = 20
for i = 1, #enemies, 1 do
enemies[i].health = -1
end
sfx(11, 3)
sfx(29, 1)
elseif player.health <= 0 then
currentscore = ceil(currentscore * 0.5) --halves score if coop
sfx(11, 3)
player.inv = 5
end
end
function player.respawn()
player.health = 3
player.inv = 3
for i = 1, 8, 1 do
addcircle(player.x+4, player.y+4, sin(i/8), cos(i/8), 2, 0.6, 7)
end
--normal and light respawn sfx for co-op
if #players == 1 then
sfx(27, 1)
else
sfx(28, 1)
end
end
function player:update()
--movement
if player.health > 0 then -- can only input if alive!!!
if btn(0, player.id) then
player.x -= 1
elseif btn(1, player.id) then
player.x += 1
end
if btn(2, player.id) then
player.y -= 1
player.ymov = 1
elseif btn(3, player.id) then
player.y += 1
player.ymov = -1
else
player.ymov = 0
end
end
player.x = mid(0, player.x, 120)
player.y = mid(0, player.y, 120)
--particles from rockets, and smoke/sparks from damage
player.particlecooldown -= ft
if player.particlecooldown < 0 and player.health > 0 then
addcircle(player.x-1, player.y, -0.5, 0, 1.5, 0.5, 9)
addcircle(player.x-1, player.y+7, -0.5, 0, 1.5, 0.5, 9)
if player.health < 3 then
addcircle(player.x+rnd(8), player.y+rnd(8), rnd(1.5)-0.75, -1.5, 1, rnd(1)+0.5, 9, -0.1)
if player.health < 2 then
damagesmoke(player)
end
end
player.particlecooldown = 0.1
end
--shooting after cooldown
player.shootcooldown -= ft
player.inv -= ft
if (btn(4, player.id) or alwaysfire) and player.shootcooldown < 0 and player.health > 0 then
--for i = 1, 4, 1 do
--addcircle(player.x+3, player.y+4, rnd(1)+0.5, rnd(1)-0.5, 1.5, rnd(0.4), 12)
--end
addbullet(player.x+3, player.y, 2, 0, true, bulletsprite)
if player.shoot3 then
addbullet(player.x+3, player.y+3, 2, 0.25, true, bulletsprite)
addbullet(player.x+3, player.y-3, 2, -0.25, true, bulletsprite)
sfx(12, 2)
else
sfx(9, 2)
end
player.shootcooldown = player.shootspeed
end
--reusing the inv timer as a respawn timer when killed
if player.health <= 0 and player.inv < 0 and not gameover then
player:respawn()
end
end
add(players, player)
end
function isgameover()
currentscore+=-10 --lose points if hit
for i = 1, #players, 1 do
if players[i].health > 0 then
return
end
end
return true
end
-- addplayer(16, 18)
|
