pinpao

local keywordHandler = KeywordHandler:new()local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end local choose = {} local cancel = {} local available = {} local stor = 20979 -- storage que precisa local trade = { {id=7368, buy=100, sell=0, name='Assassin Star'}, --- itens que vai vender } local function setNewTradeTable(table) local items = {} for _, v in ipairs(table) do items[v.id] = {itemId = v.id, buyPrice = v.buy, sellPrice = v.sell, subType = 0, realName = v.name} end return items end local function setNewLineTable(oldTable, newTable) for k, v in pairs(oldTable) do table.insert(newTable, k, v) end return true end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid local strtrade = 154171 if(msgcontains(msg, 'Trade') or msgcontains(msg, 'trade')) and getPlayerStorageValue(cid, strtrade) == 1 then selfSay('Its my offer!', cid) tradeRank = trade local items = setNewTradeTable(tradeRank) local function onBuy(cid, item, subType, amount, ignoreCap, inBackpacks) if items[item].buyPrice then doPlayerAddItem(cid, items[item].itemId, amount) doPlayerRemoveMoney(cid, items[item].buyPrice * amount) return true end return true end local function onSell(cid, item, subType, amount, ignoreCap, inBackpacks) if items[item].sellPrice then doPlayerAddMoney(cid, items[item].sellPrice * amount) doPlayerRemoveItem(cid, items[item].itemId, amount) return true end return true end openShopWindow(cid, tradeRank, onBuy, onSell) end end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())

function onStepIn(cid, item, frompos, topos) local poss1 = {x=264, y=380, z=7, stackpos=1} -- local da parede p = getThingfromPos(poss1) idparede = 2735 --- id da parede tempo = 2000 --- tempo que vai demorar pra ela aparecer novamente if isPlayer(cid) and p.itemid == idparede then doRemoveItem(p.uid,1) doSendMagicEffect(getThingPos(cid), 1) addEvent(doCreateItem, tempo, idparede, 1, poss1) else doSendMagicEffect(getThingPos(cid), 2) doPlayerSendTextMessage(cid, 22, "Acesso Liberado!") end return true end

Olá, não é meu VPS, esta tudo ok com ele, acredito que seja no banco de dados, meu servidor esta demorando pra ler a bd, sem contar que as vezes da invalid account, ai fecho e abro fica normal, muito estranho

boa tarde a todos, os players do servidor se desconecta sozinhos, tentam entrar novamente não conseguem, porem o servidor não acusa erros na distro e nem cai , o que pode ser que esta causando isso? uso tfs 0.4 DEV 8.6

Boa tarde galera, alguém sabe me explicar o porque desses erros no gesior?

Pelo o que eu entendi,não manjo muito em npc e fiz pelo celular mas tá ai ! local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid if msgcontains(msg, "Yes") then npcHandler:say(" Eu posso te ajudar com informações , como Aol, Hunts, VIP, Houses e Task o que deseja?",cid) elseif msgcontains(msg, "Aol") then npcHandler:say(" Certo você deseja saber sobre o aol, então vamos la, o aol é um amuleto sagrado que vai te proteger em caso de morte, com ele você não ira perder o seus items da sua backpack, e pode ser comprado por 10k!", cid) elseif msgcontains(msg, "Hunts") then npcHandler:say(" Quer saber sobre as hunts, as hunts são lugares onde você pode avançar de nivel, existe varias hunts no mapa , você precisa apenas explorar!", cid) elseif msgcontains(msg, "Vip") then npcHandler:say("A VIP é uma Premium que sua conta ganha quando você compra, com a VIP você pode acessar novas hunts e ter mais vantagens !", cid) elseif msgcontains(msg, "Houses") then npcHandler:say(" Houses são casas que você pode comprar no servidor por um custo basta escolher uma casa, fique na frente da porta e diz !buyhouse, é claro que precisara de dinheiro e um nivel necessário!", cid) elseif msgcontains(msg, "Task") then npcHandler:say("Task são missões que você completa para um certo npc, e com a task completa ganhara exp e items!", cid) return true end end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) <?xml version="1.0" encoding="UTF-8"?> <npc name="Arquivo" script="data/npc/scripts/arquivo.lua" walkinterval="2000" floorchange="0"> <health now="100" max="100"/> <look type="134" head="78" body="88" legs="0" feet="88" addons="3"/> <parameters> <parameter key="message_greet" value="Olá |PLAYERNAME|!, posso ajudar?" /> </parameters> </npc>

Qual vip sistem você usa ?

Lol com esse script ae vai ter qe criar 2 runa com o mesmo efeito...

Bom, falar ate papagaio fala quero ver fazer, os projeto de hoje o povo fala que vai ter isso e aquilo e que vai ser melhor que baiak global e tudo mais, no final não sai nada! Gostei da ideia so espero que saia do papel :]

Ala vodkart deitano nos script kkk Boa man gostei um dos melhores qe ja vi :] rep+

E um blacksmith simples, Vamos supor você pega um dragon hammer e bate na spike sword ela tem chanse de qebrar ou de virar uma serpent e assim vai evoluindo

