Ir para conteúdo

[Encerrado] [DÚVIDA] Pokemon PDA By Slicer


TraaNe

Posts Recomendados

Bom oque eu ia responder foi respondido :D

Dúvida Sanada?

@EDIT

Quanto ao order, aqui está, substitua por esse:

 

local dirpref = {
[1] =  {[NORTH] = {[1] = {NORTH}, [2] = {EAST, WEST}, [3] = {NORTHEAST, NORTHWEST}},
[EAST] = {[1] = {EAST}, [2] = {NORTH, SOUTH}, [3] = {NORTHEAST, SOUTHEAST}},
[sOUTH] = {[1] = {SOUTH}, [2] = {EAST, WEST}, [3] = {SOUTHEAST, SOUTHWEST}},
[WEST] = {[1] = {WEST}, [2] = {SOUTH, NORTH}, [3] = {NORTHWEST, SOUTHWEST}},
[NORTHEAST] = {[1] = {NORTH, EAST}, [2] = {NORTHEAST}, [3] = {SOUTH, WEST}},
[sOUTHEAST] = {[1] = {SOUTH, EAST}, [2] = {SOUTHEAST}, [3] = {NORTH, WEST}},
[sOUTHWEST] = {[1] = {SOUTH, WEST}, [2] = {SOUTHWEST}, [3] = {NORTH, EAST}},
[NORTHWEST] = {[1] = {NORTH, WEST}, [2] = {NORTHWEST}, [3] = {EAST, SOUTH}}},
[2] =  {[NORTH] = {[1] = {NORTH}, [2] = {WEST, EAST}, [3] = {NORTHWEST, NORTHEAST}},
[EAST] = {[1] = {EAST}, [2] = {SOUTH, NORTH}, [3] = {SOUTHEAST, NORTHEAST}},
[sOUTH] = {[1] = {SOUTH}, [2] = {WEST, EAST}, [3] = {SOUTHWEST, SOUTHEAST}},
[WEST] = {[1] = {WEST}, [2] = {NORTH, SOUTH}, [3] = {SOUTHWEST, NORTHWEST}},
[NORTHEAST] = {[1] = {EAST, NORTH}, [2] = {NORTHEAST}, [3] = {WEST, SOUTH}},
[sOUTHEAST] = {[1] = {EAST, SOUTH}, [2] = {SOUTHEAST}, [3] = {WEST, NORTH}},
[sOUTHWEST] = {[1] = {WEST, SOUTH}, [2] = {SOUTHWEST}, [3] = {EAST, NORTH}},
[NORTHWEST] = {[1] = {WEST, NORTH}, [2] = {NORTHWEST}, [3] = {SOUTH, EAST}}},
}

function doPushCreature(uid,direction,distance,time)
  if isCreature(uid) == TRUE then
  local rand = (2*math.random(0,1))-1
  local rand2 = math.random(-1,0)
  if direction == 0 then
  signal = {0,rand,-rand,rand,-rand,0,-1,-1,-1,0,0,0}
  elseif direction == 1 then
  signal = {1,1,1,0,0,0,0,rand,-rand,rand,-rand,0}
  elseif direction == 2 then
  signal = {0,rand,-rand,rand,-rand,0,1,1,1,0,0,0}

  elseif direction == 3 then

  signal = {-1,-1,-1,0,0,0,0,rand,-rand,rand,-rand,0}

  elseif direction == 4 then

  signal = {-1,rand2,(-rand2)-1,0,1,rand2+1,rand2,0}

  elseif direction == 5 then

  signal = {1,-rand2,-((-rand2)-1),0,1,rand2+1,rand2,0}

  elseif direction == 6 then

  signal = {-1,rand2,(-rand2)-1,0,-1,(-rand2)-1,rand2,0}

  else

  signal = {1,-rand2,-((-rand2)-1),0,-1,(-rand2)-1,rand2,0}

  end

  local pos = getThingPos(uid)

  nsig = #signal

  nvar = 0



  repeat

  nvar = nvar+1

  newpos = {x=pos.x+(signal[nvar]),y=pos.y+(signal[(nsig/2)+nvar]),z=pos.z}

  newtile = {x=newpos.x,y=newpos.y,z=newpos.z,stackpos=0}

  until getTileThingByPos(newtile).uid ~= 0 and hasProperty(getTileThingByPos(newtile).uid,3) == FALSE and canWalkOnPos(newtile, true, false, true, true, false) and queryTileAddThing(uid,newpos) == 1 or nvar == (nsig/2)
																													--alterado v2.5


  if distance == nil or distance == 1 then

  doTeleportThing(uid,newpos,TRUE)  

  else

  distance = distance-1

  doTeleportThing(uid,newpos,TRUE)

	 if time ~= nil then

	 addEvent(doPushCreature,time,uid,direction,distance,time)

	 else

	 addEvent(doPushCreature,500,uid,direction,distance,500)

	 end	  

  end

  end  

