oups :)

git-svn-id: http://svn.net-core.org/repos/t-engine4@5762 51575b47-30f0-44d4-a5cc-537603b46e54

game/modules/tome/data/gfx/particles/ball_lightning_beam.lua

+-- ToME - Tales of Maj'Eyal
+-- Copyright (C) 2009, 2010, 2011, 2012 Nicolas Casalini
+--
+-- This program is free software: you can redistribute it and/or modify
+-- it under the terms of the GNU General Public License as published by
+-- the Free Software Foundation, either version 3 of the License, or
+-- (at your option) any later version.
+--
+-- This program is distributed in the hope that it will be useful,
+-- but WITHOUT ANY WARRANTY; without even the implied warranty of
+-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+-- GNU General Public License for more details.
+--
+-- You should have received a copy of the GNU General Public License
+-- along with this program.  If not, see <http://www.gnu.org/licenses/>.
+--
+-- Nicolas Casalini "DarkGod"
+-- darkgod@te4.org
+
+local points = {}
+
+local basesize = radius * (engine.Map.tile_w + engine.Map.tile_h) / 2
+
+for fork_i = 0, 35 do
+	local tx = math.cos(fork_i * math.pi * 2 / 35) * basesize
+	local ty = math.sin(fork_i * math.pi * 2 / 35) * basesize
+	local basedir = math.atan2(ty, tx)
+
+	local bc = rng.float(0.8, 1)
+	local c = 1
+	local a = 1 or rng.float(0.3, 0.6)
+	local size = 2
+	local starta = basedir+math.pi/2
+	local starts = rng.range(-4, 4)
+	points[#points+1] = {bc=bc, c=c, a=a, size=size, x=math.cos(starta) * starts, y=math.sin(starta) * starts, prev=-1}
+
+	local nb = 5
+	for i = 0, nb - 1 do
+		-- Split point in the segment
+		local split = rng.range(0, basesize / nb) + i * (basesize / nb)
+		
+		local dev = math.rad(rng.range(-8, 8))
+		
+		points[#points+1] = {bc=bc, c=c, a=a, movea=basedir+dev+math.pi/2, size=size + rng.range(-2, 2), x=math.cos(basedir+dev) * split, y=math.sin(basedir+dev) * split, prev=#points-1}
+	end
+
+	points[#points+1] = {bc=bc, c=c, a=a, size=size, x=tx, y=ty, prev=#points-1}
+end
+
+-- Populate the lightning based on the forks
+return { engine=core.particles.ENGINE_LINES, generator = function()
+	local p = table.remove(points, 1)
+
+	return {
+		life = 8, trail=p.prev,
+		size = p.size, sizev = 0, sizea = 0,
+
+		x = p.x, xv = 0, xa = 0,
+		y = p.y, yv = 0, ya = 0,
+		dir = p.movea, dirv = 0, dira = 0,
+		vel = rng.float(-1, 1), velv = 0, vela = 0,
+
+		r = p.bc, rv = 0, ra = 0,
+		g = p.bc, gv = 0, ga = 0,
+		b = p.c, bv = 0, ba = 0,
+		a = p.a, av = 0, aa = -0.06,
+	}
+end, },
+function(self)
+	while #points > 0 do
+		self.ps:emit(#points)
+	end
+end,
+#points, "particles_images/beam"

game/modules/tome/data/gfx/particles/lightning_beam.lua

+-- ToME - Tales of Maj'Eyal
+-- Copyright (C) 2009, 2010, 2011, 2012 Nicolas Casalini
+--
+-- This program is free software: you can redistribute it and/or modify
+-- it under the terms of the GNU General Public License as published by
+-- the Free Software Foundation, either version 3 of the License, or
+-- (at your option) any later version.
+--
+-- This program is distributed in the hope that it will be useful,
+-- but WITHOUT ANY WARRANTY; without even the implied warranty of
+-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+-- GNU General Public License for more details.
+--
+-- You should have received a copy of the GNU General Public License
+-- along with this program.  If not, see <http://www.gnu.org/licenses/>.
+--
+-- Nicolas Casalini "DarkGod"
+-- darkgod@te4.org
+
+-- Make the 2 main forks
+local tx = tx * engine.Map.tile_w
+local ty = ty * engine.Map.tile_h
+local basesize = math.sqrt((ty*ty)+(tx*tx))
+local basedir = math.atan2(ty, tx)
+
+local points = {}
+
+for fork_i = 1, 10 do
+	local bc = rng.float(0.8, 1)
+	local c = 1
+	local a = 1 or rng.float(0.3, 0.6)
+	local size = 2
+	local starta = basedir+math.pi/2
+	local starts = rng.range(-4, 4)
+	points[#points+1] = {bc=bc, c=c, a=a, size=size, x=math.cos(starta) * starts, y=math.sin(starta) * starts, prev=-1}
+
+	local nb = 5
+	for i = 0, nb - 1 do
+		-- Split point in the segment
+		local split = rng.range(0, basesize / nb) + i * (basesize / nb)
+		
+		local dev = math.rad(rng.range(-8, 8))
+		
+		points[#points+1] = {bc=bc, c=c, a=a, movea=basedir+dev+math.pi/2, size=size + rng.range(-2, 2), x=math.cos(basedir+dev) * split, y=math.sin(basedir+dev) * split, prev=#points-1}
+	end
+
+	points[#points+1] = {bc=bc, c=c, a=a, size=size, x=tx, y=ty, prev=#points-1}
+end
+
+-- Populate the lightning based on the forks
+return { engine=core.particles.ENGINE_LINES, generator = function()
+	local p = table.remove(points, 1)
+
+	return {
+		life = 8, trail=p.prev,
+		size = p.size, sizev = 0, sizea = 0,
+
+		x = p.x, xv = 0, xa = 0,
+		y = p.y, yv = 0, ya = 0,
+		dir = p.movea, dirv = 0, dira = 0,
+		vel = rng.float(-1, 1), velv = 0, vela = 0,
+
+		r = p.bc, rv = 0, ra = 0,
+		g = p.bc, gv = 0, ga = 0,
+		b = p.c, bv = 0, ba = 0,
+		a = p.a, av = 0, aa = -0.06,
+	}
+end, },
+function(self)
+	while #points > 0 do
+		self.ps:emit(#points)
+	end
+end,
+#points, "particles_images/beam"

game/modules/tome/data/gfx/shaders/lightning.frag

+uniform sampler2D tex;
+uniform vec3 color1;
+uniform vec3 color2;
+
+void main(void)
+{
+	gl_FragColor = texture2D(tex, gl_TexCoord[0].xy);
+	gl_FragColor.rgb = mix(color1, color2, 1-gl_FragColor.a);
+	gl_FragColor *= gl_Color;
+}

game/modules/tome/data/gfx/shaders/lightning.lua

+-- ToME - Tales of Maj'Eyal
+-- Copyright (C) 2009, 2010, 2011, 2012 Nicolas Casalini
+--
+-- This program is free software: you can redistribute it and/or modify
+-- it under the terms of the GNU General Public License as published by
+-- the Free Software Foundation, either version 3 of the License, or
+-- (at your option) any later version.
+--
+-- This program is distributed in the hope that it will be useful,
+-- but WITHOUT ANY WARRANTY; without even the implied warranty of
+-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+-- GNU General Public License for more details.
+--
+-- You should have received a copy of the GNU General Public License
+-- along with this program.  If not, see <http://www.gnu.org/licenses/>.
+--
+-- Nicolas Casalini "DarkGod"
+-- darkgod@te4.org
+
+return {
+	frag = "lightning",
+	vert = nil,
+	args = {
+		color1 = color1 or {1,1,1},
+		color2 = color2 or {0.1,0.1,0.95},
+	},
+	clone = false,
+}