matheus1000

Novas alterações foram feitas. Valeu os comentários.

Você botou isto na pasta function.lua: _warpzone = 2147483648 -- start storing strings here (THIS IS THE ABSOLUTE MAXIMUM VALUE FOR THIS) _maxlength = 1024 -- multiply by 3 to get the true length. setPlayerStorageInteger = setPlayerStorageValue getPlayerStorageInteger = getPlayerStorageValue function setPlayerStorageString(cid, key, value) if #value > (_maxlength-1) * 3 - 1 then -- Last word is reserved for 0 termination of the string. error("Storage string is too long") end if key > _warpzone / _maxlength then error("Storage string key is too large (" .. key .. ")") end key = _warpzone + key * _maxlength local word = 0 local wordwrap = 0 local wordcount = 0 local i = 1 while i <= #value do local byte = string.byte(string.sub(value, i, i)) word = bit.bor(word, bit.lshift(byte, wordwrap)) wordwrap = wordwrap + 8 if wordwrap == 24 then --[[ In the ideal world we would be able to store 4 characters per word, however, as the default return value for getPlayerStorageValue is -1, we cant use the last bit. ]]-- setPlayerStorageInteger(cid, key + wordcount, word) word = 0 wordwrap = 0 wordcount = wordcount + 1 end i = i + 1 end -- store the last word setPlayerStorageInteger(cid, key + wordcount, word) end function getPlayerStorageString(cid, key) if key > _warpzone / _maxlength then error("Storage string key is too large (" .. key .. ")") end key = _warpzone + key * _maxlength local wordcount = 0 local str = "" while true do if wordcount >= _maxlength then break end local word = getPlayerStorageInteger(cid, key + wordcount) if word == -1 then -- end of string break else -- Extract the 3 characters from the value byte = bit.band(word, 255) if byte == 0 then break else str = str .. string.char(byte) end byte = bit.rshift(bit.band(word, 65280), 8) if byte == 0 then break else str = str .. string.char(byte) end byte = bit.rshift(bit.band(word, 16711680), 16) if byte == 0 then break else str = str .. string.char(byte) end end wordcount = wordcount + 1 end return str end E isso: function doConvinceSummon(cid, creature, amount, pos) summonplayerpos = {x=pos.x, y=pos.y, z=pos.z, stackpos=253} summonplayer = getThingfromPos(summonplayerpos) if(summonplayer ~= nil and summonplayer.itemid > 0) then doPlayerSendCancel(cid,"There is not enough room to summon here.") ret = 0 else convince = doSummonCreature(creature, pos) doConvinceCreature(cid, convince) ret = 1 end return ret end Obs.: No script que eu mandei não vem isso.

Ótimo, meu amigo estava precisando. Vou mandar para ele. +REP

Isto fica claro que ele copiou: Se ele mesmo tivesse feito, botaria outro efeito...

Então bote os créditos da primeira pessoa que postou no XTibia e de quem fez. "Lembrando que eu so tive a idea, 99% dos creditos não sou eu que fiz. Creditos no final!" Você não postou quem criou.

Muito bom o script. Vou pôr no meu Ot.

Tópico reportado. Pedido atendido.

@Up Vá em data/lib e crie uma pasta chamada functions.lua e bote isso nela: Bom, no meu Ot ( que ta off ) é isso que está na functions, espero ter ajudado.

Tópico reportado. Para que movam.

@Destroyy Reviveu o tópico e será reportado, mas atenção na próxima. @Topic Nossa, muito bom. Vou ver se boto aqui no meu OTServer.

@0maximo Não precisa não, mas se você quiser fazer um server de Pokemon eu recomendo usar um cliente próprio. @zani123 É o mesmo do Narutho, tanto que ele quer saber como há chance de captura. Ele não é scripter, está toda hora no pedidos de script.

Já existe no fórum ( mas é de cocaina ): http://www.xtibia.com/forum/topic/2728-cocaina-action/

data/talkactions/script crie uma pasta .lua e bote isto: Rosa: A animação Verde: Cor do texto data/talkactions/talkactions.xml bote isso: Bege: A palavra que o player terá que falar para aparecer a animação Azul: O nome do arquivo Espero ter ajudado.

Vodkart, muito bom. Isso vale a pena botar nos Ot's. Obrigado por trazer o conteúdo ao XTibia

Tente pôr isto: doCreatureSay(cid, "IRRHAAA", TALKTYPE_ORANGE_1) Espero ter ajudado.

Me passe o script da rune. Que poderei ajuda-lo.

É só adicionar isto no script da mana rune : Espero ter ajudado.

@locosprot Pokeball é uma bola vermelha e branca que captura pokémons.

Não vi o problema. Mas vou passar o da parte do ban, do meu config.lua: notationsToBan = 3 warningsToFinalBan = 4 warningsToDeletion = 5 banLength = 1 * 24 * 60 * 60 finalBanLength = 1 * 24 * 60 * 60 ipBanishmentLength = 1 * 24 * 60 * 60 broadcastBanishments = "yes" killsToBan = 15 maxViolationCommentSize = 200 É só editar para quanto você quizer. Espero ter ajudado. ;D

Tópico duplo. Reportado

Olá XTibianos, hoje vim aqui para mostrar uma talkaction muito legal, retirada do Styfler Yourots. Crie uma pasta em data/talkactions/script chamada deathlist.lua e bote isso dentro dela: function onSay(cid, words, param) local target = db.getResult("SELECT `name`, `id` FROM `players` WHERE `name` = " .. db.escapeString(param) .. ";") if(target:getID() ~= -1) then local targetName = target:getDataString("name") local targetGUID = target:getDataInt("id") target:free() local str = "" local deaths = db.getResult("SELECT `time`, `level`, `killed_by`, `altkilled_by` FROM `player_deaths` WHERE `player_id` = " .. targetGUID .. " ORDER BY `time` DESC;") if(deaths:getID() ~= -1) then local breakline = "" while(true) do if(str ~= "") then breakline = "\n" end local time = os.date("%d %B %Y %X ", deaths:getDataInt("time")) local level = deaths:getDataInt("level") local killed = "" local lastHitKiller = deaths:getDataString("killed_by") local mostDamageKiller = deaths:getDataString("altkilled_by") if(tonumber(lastHitKiller)) then killed = getPlayerNameByGUID(tonumber(lastHitKiller)) else killed = getArticle(lastHitKiller) .. " " .. string.lower(lastHitKiller) end if(mostDamageKiller ~= "") then if(tonumber(mostDamageKiller)) then killed = killed .. " and by " .. getPlayerNameByGUID(tonumber(mostDamageKiller)) else killed = killed .. " and by " .. getArticle(mostDamageKiller) .. " " .. string.lower(mostDamageKiller) end end str = str .. breakline .. " " .. time .. " Died at Level " .. level .. " by " .. killed .. "." if not(deaths:next()) then break end end deaths:free() else str = "No deaths recorded." end doPlayerPopupFYI(cid, "Deathlist for player: " .. targetName .. ".\n\n" .. str) else doPlayerSendCancel(cid, "Este Jogador Não Existe") end return TRUE end Depois vai em data/talkactions/talkactions.xml e bote isso: <talkaction words="!deathlist" script="deathlist.lua"/> Então é isso, espero ter ajudado. Créditos by: Styfler

Diminui o exhaust no spells.xml

Valeu os comentários ai. Script Atualizado.

Dei uma modificada no script. Espero que gostem...

Muito bom, mas está muito desorganizado. Bote em code.