• There is NO official Otland's Discord server and NO official Otland's server list. The Otland's Staff does not manage any Discord server or server list. Moderators or administrator of any Discord server or server lists have NO connection to the Otland's Staff. Do not get scammed!

Zombie Event

Skonelapper

Skonelapper

New Member
Joined
Sep 28, 2012
Messages
124
Reaction score
3
Witam , mam pewny problem z zombie event , ogolnie skrypt dziala , przenosi graczy do areny , ostatni gracz dostaje nagrode , jest niby wszystko ok lecz event wywala blad na konsoli i przy probie odpalenia nastepnego zombie event wywala blad w grze ze niby event jest caly czas odpalony

oto blad z konsoli :
Code: 
[23:59:54.069] [Error - TalkAction Interface] 
[23:59:54.069] In a timer event called from: 
[23:59:54.069] 			domodlib("config_zombie_event")
[23:59:54.069] 			domodlib("lib_zombie_event")

[23:59:54.069] 			function onSay(cid, words, param)
[23:59:54.069] 				if getStorage(configZombieEvent.storages.main) > 0 then
[23:59:54.069] 					return doPlayerSendCancel(cid, 'Zombie Plague Attack is already running.')
[23:59:54.069] 				end
[23:59:54.069] 			
[23:59:54.069] 				doStartCountingZombieEvent(0)

[23:59:54.069] 				for _, pid in ipairs(getPlayersOnline()) do
[23:59:54.069] 					if getCreatureStorage(pid, configZombieEvent.storages.player) > 0 then
[23:59:54.069] 						doCreatureSetStorage(pid, configZombieEvent.storages.player, -1)
[23:59:54.069] 						doTeleportThing(pid, getTownTemplePosition(getPlayerTown(pid)), true)
[23:59:54.069] 						doCreatureSetStorage(pid, configZombieEvent.storages.kills, 0)
[23:59:54.069] 					end
[23:59:54.069] 				end

[23:59:54.069] 				doSetStorage(configZombieEvent.storages.joining, 1)
[23:59:54.069] 				addEvent(doStartZombieEvent, configZombieEvent.delayTime * 60 * 1000)
[23:59:54.069] 				return true
[23:59:54.069] 			end
[23:59:54.069] 		:onSay
[23:59:54.069] Description: 
[23:59:54.069] [string "			function doStopZombieEvent()..."]:148: attempt to call field 'query' (a nil value)
[23:59:54.069] stack traceback:
[23:59:54.069] 	[string "			function doStopZombieEvent()..."]:148: in function <[string "			function doStopZombieEvent()..."]:107>


Tu skrypt eventu :

