3 scripts

[poii]

Hello i'm asking for 3 scipts hope you can help me
1. when a player is in x position and say password it is teleported to y position...

2. when player1 is in x position, player2 is in y position and player3 is in z position the 3 of them are teleported to xyz position

3. when the playe killed his 100th player he get warmaster addon!

i REP++ !!
ok i added a 4th
4. when player say !outfit it get random an old free outfit and if says
!premoutfit if player is premmy then do player get a random premium old outfit

 

[Cykotitan]

1. • password.lua:

   local pos = {x=100, y=100, z=7}
   
   function onSay(cid, words, param)
   	local p = getThingPos(cid)
   	if pos.x == p.x and pos.y == p.y and pos.z == p.z then
   		doSendMagicEffect(p, CONST_ME_TELEPORT)
   		doTeleportThing(cid, pos)
   		doSendMagicEffect(pos, CONST_ME_TELEPORT)
   	end
   end

   • talkactions.xml:

   <talkaction words="password" event="script" value="password.lua"/>

2. • teleport.lua:

   local pos = {x=100, y=100, z=7}
   
   function onStepIn(cid, item, position, fromPosition)
   	local players = {}
   	for i = 2501, 2503 do
   		local v = getTopCreature(getThingPos(i)).uid
   		if not isPlayer(v) then
   			return
   		end
   		table.insert(players, v)
   	end
   	for i = 1, #players do
   		doSendMagicEffect(getThingPos(players[i]), CONST_ME_TELEPORT)
   		doTeleportThing(players[i], pos)
   	end
   	doSendMagicEffect(pos, CONST_ME_TELEPORT)
   end

   • movements.xml

   <movevent type="StepIn" uniqueid="2501-2503" event="script" value="teleport.lua"/>

3. • addon.lua:

   local storage = 3000
   local amount = 100
   
   function onKill(cid, target, lastHit)
   	if lastHit and isPlayer(target) and target ~= cid then
   		local new = math.max(0, getPlayerStorageValue(cid, storage)) + 1
   		setPlayerStorageValue(cid, storage, new)
   		if new == amount then
   			doPlayerAddOutfitId(cid, 22, 3)
   		end
   	end
   	return true
   end

   • login.lua:

   	registerCreatureEvent(cid, "Addon")

   • creaturescripts.xml:

   	<event type="kill" name="Addon" event="script" value="addon.lua"/>