Estava aqui no pc sem nada pra fazer e achei esse antigo script então resolvi postar aqui, e apenas um script de blacksmith com skill Data/Actions/Crie um arquivo lua e adicione: local professions = { ["blacksmith"] = {storage = 1030, maxSkill = 10000}, } local recipes = { [2412] = {tool = 2422, skill = 0, loot = {{2383, 1}}, profession = "blacksmith"}, [2383] = {tool = 2422, skill = 50, loot = {{7385, 1}}, profession = "blacksmith"}, [7385] = {tool = 2422, skill = 80, loot = {{2392, 1}}, profession = "blacksmith"}, [2392] = {tool = 2422, skill = 100, loot = {{7384, 1}}, profession = "blacksmith"}, [7384] = {tool = 2422, skill = 120, loot = {{7390, 1}}, profession = "blacksmith"}, [7390] = {tool = 2422, skill = 160, loot = {{2400, 1}}, profession = "blacksmith"}, } function onUse(cid, item, fromPosition, itemEx, toPosition) if recipes[itemEx.itemid] then if itemEx.actionid > 0 then doPlayerRemoveItem(cid, 2412, 1) doPlayerRemoveItem(cid, 2383, 1) doPlayerRemoveItem(cid, 7385, 1) doPlayerRemoveItem(cid, 2392, 1) doPlayerRemoveItem(cid, 7384, 1) doPlayerRemoveItem(cid, 7390, 1) doCreatureSay(cid, "You can not Do It.", TALKTYPE_ORANGE_1) local player = getPlayerPosition(cid) doSendMagicEffect(player, 31) return TRUE end lootTable = {} lootName = "You made the item " professionSkill = getPlayerStorageValue(cid, professions[recipes[itemEx.itemid].profession].storage) itemPos = getThingPos(itemEx.uid) if professionSkill < 1 then professionSkill = 0 end if item.itemid == recipes[itemEx.itemid].tool then if professionSkill >= recipes[itemEx.itemid].skill then if item.actionid ~= 5001 then if math.random(1, 5) < 2 then doRemoveItem(itemEx.uid, 1) if recipes[itemEx.itemid].profession ~= "blacksmith" then addEvent(doCreateItem, 12000, itemEx.itemid, 1, itemPos) local player = getPlayerPosition(cid) doSendMagicEffect(player, 34) end if math.random(1, 4) < 2 then if professionSkill < professions[recipes[itemEx.itemid].profession].maxSkill then setPlayerStorageValue(cid, professions[recipes[itemEx.itemid].profession].storage, professionSkill + 1) doCreatureSay(cid, "You advanced in "..recipes[itemEx.itemid].profession.." ("..professionSkill..").", TALKTYPE_ORANGE_1) local player = getPlayerPosition(cid) doSendMagicEffect(player, 31) end end repeat if #recipes[itemEx.itemid].loot == 0 then break end for i = 1, #recipes[itemEx.itemid].loot do if math.random(1, 2) < 2 then table.insert(lootTable, (recipes[itemEx.itemid].loot)) end end until lootTable ~= {} for i = 1, #lootTable do lootCount = math.random(1, lootTable[2]) doPlayerAddItem(cid, lootTable[1], lootCount) if i == #lootTable then lootName = lootName..""..lootCount.."x ".. getItemNameById(lootTable[1]) .."." else lootName = lootName..""..lootCount.."x ".. getItemNameById(lootTable[1]) ..", " end end if lootName == "You made the item " then lootName = "You missed!." end doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, lootName) else local player = getPlayerPosition(cid) doSendMagicEffect(player, 3) end else local player = getPlayerPosition(cid) doSendMagicEffect(player, 31) doPlayerSendTextMessage(cid, 22, "You do not have the required skill!") end else local player = getPlayerPosition(cid) doSendMagicEffect(player, 55) local player = getPlayerPosition(cid) doSendMagicEffect(player, 56) doPlayerSendTextMessage(cid, 22, "You do not have the required skill!") end else local player = getPlayerPosition(cid) doSendMagicEffect(player, 2) end end return true end Data/Actions/Actions.xml Adicione: <action itemid="Iddoitemqueusaranasarmas" event="script" value="Nome_do_arquivo.lua"/> Duvidas pergunte! flw.

Ola, estava aqui em casa de bobeira e resolvi brincar um pouco com lua novamente, resolvi fazer um talk que salva seu char você pegou um item e você digita !savechar, seu char sera salvo se cair o servidor sem querer você não perde o item você estava salvo :] Data/talkactions/crie um arquivo lua e adicione: local waittime = 60 local storage = 5560 function onSay(cid, words, param, channel) if exhaustion.get(cid, storage) == FALSE then doPlayerSave(cid) exhaustion.set(cid, storage, waittime) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Character saved.") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "wait " .. exhaustion.get(cid, storage) .. " seconds.") end return TRUE end data/talkactions/talkactions.xml adicione : <talkaction words="/saveme;!saveme" event="script" value="Nome_do_arquivo.lua"/> Depois vai em lib e procure por004-database.lua e adicione: dofile(getDataDir() .. "lib/exhaustion.lua") Se estiver duvida na onde adc post seu 004-database.lua que ajudarei :] Flw.

Ola, estava conversando com meu amigo vodkart, e ele me falou que era mod aqui no tibiaking então resolvi vim pro forum! Como de custume quando sou novo no forum gosto de entrar apresentando algum script, estava sem ideia e sem tempo então fiz esse bem rapido e um script noob mais ta valendo! O player so ira ganhar 1 item, so ira ganhar outro se o servidor cair cada player ganha 1 item apenas! Data/Creaturescript/Crie um arquivo lua com qualqer nome e adicione: monster = { ["Nomedomonstro"] = {itemid = ID_DO_ITEM, count = QUANTIDADE_DE_ITEM} } function onKill(cid, target, lastHit) if monster[getCreatureName(target)] then monster = monster [getCreatureName(target)] doPlayerAddItem(cid, monster.itemid, monster.count) end return true end Data/Creaturescript/Creaturescript.xml <event type="kill" name="MonsterKill" event="script" value="Nome_do_arquivo.lua"/> Data/CreatureScript/Login.Lua registerCreatureEvent(cid, "MonsterKill") Desculpem pelo script noob, o proximo sera melhor flw.