end

function doComparePosition(pos1, pos2)
if pos1.x == pos2.x and pos1.y == pos2.y and pos1.z == pos2.z then
return true
end
return false
end

function walkTo(cid, direction, finalp, useExtraMoveOrder)
if not isCreature(cid) then return true end

doChangeSpeed(cid, 5)
local x = getThingPos(cid)
local ratedelaywalk = 1
local finalpos = {x = finalp.x, y = finalp.y, z = finalp.z}

	if not canWalkOnPos(finalpos, false, false, true, true, true) then
		finalpos = getClosestFreeTile(cid, finalpos)
	end

	if not finalpos then
	return false
	end

local dir = getDirectionToWalk(cid, finalpos, 2, 0, 0, false, true, 300)
if dir and tonumber(dir) ~= nil and tonumber(dir) >= 0 and tonumber(dir) <= 7 then
	if dir >= 4 then
		ratedelaywalk = 0.4
	end
	doPushCreature(cid, dir, 1, getNextStepDelay(cid, dir) * ratedelaywalk)
	return getNextStepDelay(cid, dir) * ratedelaywalk
elseif useExtraMoveOrder then

local random = math.random(1, 2)

for ta = 1, 3 do
	for tb = 1, #dirpref[random][direction][ta] do
		local y = getPosByDir(getThingPos(cid), dirpref[random][direction][ta][tb])
		local w = getCreatureLP(cid)
		local z = getDirectionTo(y, getThingPos(cid)) -- direção q vai marcar
		local j = getDirectionTo(getThingPos(cid), y) -- direção q ele vai
		if canWalkOnPos(y, true, false, true, true, true) and w ~= j then
			if dirpref[random][direction][ta][tb] >= 4 then
				ratedelaywalk = 0.5
			end
			doPushCreature(cid, dirpref[random][direction][ta][tb], 1, getNextStepDelay(cid, dirpref[random][direction][ta][tb]) * ratedelaywalk)
			markLP(cid, z)
		return getNextStepDelay(cid, dirpref[random][direction][ta][tb]) * ratedelaywalk
		end
	end
end
end
return false
end

function getCreatureLP(cid)
return getPlayerStorageValue(cid, 197)
end

function markLP(cid, dir)
setPlayerStorageValue(cid, 197, dir)
end

function markPos(sid, pos)
if not isCreature(sid) then return end
setPlayerStorageValue(sid, 145, pos.x)
setPlayerStorageValue(sid, 146, pos.y)
setPlayerStorageValue(sid, 147, pos.z)
end

function markFlyingPos(sid, pos)
if not isCreature(sid) then return end
setPlayerStorageValue(sid, 33145, pos.x)
setPlayerStorageValue(sid, 33146, pos.y)
setPlayerStorageValue(sid, 33147, pos.z)
end

function getFlyingMarkedPos(sid)
if not isCreature(sid) then return end
local xx = getPlayerStorageValue(sid, 33145)
local yy = getPlayerStorageValue(sid, 33146)
local zz = getPlayerStorageValue(sid, 33147)
return {x = xx, y = yy, z = zz, stackpos = 0}
end

function getMarkedPos(sid)
if not isCreature(sid) then return end
local xx = getPlayerStorageValue(sid, 145)
local yy = getPlayerStorageValue(sid, 146)
local zz = getPlayerStorageValue(sid, 147)
return {x = xx, y = yy, z = zz}
end

function getOwnerPos(sid)
if not isCreature(sid) then return end
local xx = getPlayerStorageValue(sid, 148)
local yy = getPlayerStorageValue(sid, 149)
local zz = getPlayerStorageValue(sid, 150)
return {x = xx, y = yy, z = zz}
end

function markOwnerPos(sid, pos)
if not isCreature(sid) then return end
setPlayerStorageValue(sid, 148, pos.x)
setPlayerStorageValue(sid, 149, pos.y)
setPlayerStorageValue(sid, 150, pos.z)
end

function recheck(sid, skill, pos)
if not isCreature(sid) then return end
local cid = getCreatureMaster(sid)

if skill == "cut" then

	local item = getTileItemById(pos, 2767)
	doCreatureSay(sid, "CUT!", TALKTYPE_MONSTER)
	markPos(sid, {x=1,y=1,z=7})
	doFaceCreature(sid, pos)
	doSendMagicEffect(getThingPos(item.uid), 141)
	doTransformItem(item.uid, 6216)
		local function growBush()
		doTransformItem(getTileItemById(pos, 6216).uid, 2767)
		end
	addEvent(growBush, intervalToRegrowBushAndStones * 1000)

elseif skill == "rock smash" then

	local item = getTileItemById(pos, 1285)
	doCreatureSay(sid, "ROCK SMASH!", TALKTYPE_MONSTER)
	markPos(sid, {x=1,y=1,z=7})
	doFaceCreature(sid, pos)
	doSendMagicEffect(getThingPos(item.uid), 118)
	doTransformItem(item.uid, 3610)
		local function growRock()
		doTransformItem(getTileItemById(pos, 3610).uid, 1285)
		end
	addEvent(growRock, intervalToRegrowBushAndStones * 1000)