4. • outfit.lua

   local t = {
   	['!outfit'] = {
   		[0] = {136, 137, 138, 139},
   		[1] = {128, 129, 130, 131}
   	},
   	['!premoutfit'] = {
   		[0] = {140, 141, 142, 147, 148, 149, 150, 155, 156, 157, 158, 252, 269, 270, 279, 288, 324, 336},
   		[1] = {132, 133, 134, 143, 144, 145, 146, 151, 152, 153, 154, 251, 268, 273, 278, 289, 325, 335}
   	}
   }
   
   function onSay(cid, words, param)
   	if words == 'premoutfit' and not isPremium(cid) then
   		return doPlayerSendDefaultCancel(cid, RETURNVALUE_YOUNEEDPREMIUMACCOUNT)
   	end
   	local now = getCreatureOutfit(cid)
   	local v = t[words][getPlayerSex(cid)]
   	now.lookType, now.lookAddons = v[math.random(#v)], 0
   	doCreatureChangeOutfit(cid, now)
   	return true
   end

   • talkactions.xml

   	<talkaction words="!outfit;!premoutfit" event="script" value="outfit.lua"/>

 

[poii]

wait on first is needed to step on a position x-y-z so player can say the password if he is not on x-y-z position then nothing happens

 

[Doggynub]

@up
actually that is what he made
just that

local pos = {x=100, y=100, z=7}
local poss = {x=102, y=100, z=7}  --place where he will be tped

function onSay(cid, words, param)
	local p = getThingPos(cid)
	if pos.x == p.x and pos.y == p.y and pos.z == p.z then
		doSendMagicEffect(p, CONST_ME_TELEPORT)
		doTeleportThing(cid, poss)
		doSendMagicEffect(poss, CONST_ME_TELEPORT)
	end
end

 

[poii]

oh thanks !
and this on outfit?

[26/07/2010 01:54:14] [Error - TalkAction Interface]
[26/07/2010 01:54:14] data/talkactions/scripts/outfit.luanSay
[26/07/2010 01:54:14] Description:
[26/07/2010 01:54:14] data/talkactions/scripts/outfit.lua:18: attempt to get length of local 'v' (a nil value)
[26/07/2010 01:54:14] stack traceback:
[26/07/2010 01:54:14] data/talkactions/scripts/outfit.lua:18: in function <data/talkactions/scripts/outfit.lua:12>

 

[Doggynub]

local t = {
	['!outfit'] = {
		[0] = {136, 137, 138, 139},
		[1] = {128, 129, 130, 131}
	},
	['!premoutfit'] = {
		[0] = {140, 141, 142, 147, 148, 149, 150, 155, 156, 157, 158, 252, 269, 270, 279, 288, 324, 336},
		[1] = {132, 133, 134, 143, 144, 145, 146, 151, 152, 153, 154, 251, 268, 273, 278, 289, 325, 335}
	}
}

function onSay(cid, words, param)
	if words == 'premoutfit' and not isPremium(cid) then
		return doPlayerSendDefaultCancel(cid, RETURNVALUE_YOUNEEDPREMIUMACCOUNT)
	end
	local now = getCreatureOutfit(cid)
	local v = t[words][getPlayerSex(cid)]
	now.lookType, now.lookAddons = v[math.random(#v)], 0
	doCreatureChangeOutfit(cid, now)
	return true
end

 

[Cykotitan]

he has error ^.-

 

[Doggynub]

ye you just made typing mistakes

 

[Cykotitan]

no i didn't, only bug was in table and it doesn't prevent it from working

 

[Doggynub]

humm ok lets see

local t = {
	['!outfit'] = {
		[0] = {136, 137, 138, 139},
		[1] = {128, 129, 130, 131}
	},
	['!premoutfit'] = {
		[B][I][U][0][/U][/I][/B] = {140, 141, 142, 147, 148, 149, 150, 155, 156, 157, 158, 252, 269, 270, 279, 288, 324, 336},
		[B][I][U][0][/U][/I][/B] = {132, 133, 134, 143, 144, 145, 146, 151, 152, 153, 154, 251, 268, 273, 278, 289, 325, 335}
	}
}

function onSay(cid, words, param)
	if words == 'premoutfit' and not isPremium(cid) then
		return doPlayerSendDefaultCancel(cid, RETURNVALUE_YOUNEEDPREMIUMACCOUNT)
	end
	local now = getCreatureOutfit(cid)
	local v = t[words][getPlayerSex(cid)]
	now.lookType, now.lookAddons = v[math.random(#v)], 0
	doCreatureChangeOutfit(cid, now)
	return true
end

local pos = {x=100, y=100, z=7}

function onStepIn(cid, item, position, fromPosition)
	local players = {}
	for i = 2501, 2503 do
		local v = getTopCreature(getThingPos(i)).uid
		if not isPlayer(v) then
			return
		end
		table.insert(players, v)
	end
	for i = 1, #players do
		doSendMagicEffect(getThingPos(players[i]), CONST_ME_TELEPORT)
		doTeleportThing(players[i], pos)
	end
	doSendMagicEffect(pos, CONST_ME_TELEPORT)
end

And here you made 1 local for the required place and the tp place
(didnt give an error , but he didnt know where to put tp place)

 

[Cykotitan]

humm ok lets see
And here you made 1 local for the required place and the tp place

he must put uids on required places

 

[Doggynub]

..