erro

[Encerrado] Nurce Joy Error

Por lazarocp, 26 de set. de 2015 em Tópicos Sem Resposta

nurce

poketibia

script

pokemon

ball

heal

917

lazarocp LBarão Barão

info

Grupo: Barão

Registrado: 17/01/12

Posts: 236

Reputação: +67

Gênero: Masculino

27 de setembro de 2015 às 21:09

Bem, Ola pessoal gostaria de pedir ajuda para um erro que esta acontecendo na minha nurce apos eu adicionar mais pokebolas no script dela, O erro e este:

[Error - LuaScriptInterface::loadFile] data/npc/scripts/heal.lua:1478: function at line 81 has more than 200 local variables

[26/09/2015 19:17:20] [Warning - NpcScript::NpcScript] Cannot load script: data/npc/scripts/heal.lua

A linha esta errada porque no meu eu adicionei mais coisa em sima dela

mais a linha citada seria a com essa função//// function onCreatureSay(cid, type, msg)////

o script e o heal lua do pokemon dash ,(NÃO É PDA)

AQui o Script normal sem nehuma edição

O erro aconte quando adiciono mais tags como essa

local items = getItemsInContainerById(bp.uid, 2659)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doItemSetAttribute(uid, "poke", getItemAttribute(uid, "poke"):sub(1, findLetter(getItemAttribute(uid, "poke"), "[")) .. maxh .. getItemAttribute(uid, "poke"):sub(findLetter(getItemAttribute(uid, "poke"), "/")))

doTransformItem(uid, 2655)

doCureAllStatus(uid)

end

//////////////////////

</Spoiler>

local focus = 0

local talk_start = 0

local target = 0

local following = false

local attacking = false

local talkState = {}

local states = {'1', '2', '3', '4', '5', '6'}

local store = {1001, 1002, 1003, 1004, 1005, 1006, 1007, 1008, 1009, 1010, 1011, 1012, 1013, 1014, 1015, 1016, 1017, 1018, 1019, 1020, 1021, 1022, 1023, 1024, 1025, 1026, 1027, 1028, 1029, 1030, 1031, 1032, 1033, 1034, 1035, 1036, 1037, 1038, 1039, 1040, 1041, 1042, 1043, 1044, 1045, 1046, 1047, 1048, 1049, 1050, 1051, 1052, 1053, 1054, 1055, 1056, 1057, 1058, 1059, 1060, 1061, 1062, 1063, 1064, 1065, 1066, 1067, 1068, 1069, 1071, 1072, 1073, 1074, 1075, 1076, 1077, 1078, 1079, 1080, 1081, 1082, 1083, 1084, 1085, 1086, 1087, 1088, 1089, 1090, 1091, 1092, 1093, 1094, 1095, 1096, 1097, 1098, 1099, 1100, 1101, 1102, 1103, 1104, 1105, 1106, 1107, 1108, 1109, 1110, 1111, 1112, 1113, 1114, 1115, 1116, 1117, 1118, 1119, 1120, 1121, 1122, 1123, 1124, 1125, 1126, 1127, 1128, 1129, 1130, 1131, 1132, 1133, 1134, 1135, 1136, 1137, 1138, 1139, 1140, 1141, 1142, 1143, 1144, 1145, 1146, 1147, 1148, 1149, 1150, 1151}

local unlock = {}

local pokeballs = {'2222', '2224'}

local ultraballs = {'2220', '2227'}

local greatballs = {'2651', '2657'}

local superballs = {'2653', '2658'}

local saffariballs = {'2655', '2659'}

local loveballs = {'11623', '11621'}

local dark = {'11620', '11618'}

local golden = {'11626','11624'}

local frase = {'11629', '11627'}

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

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, msg)

local msg = string.lower(msg)

local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid

if((msgcontains(msg, 'hi') or msgcontains(msg, 'heal') or msgcontains(msg, 'help')) and (getDistanceToCreature(cid) <= 3)) then

if #getCreatureSummons(cid) == 1 then

selfSay('Sorry, puch your pokémon for pokeball.')