elseif skill == "headbutt" then   --alterado v2.6

local master = getCreatureMaster(sid)
local array = {}						  
local lvl = {25, 40, 60, 80, 1000} --lvls

for i = 1, #lvl do
	if getPlayerLevel(master) <= lvl[i] then
	   array = headbutt[lvl[i]]
	   break
	end
end
local rand = array[math.random(#array)]
for j = 1, rand[2] do
	local poke = doCreateMonster(rand[1], getClosestFreeTile(sid, pos))
	doSetMonsterPassive(poke)			  
	doWildAttackPlayer(poke, master)
end
local item = getTileItemById(pos, 12591)	--id do item   arvore normal
doCreatureSay(sid, "HEADBUTT!", TALKTYPE_MONSTER)
markPos(sid, {x=1,y=1,z=7})
doFaceCreature(sid, pos)
doSendMagicEffect(getThingPos(item.uid), 118)
doTransformItem(item.uid, 12592)  --id do item   arvore quebrada
local function growHead()
	  doTransformItem(getTileItemById(pos, 12592).uid, 12591) --id do item  arvore quebrada, arvore normal
end
addEvent(growHead, choose(5, 10, 20, 30) * 60 * 1000)   --o tempo pra arvore voltar ao normal varia de 5~30min

elseif skill == "dig"  then

	local item = getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0})
	doCreatureSay(sid, "DIG!", TALKTYPE_MONSTER)
	markPos(sid, {x=1,y=1,z=7})
	doFaceCreature(sid, pos)
	doSendMagicEffect(getThingPos(item.uid), 3)
	doTransformItem(item.uid, item.itemid+1)
		local function closeHole()
		doTransformItem(getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).uid, item.itemid)
		end
	addEvent(closeHole, intervalToRegrowBushAndStones * 1000)

elseif skill == "fly" and isPremium(cid) then

	--if not isPremium(cid) then
	--doPlayerSendCancel(cid, "Only premium members are allowed to fly.")
	--return true
	--end
	local pokemon = flys[getPokemonName(getCreatureSummons(cid)[1])]
	doPlayerSendTextMessage(cid, 27, "Type \"up\" or \"h1\" to fly higher and \"down\" or \"h2\" to fly lower.")
	doChangeSpeed(cid, -getCreatureSpeed(cid))
	local speed = 500 + PlayerSpeed/5 + getSpeed(sid) * 6 * speedRate
	doChangeSpeed(cid, speed)
	setPlayerStorageValue(cid, 54844, speed)
	doSetCreatureOutfit(cid, {lookType = pokemon[1] + 351}, -1)
	doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, "hp", getCreatureHealth(getCreatureSummons(cid)[1]) / getCreatureMaxHealth(getCreatureSummons(cid)[1]))
	doRemoveCreature(getCreatureSummons(cid)[1])
	setPlayerStorageValue(cid, 17000, 1)
	if getCreatureOutfit(cid).lookType == 667 or getCreatureOutfit(cid).lookType == 999 then
	   markPosEff(cid, getThingPos(cid))
	   sendMovementEffect(cid, 136, getThingPos(cid))	 --edited efeito quando anda com o porygon
	end
return true

elseif skill == "ride" and isPremium(cid) then

	local pokemon = rides[getPokemonName(getCreatureSummons(cid)[1])]
	doChangeSpeed(cid, -getCreatureSpeed(cid))
	local speed = 150 + PlayerSpeed + getSpeed(sid) * 5 * speedRate
	doChangeSpeed(cid, speed)
	setPlayerStorageValue(cid, 54844, speed)
	doSetCreatureOutfit(cid, {lookType = pokemon[1] + 351}, -1)
	doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, "hp", getCreatureHealth(getCreatureSummons(cid)[1]) / getCreatureMaxHealth(getCreatureSummons(cid)[1]))
	doRemoveCreature(getCreatureSummons(cid)[1])
	setPlayerStorageValue(cid, 17001, 1)

return true
end

if getOwnerPos(sid).x ~= getThingPos(getCreatureMaster(sid)).x or getOwnerPos(sid).y ~= getThingPos(getCreatureMaster(sid)).y or isCreature(getCreatureTarget(getCreatureMaster(sid))) then
	doRegainSpeed(sid)
	markPos(sid, {x=1,y=1,z=7})
return true
end

addEvent(recheck, 120, sid)
end

function goThere(sid, thepos, skill, target, rept)
if not isCreature(sid) then return true end
if getCreatureNoMove(sid) or isSleeping(sid) or isParalyze(sid) then return true end			--alterado v2.6
if thepos.x ~= getMarkedPos(sid).x or thepos.y ~= getMarkedPos(sid).y then return true end
if isCreature(getCreatureTarget(getCreatureMaster(sid))) and target == false or (rept and rept <= 0) then
	doRegainSpeed(sid)
	markPos(sid, {x=1,y=1,z=7})
