SkyLigh

@Vinny desculpe mais voce tem poucos posts e também fez um grande flood falando que reputo mais nao reputo reportado pro flood

Título irregular reportado

Puts cara se ajuda por rep Storage E Uma Função Da linguagem.lua que ela se pode checkar muitas coisas como vip serve para usar em functions novas e mais coisas ainda

Fico show mesmo mais isso You can't empurar players if anti-push está actived. Pqp usa o tradutor igual o vodkart falo

Título irregular reportado

function onUse(cid, item) master = getCreatureMaster(cid) local name = "Demon" -- nome entre as aspas if master > 0 then doSummonCreature(name, getPlayerPosition(cid)) setPlayerStorageValue(master, 828282, -1) doPlayerSendTextMessage(master, MESSAGE_STATUS_CONSOLE_ORANGE, "Voce cancelou seu Mac!") doRemoveItem(item.uid,1) end return TRUE end

Duvida sanada reportado

Reportado por flood reviver tópico

acho que agr vai nao posso afirmar function onSay(cid, words, param, back) local to = {x = 125, y = 47, z = 7} -- Para onde levara o player local area1 = {x = 126, y = 46, z = 1} -- Ponta de cima na esquerda na area que o tp leva local area2 = {x = 128, y = 50, z = 1} -- Ponta de baixo na direita na area que o tp leva function back(cid) if isInArea(getCreaturePosition(cid), area1, area2) then doTeleportThing(cid, to) end end if isPlayer(cid) then addEvent(back, 10000, cid) -- tempo (1000 = segundo) end return true end

duvida sanada reportado

function onSay(cid, words, param) local to = {x = 125, y = 47, z = 7} -- Para onde levara o player local area1 = {x = 126, y = 46, z = 1} -- Ponta de cima na esquerda na area que o tp leva local area2 = {x = 128, y = 50, z = 1} -- Ponta de baixo na direita na area que o tp leva function back(cid) if isInArea(getCreaturePosition(cid), area1, area2) then doTeleportThing(cid, to) end end if isPlayer(cid) then addEvent(back, 10*1000, cid, true) end return true end

va em data / talkactions / ranks.lua e delete oq ta la dentro e add function getPlayerNameByGUID2(n) local c = db.getResult("SELECT `name` FROM `players` WHERE `id` = "..n..";") if c:getID() == -1 then return "SQL_ERROR["..n.."]" end return c:getDataString("name") end function onSay(cid, words, param) local max = 10 local letters_to_next = 20 local skills = { ['fist'] = 0, ['club'] = 1, ['sword'] = 2, ['axe'] = 3, ['distance'] = 4, ['shielding'] = 5, ['fishing'] = 6, ['dist'] = 4, ['shield'] = 5, ['fish'] = 6, } local name_now local name = "Highscore for level\n" local rkn = 0 local no_break = 0 param = string.lower(param) dofile('config.lua') if param == "" or param == "level" and ( param ~= "magic" and param == "ml") and skills[param] == nil then name = name.."\n" name = name.."Rank Level - Nome do Jogador\n" local v = db.getResult("SELECT `name`, `level`, `experience` FROM `players` WHERE `group_id` <= 2 ORDER BY `experience` DESC LIMIT 0,"..(max)..";") repeat no_break = no_break +1 if v:getID() == -1 then break end rkn = rkn+1 name_now, l = v:getDataString("name"), string.len(v:getDataString("name")) space = "" for i=1, letters_to_next-l do space = space.." " end name = name..rkn..". "..v:getDataInt("level") .." - "..name_now..space.." ".."\n" if no_break >= 20 then break end until v:next() == false elseif param == "magic" or param == "ml" then name = name.."\n" name = name.."Rank Magic - Nome do Jogador\n" local v = db.getResult("SELECT `name`, `level`, `maglevel` FROM `players` WHERE `group_id` <= 2 ORDER BY `maglevel` DESC LIMIT 0,"..(max)..";") repeat if v:getID() == -1 then break end rkn = rkn+1 name_now, l = v:getDataString("name"), string.len(v:getDataString("name")) space = "" for i=1, letters_to_next-l do space = space.." " end name = name..rkn..". "..v:getDataInt("maglevel").." - "..name_now..space.." ".." ".."".."\n" until v:next() == false elseif param == "reset" or param == "resets" then name = name.."\n" name = name.."Rank Reset - Nome do Jogador\n" local v = db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = 1020 ORDER BY cast(value as INTEGER) DESC;") local kk = 0 repeat if kk == max or v:getID() == -1 then break end kk = kk+1 name_now, l = getPlayerNameByGUID2(v:getDataInt("player_id")), string.len(getPlayerNameByGUID2(v:getDataInt("play er_id"))) space = "" for i=1, letters_to_next-l do space = space.." " end if name_now == nil then name_now = 'sql error['..v:getDataInt("player_id")..']' end name = name..kk..". "..v:getDataInt("value").." - "..name_now..space.." \n" until v:next() == false elseif skills[param] ~= nil then name = name.."\n" name = name.."Rank "..param.." fighting - Nome do Jogador\n" local v = db.getResult("SELECT `player_id`, `value` FROM `player_skills` WHERE `skillid` = "..skills[param].." ORDER BY `value` DESC;") local kk = 0 repeat if kk == max or v:getID() == -1 then break end kk = kk+1 name_now, l = getPlayerNameByGUID2(v:getDataInt("player_id")), string.len(getPlayerNameByGUID2(v:getDataInt("play er_id"))) space = "" for i=1, letters_to_next-l do space = space.." " end if name_now == nil then name_now = 'sql error['..v:getDataInt("player_id")..']' end name = name..kk..". "..v:getDataInt("value").." - "..name_now..space.." \n" until v:next() == false end if name ~= "Highscore\n" then doPlayerPopupFYI(cid, name) end return TRUE end e dps so usar

