eduardo190696

OtheReality falo bonito xd

Help, da esse erro [08/08/2011 08:06:39] [Warning - NpcScript::NpcScript] Can not load script: data/npc/scripts/smallstone.lua [08/08/2011 08:06:39] data/npc/scripts/smallstone.lua:1: unexpected symbol near '{' [08/08/2011 08:06:39] Lua Script Error: [Npc interface] [08/08/2011 08:06:39] (Unknown scriptfile) [08/08/2011 08:06:39] attempt to call a nil value [08/08/2011 08:06:39] stack traceback: [08/08/2011 08:06:39] [C]: ? npc n pega versão testada 9.1 não reparem no nome do script, todos os npc que eu tento fazer da a mesma coisa esse erro me persegue FUCK alguém sabe o que causa ele ?

/lib/000-constant.lua deve ser isso COLOR_BLACK = 0 COLOR_BLUE = 5 COLOR_GREEN = 18 COLOR_TEAL = 35 COLOR_LIGHTGREEN = 66 COLOR_DARKBROWN = 78 COLOR_LIGHTBLUE = 89 COLOR_DARKPURPLE = 112 COLOR_BROWN = 120 COLOR_GREY = 129 COLOR_DARKRED = 144 COLOR_DARKPINK = 152 COLOR_PURPLE = 154 COLOR_DARKORANGE = 156 COLOR_RED = 180 COLOR_PINK = 190 COLOR_ORANGE = 192 COLOR_DARKYELLOW = 205 COLOR_YELLOW = 210 COLOR_WHITE = 215 COLOR_NONE = 255

oque tem de errado nesse script local ass = { Player1 = {x = 1118, y = 1129, z = 8, stackpos = 1} } function onStepIn(cid, item, position, lastPosition, fromPosition, toPosition, actor, item) for k,v in pairs(ass) do if getPlayerPosition(cid) == v then if getPlayerVocation(cid) == 4 then doTeleportThing(cid, {x = 1118, y = 1131, z = 9, stackpos = 1}) end end end end Por Favor ALGUEM ME AJUDAAAAA

ai mano a alavanca até vai mais essa parada dos itens nem sei n function onUse(cid, item, fromPosition, itemEx, toPosition) if getPlayerStorage(cid, 2554) == 1 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você Já pucho essa Alavanca.") else doCreateItem(Id_Item, 1, {x = Posx, y = Posy, z = Posz, stackpos = 1} ) doCreateItem(Id_Item, 1, {x = Posx, y = Posy, z = Posz, stackpos = 1} ) doCreateItem(Id_Item, 1, {x = Posx, y = Posy, z = Posz, stackpos = 1} ) doCreateItem(Id_Item, 1, {x = Posx, y = Posy, z = Posz, stackpos = 1} ) setPlayerStorage(cid, 2554,1) end end Só mudar os doCreateItem(Item ID, 1, {x = posição x, y = posição y, z = posição z, stackpos = 1} )

usa esse -- NPC de troca - local focus = 0 local talk_start = 0 local target = 0 local following = false local attacking = false local addon_state = 0 function onThingMove(creature, thing, oldpos, oldstackpos) end function onCreatureAppear(creature) end function onCreatureDisappear(cid, pos) if focus == cid then selfSay('Good bye then.') 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, msg) msg = string.lower(msg) if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then selfSay('Olá ' .. getCreatureName(cid) .. '...Hiho! eu preciso de ->queijos<- vc viu algum por ai?') focus = cid talk_start = os.clock() elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then selfSay('Sorry, ' .. getCreatureName(cid) .. '! I talk to you in a minute.') elseif focus == cid then talk_start = os.clock() if msgcontains(msg, 'trade') or msgcontains(msg, 'queijo') then if doPlayerRemoveItem(cid,XXXX,5) == 0 then selfSay('achou alguma queijo?!') addon_state = 0 else if getPlayerStorageValue(cid,554411) == 1 them selfSay('Você ja pegou seu presente') else selfSay('Vc achou! pegue seu presente!!') doPlayerAddItem(cid, XXXX, 1) getPlayerStorageValue(cid,554411,1) talk_start = 0 end elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then selfSay('Good bye, ' .. getCreatureName(cid) .. '! Obrigado!..') focus = 0 talk_start = 0 end end end function onCreatureChangeOutfit(creature) end function onThink() doNpcSetCreatureFocus(focus) if (os.clock() - talk_start) > 30 then if focus > 0 then selfSay('Se achar mais queijos me avise...') end focus = 0 end if focus ~= 0 then if getDistanceToCreature(focus) > 5 then selfSay('Good bye then.') focus = 0 end end end