return true
end	

if (skill == "ride" or skill == "fly") and getDistanceBetween(getThingPos(sid), getMarkedPos(sid)) <= 1 then

local currentPos = getThingPos(getCreatureMaster(sid))
local summonPos = getThingPos(sid)
local masterPos = getCreatureLastPosition(sid)

if (getThingPos(sid).x == getThingPos(getCreatureMaster(sid)).x and getThingPos(sid).y == getThingPos(getCreatureMaster(sid)).y) or (currentPos.x == masterPos.x and currentPos.y == masterPos.y) then
recheck(sid, skill, thepos)
return true
end

if currentPos.x == thepos.x and currentPos.y == thepos.y then
	if getDirectionTo(getThingPos(sid), getThingPos(getCreatureMaster(sid))) <= 3 then
		doRegainSpeed(sid)
		local ndelay = getNextStepDelay(sid, 0)
		doTeleportThing(sid, thepos, true)
		doChangeSpeed(sid, -getCreatureSpeed(sid))
		markPos(sid, getThingPos(getCreatureMaster(sid)))
		addEvent(goThere, ndelay, sid, getMarkedPos(sid), skill, target)
	else
		doChangeSpeed(sid, - getCreatureSpeed(sid))
		doRegainSpeed(sid)
		markPos(sid, getThingPos(getCreatureMaster(sid)))
		local x = walkTo(sid, getDirectionTo(getThingPos(sid), getMarkedPos(sid)), getMarkedPos(sid), skill == "ride" or skill == "fly")
		doChangeSpeed(sid, - getCreatureSpeed(sid))
		addEvent(goThere, x, sid, getMarkedPos(sid), skill, target)
		end
return true
else
	markPos(sid, getThingPos(getCreatureMaster(sid)))
	doChangeSpeed(sid, - getCreatureSpeed(sid))
	doRegainSpeed(sid)
	local ndelay = getNextStepDelay(sid, 0)
		if getDirectionTo(getThingPos(sid), getMarkedPos(sid)) >= 4 then
			local x = walkTo(sid, getDirectionTo(getThingPos(sid), getMarkedPos(sid)), getMarkedPos(sid), skill == "ride" or skill == "fly")
		else
			doTeleportThing(sid, getPosByDir(getThingPos(sid), getDirectionTo(getThingPos(sid), getMarkedPos(sid))))
		end
	doChangeSpeed(sid, - getCreatureSpeed(sid))
	addEvent(goThere, x and x or ndelay, sid, getMarkedPos(sid), skill, target)
return true
end

addEvent(recheck, 350, sid, skill, thepos)
return true
end

if getThingPos(sid).x == getMarkedPos(sid).x and getThingPos(sid).y == getMarkedPos(sid).y then
if isCreature(getCreatureTarget(sid)) then
doFaceCreature(sid, getThingPos(getCreatureTarget(sid)))
end
if skill == "blink" then
   doChangeSpeed(sid, - getCreatureSpeed(sid))   --edited blink
end
addEvent(recheck, 350, sid, skill, thepos)
return true
end

if (getOwnerPos(sid).x ~= getThingPos(getCreatureMaster(sid)).x or getOwnerPos(sid).y ~= getThingPos(getCreatureMaster(sid)).y) and isCreature(getCreatureTarget(getCreatureMaster(sid))) == false and skill == "move" then
doRegainSpeed(sid)
markPos(sid, {x=1,y=1,z=7})
return true
end

doRegainSpeed(sid)

local holeid = thepos
holeid.stackpos = 0
holeid = getTileThingByPos(holeid).itemid

if getDistanceBetween(getThingPos(sid), getMarkedPos(sid)) <= 1 and (not isWalkable(getPosByDir(getThingPos(sid), getDirectionTo(getThingPos(sid), getMarkedPos(sid))), true, false, false, true) or isInArray(specialabilities["digholes"], holeid)) then
if isGhostPokemon(sid) and getPlayerStorageValue(getCreatureMaster(sid), 990) <= 0 then
	local todir = getDirectionTo(getThingPos(sid), getMarkedPos(sid))
	if todir <= 3 then
		doTeleportThing(sid, getMarkedPos(sid), true)
	else
		local gotopos = getPosByDir(getThingPos(sid), dirpref[math.random(1, 2)][todir][1][math.random(1, 2)])
		doTeleportThing(sid, gotopos, true)
		addEvent(goThere, getNextStepDelay(sid, 0), sid, getMarkedPos(sid), skill, target)
		return true
	end
end
doFaceCreature(sid, getMarkedPos(sid))
addEvent(recheck, 180, sid, skill, thepos)
doChangeSpeed(sid, - getCreatureSpeed(sid))
return true
end	

