Postado Dezembro 11, 2012 12 anos Galera, por favor me ajudem '-' Um evento aqui bugou... E pior não da para fechar, todos players estão salvos porem não tem como iniciar o evento denovo... Quando tento inicia-lo denovo da isso >>> 21:36 Biohazard is already running. PS: Já reiniciei o server e o dedicado para ver e da mesma coisa!!!
Postado Dezembro 11, 2012 12 anos Esse evento tem alguma lib? Se sim poste ela aqui por-favor! -"Supra Omnes Lux Lucis" - Acima de todos brilha a Luz -
Postado Dezembro 12, 2012 12 anos Autor Tá ai -- This script is part of Biohazard Event System -- Copyright (C) 2012 #####, Oneshot -- -- 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 . -- Main config. BIOHAZARD_DEFAULT_MAX_PLAYERS = 10 BIOHAZARD_IGNORE_GROUP_ID = 4 BIOHAZARD_ARENA_ENTER_POSITION = {x = 31931, y = 31799, z = 7} BIOHAZARD_ARENA_KICK_POSITION = {x = 32360, y = 31781, z = 7} BIOHAZARD_GLOBAL_STATUS = 67600 BIOHAZARD_GLOBAL_MAX_PLAYERS = 67601 BIOHAZARD_PLAYER_STATUS = 67600 BIOHAZARD_PLAYER_NEMESIS_HEALTH = 67601 BIOHAZARD_NEMESIS_MAX_HEALTH = 100000000 -- Main functions. function doSetBiohazardMaxPlayers(amount) doSetStorage(BIOHAZARD_GLOBAL_MAX_PLAYERS, amount) return true end function getBiohazardMaxPlayers() return getStorage(BIOHAZARD_GLOBAL_MAX_PLAYERS) end function getBiohazardPlayerStatus(cid) return getCreatureStorage(cid, BIOHAZARD_PLAYER_STATUS) end function doSetBiohazardPlayerStatus(cid, status) doCreatureSetStorage(cid, BIOHAZARD_PLAYER_STATUS, status) return true end function doBiohazardAddPlayer(cid) doTeleportThing(cid, BIOHAZARD_ARENA_ENTER_POSITION) if getPlayerGroupId(cid) < BIOHAZARD_IGNORE_GROUP_ID then doCreatureSetStorage(cid, BIOHAZARD_PLAYER_STATUS, 1) end return true end function doBiohazardKickPlayer(cid) doTeleportThing(cid, BIOHAZARD_ARENA_KICK_POSITION) doRemoveCondition(cid, CONDITION_OUTFIT) doCreatureSetStorage(cid, BIOHAZARD_PLAYER_STATUS, -1) return true end function getBiohazardEventPlayers() local ret = {} for _, cid in ipairs(getPlayersOnline()) do if cid and getCreatureStorage(cid, BIOHAZARD_PLAYER_STATUS) >= 1 then table.insert(ret, cid) end end return ret end function doBiohazardChooseNemesis() local players = getBiohazardEventPlayers() local cid = players[math.random(1, #players)] doSetCreatureOutfit(cid, {lookType = 311}, -1) doCreatureSetStorage(cid, BIOHAZARD_PLAYER_NEMESIS_HEALTH, BIOHAZARD_NEMESIS_MAX_HEALTH) doCreatureSetStorage(cid, BIOHAZARD_PLAYER_STATUS, 2) return true end function isNemesis(cid) return getCreatureStorage(cid, BIOHAZARD_PLAYER_STATUS) == 2 end function getBiohazardNemesis() local ret for _, cid in ipairs(getBiohazardEventPlayers()) do if getCreatureStorage(cid, BIOHAZARD_PLAYER_STATUS) == 2 then ret = cid break end end return ret end
Postado Dezembro 12, 2012 12 anos -- This script is part of Biohazard Event System -- Copyright (C) 2012 #####, Oneshot -- -- 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 . -- Main config. BIOHAZARD_DEFAULT_MAX_PLAYERS = 10 BIOHAZARD_IGNORE_GROUP_ID = 4 BIOHAZARD_ARENA_ENTER_POSITION = {x = 31931, y = 31799, z = 7} BIOHAZARD_ARENA_KICK_POSITION = {x = 32360, y = 31781, z = 7} BIOHAZARD_GLOBAL_STATUS = 67600 BIOHAZARD_GLOBAL_MAX_PLAYERS = 67601 BIOHAZARD_PLAYER_STATUS = 67600 BIOHAZARD_PLAYER_NEMESIS_HEALTH = 67601 BIOHAZARD_NEMESIS_MAX_HEALTH = 100000000 -- Main functions. function doSetBiohazardMaxPlayers(amount) doSetStorage(BIOHAZARD_GLOBAL_MAX_PLAYERS, amount) return true end function getBiohazardMaxPlayers() return getStorage(BIOHAZARD_GLOBAL_MAX_PLAYERS) end function getBiohazardPlayerStatus(cid) return getCreatureStorage(cid, BIOHAZARD_PLAYER_STATUS) end function doSetBiohazardPlayerStatus(cid, status) doCreatureSetStorage(cid, BIOHAZARD_PLAYER_STATUS, status) return true end function doBiohazardAddPlayer(cid) doTeleportThing(cid, BIOHAZARD_ARENA_ENTER_POSITION) if getPlayerGroupId(cid) < BIOHAZARD_IGNORE_GROUP_ID then doCreatureSetStorage(cid, BIOHAZARD_PLAYER_STATUS, 1) end return true end function doBiohazardKickPlayer(cid) doTeleportThing(cid, BIOHAZARD_ARENA_KICK_POSITION) doRemoveCondition(cid, CONDITION_OUTFIT) doCreatureSetStorage(cid, BIOHAZARD_PLAYER_STATUS, -1) return true end function getBiohazardEventPlayers() local ret = {} for _, cid in ipairs(getPlayersOnline()) do if cid and getCreatureStorage(cid, BIOHAZARD_PLAYER_STATUS) >= 1 then table.insert(ret, cid) end end return ret end function doBiohazardChooseNemesis() local players = getBiohazardEventPlayers() local cid = players[math.random(1, #players)] doSetCreatureOutfit(cid, {lookType = 311}, -1) doCreatureSetStorage(cid, BIOHAZARD_PLAYER_NEMESIS_HEALTH, BIOHAZARD_NEMESIS_MAX_HEALTH) doCreatureSetStorage(cid, BIOHAZARD_PLAYER_STATUS, 2) return true end function isNemesis(cid) return getCreatureStorage(cid, BIOHAZARD_PLAYER_STATUS) == 2 end function getBiohazardNemesis() local ret for _, cid in ipairs(getBiohazardEventPlayers()) do if getCreatureStorage(cid, BIOHAZARD_PLAYER_STATUS) == 2 then ret = cid break end end return ret end setGlobalStorageValue(BIOHAZARD_GLOBAL_STATUS, -1) setGlobalStorageValue(BIOHAZARD_GLOBAL_MAX_PLAYERS, -1) Testa aí! -"Supra Omnes Lux Lucis" - Acima de todos brilha a Luz -
Postado Dezembro 12, 2012 12 anos Autor Ok, só vou poder realizar o teste pela manhã, mas se funcionar volto para dar REP+
Participe da conversa
Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.