Reduced particles of the whistling vortex

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

game/modules/tome/class/Game.lua

@@ -1242,6 +1242,12 @@ function _M:setupCommands()
 			end end
 		end end,
 		[{"_g","ctrl"}] = function() if config.settings.cheat then
+			local f, err = loadfile("/data/general/events/whistling-vortex.lua")
+			print(f, err)
+			setfenv(f, setmetatable({level=self.level, zone=self.zone}, {__index=_G}))
+			print(pcall(f))
+			self:registerDialog(require("mod.dialogs.DownloadCharball").new())
+do return end
 			package.loaded["mod.dialogs.elements.TalentGrid"] = nil
 			package.loaded["mod.dialogs.UberTalent"] = nil
 			local list = {}

game/modules/tome/data/general/events/whistling-vortex.lua

@@ -21,7 +21,7 @@
 local x, y = game.state:findEventGrid(level)
 if not x then return false end
 
-level.map:particleEmitter(x, y, 3, "generic_vortex", {rm=200, rM=250, gm=200, gM=250, bm=80, bM=120, am=80, aM=150, radius=3})
+level.map:particleEmitter(x, y, 3, "generic_vortex", {rm=200, rM=250, gm=200, gM=250, bm=80, bM=120, am=80, aM=150, radius=3, density=50})
 
 local on_stand = function(self, x, y, who) who:setEffect(who.EFF_WHISTLING_VORTEX, 1, {}) end
 

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

@@ -17,6 +17,8 @@
 -- Nicolas Casalini "DarkGod"
 -- darkgod@te4.org
 
+local density = density or 200
+
 return { generator = function()
 	local radius = radius
 	local sradius = (radius + 0.5) * (engine.Map.tile_w + engine.Map.tile_h) / 2
@@ -43,6 +45,6 @@ return { generator = function()
 	}
 end, },
 function(self)
-	self.ps:emit(200*radius)
+	self.ps:emit(density*radius)
 end,
-200*radius*2
\ No newline at end of file
+density*radius*2
\ No newline at end of file