local ret = 0
if getDistanceBetween(getThingPos(sid), getMarkedPos(sid)) <= 1 then
	ret = walkTo(sid, getDirectionTo(getThingPos(sid), getMarkedPos(sid)), getMarkedPos(sid), skill == "ride" or skill == "fly" or isGhostPokemon(sid))
	if not tonumber(ret) then
		doFaceCreature(sid, getMarkedPos(sid))
		addEvent(recheck, 180, sid, skill, thepos)
		doChangeSpeed(sid, - getCreatureSpeed(sid))
	return true
	end
else
	ret = walkTo(sid, getDirectionTo(getThingPos(sid), getMarkedPos(sid)), getMarkedPos(sid), skill == "ride" or skill == "fly" or not isGhostPokemon(sid))-- and isSightClear(getThingPos(sid), getMarkedPos(sid), false)))
end

if not tonumber(ret) then
doPlayerSendCancel(getCreatureMaster(sid), "Destination is not reachable.")
markPos(sid, {x=1,y=1,z=7})
return true
end

doChangeSpeed(sid, - getCreatureSpeed(sid))
addEvent(goThere, tonumber(ret), sid, getMarkedPos(sid), skill, target, rept and rept - 1 or 22)
end
Editado por Roksas
Link para o comentário
Compartilhar em outros sites

  • Respostas 67
  • Created
  • Última resposta

Top Posters In This Topic

Top Posters In This Topic

Yan é Isso Aqi

 

 

 

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Charizard - Unknown spell name: Fire Spin

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Charizard.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Charizard - Unknown spell name: Burning Skin

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Charizard.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Charizard - Unknown spell name: Ranging Blast

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Charizard.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Blastoise - Unknown spell name: Hydro Pump

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Blastoise.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Blastoise - Unknown spell name: Jet Cannons

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Blastoise.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Beedrill - Unknown spell name: Toxic Needle

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Beedrill.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Beedrill - Unknown spell name: Mega Prick

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Beedrill.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Pidgeot - Unknown spell name: Windstorm

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Pidgeot.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Rattata - Unknown spell name: Hyper Fang

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Rattata.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Raticate - Unknown spell name: Hyper Fang

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Raticate.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Fearow - Unknown spell name: Wind Blow

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Fearow.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Fearow - Unknown spell name: Sky Drop

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Fearow.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Fearow - Unknown spell name: Wind Vortex

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Fearow.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Raichu - Unknown spell name: Thundershock

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Raichu.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Raichu - Unknown spell name: Thunderbolt

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Raichu.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Nidoking - Unknown spell name: Double-edge

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Nidoking.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Golbat - Unknown spell name: Poisonous Wing

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Golbat.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Vileplume - Unknown spell name: Mega Drain

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Vileplume.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Vileplume - Unknown spell name: Gastro Acid

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Vileplume.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Paras - Unknown spell name: Leech Life

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Paras.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Parasect - Unknown spell name: Leech Life

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Parasect.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Parasect - Unknown spell name: Nature Ball

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Parasect.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Venonat - Unknown spell name: Disable

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Venonat.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Venonat - Unknown spell name: Zen Headbutt

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Venonat.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Venomoth - Unknown spell name: Disable

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Venomoth.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Venomoth - Unknown spell name: Zen Headbutt

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Venomoth.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Arcanine - Unknown spell name: Extreme Speed

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Arcanine.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Arcanine - Unknown spell name: Heat Wave

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Arcanine.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Abra - Unknown spell name: Psycho Shift

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Abra.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Alakazam - Unknown spell name: Psycho Shift

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Alakazam.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Alakazam - Unknown spell name: Meditate

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Alakazam.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Alakazam - Unknown spell name: Mind Blast

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Alakazam.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Tentacruel - Unknown spell name: Tidal Wave

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Tentacruel.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Muk - Unknown spell name: Gunk Shot

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Muk.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Muk - Unknown spell name: Slime Wave

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Muk.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Gengar - Unknown spell name: GhostInvisible

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Gengar.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Gengar - Unknown spell name: Dark Pulse

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Gengar.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Onix - Unknown spell name: Slam

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Onix.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Onix - Unknown spell name: Magnitude

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Onix.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Hypno - Unknown spell name: Pound

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Hypno.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Hypno - Unknown spell name: Disable

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Hypno.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Krabby - Unknown spell name: Slam

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Krabby.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Kingler - Unknown spell name: Slam

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Kingler.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Voltorb - Unknown spell name: Volt Tackle

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Voltorb.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Voltorb - Unknown spell name: Slam

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Voltorb.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Electrode - Unknown spell name: Slam

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Electrode.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Electrode - Unknown spell name: Discharge

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Electrode.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Electrode - Unknown spell name: Volt Tackle

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Electrode.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Hitmonlee - Unknown spell name: Double Kick

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Hitmonlee.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Hitmonlee - Unknown spell name: Hi Jump Kick

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Hitmonlee.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Hitmonlee - Unknown spell name: Reversal

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Hitmonlee.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Hitmonlee - Unknown spell name: Omnikick

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Hitmonlee.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Hitmonchan - Unknown spell name: Comet Punch

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Hitmonchan.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Hitmonchan - Unknown spell name: Mach Punch

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Hitmonchan.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Hitmonchan - Unknown spell name: Focus Punch

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Hitmonchan.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Hitmonchan - Unknown spell name: Double Punch

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Hitmonchan.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Tangela - Unknown spell name: Mega Drain

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Tangela.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Seadra - Unknown spell name: Water Spout

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Seadra.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Scyther - Unknown spell name: Razor Wind

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Scyther.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Jynx - Unknown spell name: Sweet Kiss

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Jynx.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Electabuzz - Unknown spell name: Electric Field

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Electabuzz.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Pinsir - Unknown spell name: Close Combat

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Pinsir.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Pinsir - Unknown spell name: Strangling Tweezers

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Pinsir.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Gyarados - Unknown spell name: Water Oath

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Gyarados.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Gyarados - Unknown spell name: Hydro Pump

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Gyarados.xml)