Code: 
<?xml version="1.0" encoding="UTF-8"?>
<mod name="Zombie_Event" version="3.0" author="VirrageS" contact="otland.net" enabled="yes">

	<config name="config_zombie_event">
		<![CDATA[
			configZombieEvent = {
				storages = {
					main = '999991', -- set free storage
					player = '919992', -- set free storage
					joining = '999993', -- set free storage
					kills = '999994', -- set free storage
					exhaust = '999995', -- set free storage
					countEvent = '999996' -- set free storage
				},
				
				position = {x=2127,y=2043,z=7}, -- position to which player is teleporting
				room = {
					from = {x=2114,y=2023,z=7}, -- left top corner of event room
					to = {x=2149,y=2071,z=7} -- right bottom corner of event room
				},				
				
				rewards = {2300}, -- reward id which player can win (reward is random)				
				players = {
					max = 20, -- max players in event
					min = 2, -- min players to event start
					minLevel = 100, -- min level to join to event
					pvpEnabled = false -- can players hit theirselfs
				},
				
				days = {
					['Tuesday'] = {'17:30:20'}, 
					['Thursday'] = {'17:30:20'}, 
					['Friday'] = {'17:30:20'}, 
					['Sunday'] = {'17:30:20'}
				},
				
				spawnDelay = 2000, -- miliseconds
				amountCreatingMonsters = 5,
				monsters = {'Scratchclaw', 'Propell Zombie', 'Vile Centurion', 'Mongrel Man', 'Daidalost'}, -- name of monsters which is creating in event

				delayTime = 5.0, -- time in which players who joined to event are teleporting to teleport position [miuntes]
				startEvent = 1, -- time from teleport to start event [seconds]
				stopEvent = 920000, -- [seconds]
				text = '-PL-\nAby wygrac i otrzymac nagrode, zabij jak najwieksza liczbe zombie przez 20min lub pozostan sam na arenie.\n\n-ENG-\nTo win and get a reward, kill as many zombies for 20 minutes or stay the same in the arena.'
			}
		]]>
	</config>
	
	<lib name="lib_zombie_event">
		<![CDATA[
			function doStopZombieEvent()
				if getStorage(configZombieEvent.storages.main) > 0 then
					local playerTable, creatureTable = {}, {}

					for x = configZombieEvent.room.from.x, configZombieEvent.room.to.x do
						for y = configZombieEvent.room.from.y, configZombieEvent.room.to.y do
							local n, i = getTileInfo({x=x, y=y, z=configZombieEvent.room.from.z}).creatures, 1
							if n ~= 0 then
								local v = getThingfromPos({x=x, y=y, z=configZombieEvent.room.from.z, stackpos=i}).uid
								while v ~= 0 do
									if isPlayer(v) then
										table.insert(playerTable, v)
										if n == #playerTable then
											break
										end
									elseif isMonster(v) then
										table.insert(creatureTable, v)
										if n == #creatureTable then
											break
										end
									end
									i = i + 1
									v = getThingfromPos({x=x, y=y, z=configZombieEvent.room.from.z, stackpos=i}).uid
								end
							end
						end
					end

					if #playerTable > 1 then
						table.sort(playerTable, function(a, b) return (getCreatureStorage(a, configZombieEvent.storages.kills)) > (getCreatureStorage(b, configZombieEvent.storages.kills)) end)
						
						local prize = math.random(#configZombieEvent.rewards)
						
						doTeleportThing(playerTable[1], getTownTemplePosition(getPlayerTown(playerTable[1])))
						doCreatureSetStorage(playerTable[1], configZombieEvent.storages.kills, 0)
						doPlayerAddItem(playerTable[1], configZombieEvent.rewards[prize], 1)
						doCreatureAddHealth(playerTable[1], getCreatureMaxHealth(playerTable[1]) - getCreatureHealth(playerTable[1]))
						doCreatureAddMana(playerTable[1], getCreatureMaxMana(playerTable[1]) - getCreatureMana(playerTable[1]))
						doPlayerSendTextMessage(playerTable[1], MESSAGE_EVENT_ADVANCE, 'You win! You have received '..getItemNameById(configZombieEvent.rewards[prize])..' as reward.')
						doBroadcastMessage('Zombie Plague Attack has finished. The winner is '..getCreatureName(playerTable[1])..'. Congratulations!')
						doSetStorage(configZombieEvent.storages.main, -1)
						
						db.query("INSERT INTO `events` (`event_name`, `winner_name`, `won_item`, `time_win`) VALUES (\"Zombie\", \"" .. getCreatureName(playerTable[1]) .. "\", \"" .. getItemNameById(configZombieEvent.rewards[prize]) .. "\", " .. getStorage(configZombieEvent.storages.countEvent) ..");")

						for i = 2, #playerTable do
							doCreatureAddHealth(playerTable[i], getCreatureMaxHealth(playerTable[i]) - getCreatureHealth(playerTable[i]))
							doCreatureAddMana(playerTable[i], getCreatureMaxMana(playerTable[i]) - getCreatureMana(playerTable[i]))
							doTeleportThing(playerTable[i], getTownTemplePosition(getPlayerTown(playerTable[i])))
							doPlayerSendTextMessage(playerTable[i], MESSAGE_EVENT_ADVANCE, 'You loss.')
							doSendMagicEffect(getThingPos(playerTable[i]), CONST_ME_STUN)
							doCreatureSetStorage(playerTable[i], configZombieEvent.storages.kills, 0)
						end

						for i = 1, #creatureTable do
							if isMonster(creatureTable[i]) then
								doRemoveCreature(creatureTable[i])
							end
						end
						
						doSetStorage(configZombieEvent.storages.countEvent, getStorage(configZombieEvent.storages.countEvent) + 1)
					elseif #playerTable == 0 then
						for i = 1, #creatureTable do
							if isMonster(creatureTable[i]) then
								doRemoveCreature(creatureTable[i])
							end
						end
					
						doBroadcastMessage('No one win in Zombie Plague Attack.')
						doSetStorage(configZombieEvent.storages.main, -1)
						doSetStorage(configZombieEvent.storages.countEvent, getStorage(configZombieEvent.storages.countEvent) + 1)
					end
				end
			end

			function doStartZombieEvent()
				doSetStorage(configZombieEvent.storages.joining, -1)

				if configZombieEvent.players.min <= doCountPlayersZombieEvent() then
					for _, cid in ipairs(getPlayersOnline()) do
						if getCreatureStorage(cid, configZombieEvent.storages.player) > 0 then
							doCreatureSetStorage(cid, configZombieEvent.storages.player, -1)
							doTeleportThing(cid, configZombieEvent.position)
							doCreatureSetNoMove(cid, false)
							doRemoveCondition(cid, CONDITION_INFIGHT)
							
							doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, 'Get ready. Zombie Plague Attack starts in '..configZombieEvent.startEvent..' seconds.')
						end
					end
					
					addEvent(doSetStorage, configZombieEvent.startEvent * 1000, configZombieEvent.storages.main, 1)
					addEvent(doStopZombieEvent, configZombieEvent.stopEvent * 1000)
					addEvent(doRepeatCheckZombieEvent, configZombieEvent.startEvent * 1000 + 2000)
					
					doBroadcastMessage('Zombie Plague Attack has started. LET\'S GO!')
				else
					for _, cid in ipairs(getPlayersOnline()) do
						if getCreatureStorage(cid, configZombieEvent.storages.player) > 0 then
							doCreatureSetNoMove(cid, false)
							doRemoveCondition(cid, CONDITION_INFIGHT)
						end
					end
					
					doBroadcastMessage('Zombie Plague Attack hasn\'t started beacuse there were not enough players.')
				end
			end
			
			function doRepeatCheckZombieEvent()
				if getStorage(configZombieEvent.storages.main) > 0 then
					local playerTable, creatureTable, xTable, yTable = {}, {}, {}, {}

					for x = configZombieEvent.room.from.x, configZombieEvent.room.to.x do
						for y = configZombieEvent.room.from.y, configZombieEvent.room.to.y do
							local n, i = getTileInfo({x=x, y=y, z=configZombieEvent.room.to.z}).creatures, 1
							if n ~= 0 then
								local v = getThingfromPos({x=x, y=y, z=configZombieEvent.room.to.z, stackpos=i}).uid
								while v ~= 0 do
									if isPlayer(v) then
										table.insert(playerTable, v)
										if n == #playerTable then
											break
										end
									elseif isMonster(v) then
										table.insert(creatureTable, v)
										if n == #creatureTable then
											break
										end
									end
									i = i + 1
									v = getThingfromPos({x=x, y=y, z=configZombieEvent.room.to.z, stackpos=i}).uid
								end
							end
							
							table.insert(xTable, x)
							table.insert(yTable, y)
						end
					end

					if #playerTable == 1 then
						local prize = math.random(#configZombieEvent.rewards)
						
						addEvent(doTeleportThing, 200, playerTable[1], getTownTemplePosition(getPlayerTown(playerTable[1])), true)
						doPlayerAddItem(playerTable[1], configZombieEvent.rewards[prize], 1)
						doCreatureSetStorage(playerTable[1], configZombieEvent.storages.kills, 0)
						doCreatureAddHealth(playerTable[1], getCreatureMaxHealth(playerTable[1]) - getCreatureHealth(playerTable[1]))
						doCreatureAddMana(playerTable[1], getCreatureMaxMana(playerTable[1]) - getCreatureMana(playerTable[1]))
						doPlayerSendTextMessage(playerTable[1], MESSAGE_EVENT_ADVANCE, 'You win! You have received '..getItemNameById(configZombieEvent.rewards[prize])..' as reward.')
						doBroadcastMessage('Zombie Plague Attack has finished. The winner is '..getCreatureName(playerTable[1])..'. Congratulations.')
						db.query("INSERT INTO `events` (`event_name`, `winner_name`, `won_item`, `time_win`) VALUES (\"Zombie\", \"" .. getCreatureName(playerTable[1]) .. "\", \""..getItemNameById(configZombieEvent.rewards[prize]).."\", "..getStorage(configZombieEvent.storages.countEvent)..");")
						
						for i = 1, #creatureTable do
							if isMonster(creatureTable[i]) then
								doRemoveCreature(creatureTable[i])
							end
						end
						
						doSetStorage(configZombieEvent.storages.main, -1)
						doSetStorage(configZombieEvent.storages.countEvent, getStorage(configZombieEvent.storages.countEvent) + 1)
						return
					elseif #playerTable == 0 then
						for i = 1, #creatureTable do
							if isMonster(creatureTable[i]) then
								doRemoveCreature(creatureTable[i])
							end
						end
					
						doBroadcastMessage('No one win in Zombie Plague Attack.')
						doSetStorage(configZombieEvent.storages.main, -1)
						
						doSetStorage(configZombieEvent.storages.countEvent, getStorage(configZombieEvent.storages.countEvent) + 1)
						return
					end
				
					local pos = {x=xTable[math.random(#xTable)], y=yTable[math.random(#yTable)], z=7}				
					for i = 1, configZombieEvent.amountCreatingMonsters do
						doCreateMonster(configZombieEvent.monsters[math.random(#configZombieEvent.monsters)], pos, false, false, false)
						doSendMagicEffect(pos, CONST_ME_BATS)
					end
					
					addEvent(doRepeatCheckZombieEvent, configZombieEvent.spawnDelay)
				end
			end
			
			function doCountPlayersZombieEvent()
				local x = 0
				for _, cid in ipairs(getPlayersOnline()) do
					if getCreatureStorage(cid, configZombieEvent.storages.player) > 0 then
						x = x + 1
					end
				end
				return x
			end
			
			function doStartCountingZombieEvent(x)
				if configZombieEvent.delayTime-x > 0 then
					doBroadcastMessage('Zombie Plague Attack is going to start in '..configZombieEvent.delayTime-x..' minutes. You can join to the event by saying "!zombie join".')
					addEvent(doStartCountingZombieEvent, 60*1000, x+1)
				end
			end
		]]>
	</lib>

	<talkaction words="!zombie" event="script">
		<![CDATA[
			domodlib("config_zombie_event")

			function onSay(cid, words, param)
				if getStorage(configZombieEvent.storages.joining) ~= 1 then
					return doPlayerSendCancel(cid, 'Zombie Plague Attack hasn\'t started yet.')
				elseif param == '' then
					return doPlayerSendCancel(cid, 'Command param required (say: "!zombie join" or "!zombie leave.").')
				elseif getPlayerLevel(cid) < configZombieEvent.players.minLevel then
					return doPlayerSendCancel(cid, 'You can\'t join to the event if you don\'t have a require '..configZombieEvent.players.minLevel..' level.')
				elseif getTileInfo(getThingPos(cid)).protection ~= true then
					return doPlayerSendCancel(cid, 'You can\'t join to the event if you aren\'t in protection zone.')
				elseif exhaustion.check(cid, configZombieEvent.storages.exhaust) ~= false then
					return doPlayerSendCancel(cid, 'You must wait '..exhaustion.get(cid, configZombieEvent.storages.exhaust)..' seconds to use this command again.')
				end

				if param == 'join' then
					if getCreatureStorage(cid, configZombieEvent.storages.player) > 0 then
						return doPlayerSendCancel(cid, 'You have arleady joined to event. Wait patiently for start.')
					elseif doCountPlayersZombieEvent() == configZombieEvent.players.max then
						return doPlayerSendCancel(cid, 'Max players in the event have been reached.')
					end
					
					doCreatureSetNoMove(cid, true)
					doPlayerPopupFYI(cid, configZombieEvent.text)
					doCreatureSetStorage(cid, configZombieEvent.storages.player, 1)
					doAddCondition(cid, createConditionObject(CONDITION_INFIGHT, -1))
					doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, 'You have joined to Zombie Plague Attack. You can\'t move until event don\'t start. Wait patiently for the event start.')
					doPlayerSendTextMessage(cid, MESSAGE_EVENT_ORANGE, 'You have joined to Zombie Plague Attack.')
				elseif param == 'leave' then
					if getCreatureStorage(cid, configZombieEvent.storages.player) <= 0 then
						return doPlayerSendCancel(cid, 'You can\'t leave from the event if you don\'t join.')
					end
					
					doCreatureSetNoMove(cid, false)
					doCreatureSetStorage(cid, configZombieEvent.storages.player, -1)
					doRemoveCondition(cid, CONDITION_INFIGHT)
					doPlayerSendTextMessage(cid, MESSAGE_EVENT_ORANGE, 'You have left from the Zombie Plague Attack.')
				end
				
				exhaustion.set(cid, configZombieEvent.storages.exhaust, 5)				
				return true
			end
		]]>
	</talkaction>
	
	<talkaction words="!startzombie" access="5" event="script">
		<![CDATA[
			domodlib("config_zombie_event")
			domodlib("lib_zombie_event")

			function onSay(cid, words, param)
				if getStorage(configZombieEvent.storages.main) > 0 then
					return doPlayerSendCancel(cid, 'Zombie Plague Attack is already running.')
				end
			
				doStartCountingZombieEvent(0)

				for _, pid in ipairs(getPlayersOnline()) do
					if getCreatureStorage(pid, configZombieEvent.storages.player) > 0 then
						doCreatureSetStorage(pid, configZombieEvent.storages.player, -1)
						doTeleportThing(pid, getTownTemplePosition(getPlayerTown(pid)), true)
						doCreatureSetStorage(pid, configZombieEvent.storages.kills, 0)
					end
				end

				doSetStorage(configZombieEvent.storages.joining, 1)
				addEvent(doStartZombieEvent, configZombieEvent.delayTime * 60 * 1000)
				return true
			end
		]]>
	</talkaction>
	
	<talkaction words="!stopzombie" access="5" event="script">
		<![CDATA[
			domodlib("config_zombie_event")
			domodlib("lib_zombie_event")

			function onSay(cid, words, param)
				if getStorage(configZombieEvent.storages.main) > 0 then
					doStopZombieEvent()
				else
					doPlayerSendCancel(cid, 'You can not do it if Zombie Plague Attack is not enabled.')
				end
				return true
			end
		]]>
	</talkaction>

	<globalevent name="Zombie_Event_Days" interval="1000" event="script">
		<![CDATA[
			domodlib("config_zombie_event")
			domodlib("lib_zombie_event")
			
			local daysOpen = {}			
			for k, v in pairs(configZombieEvent.days) do
				table.insert(daysOpen, k)
			end
			
			function onThink(interval)
				if isInArray(daysOpen, os.date('%A')) then
					if isInArray(configZombieEvent.days[os.date('%A')], os.date('%X', os.time())) then
						if getStorage(configZombieEvent.storages.joining) ~= 1 then
							doStartCountingZombieEvent(0)

							for _, pid in ipairs(getPlayersOnline()) do
								if getCreatureStorage(pid, configZombieEvent.storages.player) > 0 then
									doCreatureSetStorage(pid, configZombieEvent.storages.player, -1)
									doTeleportThing(pid, getTownTemplePosition(getPlayerTown(pid)), true)
									doCreatureSetStorage(pid, configZombieEvent.storages.kills, 0)
								end
							end

							doSetStorage(configZombieEvent.storages.joining, 1)
							addEvent(doStartZombieEvent, configZombieEvent.delayTime * 60 * 1000)
						end
					end
				end
				return true
			end
		]]>
	</globalevent>
	
	<event type="statschange" name="Zombie_Event_Dead" event="script">
		<![CDATA[
			domodlib("config_zombie_event")

			function onStatsChange(cid, attacker, type, combat, value)
				if type == 1 and getCreatureHealth(cid) <= value then
					if isInRange(getThingPos(cid), configZombieEvent.room.from, configZombieEvent.room.to) then
						if isPlayer(cid) then
							doCreatureAddHealth(cid, getCreatureMaxHealth(cid) - getCreatureHealth(cid))
							doCreatureAddMana(cid, getCreatureMaxMana(cid) - getCreatureMana(cid))
							doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
							doPlayerSendTextMessage(cid, MESSAGE_EVENT_ORANGE, 'You loss due to attack.')
							
							doSendAnimatedText(getThingPos(cid), value, TEXTCOLOR_RED)
							doSendMagicEffect(getThingPos(cid), CONST_ME_TELEPORT)
							doCreatureSetStorage(cid, configZombieEvent.storages.kills, 0)
							return false
						end
					end
				elseif configZombieEvent.players.pvpEnabled ~= true and isInArray({1,3}, type) and isPlayer(attacker) and isPlayer(cid) then
					if isInRange(getThingPos(cid), configZombieEvent.room.from, configZombieEvent.room.to) then
						return false
					end
				end
				return true
			end
		]]>
	</event>

	<event type="kill" name="Zombie_Event_Kill" event="script">
		<![CDATA[
			domodlib("config_zombie_event")

			function onKill(cid, target, damage, flags)
				if isInRange(getThingPos(cid), configZombieEvent.room.from, configZombieEvent.room.to) then
					if isInArray(configZombieEvent.monsters, getCreatureName(target)) then
						doCreatureSetStorage(cid, configZombieEvent.storages.kills, math.max(0, getCreatureStorage(cid, configZombieEvent.storages.kills) + 1))
					end
				end
				return true
			end
		]]>
	</event>

	<event type="login" name="Zombie_Event_Login" event="script">
		<![CDATA[
			domodlib("config_zombie_event")

			function onLogin(cid)
				if getCreatureStorage(cid, configZombieEvent.storages.player) > 0 then
					doCreatureSetStorage(cid, configZombieEvent.storages.player, -1)
					doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), true)
					doCreatureSetNoMove(cid, false)
					doRemoveCondition(cid, CONDITION_INFIGHT)
					doCreatureSetStorage(cid, configZombieEvent.storages.player.kills, 0)
				end

				registerCreatureEvent(cid, 'Zombie_Event_Dead')
				registerCreatureEvent(cid, 'Zombie_Event_Kill')
				return true
			end
		]]>
	</event>
	
	<globalevent name="Zombie_Event_Start" type="startup" event="script">
		<![CDATA[
			domodlib("config_zombie_event")

			function onStartup()
				doSetStorage(configZombieEvent.storages.main, -1)
				doSetStorage(configZombieEvent.storages.joining, -1)
				return true
			end
		]]>
	</globalevent>
 
Sort by date Sort by votes

Similar threads

J
  • Question
FireStorm Event
Replies
0
Views
369
jareczekjsp
J
G
  • Question
RevScripts i need auto zombie system
Replies
15
Views
963
Gaber Zen
G
G
  • Question
RevScripts ZOMBIE EVENT SYSTEM
Replies
3
Views
661
Gaber Zen
G
E
  • Question
TFS 0.X 0.4 8.60 - Advanced Poll System error HELP
Replies
5
Views
204
Enderlop
E
J
  • Question
Auto Blessing problem
Replies
3
Views
500
jareczekjsp
J
G
  • Question
RevScripts Update Battle Event Script
Replies
5
Views
685
Gaber Zen
G
Kownikuzyt
  • Question
[TFS 0.4_DEV rev3884] Server problem #1
Replies
10
Views
454
Tenzhiro
Tenzhiro
bybbzan
  • Question
Zombie event 1.5 - downgrade 8.6 by nekiro
Replies
1
Views
237
Mateus Robeerto
Mateus Robeerto
L
  • Question
TFS 0.X My server doesn't recognize the MOD
Replies
1
Views
279
tobi132
T
G
  • Question
Lua Autoloot Script/Error onkill-Mods
Replies
1
Views
366
Gaber Zen
G
Back
Top