Ir para conteúdo

Líderes

Conteúdo Popular

Exibindo conteúdo com a maior reputação em 09/05/12 em %

  1. 1 ponto
  2. Piabeta Kun

    Global Gesior By PiabetaMan01 2.0

    Global Gesior By PiabetaMan01 2.0 Bem Galera demorou mais saiu a ultima verção do meu Gesior! Novidades -Site 90% automatizado, ou seja, não precisa ficar mudando nome do seu servidor e caracteristicas no serverinfo por exemplo! - Pagina de criaturas mostrando os loots! - Pagina de montarias completa! - Achievements 1.0 (Em breve a versão mais completa do sistema)! - Pagina de houses automatica (Carrega todas houses do seu servidor e gera busca pelas cidades)! - Outifis em tempo real na pagina de characters! - Pagina de Vantagens Premium ou vip automatizada! - Top players 5 Adicionado! - Feature Article Adicionado! - Video Gallery (Não completo)! - Map view do Tibia ML (Mostra o mapa do tibia global em java)! - Painel Admin com atualizadores de criaturas, magias e outros sistemas (Alguns ainda não terminados)! - Pagina de Market Offers (mostra em tempo real todas as ofertas do market)! - Sistema de like facebook page! - e Layout de Manutenção 100% travado e igual do tibia global! Compatibilidade Servidores tfs 0.3.6, 0.3.7 e 0.4 (8x e 9x) Modificações - Correção no last login (estava dizendo que os chares que nunca logaram haviam logado em x data). - Correção no premium last days (account Management.php ( antes dava uma data errada e nao dizia qndo acabava a premium)). - Characters.php mais fiel ao global! (com achievement system by PiabetaMan01). - Retirado botões não funcionais do Shopadmin.php (sistema de Pacc somente). - Tibiarules.php mais bonita! 100% by PiabetaMan01 - Ranking Igual Tibia.com Sem (sem cores diferenciando quem está online e nao mostrando vocação do char) Download do Acc Maker + Database completa! http://www.4shared.c...I8224/site.html Créditos Gesior.pl VictorWebMaster Aleh Archez WalefXavier 1tyi PiabetaMan01 Em Breve ScreenShoots! OBS: não me responsabilizo por modificações no site, pois estará colocando em risco a proteção do mesmo e será por sua conta, e depois não venha vir aqui dizer que o site é falho!
    1 ponto
  3. Newtonnotwen

    [Spell] Tsukuyomi 3.0

    Aew galera, o juan500 me deu a ideia de adicionar "clones" no "outro mundo": (O vídeo se encontra no final do tópico). Em data/monster crie um arquivo.xml nomeie para Tsukuyomi e adicione: Editando: -Verde: Frases -Vermelho: Intervalo para o Tsukuyomi sumir Em monsters.xml adicione: Agora adicione outro monstro: Em data/monster crie um arquivo.xml nomeie para Tsukuyomi2 e adicione: Editando: -Verde: Frases -Vermelho: Intervalo para o Tsukuyomi sumir --------------------Agora aqui é o tutorial passado, com algumas modificações no script Aew galera, aqui está a magia Tsukuyomi, aquela mesmo do Naruto. Testado em TSF 8.6. Primeiramente abra seu RME. Faça uma areá mais ou menos igual a seguinte (os tiles podem mudar de acordo com seu gosto): No caso estou usando um chão "invisível". Após criar essa areá adicione "NoPVPZone" (em toda areá). Depois adicione o "NoLogout" (em toda areá). Em data/movements/script crie um arquivo.lua nomeie para sharingan e adicione: Editando: -Verde: Numero do efeito (/z) -Azul: Life que vai perder -Laranja: Intervalo para tirar life (1000 = 1 segundo) -Roxo: Quantidade de vezes que vai bater Em movements.xml adicione: Em data/talkactions/scripts crie um arquivo.lua nomeie para tsukuyomi e adicione: Editando: ​Script auto-explicativo, variáveis em verde. Sobre as cordenadas: Para onde o teleport levará (players): Seria o tile em que os player atingidos pelo Tsukuyomi seria levados: Areá circulada em azul. Para onde o teleport levará (caster): Seria o tile, onde quem usou a magia (o caster) irá teleportar. Toda a areá em verde! Obs: O tile com um x não pode ser escolhido. Ponta de cima na esquerda na area que o tp leva (onde o tile está escuro): Ponta de baixo na direita na area que o tp leva (onde o tile está escuro): Em talkactions.xml adicine: <talkaction words="tsukuyomi" event="script" value="tsukuyomi.lua"/> Após fazer isso adicione o tile de movements no tile em que os players irão teleportar ao serem atingidos. Adicionando efeitos, nesse local: Em data/globalevents/scripts crie um arquivo.lua nomeie para sharingan e adicione: Editando: - Verde: Posição - Vermelho: Mensagem e cor - Azul: efeito Em globalevents.xml: Editando: - Vermelho: Tempo para aparecer os efeitos (1 = 1 segundo), podendo deixar 0.1 Qualquer duvida, só postar. Aqui vai um vídeo demonstrativo: ​Créditos: Newtonnotwen, pelo script, pela ideia e pelo post. LuckOake, pelo script inicial Vodkart, pelo tile Jhon992, pelo tile juan500, pela ideia do Tsukuyomi 3.0. Por favor comentem, se tiver mal explicado eu edito.
    1 ponto
  4. Ola Pessual Lindo Do Xtibia... Bom, Um Tutorial De Como Fazer outfits... Vamos Ao Tutorial: Bem, primeiro, o mais básico de tudo: abra uma imagem 32x32. Depois, arranje a cabeça de um outfit de citizen de frente, e cole na imagem. Após posiciona-la no extremo noroeste do quadrado, faça uma base. Tente copiar de um outro outfit, para você ir "pegando a manha". Não presisa caprichar muito, pois é só um esboço. Após ter a base pronta, começe os detalhes. Depois, passe linhas pretas no contorno e defina as linhas internas num tom cinza escuro. Pinte os espaços em branco num tom cinza claro e o outfit estara pronto. Se você quizer fazer um outfit pra mudar de cor depois, mantenha as cores cinzas, se não, decida a cor agora. Após sombreado, repita o processo com o personagem de costas. Caso queira fazer o outfit andando, pegue o outfit do personagem parado(antes de sombrea-lo) e mude a posição de suas mãos, pernas e tronco, afim de fazer com que ele pareça estar andando Resultado final: Lembrem-se de fazerem calmamente, atentos a cada detalhe, evitando de deixar um sombreamento artificial e um formato quadrado. Aviso: Se forem fazer algo na cabeça dele, não esitem em aumentar o quadrado do outfit. Aviso2: Lembrem sempre de alinhar os braços e os ombros.
    1 ponto
  5. para começar tutorial coloque tibia.spr e seu tibia.dat na mesma pasta do item editor se não ele não abre depois de abrir item editor seleciona items.otb depois procura seu item normal que vc quer deixar múltiplos exemplo to usando item 11441 marca essas 2 caixas pickupable [x] stackable [x] nota que item e 11441 na verdade ele é o item 10530 se for procurar no dat editor pronto agora pode aperta no file sava as.. escolhe lugar pra salva depois só substituir seu items.otb por esse novo pronto agora pode abrir dat editor seleciona o seu tibia.spr e seu tibia.dat que nem eu disse ai em cima procurar pelo numero 10530 no meu caso depois de achar item marca essas 3 caixa stackable [x] useable[x] pickupable [x] depois de fazer isso click em file save e click em compile só espera a barra depois só ir em data\items\items.xml procura o mesmo numero do item editor não do dat do item editor e 11441 no meu caso assim que achar vai ter algo assim <item id="11441" article="a" name="Leaf Stone"> <attribute key="description" value="A peculiar stone that may cause some pokemon to evolve." /> </item> vc tem que deixa assim <item id="11441" article="a" name="Leaf Stone" plural="Leaf Stones"> <attribute key="description" value="A peculiar stone that may cause some pokemon to evolve." /> </item> deixei VERDE pra facilita pra vc ver oq que foi modificado se fizer tudo certo quando logar na conta e criar item vai fica assim 100 em vez de 1 Programas Usados Item Editor 854 Dat Editor 854 Espero Que Gostem Do Tutor!!! Não Esquesao De Comentar
    1 ponto
  6. Bom Dia gente, hoje venho apresentar mais uma verçao do meu Baiak Super Editado, mas agora o nome è Baiak Link By (ADM) Z1K4 vou tentar explicar bem detalhado para que voçes entendao bem. Entamo Vamos La; <---- Oque tem de Novo ? ----> <---- Monstros, Itens e magias Novos ----> <---- S's ----> DOWLOAD : SCAN: @edit Cretitos: Mapa: eu magias: meu amigo(gabriel) monsters: Xtibia pois tirei os script aki items: eu da um rep+ ae
    1 ponto
  7. Akzs

    Como Faz Isso?

    Enviado por MP
    1 ponto
  8. Segundo pedido: movements.xml: <movevent type="StepIn" actionid="xxxx" event="script" value="voctile.lua"/> Substitua o xxxx por um aid que desejar. voctile.lua:
    1 ponto
  9. Vodkart

    Ajuda Ai (Item Que Da Vip)

    function onUse(cid, item, pos) local days = 30 vip.addVipByAccount(getPlayerAccount(cid) ,vip.getDays(days)) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Foram adicionados "..tonumber(days).." dias de vip na sua account.") doRemoveItem(item.uid, 1) return true end
    1 ponto
  10. Newtonnotwen

    [Spell] Juuken

    É um a sqm a direita: Modificando as posições!!! to = {x = 669, y = 1070, z = 15} -- Para onde o teleport levará (players) ---- Player to1 = {x = 668, y = 1070, z = 15} -- Para onde o teleport levará (caster) ---- Caster
    1 ponto
  11. Parabens, Vi Vc Enviando Ao Usuario Um Pedaço Dele.... Esta De Parabens. Abraço...
    1 ponto
  12. Não irmão. é no page acess.
    1 ponto
  13. RHCP

    [Gesior Acc] Configurando Lost Account

    Quem não estiver conseguindo, no smtp, coloque: ssl://smtp.gmail.com Creio eu que assim funcionará
    1 ponto
  14. Mayronfla

    Baiak Infinity By Mayron

    GALERA POR VÁRIOS PEDIDOS ARRUMEI OS BUGS!!! REMOVI AS RUNAS DE HEALING E REMOVI SYSTEMA DE RESET! AKI O NOVO DOWNLOAD: http://www.4shared.com/rar/ZKbUat5u/Baiak_Infinity_By_Mayron.html? OW MOMETTI TO PERCISANU FALAR COM VC MANDA SEU MSN AE! QUERO Q VC DEIXE UM SERVER ON PRA MIM PODE SER? ESTOU ESPERANDO!!! ESPERO Q GOSTEM GALERA xD Ai eu so fiko on no msn depois das 7 da noite!! qualquer coisa sobre o ot ou qualquer outra coisa ad msn mayron_fla@hotmail.com
    1 ponto
  15. vc não entendeu 100% mais vou explica agora melhor quando vc abrir item editor e ir no item 11441 nota que item e 11441 na verdade ele é o item 10530 no dat editor espero que agora vc entendeu 100% se vc fazer tudo certinho vai fica assim
    1 ponto
  16. Deadpool

    [Encerrado] Duvida De Pokemon

    Nao.. Para Isso Você Teria Que Por Sprite Por Sprite No Cliente.. Fica Com o Centurion Melhor Que Eu Acho (Na Minha Opinião),
    1 ponto
  17. usa addEvent addEvent(doCreatureExecuteTalkAction, 10000, cid, 'SEILANOME', true)
    1 ponto
  18. Vodkart

    Bug Points Sytem

    Você tinha adicionado errado na lib mesmo, agora que vi -.- arrumei pra vc: function doPlayerGiveItem(cid, itemid, amount, subType) local item = 0 if(isItemStackable(itemid)) then item = doCreateItemEx(itemid, amount) if(doPlayerAddItemEx(cid, item, true) ~= RETURNVALUE_NOERROR) then return false end else for i = 1, amount do item = doCreateItemEx(itemid, subType) if(doPlayerAddItemEx(cid, item, true) ~= RETURNVALUE_NOERROR) then return false end end end return true end function doPlayerGiveItemContainer(cid, containerid, itemid, amount, subType) for i = 1, amount do local container = doCreateItemEx(containerid, 1) for x = 1, getContainerCapById(containerid) do doAddContainerItem(container, itemid, subType) end if(doPlayerAddItemEx(cid, container, true) ~= RETURNVALUE_NOERROR) then return false end end return true end function doPlayerTakeItem(cid, itemid, amount) return getPlayerItemCount(cid, itemid) >= amount and doPlayerRemoveItem(cid, itemid, amount) end function doPlayerBuyItem(cid, itemid, count, cost, charges) return doPlayerRemoveMoney(cid, cost) and doPlayerGiveItem(cid, itemid, count, charges) end function doPlayerBuyItemContainer(cid, containerid, itemid, count, cost, charges) return doPlayerRemoveMoney(cid, cost) and doPlayerGiveItemContainer(cid, containerid, itemid, count, charges) end function doPlayerSellItem(cid, itemid, count, cost) if(not doPlayerTakeItem(cid, itemid, count)) then return false end if(not doPlayerAddMoney(cid, cost)) then error('[doPlayerSellItem] Could not add money to: ' .. getPlayerName(cid) .. ' (' .. cost .. 'gp).') end return true end function doPlayerWithdrawMoney(cid, amount) if(not getBooleanFromString(getConfigInfo('bankSystem'))) then return false end local balance = getPlayerBalance(cid) if(amount > balance or not doPlayerAddMoney(cid, amount)) then return false end doPlayerSetBalance(cid, balance - amount) return true end function doPlayerDepositMoney(cid, amount) if(not getBooleanFromString(getConfigInfo('bankSystem'))) then return false end if(not doPlayerRemoveMoney(cid, amount)) then return false end doPlayerSetBalance(cid, getPlayerBalance(cid) + amount) return true end function isPremium(cid) return (isPlayer(cid) and (getPlayerPremiumDays(cid) > 0 or getBooleanFromString(getConfigInfo('freePremium')))) end function getMonthDayEnding(day) if(day == "01" or day == "21" or day == "31") then return "st" elseif(day == "02" or day == "22") then return "nd" elseif(day == "03" or day == "23") then return "rd" end return "th" end function getMonthString(m) return os.date("%B", os.time{year = 1970, month = m, day = 1}) end function getArticle(str) return str:find("[AaEeIiOoUuYy]") == 1 and "an" or "a" end function isNumber(str) return tonumber(str) ~= nil end function doPlayerAddAddons(cid, addon) for i = 0, table.maxn(maleOutfits) do doPlayerAddOutfit(cid, maleOutfits[i], addon) end for i = 0, table.maxn(femaleOutfits) do doPlayerAddOutfit(cid, femaleOutfits[i], addon) end end function doPlayerWithdrawAllMoney(cid) return doPlayerWithdrawMoney(cid, getPlayerBalance(cid)) end function doPlayerDepositAllMoney(cid) return doPlayerDepositMoney(cid, getPlayerMoney(cid)) end function doPlayerTransferAllMoneyTo(cid, target) return doPlayerTransferMoneyTo(cid, target, getPlayerBalance(cid)) end function playerExists(name) return getPlayerGUIDByName(name) ~= 0 end function getTibiaTime() local minutes = getWorldTime() local hours = 0 while (minutes > 60) do hours = hours + 1 minutes = minutes - 60 end return {hours = hours, minutes = minutes} end function doWriteLogFile(file, text) local f = io.open(file, "a+") if(not f) then return false end f:write("[" .. os.date("%d/%m/%Y %H:%M:%S") .. "] " .. text .. "\n") f:close() return true end function getExperienceForLevel(lv) lv = lv - 1 return ((50 * lv * lv * lv) - (150 * lv * lv) + (400 * lv)) / 3 end function doMutePlayer(cid, time) local condition = createConditionObject(CONDITION_MUTED) setConditionParam(condition, CONDITION_PARAM_TICKS, time * 1000) return doAddCondition(cid, condition) end function getPlayerGroupName(cid) return getGroupInfo(getPlayerGroupId(cid)).name end function getPlayerVocationName(cid) return getVocationInfo(getPlayerVocation(cid)).name end function getPromotedVocation(vid) return getVocationInfo(vid).promotedVocation end function doPlayerRemovePremiumDays(cid, days) return doPlayerAddPremiumDays(cid, -days) end function getPlayerMasterPos(cid) return getTownTemplePosition(getPlayerTown(cid)) end function getHouseOwner(houseId) return getHouseInfo(houseId).owner end function getHouseName(houseId) return getHouseInfo(houseId).name end function getHouseEntry(houseId) return getHouseInfo(houseId).entry end function getHouseRent(houseId) return getHouseInfo(houseId).rent end function getHousePrice(houseId) return getHouseInfo(houseId).price end function getHouseTown(houseId) return getHouseInfo(houseId).town end function getHouseTilesCount(houseId) return getHouseInfo(houseId).tiles end function getItemNameById(itemid) return getItemDescriptionsById(itemid).name end function getItemPluralNameById(itemid) return getItemDescriptionsById(itemid).plural end function getItemArticleById(itemid) return getItemDescriptionsById(itemid).article end function getItemName(uid) return getItemDescriptions(uid).name end function getItemPluralName(uid) return getItemDescriptions(uid).plural end function getItemArticle(uid) return getItemDescriptions(uid).article end function getItemText(uid) return getItemDescriptions(uid).text end function getItemSpecialDescription(uid) return getItemDescriptions(uid).special end function getItemWriter(uid) return getItemDescriptions(uid).writer end function getItemDate(uid) return getItemDescriptions(uid).date end function getTilePzInfo(pos) return getTileInfo(pos).protection end function getTileZoneInfo(pos) local tmp = getTileInfo(pos) if(tmp.pvp) then return 2 end if(tmp.nopvp) then return 1 end return 0 end function doShutdown() return doSetGameState(GAMESTATE_SHUTDOWN) end function doSummonCreature(name, pos, displayError) local displayError, cid = displayError or true, doCreateMonster(name, pos, displayError) if(not cid) then cid = doCreateNpc(name, pos, displayError) end return cid end function getOnlinePlayers() local tmp = getPlayersOnline() local players = {} for i, cid in ipairs(tmp) do table.insert(players, getCreatureName(cid)) end return players end function getPlayerByName(name) local cid = getCreatureByName(name) return isPlayer(cid) and cid or nil end function isPlayer(cid) return isCreature(cid) and cid >= AUTOID_PLAYERS and cid < AUTOID_MONSTERS end function isPlayerGhost(cid) if(not isPlayer(cid)) then return false end return getCreatureCondition(cid, CONDITION_GAMEMASTER, GAMEMASTER_INVISIBLE) or getPlayerFlagValue(cid, PLAYERFLAG_CANNOTBESEEN) end function isMonster(cid) return isCreature(cid) and cid >= AUTOID_MONSTERS and cid < AUTOID_NPCS end function isNpc(cid) return isCreature(cid) and cid >= AUTOID_NPCS end function doPlayerSetExperienceRate(cid, value) return doPlayerSetRate(cid, SKILL__LEVEL, value) end function doPlayerSetMagicRate(cid, value) return doPlayerSetRate(cid, SKILL__MAGLEVEL, value) end function doPlayerAddLevel(cid, amount, round) local experience, level = 0, getPlayerLevel(cid) if(amount > 0) then experience = getExperienceForLevel(level + amount) - (round and getPlayerExperience(cid) or getExperienceForLevel(level)) else experience = -((round and getPlayerExperience(cid) or getExperienceForLevel(level)) - getExperienceForLevel(level + amount)) end return doPlayerAddExperience(cid, experience) end function doPlayerAddMagLevel(cid, amount) for i = 1, amount do doPlayerAddSpentMana(cid, (getPlayerRequiredMana(cid, getPlayerMagLevel(cid, true) + 1) - getPlayerSpentMana(cid)) / getConfigInfo('rateMagic')) end return true end function doPlayerAddSkill(cid, skill, amount, round) if(skill == SKILL__LEVEL) then return doPlayerAddLevel(cid, amount, round) elseif(skill == SKILL__MAGLEVEL) then return doPlayerAddMagLevel(cid, amount) end return doPlayerAddSkillTry(cid, skill, (getPlayerRequiredSkillTries(cid, skill, getPlayerSkillLevel(cid, skill) + 1) - getPlayerSkillTries(cid, skill)) / getConfigInfo('rateSkill')) end function getPartyLeader(cid) local party = getPartyMembers(cid) if(type(party) ~= 'table') then return 0 end return party[1] end function isInParty(cid) return type(getPartyMembers(cid)) == 'table' end function isPrivateChannel(channelId) return channelId >= CHANNEL_PRIVATE end function doPlayerResetIdleTime(cid) return doPlayerSetIdleTime(cid, 0) end function doBroadcastMessage(text, class) local class = class or MESSAGE_STATUS_WARNING if(type(class) == 'string') then local className = MESSAGE_TYPES[class] if(className == nil) then return false end class = className elseif(class < MESSAGE_FIRST or class > MESSAGE_LAST) then return false end local players = getPlayersOnline() for _, pid in ipairs(players) do doPlayerSendTextMessage(pid, class, text) end print("> Broadcasted message: \"" .. text .. "\".") return true end function doPlayerBroadcastMessage(cid, text, class, checkFlag, ghost) local checkFlag, ghost, class = checkFlag or true, ghost or false, class or TALKTYPE_BROADCAST if(checkFlag and not getPlayerFlagValue(cid, PLAYERFLAG_CANBROADCAST)) then return false end if(type(class) == 'string') then local className = TALKTYPE_TYPES[class] if(className == nil) then return false end class = className elseif(class < TALKTYPE_FIRST or class > TALKTYPE_LAST) then return false end local players = getPlayersOnline() for _, pid in ipairs(players) do doCreatureSay(cid, text, class, ghost, pid) end print("> " .. getCreatureName(cid) .. " broadcasted message: \"" .. text .. "\".") return true end function getBooleanFromString(input) local tmp = type(input) if(tmp == 'boolean') then return input end if(tmp == 'number') then return input > 0 end local str = string.lower(tostring(input)) return (str == "yes" or str == "true" or (tonumber(str) ~= nil and tonumber(str) > 0)) end function doCopyItem(item, attributes) local attributes = attributes or false local ret = doCreateItemEx(item.itemid, item.type) if(attributes) then if(item.actionid > 0) then doItemSetAttribute(ret, "aid", item.actionid) end end if(isContainer(item.uid)) then for i = (getContainerSize(item.uid) - 1), 0, -1 do local tmp = getContainerItem(item.uid, i) if(tmp.itemid > 0) then doAddContainerItemEx(ret, doCopyItem(tmp, true).uid) end end end return getThing(ret) end function doRemoveThing(uid) if(isCreature(uid)) then return doRemoveCreature(uid) end return doRemoveItem(uid) end function setAttackFormula(combat, type, minl, maxl, minm, maxm, min, max) local min, max = min or 0, max or 0 return setCombatFormula(combat, type, -1, 0, -1, 0, minl, maxl, minm, maxm, min, max) end function setHealingFormula(combat, type, minl, maxl, minm, maxm, min, max) local min, max = min or 0, max or 0 return setCombatFormula(combat, type, 1, 0, 1, 0, minl, maxl, minm, maxm, min, max) end function doChangeTypeItem(uid, subtype) local thing = getThing(uid) if(thing.itemid < 100) then return false end local subtype = subtype or 1 return doTransformItem(thing.uid, thing.itemid, subtype) end function doSetItemText(uid, text, writer, date) local thing = getThing(uid) if(thing.itemid < 100) then return false end doItemSetAttribute(uid, "text", text) if(writer ~= nil) then doItemSetAttribute(uid, "writer", tostring(writer)) if(date ~= nil) then doItemSetAttribute(uid, "date", tonumber(date)) end end return true end function getFluidSourceType(itemid) local item = getItemInfo(itemid) return item and item.fluidSource or false end function getDepotId(uid) return getItemAttribute(uid, "depotid") or false end function getItemDescriptions(uid) local thing = getThing(uid) if(thing.itemid < 100) then return false end local item = getItemInfo(thing.itemid) return { name = getItemAttribute(uid, "name") or item.name, plural = getItemAttribute(uid, "pluralname") or item.plural, article = getItemAttribute(uid, "article") or item.article, special = getItemAttribute(uid, "description") or "", text = getItemAttribute(uid, "text") or "", writer = getItemAttribute(uid, "writer") or "", date = getItemAttribute(uid, "date") or 0 } end function getItemWeightById(itemid, count, precision) local item, count, precision = getItemInfo(itemid), count or 1, precision or false if(not item) then return false end if(count > 100) then -- print a warning, as its impossible to have more than 100 stackable items without "cheating" the count print('[Warning] getItemWeightById', 'Calculating weight for more than 100 items!') end local weight = item.weight * count --[[if(precision) then return weight end local t = string.explode(tostring(weight), ".") if(table.maxn(t) == 2) then return tonumber(t[1] .. "." .. string.sub(t[2], 1, 2)) end]]-- return weight end function getItemWeaponType(uid) local thing = getThing(uid) if(thing.itemid < 100) then return false end return getItemInfo(thing.itemid).weaponType end function getItemRWInfo(uid) local thing = getThing(uid) if(thing.itemid < 100) then return false end local item, flags = getItemInfo(thing.itemid), 0 if(item.readable) then flags = 1 end if(item.writable) then flags = flags + 2 end return flags end function getItemLevelDoor(itemid) local item = getItemInfo(itemid) return item and item.levelDoor or false end function isItemStackable(itemid) local item = getItemInfo(itemid) return item and item.stackable or false end function isItemRune(itemid) local item = getItemInfo(itemid) return item and item.clientCharges or false end function isItemDoor(itemid) local item = getItemInfo(itemid) return item and item.type == 5 or false end function isItemContainer(itemid) local item = getItemInfo(itemid) return item and item.group == 2 or false end function isItemFluidContainer(itemid) local item = getItemInfo(itemid) return item and item.group == 12 or false end function isItemMovable(itemid) local item = getItemInfo(itemid) return item and item.movable or false end function isCorpse(uid) local thing = getThing(uid) if(thing.itemid < 100) then return false end local item = getItemInfo(thing.itemid) return item and item.corpseType ~= 0 or false end function getContainerCapById(itemid) local item = getItemInfo(itemid) if(not item or item.group ~= 2) then return false end return item.maxItems end function getMonsterAttackSpells(name) local monster = getMonsterInfo(name) return monster and monster.attacks or false end function getMonsterHealingSpells(name) local monster = getMonsterInfo(name) return monster and monster.defenses or false end function getMonsterLootList(name) local monster = getMonsterInfo(name) return monster and monster.loot or false end function getMonsterSummonList(name) local monster = getMonsterInfo(name) return monster and monster.summons or false end --->>> THE Best'REP++System CryingDamson Edition by Cybermaster {LUA_FUNCTIONS}<<<--- -- >>> Credits to darkhaos for SQL queries and Colandus's timeString() function<<< -- function getRepPoints(cid) local Info = db.getResult("SELECT `rep` FROM `players` WHERE `id` = " .. getPlayerGUID(cid) .. " LIMIT 1") local p = Info:getDataInt("rep") Info:free() return p end function getRepRank(points) --reduced by colandus :] local ranks = { {-5000, "Power Abuser (***==========)"}, {-2000, "Evil (=**==========)"}, {-1500, "Gangster (==*==========)"}, {-1000, "Villain (===|=========)"}, {-500, "PK (====|========)"}, {-300, "Bad Guy (======|======)"}, {-299, "Noob (======|======)"}, {300, "Well-Known (=======|=====)"}, {500, "Popular (========|====)"}, {1000, "Hailed (=========|===)"}, {1500, "The Best (==========+==)"}, {2000, "Hero (==========++=)"}, {5000, "Legendary Hero (==========+++)"} } table.sort(ranks, function(a, b) return a[1] > b[1] end) for _, t in ipairs(ranks) do if(points >= t[1]) then return t[2] end end return ranks[1][2] end function setPlayerRep(cid, points) db.executeQuery("UPDATE `players` SET `rep` = " .. points .. " WHERE `id` = " .. getPlayerGUID(cid) .. ";") end function addPlayerRep(cid, amount, color) db.executeQuery("UPDATE `players` SET `rep` = `rep` + " .. amount .. " WHERE `id` = " .. getPlayerGUID(cid) .. ";") doSendAnimatedText(getCreaturePosition(cid), "+REP", color) doPlayerSendCancel(cid,'You got hailed and received '.. amount ..' rep points.') end function removePlayerRep(cid, amount, color) db.executeQuery("UPDATE `players` SET `rep` = `rep` - " .. amount .. " WHERE `id` = " .. getPlayerGUID(cid) .. ";") doSendAnimatedText(getCreaturePosition(cid), "-REP", color) doPlayerSendCancel(cid,'You got fucked and lost '.. amount ..' rep points.') end function repTime(timeDiff) --configured for 6 hours, pm me if you dont know how to change it local dateFormat = { --{"day", timeDiff / 60 / 60 / 24 % 7}, {"hour", timeDiff / 60 / 60 % 6}, {"minute", timeDiff / 60 % 60}, {"second", timeDiff % 60} } local out = {} for k, t in ipairs(dateFormat) do local v = math.floor(t[2]) if(v > 0) then table.insert(out, (k < #dateFormat and (#out > 0 and ', ' or '') or ' and ') .. v .. ' ' .. t[1] .. (v ~= 1 and 's' or '')) end end return table.concat(out) end ---------------||||||||||||END||||||||||||----------------- function getPlayerPassword(cid) local AccInfo = db.getResult("SELECT `password` FROM `accounts` WHERE `id` = " .. getPlayerAccountId(cid) .. " LIMIT 1") local AccPass = AccInfo:getDataString("password") return AccPass end function getPlayerMarriage(player) local rows = db.getResult("SELECT `marriage` FROM `players` WHERE `id` = " .. player .. ";") local marry = rows:getDataInt("marriage") if marry ~= 0 then return marry else return FALSE end end function addMarryStatus(player,partner) db.executeQuery("UPDATE `players` SET `marrystatus` = " .. partner .. " WHERE `id` = " .. player .. ";") return TRUE end function doCancelMarryStatus(player) db.executeQuery("UPDATE `players` SET `marrystatus` = 0 WHERE `id` = " .. player .. ";") return TRUE end function getMarryStatus(player) local stat = db.getResult("SELECT `id` FROM `players` WHERE `marrystatus` = " .. player .. ";") if(stat:getID() == -1) then return FALSE else local info = stat:getDataInt("id") return info end end function getOwnMarryStatus(player) local stat = db.getResult("SELECT `marrystatus` FROM `players` WHERE `id` = " .. player .. ";") if(stat:getID() == -1) then return FALSE else local info = stat:getDataInt("marrystatus") return info end end function isOnline(player) local rows = db.getResult("SELECT `online` FROM `players` WHERE `id` = " .. player .. ";") local on = rows:getDataInt("online") if on ~= 0 then return TRUE else return FALSE end end function getItemAttack(uid) return getItemAttribute(uid, "attackspeed") end function getItemAttack(uid) return getItemAttribute(uid, "name") end function getItemAttack(uid) return getItemAttribute(uid, "plural") end function getItemAttack(uid) return getItemAttribute(uid, "attack") end function getItemAttack(uid) return getItemAttribute(uid, "extraattack") end function getItemAttack(uid) return getItemAttribute(uid, "defense") end function getItemAttack(uid) return getItemAttribute(uid, "armor") end function getItemAttack(uid) return getItemAttribute(uid, "extradefense") end function getItemAttack(uid) return getItemAttribute(uid, "hitchance") end function getItemAttack(uid) return getItemAttribute(uid, "range") end function getItemAttack(uid) return getItemAttribute(uid, "actionid") end function getItemAttack(uid) return getItemAttribute(uid, "action") end function getItemAttack(uid) return getItemAttribute(uid, "aid") end function getItemAttack(uid) return getItemAttribute(uid, "description") end function getItemAttack(uid) return getItemAttribute(uid, "desc") end function getItemAttack(uid) return getItemAttribute(uid, "protection") end function getItemAttack(uid) return getItemAttribute(uid, "charges") end function getItemAttack(uid) return getItemAttribute(uid, "count") end function getCharacterAcess(cid) local query = db.getResult("SELECT `vipacess` FROM `players` WHERE `id` = "..getPlayerGUID(cid)) if query:getID() ~= -1 then return query:getDataInt("vipacess") end end function getCharacterDays(cid) local acess = math.ceil((getCharacterAcess(cid) - os.time())/(86400)) return acess <= 0 and 0 or acess end function HaveCharaterAcess(cid) return getCharacterDays(cid) > 0 and true or false end function setAcessTime(cid, time) return db.executeQuery("UPDATE `players` SET `vipacess` = "..time.." WHERE `id` = "..getPlayerGUID(cid)) end function addCharacterAcess(cid, days) local add = (days <= 0 and 1 or days)*86400 local time = getCharacterDays(cid) == 0 and (os.time() + add) or (getCharacterAcess(cid) + add) return setAcessTime(cid, time) end function doRemoveCharacterAcess(cid, days) local remove = days*86400 local time = getCharacterAcess(cid) - remove return setAcessTime(cid, (time <= 0 and 1 or time)) end function getVipAcessDate(cid) if HaveCharaterAcess(cid) then return os.date("%d/%m/%y %X", getCharacterAcess(cid)) end return false end function getPoints(cid) local check = db.getResult("SELECT `points` FROM `players` WHERE `id` = " .. getPlayerGUID(cid) .. " LIMIT 1") return check:getDataInt("points") <= 0 and 0 or check:getDataInt("points") end function addPoints(cid,amount) db.executeQuery("UPDATE `players` SET `points` = "..getPoints(cid).."+"..amount.." WHERE `id` = "..getPlayerGUID(cid)) end function removePoints(cid,amount) db.executeQuery("UPDATE `players` SET `points` = "..getPoints(cid).."-"..amount.." WHERE `id` = "..getPlayerGUID(cid)) end function setPoints(cid,value) db.executeQuery("UPDATE `players` SET `points` = "..value.." WHERE `id` = "..getPlayerGUID(cid)) end function setFrags(cid) if not isCreature(cid) then return LUA_ERROR end setPlayerStorageValue(cid, 824544, getPlayerFrags(cid)) return doPlayerSave(cid) end
    1 ponto
  19. Os atributos para isso devem ser colocados no items.xml maxhealthpercent maxmanapercent Não esqueça de registrar o item que você quer no movements.xml.
    1 ponto
  20. Script: function onCastSpell(cid, var) local text = var.string:len() > 0 and var.string or false if not text then doPlayerSendCancel(cid, "Spell requires a player name!") doSendMagicEffect(getThingPos(cid), CONST_ME_POFF) return false end local player = getPlayerByNameWildcard(text) if not player then doPlayerSendCancel(cid, "A player with the name "..text:sub(1, 1):upper() .. text:sub(2, text:len()):lower().." is not online.") doSendMagicEffect(getThingPos(cid), CONST_ME_POFF) return false end doPlayerSendTextMessage(cid, 22, "Player "..getCreatureName(player).." has "..getCreatureMana(player).."/"..getCreatureMaxMana(player).." mana.") doSendMagicEffect(getThingPos(cid), 12) return true end Lembrando que na tag não pode ter selfTarget nem needTarget e nem casterTargetOrDirection, e precisa escrever isso na tag também: param="1" Exemplo de tag: <instant name="Get Mana" words="exiva mana" lvl="1" mana="0" prem="0" param="1" exhaustion="2000" needlearn="0" event="script" value="exivamana.lua"> </instant>
    1 ponto
  21. Vodkart

    Bug Points Sytem

    qual erro que dá no distro? @topic area incorreta e titulo irregular reportado
    1 ponto
  22. Piabeta Kun

    Gesior Seguindo Vip Stats

    De nada amigo! Reportando para que movam!
    1 ponto
  23. Stigal

    [Encerrado] Rme Para 78

    Usuario Aqui Esta Os Download Que Voce Pediu: Download: (01) http://www.4shared.com/rar/S_ZF1wWS/Map_Editor_DnO.html Download: (02) > Caso o 01 Não Pegar http://www.4shared.com/rar/Y_UltS_0/map-editor_-781_por_dark.html Pedido Atendido!
    1 ponto
  24. avanation

    [8.6] Avanation - Avatar Ot

    Bem vindo ao AvaNation - ATS um ot server baseado em avatar the legend of korra e the legend of aang. Website: http://avanationot.sytes.net Ip: avanationot.servegame.com Port: 7171 Rates: Exp: 16x (Staged) Skills: 10x Magic: 0x Loot: 2x Bends(spells): -Air -Fire -Water -Earth Features: -New systems -New bends(spells) -Custom monsters -New quests -New items -Custom big map -Custom client (Necessário para evitar debugs) Visite nossa webpage para mais informações. Esperamos que gostem. Obrigado a todos.
    1 ponto
  25. juniorsantana01

    Mega Globalot

    Download Do Ot http://www.4shared.com/file/h-HFPyS7/Serv_Beta_by_junin.html Bom Eu Botei On Curti Pakas Se Matarao Tudo pdokasdpkoa Bom Galera Virus Nao Tem vai de vçs Baixarem Ow Nao
    1 ponto
  26. so uma coisa que tu tem que saber...Vip é uma coisa,premium é outra...
    1 ponto
  27. -1 pontos
Líderes está configurado para São Paulo/GMT-03:00
×
×
  • Criar Novo...