[18/12/2012 13:54:31] [Error - Monsters::deserializeSpell] Shiny Jolteon - Unknown spell name: Double Kick

[18/12/2012 13:54:31] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Jolteon.xml)

[18/12/2012 13:54:32] [Error - Monsters::deserializeSpell] Shiny Flareon - Unknown spell name: Fire Mark

[18/12/2012 13:54:32] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Flareon.xml)

[18/12/2012 13:54:32] [Error - Monsters::deserializeSpell] Shiny Dratini - Unknown spell name: Slam

[18/12/2012 13:54:32] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Dratini.xml)

[18/12/2012 13:54:32] [Error - Monsters::deserializeSpell] Shiny Dratini - Unknown spell name: Dragon Tail

[18/12/2012 13:54:32] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Dratini.xml)

[18/12/2012 13:54:32] [Error - Monsters::deserializeSpell] Shiny Dragonair - Unknown spell name: Dragon Tail

[18/12/2012 13:54:32] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Dragonair.xml)

[18/12/2012 13:54:32] [Error - Monsters::deserializeSpell] Shiny Dragonite - Unknown spell name: Dragon Tail

[18/12/2012 13:54:32] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Dragonite.xml)

[18/12/2012 13:54:32] [Error - Monsters::deserializeSpell] Shiny Dragonite - Unknown spell name: Aeroblast

[18/12/2012 13:54:32] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Dragonite.xml)

 

 

 

E Tem Isso Aqi Tbm

 

 

 

[18/12/2012 13:55:14] [Error - Npc interface]

[18/12/2012 13:55:14] data/npc/scripts/profrobert.lua:onCreatureSay

[18/12/2012 13:55:14] Description:

[18/12/2012 13:55:14] data/lib/011-string.lua:16: bad argument #1 to 'find' (string expected, got nil)

[18/12/2012 13:55:14] stack traceback:

[18/12/2012 13:55:14] [C]: in function 'find'

[18/12/2012 13:55:14] data/lib/011-string.lua:16: in function '(for generator)'

[18/12/2012 13:55:14] data/lib/011-string.lua:16: in function 'explode'

[18/12/2012 13:55:14] data/lib/some functions.lua:681: in function 'doCorrectString'

[18/12/2012 13:55:14] data/npc/scripts/profrobert.lua:46: in function 'callback'

[18/12/2012 13:55:14] data/npc/lib/npcsystem/npchandler.lua:391: in function 'onCreatureSay'

[18/12/2012 13:55:14] data/npc/scripts/profrobert.lua:7: in function <data/npc/scripts/profrobert.lua:7>

 

Quem Manjar Agradeço *-

Link para o comentário
Compartilhar em outros sites

Bom Desculpme Pelo Double

Mas Quem Poder Solucionar Isso Pra Finalizar

 

Esses São Erros Que Aparecem Ao Ligar Server

 

 

 

18/12/2012 14:54:03] [Error - LuaScriptInterface::loadFile] cannot open data/talkactions/scripts/partyexp.lua: No such file or directory

[18/12/2012 14:54:03] [Warning - Event::loadScript] Cannot load script (data/talkactions/scripts/partyexp.lua)

[18/12/2012 14:54:03] cannot open data/talkactions/scripts/partyexp.lua: No such file or directory

[18/12/2012 14:54:04] [Warning - Event::loadScript] Event onRemoveItem not found (data/movements/scripts/UniqueItem.lua)

 

[18/12/2012 14:54:04] [Error - CreatureScript Interface]

[18/12/2012 14:54:04] data/creaturescripts/scripts/exp.lua

[18/12/2012 14:54:04] Description:

[18/12/2012 14:54:04] data/creaturescripts/scripts/exp.lua:5: table index is nil

[18/12/2012 14:54:04] [Warning - Event::loadScript] Cannot load script (data/creaturescripts/scripts/exp.lua)

 

