Jump to content
  • 0

[Resolvido] Error Look.lua PDA


jeanflamengo

Question

estou tentando colocar Held item no meu serve porem esta dando um error no meu look.lua e eu não to conseguindo arrumar e.e

 

look.lua

 

 

local NPCBattle = {
["Brock"] = {artig = "He is", cidbat = "Pewter"},
["Misty"] = {artig = "She is", cidbat = "Cerulean"},
["Blaine"] = {artig = "He is", cidbat = "Cinnabar"},
["Sabrina"] = {artig = "She is", cidbat = "Saffron"}, --alterado v1.9 \/ peguem tudo!
["Kira"] = {artig = "She is", cidbat = "Viridian"},
["Koga"] = {artig = "He is", cidbat = "Fuchsia"},
["Erika"] = {artig = "She is", cidbat = "Celadon"},
["Surge"] = {artig = "He is", cidbat = "Vermilion"},
}
local gastostones = {
[0] = 0,
[1] = 1,
[2] = 2,
[3] = 3,
[4] = 4,
[5] = 6,
[6] = 8,
[7] = 10,
[8] = 12,
[9] = 15,
[10] = 18,
[11] = 21,
[12] = 24,
[13] = 28,
[14] = 32,
[15] = 36,
[16] = 40,
[17] = 45,
[18] = 50,
[19] = 55,
[20] = 60,
[21] = 66,
[22] = 72,
[23] = 78,
[24] = 84,
[25] = 91,
[26] = 98,
[27] = 105,
[28] = 112,
[29] = 120,
[30] = 128,
[31] = 136,
[32] = 144,
[33] = 153,
[34] = 162,
[35] = 171,
[36] = 180,
[37] = 190,
[38] = 200,
[39] = 210,
[40] = 220,
[41] = 231,
[42] = 242,
[43] = 253,
[44] = 264,
[45] = 276,
[46] = 288,
[47] = 300,
[48] = 312,
[49] = 325,
[50] = 338,
}
local heldname1 = {}
local heldname2 = {}
local heldname3 = {}
function onLook(cid, thing, position, lookDistance)
local str = {}
local iname = getItemInfo(thing.itemid)
if not isCreature(thing.uid) then
if not iname or not iname.name then return true end
if isPokeball(thing.itemid) and getItemAttribute(thing.uid, "poke") then --alterado aki
local owner = getItemAttribute(thing.uid, "firstpoke")
local pokename = getItemAttribute(thing.uid, "poke")
unLock(thing.uid)
local lock = getItemAttribute(thing.uid, "lock")
local pokename = getItemAttribute(thing.uid, "poke")
local boost = getItemAttribute(thing.uid, "boost") or 0
local held1 = getItemAttribute(thing.uid, "attackheld") or 0
local held2 = getItemAttribute(thing.uid, "defheld") or 0
local held3 = getItemAttribute(thing.uid, "regenheld") or 0
if held1 == 1 then
heldname1 = "Held 1: X-Attack"
else
heldname1 = "Held 1: Vazio"
end
if held2 == 1 then
heldname2 = "Held 2: X-Defense"
else
heldname2 = "Held 2: Vazio"
end
if held3 == 1 then
heldname3 = "Held 3: X-Regeneration"
else
heldname3 = "Held 3: Vazio"
end
table.insert(str, "You see "..iname.article.." "..iname.name..".")
if getItemAttribute(thing.uid, "unique") then
table.insert(str, " It's an unique item.")
end
if not pokesPrice[pokename] then
if ditto == 1 then
table.insert(str, "\nIt contains "..getArticle(pokename).." "..pokename.."(Ditto). Price: unsellable.\n")
else
table.insert(str, "\nIt contains "..getArticle(pokename).." "..pokename..". Price: unsellable.\n")
end
else
local precocerto = ((pokesPrice[pokename].price) + (((gastostones[boost] * 5) * (100000 * 0.01))) + ((held1 * 0.1) * 10000000) + ((held2 * 0.1) * 10000000)+ ((held3 * 0.1) * 10000000))
if ditto then
table.insert(str, "\nIt contains "..getArticle(pokename).." "..pokename.."(Ditto). Price: $"..precocerto..".\n")
else
table.insert(str, "\nIt contains "..getArticle(pokename).." "..pokename..". Price: $"..precocerto..".\n")
end
end
if lock and lock > 0 then
table.insert(str, "It will unlock in ".. os.date("%d/%m/%y %X", lock)..".\n")
end
local boost = getItemAttribute(thing.uid, "boost") or 0
if boost > 0 then
table.insert(str, "Boost level: +"..boost..".\n")
end
if getItemAttribute(thing.uid, "nick") then
table.insert(str, "It's nickname is: "..getItemAttribute(thing.uid, "nick")..".\n")
end
if getItemAttribute(thing.uid, "attackheld") ~= -1 or getItemAttribute(thing.uid, "defheld") ~= -1 or getItemAttribute(thing.uid, "regenheld") ~= -1 then
table.insert(str, ""..heldname1..". "..heldname2..". "..heldname3..".\n")
else
table.insert(str, "Nao possui nenhum held.\n")
end
if getItemAttribute(thing.uid, "gender") == SEX_MALE then
table.insert(str, "It is male.")
elseif getItemAttribute(thing.uid, "gender") == SEX_FEMALE then
table.insert(str, "It is female.")
else
table.insert(str, "It is genderless.")
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str))
return false
elseif string.find(iname.name, "fainted") or string.find(iname.name, "defeated") then
local name = iname.name
name = string.gsub(name, "fainted ", "")
name = string.gsub(name, "defeated ", "")
name = doCorrectPokemonName(name)
if shinys[name] then
name = shinys[name]
end
name = "fainted "..name:lower()
table.insert(str, "You see "..iname.article.." "..name..". ")
if isContainer(thing.uid) then
table.insert(str, "(Vol: "..getContainerCap(thing.uid)..")")
end
table.insert(str, "\n")
if getItemAttribute(thing.uid, "gender") == SEX_MALE then
table.insert(str, "It is male.")
elseif getItemAttribute(thing.uid, "gender") == SEX_FEMALE then
table.insert(str, "It is female.")
else
table.insert(str, "It is genderless.")
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str))
return false
elseif isContainer(thing.uid) then --containers
if iname.name == "dead human" and getItemAttribute(thing.uid, "pName") then
table.insert(str, "You see a dead human (Vol:"..getContainerCap(thing.uid).."). ")
table.insert(str, "You recognize ".. getItemAttribute(thing.uid, "pName")..". ".. getItemAttribute(thing.uid, "article").." was killed by a ")
table.insert(str, getItemAttribute(thing.uid, "attacker")..".")
else
table.insert(str, "You see "..iname.article.." "..iname.name..". (Vol:"..getContainerCap(thing.uid)..").")
end
if getPlayerGroupId(cid) >= 4 and getPlayerGroupId(cid) <= 6 then
table.insert(str, "\nItemID: ["..thing.itemid.."]")
local pos = getThingPos(thing.uid)
table.insert(str, "\nPosition: [X: "..pos.x.."][Y: "..pos.y.."][Z: "..pos.z.."]")
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str))
return false
elseif getItemAttribute(thing.uid, "unique") then
local p = getThingPos(thing.uid)
table.insert(str, "You see ")
if thing.type > 1 then
table.insert(str, thing.type.." "..iname.plural..".")
else
table.insert(str, iname.article.." "..iname.name..".")
end
table.insert(str, " It's an unique item.\n"..iname.description)
if getPlayerGroupId(cid) >= 4 and getPlayerGroupId(cid) <= 6 then
table.insert(str, "\nItemID: ["..thing.itemid.."]")
table.insert(str, "\nPosition: ["..p.x.."]["..p.y.."]["..p.z.."]")
end
sendMsgToPlayer(cid, MESSAGE_INFO_DESCR, table.concat(str))
return false
else
return true
end
end
local npcname = getCreatureName(thing.uid)
if ehNPC(thing.uid) and NPCBattle[npcname] then --npcs duel
table.insert(str, "You see "..npcname..". "..NPCBattle[npcname].artig.." leader of the gym from "..NPCBattle[npcname].cidbat..".")
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str))
return false
end
if getPlayerStorageValue(thing.uid, 697548) ~= -1 then
table.insert(str, getPlayerStorageValue(thing.uid, 697548))
local pos = getThingPos(thing.uid)
if youAre[getPlayerGroupId(cid)] then
table.insert(str, "\nPosition: [X: "..pos.x.."][Y: "..pos.y.."][Z: "..pos.z.."]")
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str))
return false
end
if not isPlayer(thing.uid) and not isMonster(thing.uid) then --outros npcs
table.insert(str, "You see "..getCreatureName(thing.uid)..".")
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str))
return false
end
if isPlayer(thing.uid) then --player
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, getPlayerDesc(cid, thing.uid, false))
return false
end
if getCreatureName(thing.uid) == "Evolution" then return false end
if not isSummon(thing.uid) then --monstros
table.insert(str, "You see a wild "..string.lower(getCreatureName(thing.uid))..".\n")
if getPokemonGender(thing.uid) == SEX_MALE then
table.insert(str, "It is male.")
elseif getPokemonGender(thing.uid) == SEX_FEMALE then
table.insert(str, "It is female.")
else
table.insert(str, "It is genderless.")
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str))
return false
elseif isSummon(thing.uid) and not isPlayer(thing.uid) then --summons
local boostlevel = getItemAttribute(getPlayerSlotItem(getCreatureMaster(thing.uid), 8).uid, "boost") or 0
if getCreatureMaster(thing.uid) == cid then
local myball = getPlayerSlotItem(cid, 8).uid
table.insert(str, "You see your "..string.lower(getCreatureName(thing.uid))..".")
if boostlevel > 0 then
table.insert(str, "\nBoost level: +"..boostlevel..".")
end
table.insert(str, "\nHit points: "..getCreatureHealth(thing.uid).."/"..getCreatureMaxHealth(thing.uid)..".")
table.insert(str, "\n"..getPokemonHappinessDescription(thing.uid))
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str))
else
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You see a "..string.lower(getCreatureName(thing.uid))..".\nIt belongs to "..getCreatureName(getCreatureMaster(thing.uid))..".")
end
return false
end
return true
end