Vai em moviments e adc isso em tiles.lua no final function onStepIn(cid, item, position, lastPosition, fromPosition, toPosition, actor) if getPlayerLevel(cid) < 150 then doTeleportThing(cid, {x = 1041, y = 1069, z = 7, stackpos = 1}) end em moviments.xml bota <movevent event="StepIn" itemid="416" script="tiles.lua"/> Modificaçoes if getPlayerLevel(cid) < 150 then 150 é o lvl que é pra pasar, então se o lvl do player for menor que 150 ele n passa. doTeleportThing(cid, {x = 1041, y = 1069, z = 7, stackpos = 1}) edite {x = 1041, y = 1069, z = 7, stackpos = 1} X,y,z pra onde o player vai ser teleportado se o lvl dele for menor que 150 stackpos n muda em moviments.xml só muda o id <movevent event="StepIn" itemid="AQUI" script="tiles.lua"/>

Lolksky , já esta no tópico releia ele

ot server abre qualquer versão do map. valeu bye

que ta eu uso no action do id da arvore da minha quest, que só ela de o item, não mexo muito com quests e tals mais ja tenho o script e tudo só n sei que tag usar para que só aquela arvore acione o item quando der use. Action ID:50000 Uniqued ID:50001 já descobri pode deletar

II mano, nem é n.. do mock é totalmente diferente e tem até video no youtube.... ja vai começa a fala que é cópia --' affs

Ok, Mais a intenção do script é auto transformar moedas mais posso fazer por talkactions

Script Criado pelo Apocarai, e editado por mim Adc isso em CreatureScripts function onThink(cid, interval, lastExecution) local config = { [2148] = {quant = 100, to = 2149}, [2149] = {quant = 100, to = 2160} } for k, v in pairs(config) do if getPlayerItemCount(cid, k) >= v.quant then doPlayerRemoveItem(cid, k, v.quant) doPlayerAddItem(cid, v.to,1) doPlayerSendTextMessage(cid, 25, "Changed " .. v.quant .. " " .. getItemNameById(k) .. " into " .. getItemNameById(v.to) .. ".") end end return true end tag <event type="think" name="Transforme" script="transform.lua"/> e Adc isso em login.lua registerCreatureEvent(cid, "Transforme") Por TalkActions add em Talkactions/scripts , nome moedas.lua function onSay(cid, words, param, item) local config = { [2148] = {quant = 100, to = 2152}, [2152] = {quant = 100, to = 2160} } for k, v in pairs(config) do if getPlayerItemCount(cid, k) >= v.quant then doPlayerRemoveItem(cid, k, v.quant) doPlayerAddItem(cid, v.to,1) doPlayerSendTextMessage(cid, 25, "Changed " .. v.quant .. " " .. getItemNameById(k) .. " into " .. getItemNameById(v.to) .. ".") end end return true end Tag add em Talkactions.xml <talkaction words="!juntar" script="moedas.lua"/>