[18/12/2012 14:54:04] [Warning - Event::loadScript] Event onLogin not found (data/creaturescripts/scripts/logskull.lua)

 

Tipo Consigui Colocar Utani Gran Hur No Server,Mudei Nome (Correr)

Levl,Mana Etc

Porem Só GOD Consegue Usar

os Players Não ;x

 

Bem Só IssO

Quem Souber Arrumar Esses Problema Agradeço Muito ! Com Reps Tbm Claro (Porém Só Amanhã,Acabou ;X)

Link para o comentário
Compartilhar em outros sites

Seguinte, vá no arquivo talkactions.xml, e aperte CTRL+F, procure por partyexp.lua e apague a tag! Em seguida nos envie o arquivo UniqueItem.lua na pasta movements/scripts e o arquivo exp.lua da pasta creaturescripts/scripts. E no arquivo login.lua na mesma pasta adicione isso:

 

registerCreatureEvent(cid, "LogSkull")

Editado por Roksas
Link para o comentário
Compartilhar em outros sites

Aqui está, aperte CTRL+F e digite "DIAMOND" sem as aspas, substitua pelo ID do Diamond.

 

local focus = 0
local talk_start = 0
local conv = 0
local target = 0
local following = false
local attacking = false
local talkState = {}
local finalname = ""

function onThingMove(creature, thing, oldpos, oldstackpos)
end

function onCreatureAppear(creature)
end

function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Good bye sir!')
focus = 0
talk_start = 0
end
end

function onCreatureTurn(creature)
end

function msgcontains(txt, str)
return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end

function onCreatureSay(cid, type, msge)
local msg = string.lower(msge)
local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid


   if focus == cid then
       talk_start = os.clock()
   end

local auras = {"red aura", "blue aura", "green aura", "yellow aura", "white aura", "gray aura", "cyan aura", "purple aura", "orange aura"}


if (msgcontains(msg, 'hi') and (focus == 0) and (getDistanceToCreature(cid) <= 4)) then

   focus = cid
   conv = 1
   talk_start = os.clock()
   selfSay("Hello, "..getCreatureName(cid).."! I can give your pokemon a nickname or i can put in your pokemon a elemental aura, if he is boosted at least +50...")

elseif (msgcontains(msg, "no") or msgcontains(msg, "bye")) and focus == cid and conv ~= 3 then

   selfSay("No problem then, sir. Come back when you feel like it!")
   focus = 0

elseif (msgcontains(msg, "nick") or msgcontains(msg, "nickname")) and focus == cid and conv == 1 then

       if getPlayerSlotItem(cid, 8).uid <= 0 then
           selfSay("Sorry, you don't have a pokemon in the main slot!")
           focus = 0
       return true
       end

   selfSay("Put your pokemon at the main slot and tell me, what nickname would you like me to give to your pokemon?")
   conv = 3

elseif msgcontains(msg, "aura") and focus == cid and conv == 1 then

 if getPlayerSlotItem(cid, 8).uid <= 0 then
    selfSay("Sorry, you don't have a pokemon in the main slot!")
    focus = 0
 return true
 end

 local pb = getPlayerSlotItem(cid, 8).uid
 if not getItemAttribute(pb, "boost") or getItemAttribute(pb, "boost") < 50 then
    selfSay("Sorry, your pokemon is not boosted +50!")
    focus = 0
 return true
 end  

 if getItemAttribute(pb, "aura") and getItemAttribute(pb, "aura") ~= "" then
    selfSay("Sorry, your pokemon already have a elemental aura!")
    focus = 0
 return true
 end

 if #getCreatureSummons(cid) >= 1 then
    selfSay("Return your pokemon for your pokeball!")
    focus = 0
 return true
 end	   

 selfSay("You can choose one of these auras: red aura, blue aura, green aura, yellow aura, white aura, gray aura, cyan aura, purple aura, orange aura. Which one do you prefer?")
 conv = 9

elseif isInArray(auras, msg) and focus == cid and conv == 9 then

   selfSay("Are you sure that you want to put a "..msg.." in your pokemon?")
   conv = 11
   local d, e = msg:find('(.-) aura')
      auraFinal = string.sub(msg, d -1, e - 5)

elseif msgcontains(msg, "yes") and focus == cid and conv == 11 then	    

 if getPlayerSlotItem(cid, 8).uid <= 0 then
    selfSay("Sorry, you don't have a pokemon in the main slot!")
    focus = 0
 return true
 end

 local pb = getPlayerSlotItem(cid, 8).uid
 if not getItemAttribute(pb, "boost") or getItemAttribute(pb, "boost") < 50 then
    selfSay("Sorry, your pokemon is not boosted +50!")
    focus = 0
 return true
 end

 if #getCreatureSummons(cid) >= 1 then
    selfSay("Return your pokemon for your pokeball!")
    focus = 0
 return true
 end   

 doItemSetAttribute(pb, "aura", auraFinal)   
 selfSay("Done! Now your pokemon have a new elemental aura. Enjoy it!")
    focus = 0
    conv = 0