error na distro

[30/03/2014 01:52:51] [Error - CreatureScript Interface]
[30/03/2014 01:52:51] data/creaturescripts/scripts/look.lua:onLook
[30/03/2014 01:52:51] Description:
[30/03/2014 01:52:51] data/creaturescripts/scripts/look.lua:111: attempt to index field '?' (a number value)
[30/03/2014 01:52:51] stack traceback:
[30/03/2014 01:52:51] data/creaturescripts/scripts/look.lua:111: in function <data/creaturescripts/scripts/look.lua:68>


ixi pode fexar o topico conseguir arrumar o held item jah

Edited by jeanflamengo
Link to comment
Share on other sites

4 answers to this question

Recommended Posts

  • 0

Tenho um servidor aqui, que eu editei e talls,

Base PDA:

 

Tente usar o meu, mais faz backup do seu pra garantir.

 

Look.lua

 

 

function onLook(cid, thing, position, lookDistance)
local str = ""
if not isCreature(thing.uid) then
local iname = getItemInfo(thing.itemid)
if isPokeball(thing.itemid) then
unLock(thing.uid)
local lock = getItemAttribute(thing.uid, "lock") --alterado v1.8
local pokename = getItemAttribute(thing.uid, "poke")
local item = getItemInfo(thing.itemid)
str = "You see "..item.article.." "..item.name.."."
if getItemAttribute(thing.uid, "unique") then --alterado v1.8
str = str.." It's an unique item."
end
if pokesPrice[pokename] then
str = str.."\nIt contains "..getArticle(pokename).." "..pokename..". Price: $"..pokesPrice[pokename].price..".\n"
else
str = str.."\nIt contains "..getArticle(pokename).." "..pokename..". Price: unsellable.\n"
end
if lock and lock > 0 then
str = str.."It will unlock in ".. os.date("%d/%m/%y %X", lock)..".\n" --alterado v1.8
end
local boost = getItemAttribute(thing.uid, "boost") or 0
if boost > 0 then
str = str.."Boost level: +"..boost..".\n"
end
if getItemAttribute(thing.uid, "nick") then
str = str.."It's nickname is: "..getItemAttribute(thing.uid, "nick")..".\n"
end
if getItemAttribute(thing.uid, "gender") == SEX_MALE then
str = str.."It is male."
elseif getItemAttribute(thing.uid, "gender") == SEX_FEMALE then
str = str.."It is female."
else
str = str.."It is genderless."
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)
return false
elseif string.find(iname.name, "fainted") or string.find(iname.name, "defeated") then --corpses
str = "You see a "..string.lower(iname.name)..". " --alterado v1.8 \/
if isContainer(thing.uid) then
str = str.."(Vol: "..getContainerCap(thing.uid)..")"
end
str = str.."\n"
if getItemAttribute(thing.uid, "gender") == SEX_MALE then
str = str.."It is male."
elseif getItemAttribute(thing.uid, "gender") == SEX_FEMALE then
str = str.."It is female."
else
str = str.."It is genderless."
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)
return false
elseif isContainer(thing.uid) then --containers
local info = getItemInfo(thing.itemid) --alterado v1.7
if info.name == "dead human" and getItemAttribute(thing.uid, "pName") then
str = "You see a dead human (Vol:"..getContainerCap(thing.uid).."). "
str = str.."You recognize ".. getItemAttribute(thing.uid, "pName")..". ".. getItemAttribute(thing.uid, "article").." was killed by a "
str = str.."".. getItemAttribute(thing.uid, "attacker").."."
else
str = "You see "..info.article.." "..info.name..". (Vol:"..getContainerCap(thing.uid)..")."
end
if getPlayerGroupId(cid) >= 4 and getPlayerGroupId(cid) <= 6 then
str = str.."\nItemID: ["..thing.itemid.."]" --alterado v1.8
local pos = getThingPos(thing.uid)
str = str.."\nPosition: [X: "..pos.x.."][Y: "..pos.y.."][Z: "..pos.z.."]" --alterado v1.8
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)
return false
elseif getItemAttribute(thing.uid, "unique") then --alterado v1.8 \/
local info = getItemInfo(thing.itemid)
local p = getThingPos(thing.uid)
local str = "You see "
if thing.type > 0 then
str = str..thing.type.." "..info.plural.."."
else
str = str..info.article.." "..info.name.."."
end
str = str.." It's an unique item.\n"
str = str..info.description.."\nItemID: ["..thing.itemid.."]"
str = str.."\nPosition: ["..p.x.."]["..p.y.."]["..p.z.."]"
sendMsgToPlayer(cid, MESSAGE_INFO_DESCR, str)
return false
else
return true
end
end
local NPCBattle = {
["Brock"] = {artig = "He is", cidbat = "Pewter"},
["Misty"] = {artig = "She is", cidbat = "Cerulean"},
["Blaine"] = {artig = "He is", cidbat = "Cinnabar"},
["Sabrina"] = {artig = "She is", cidbat = "Saffron"}, --alterado v1.7
["Kira"] = {artig = "She is", cidbat = "Viridian"},
["Koga"] = {artig = "He is", cidbat = "Fushcia"},
["Erika"] = {artig = "She is", cidbat = "Celadon"},
["Surge"] = {artig = "He is", cidbat = "Vermilion"},
}
local npcname = getCreatureName(thing.uid)
if ehNPC(thing.uid) and NPCBattle[npcname] then --npcs duel
str = "You see "..npcname..". "..NPCBattle[npcname].artig.." leader of the gym from "..NPCBattle[npcname].cidbat.."." --alterado v1.7
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)
return false
elseif ehNPC(thing.uid) and getPlayerStorageValue(thing.uid, 697548) ~= -1 then --npcs de TV
local str = getPlayerStorageValue(thing.uid, 697548) --alterado v1.7
local pos = getThingPos(thing.uid)
str = youAre[getPlayerGroupId(cid)] and str.."\nPosition: [X: "..pos.x.."][Y: "..pos.y.."][Z: "..pos.z.."]" or str
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)
return false
end
if not isPlayer(thing.uid) and not isMonster(thing.uid) then --outros npcs
str = "You see "..getCreatureName(thing.uid).."."
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)
return false
end
if isPlayer(thing.uid) then --player
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, getPlayerDesc(cid, thing.uid, false)) --alterado v1.7
return false
end
if getCreatureName(thing.uid) == "Evolution" then return false end
if not isSummon(thing.uid) then --monstros
local str = "You see a wild "..string.lower(getCreatureName(thing.uid))..".\n"
str = (getPlayerGroupId(cid) >= 4) and str.."Hit Points: "..getCreatureHealth(thing.uid).." / "..getCreatureMaxHealth(thing.uid)..".\n" or str
if getPokemonGender(thing.uid) == SEX_MALE then
str = str.."It is male."
elseif getPokemonGender(thing.uid) == SEX_FEMALE then
str = str.."It is female."
else
str = str.."It is genderless."
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)
return false
elseif isSummon(thing.uid) and not isPlayer(thing.uid) then --summons
local boostlevel = getItemAttribute(getPlayerSlotItem(getCreatureMaster(thing.uid), 8).uid, "boost") or 0
if getCreatureMaster(thing.uid) == cid then
local myball = getPlayerSlotItem(cid, 8).uid
local string = "You see your "..string.lower(getCreatureName(thing.uid)).."."
if boostlevel > 0 then
string = string.."\nBoost level: +"..boostlevel.."."
end
string = string.."\nHit points: "..getCreatureHealth(thing.uid).."/"..getCreatureMaxHealth(thing.uid).."."
string = string.."\n"..getPokemonHappinessDescription(thing.uid)
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, string)
else
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You see a "..string.lower(getCreatureName(thing.uid))..".\nIt belongs to "..getCreatureName(getCreatureMaster(thing.uid))..".")
end
return false
end
return true
end

Pode ser que ajude,
Não manjo muito nesta área :\
Link to comment
Share on other sites

  • 0
  • Administrador
A questão neste tópico de suporte foi respondida e/ou o autor do tópico resolveu o problema. Este tópico está fechado e foi movido para Suporte - Resolvidos. Se você tiver outras dúvidas, crie um novo tópico.
Link to comment
Share on other sites

Guest
This topic is now closed to further replies.
×
×
  • Create New...