testem esse by me se pega da um tok function onUse(cid, item, itemEx) local pkm = { ["Rat"] = {1} } for k,v in pairs(pkm) if getPlayerSlotItem(cid,2) == 2173 then if getCreatureName(cid) == k then doCreatureAddHealth(cid, 100) doItemSetAttribute(cid, "+"..v[1]) else doPlayerSendCancel(cid, "Desculpe você não pode Bootiar esse summon.) end

KKK, é um bom mode de usar mesmo KKK

CRIADOR : JANO Retirado: Outro forum Script: Auto Loot *-* creaturescripts.xml <event type="login" name="aloot_reg" event="script" value="aloot.lua"/> <event type="kill" name="aloot_kill" event="script" value="aloot.lua"/> creaturescripts/scritps aloot.lua function onLogin(cid) registerCreatureEvent(cid, "aloot_kill") return true end local stor = 7575 function autoloot(cid, target, pos) local function doStack(cid, itemid, new) local count = getPlayerItemCount(cid, itemid) if (count > 100) then count = count - math.floor(count / 100) * 100 end local newCount = count + new if (count ~= 0) then local find = getPlayerItemById(cid, true, itemid, count).uid if (find > 0) then doRemoveItem(find) else newCount = new end end local item = doCreateItemEx(itemid, newCount) doPlayerAddItemEx(cid, item, true) end local function scanContainer(cid, uid, list) for k = (getContainerSize(uid) - 1), 0, -1 do local tmp = getContainerItem(uid, k) if (isInArray(list, tmp.itemid)) then if isItemStackable(tmp.itemid) and (getPlayerItemCount(cid, tmp.itemid) > 0) then doStack(cid, tmp.itemid, tmp.type) else local item = doCreateItemEx(tmp.itemid, tmp.type) doPlayerAddItemEx(cid, item, true) end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, 'Looted ' .. tmp.type .. ' ' .. getItemNameById(tmp.itemid) .. '.') doRemoveItem(tmp.uid) elseif isContainer(tmp.uid) then scanContainer(cid, tmp.uid, list) end end end local items = {} for i = getTileInfo(pos).items, 1, -1 do pos.stackpos = i table.insert(items, getThingFromPos(pos)) end if (#items == 0) then return end local corpse = -1 for _, item in ipairs(items) do local name = getItemName(item.uid):lower() if name:find(target:lower()) then corpse = item.uid break end end if (corpse ~= -1) and isContainer(corpse) then scanContainer(cid, corpse, tostring(getPlayerStorageValue(cid, stor)):gsub('_', ''):explode(',')) end end function onKill(cid, target, lastHit) if not isPlayer(target) then local infos = getPlayerStorageValue(cid, stor) if (infos == -1) then return true end local list = tostring(infos):explode(',') if (#list == 0) then return true end addEvent(autoloot, 150, cid, getCreatureName(target), getCreaturePosition(target)) end return true end talkactios.xml <talkaction words="/aloot" hide="yes" event="script" value="aloot.lua"/> Talkaction/scrips local stor, limit = 7575, 5 --storage, limit to add. local allow_container = false --empty! not looted with items, atleast for now. function onSay(cid, words, param) local expl = param:explode(':') local action, rst = expl[1], expl[2] if (action:lower() == 'check') then local infos, list = getPlayerStorageValue(cid, stor), {} if (infos ~= -1) then list = tostring(infos):explode(',') end local txt = 'Autoloot List:\n' if (#list > 0) then for k, id in ipairs(list) do id = id:gsub('_', '') if tonumber(id) then txt = txt .. getItemNameById(tonumber(id)) .. ((k < #list) and '\n' or '') end end else txt = 'Empty' end doPlayerPopupFYI(cid, txt) elseif (action:lower() == 'add') then local infos, list = getPlayerStorageValue(cid, stor), {} if (infos ~= -1) then list = tostring(infos):gsub('_', ''):explode(',') end if (#list >= limit) then return doPlayerSendCancel(cid, 'You already have ' .. limit .. ' autolooting items.') end local item = tonumber(rst) if not item then item = getItemIdByName(rst, false) if not item then return doPlayerSendCancel(cid, 'not valid item.') end end if not allow_container and isItemContainer(item) then return doPlayerSendCancel(cid, 'this item can not be autolooted.') end local attrs = getItemInfo(item) if not attrs then return doPlayerSendCancel(cid, 'not valid item.') elseif not attrs.movable or not attrs.pickupable then return doPlayerSendCancel(cid, 'this item can not be autolooted.') end if isInArray(list, item) then return doPlayerSendCancel(cid, 'already added.') end table.insert(list, tostring(item)) local new = '' for v, id in ipairs(list) do new = new .. '_' .. id:gsub('_' ,'') .. ((v < #list) and ',' or '') end doPlayerSetStorageValue(cid, stor, tostring(new)) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, 'Item >>' .. getItemNameById(item) .. '<< has been added to the autoloot list.') elseif (action:lower() == 'remove') then local infos, list = getPlayerStorageValue(cid, stor), {} if (infos ~= -1) then list = tostring(infos):gsub('_', ''):explode(',') end if (#list == 0) then return doPlayerSendCancel(cid, 'You dont have any item added.') end if (#list >= limit) then return doPlayerSendCancel(cid, 'You already have ' .. limit .. ' autolooting items.') end local item = tonumber(rst) if not item then item = getItemIdByName(rst, false) if not item then return doPlayerSendCancel(cid, 'not valid item.') end end if not isInArray(list, item) then return doPlayerSendCancel(cid, 'This item is not in the list.') end local new = '' for v, id in ipairs(list) do if (tonumber(id) ~= item) then new = new .. '_' .. id:gsub('_' ,'') .. ((v < #list) and ',' or '') end end doPlayerSetStorageValue(cid, stor, tostring(new)) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, 'Item >>' .. getItemNameById(item) .. '<< removed from the autoloot list.') end return true end Usando /aloot check Cheka a Lista dos Loots /aloot add:itemid ou nome do item Exemplo /aloot add:worm /aloot add:2170 16:42 Item >>worm<< has been added to the autoloot list. Para remover /aloot remove:worm /aloot remove:2170 Exemplo Testado: 16:41 Looted 2 gold coin. 16:41 Looted 1 cheese. é isso pessoal gosto da + Rep

Dá próxima vez o apocarai presta mais atenção xD, errar é humano, apocarai sabe que só to brincando

KKK apocarai doPlayerRemoveItem(cid, k, v.quant) doPlayerRemoveItem(cid, v.to, 1) -- << erro Erro feio em doPlayerAddItem(cid, v.to,1) que seria o certo function onThink(cid, interval, lastExecution) local config = { [2148] = {quant = 100, to = 2149}, [2149] = {quant = 100, to = 2160} } for k, v in pairs(config) do if getPlayerItemCount(cid, k) >= v.quant then doPlayerRemoveItem(cid, k, v.quant) doPlayerAddItem(cid, v.to,1) doPlayerSendTextMessage(cid, 25, "Changed " .. v.quant .. " " .. getItemNameById(k) .. " into " .. getItemNameById(v.to) .. ".") end end return true end 9.1 sem bugs function onThink(cid, interval, lastExecution) local config = { [2148] = {quant = 100, to = 2149}, [2149] = {quant = 100, to = 2160} } for k, v in pairs(config) do if getPlayerItemCount(cid, k) >= v.quant then doPlayerRemoveItem(cid, k, v.quant) doPlayerAddItem(cid, v.to,1) end end return true end tirei a frase pq alem de ser desnecessária bugava

pow add msn vocês 2 e vamos discutir idéias para esse script a minha idéia ta certa e o script era pra tar tb mais n pega essa porra dudugt500@hotmail.com

pow mano eu to tentando fazer uma aqui, se der eu do uma aviso

como bota pro pet teleportar pro player ? e as spell não acertarem os jogadores e eles não poderem atacar seus proprios pets

Bom, para começar precisaremos de 2 programas um programa do Black Demon que ta no anexo esse programa do Black demon só usaremos para ver as signature do DATA e do SPR vamos começar 1° Abra o item editor( by black demon) 2° Abra o data e o spr do seu client 3° Aperte Alt+P 4° Copie as signatures dos Spr e do Data Data 4E12DAFF 9.1 Spr 4E12DB27 9.1 Agora abra o arquivo graphics.dat na pasta do seu item editor e adicione as signatures que você copiou no fim nessa ordem: data spr versão 16 Vai fica mais ou menos assim 4E12DAFF 4E12DB27 910 16 FIM É isso pessoal simples que nem fazer coco, se gosto da +rep item editor.rar

Função Remove Pet ADC

add no msn que nois se fala por lá @edit tony não faz parte da equipe