Dungeon System

[rafaeru]

Część funkcji na dungeon pisana przeze mnie, już jej nie potrzebuje. Do własnego użytku (może służyć jako teleport na questa dla party).

 

testowana na TFS 0.3.5

function dungeon(cid, exht, global, position, item, count, levelod, leveldo,storage, tajm)
partylist = getPartyMembers(cid)
	if getGlobalStorageValue(global) ~= 1 then
		if not isPlayer or not partylist  then
			selfSay('You dont have party.', cid)
			talkState[talkUser] = 0
		else
		if getPlayerLevel(cid) >= levelod and getPlayerLevel(cid) <= leveldo then
			if exhaustion.get(cid, exht) == false then
				if table.maxn(partylist) == count then
					if(doPlayerRemoveItem(cid, item, 1) == TRUE) then
						doTeleportThing(cid, position)
						partyTeleport(cid,storage,exht,tajm)
						setGlobalStorageValue(global, 1)
					else
						selfSay('You dont have required item.', cid)
						talkState[talkUser] = 0
					end
				else
					selfSay('You dont have '..count..' people in team.', cid)
					talkState[talkUser] = 0
				end
			else
			selfSay('Somebody of team have done this dungeon in latest time.', cid)
			talkState[talkUser] = 0
			end
		else
		selfSay('You dont have required level ('..levelod..'-'..leveldo..')', cid)
		talkState[talkUser] = 0
		end
		end
	else
	selfSay('Dungeon is busy. Try later.', cid)
	talkState[talkUser] = 0
	end
end

function partyTeleport(cid, storage, exht, tajm)
local partylist = getPartyMembers(cid)
	if not isPlayer or not partylist then 
		return true
	end

for _, party in ipairs(partylist) do
	setPlayerStorageValue(party,storage,1)
	exhaustion.set(party, exht, tajm)
	doTeleportThing(party, getCreaturePosition(cid))
	doSendMagicEffect(getCreaturePosition(party), 110)
	doPlayerSendTextMessage(party, MESSAGE_INFO_DESCR, "Your team has been teleported by "..getCreatureName(cid)..".")
end

	doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "All players in the party have been teleported to you.")
return true
end