bloody chance

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

game/modules/tome/class/Actor.lua

@@ -38,7 +38,8 @@ function _M:die(src)
 	if src then
 		src:gainExp(self:worthExp())
 	end
-	self:bloodyDeath()
+	-- Do we get a blooooooody death ?
+	if rng.percent(33) then self:bloodyDeath() end
 end
 
 function _M:levelup()