return true

end

if getPlayerStorageValue(cid, 230) >= 1 then

return selfSay('Wait a moment.')

end

setPlayerStorageValue(cid, 230, 1)

addEvent(setPlayerStorageValue, 2000, cid, 230, 0)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid)-getCreatureHealth(cid))

doSendMagicEffect(getThingPos(cid), 132)

if isInArray(pokeballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]"))

doItemSetAttribute(feet.uid, "poke", getItemAttribute(feet.uid, "poke"):sub(1, findLetter(getItemAttribute(feet.uid, "poke"), "[")) .. maxh .. getItemAttribute(feet.uid, "poke"):sub(findLetter(getItemAttribute(feet.uid, "poke"), "/")))

doTransformItem(feet.uid, 2222)

doCureAllStatus(feet.uid)

end

if isInArray(ultraballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]"))

doTransformItem(feet.uid, 2220)

doCureAllStatus(feet.uid)

end

if isInArray(greatballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]"))

doTransformItem(feet.uid, 2651)

doCureAllStatus(feet.uid)

end

if isInArray(superballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]"))

doTransformItem(feet.uid, 2653)

doCureAllStatus(feet.uid)

end

if isInArray(saffariballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]"))

doTransformItem(feet.uid, 2655)

doCureAllStatus(feet.uid)

end

if isInArray(loveballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]"))

doTransformItem(feet.uid, 11621)

doCureAllStatus(feet.uid)

end

if isInArray(dark, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]"))

doTransformItem(feet.uid, 11618)

doCureAllStatus(feet.uid)

end

if isInArray(golden, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]"))

doTransformItem(feet.uid, 11624)

doCureAllStatus(feet.uid)

end

if isInArray(frash, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]"))

doTransformItem(feet.uid, 11627)

doCureAllStatus(feet.uid)

end

local bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK)

local items = getItemsInContainerById(bp.uid, 2224)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doTransformItem(uid, 2222)

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 2227)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doTransformItem(uid, 2220)

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 2657)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doTransformItem(uid, 2651)

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 2658)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doTransformItem(uid, 2653)

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 2659)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doTransformItem(uid, 2655)

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 2222)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 2220)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 2651)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 2653)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doCureAllStatus(uid)

end

------------ Novas balls

local items = getItemsInContainerById(bp.uid, 11623) -- Love

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 11621) -- Love

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 11620) -- dark

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 11618)-- dark

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 11626)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 11624)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 11629)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doCureAllStatus(uid)

end

local items = getItemsInContainerById(bp.uid, 11627)

for _, uid in pairs(items) do

local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]"))

doCureAllStatus(uid)

end

selfSay('There you go! You and your pokemons are healthy again.')

end

function onThink()

if focus ~= 0 then

a, b, c = selfGetPosition()

if c ~= getThingPos(focus).z then

focus = 0

end

if focus ~= 0 then

if getDistanceToCreature(focus) > 3 then

focus = 0

end

return true

end

</Spoiler>

Editado Setembro 27 por lazarocp

zipter98 ZHerói Herói

info

Grupo: Herói

Registrado: 20/09/12

Posts: 2.6k

Reputação: +1.1k

Gênero: Masculino

28 de setembro de 2015 às 14:57

Tópico Movido
Este tópico foi movido de "OTServ → Suporte OTServ → Suporte Scripting"
para "OTServ → Suporte OTServ → Suporte Derivados".

2 anos depois...

Stigaldon't ever stop...SHerói Herói

info

Grupo: Herói

Registrado: 28/11/10

Posts: 3.4k

Reputação: +585

Gênero: Masculino

21 de abril de 2018 às 03:29

A questão neste tópico de suporte foi encerrada por falta de respostas. Este tópico está fechado e foi movido para Suporte - Tópicos Sem Resposta.

+ Caso a dúvida não tenha sido resolvida você poderá criar outro tópico solicitando ajuda.
* Lembre-se que é permitido dar UP no tópico a cada 24 horas para assim o destacar e manter movimentado.