tenta assim function onSay(cid, words, param) local to = {x = 125, y = 47, z = 7} -- Para onde levara o player local area1 = {x = 126, y = 46, z = 1} -- Ponta de cima na esquerda na area que o tp leva local area2 = {x = 128, y = 50, z = 1} -- Ponta de baixo na direita na area que o tp leva function back(cid) if isInArea(getCreaturePosition(cid), area1, area2) then doTeleportThing(cid, to) end end if isPlayer(cid) then addEvent( 10000, cid) -- tempo (1000 = segundo) end return true end

Duvida sanada reportado

Para de flood veih o download nem funciona nem rep + se deu pro mlk so quer upar post reportado

Tipo acho que nakele script Nao da pra fazer oq voce qer mais eu posso criar uma talk para isto que o player diz !buystorage ele recebe uam storage

qual o id dela ?

va em data / actions / scripts / e crie um arquivo.lua chamado de promotion e adicione function onUse(cid, item, frompos, item2, topos) local voc = {5,6,7,8} if getPlayerVocation(cid,voc) == 1 then doPlayerSetVocation(cid,getPlayerVocation(cid)+4) doPlayerSendTextMessage(cid, 22, "Você foi promovido.") else doPlayerSendTextMessage(cid, 22, "Você Ja Foi Promovido.") end return true end em actions.xml <action uniqueid="2810" script="promotion.lua" /> dps so usar o id 2810 no actionid e no uniqueid da caixa

então veja este topico http://www.xtibia.com/forum/topic/190384-vip-345-ajudem/page__p__1300218#entry1300218 e o nick http://www.xtibia.com/forum/topic/147361-action-vip-no-nome/

Se quer Um Igual Do Map Do Bryaan ? e do tech que ganha vip ao clikcar no item ? so que adiciona vip?

Raidou eu acho que o erro pode ser a versao do servidor os scripts sao compativeis a 8.60 eu acho

pronto local config = { loginMessage = getConfigValue('loginMessage'), useFragHandler = getBooleanFromString(getConfigValue('useFragHandler')) } local loss = getConfigValue('deathLostPercent') if(loss ~= nil) then doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10) end local accountManager = getPlayerAccountManager(cid) if(accountManager == MANAGER_NONE) then local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage if(lastLogin > 0) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str) str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "." else str = str .. " Please choose your outfit." doPlayerSendOutfitWindow(cid) end doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str) elseif(accountManager == MANAGER_NAMELOCK) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?") elseif(accountManager == MANAGER_ACCOUNT) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.") end if(not isPlayerGhost(cid)) then doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT) end registerCreatureEvent(cid, "Mail") registerCreatureEvent(cid, "GuildMotd") registerCreatureEvent(cid, "Idle") if(config.useFragHandler) then registerCreatureEvent(cid, "SkullCheck") end registerCreatureEvent(cid, "ReportBug") registerCreatureEvent(cid, "AdvanceSave") registerCreatureEvent(cid, "efe") return true end

Raidou o login.lua e o creatures.xml e igual o do caotic

Sim e pelo gesior ou pelo sv voce escolhe

E Também os novatos nem iria chegar aos pes desses o tibia ia ter um caida como nunca antes fora os jogadores gastaram seu dinheiro em sites pra itens lvl's e P.A Game.Cod acho que reprovado No momento agr tem 26560 Players Online Online no Tibia global