elseif conv == 3 and focus == cid then

   local tablee = {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "x", "w", "y", "z", ".", ":", "'", '"', "~", "^", "@", "#", "$", "%", "&", "*", "(", ")", "-", "+", "_", "?", ">", "<", "•", ";", "°", "¹", "²", "³", "£", "¢", "¬", "1", "2", "3", "4", "5", "6", "7", "8", "9", "0"}
   local table = {"'", '"', "!", "ã", "õ", "ç", "´", "`", "á", "à", "ó", "ò", "é", "è", "í", "ì", "ú", "ù", "¹", "²", "³", "£", "¢", "¬", "§", "°", "º", "ª", "•", "|"}

   for a = 1, #table do
       if string.find(msg, table[a]) then
           selfSay("Sorry, the nick has invalid symbols.")
       return true
       end
   end

   if string.len(msg) <= 1 or string.len(msg) >= 19 then
       selfSay("Sorry, that nick is too long or too short!")
   return true
   end

   local pokename = getItemAttribute(getPlayerSlotItem(cid, 8).uid, "poke")


   selfSay("Are you sure that you want to change your's "..pokename.." name to \""..msge.."\"? This is going to cost you 10 hundred dollars.")
   conv = 5
   finalname = msge

elseif msgcontains(msg, "yes") and focus == cid and conv == 5 then

   if getPlayerSlotItem(cid, 8).uid <= 0 then
       selfSay("Where is your pokemon?! You have to keep it at the main slot!")
       focus = 0
   return true
   end

   if doPlayerRemoveItem(cid, DIAMOND,1) == false then
       selfSay("You don't have enough money to afford this service, come back later.")
       focus = 0
       conv = 0
   return true
   end

   local nick = ""..finalname..""
   local description = "Contains a "..getItemAttribute(getPlayerSlotItem(cid, 8).uid, "poke").."."
   selfSay("Done! Your pokemon now has a new name, enjoy it!")
   doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, "nick", nick)
   local newdes = description.."\nIt's nickname is: "..finalname.."."
   doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, "description", newdes)
   local hp = getItemAttribute(getPlayerSlotItem(cid, 8).uid, "happy")
   doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, "happy", hp + 25)
   if #getCreatureSummons(cid) >= 1 then
       adjustStatus(getCreatureSummons(cid)[1], getPlayerSlotItem(cid, 8).uid)
   end
   focus = 0
   conv = 0
   end
end

local intervalmin = 38
local intervalmax = 70
local delay = 25
local number = 1
local messages = {"Want to give some nicknames to your pokemon? Talk to me!",
         "Did you know your pokemon gets a little happier when you give him a nickname?",
         "Every pokemon wants to have a nickname! Come talk to me!",
         "Pokemons love nicknames, you should give yours one.",
        }

function onThink()

   if focus == 0 then
       selfTurn(1)
           delay = delay - 0.5
           if delay <= 0 then
               selfSay(messages[number])
               number = number + 1
                   if number > #messages then
                       number = 1
                   end
               delay = math.random(intervalmin, intervalmax)
           end
       return true
   else

   if not isCreature(focus) then
       focus = 0
   return true
   end

       local npcpos = getThingPos(getThis())
       local focpos = getThingPos(focus)

       if npcpos.z ~= focpos.z then
           focus = 0
       return true
       end

       if (os.clock() - talk_start) > 45 then
           focus = 0
           selfSay("Come back some other time!")
       end

       if getDistanceToCreature(focus) > 3 then
           selfSay("Enjoy!")
           focus = 0
       return true
       end

       local dir = doDirectPos(npcpos, focpos)    
       selfTurn(dir)
   end


return true
end

Link para o comentário
Compartilhar em outros sites

Com Level

Se Alguem Poder Fazer Grande Favorzão Tbm

Deixar Esse Npc Ao inves de trocar Nickname Por 80 Hundred

Trocar Por 1 Diamond

 

 

Npc Namer

http://wklej.org/id/900906/

 

 

Nick.lua

http://wklej.org/id/900907/

 

Pare de fazer milhares de pedidos, se a duvida original ja foi resolvida, crie um novo tópico com novo pedido, se insistir em fazer novos aqui irei fechar.

Link para o comentário
Compartilhar em outros sites

Funfo Aqi rs'

 

 

Po,Desculpa Ai

Yan é Porq

Vai surgindo dúvidas Novas,Idéias rs

Desculpe rs

 

 

Mas Com Dúvida Original

Criei o Npc Q Amigo Passou

Porem Vou Abri No Rme Não Dá

Ja importei Mas não da

Só No Comando /s ;/

Link para o comentário
Compartilhar em outros sites

Visitante
Este tópico está impedido de receber novos posts.

×
×
  • Criar Novo...