Líderes
-
-
Fir3element
HéroiPontos1305Total de itens -
-
Conteúdo Popular
Exibindo conteúdo com a maior reputação em 12/25/15 em todas áreas
-
[TFS 1.x] NPC Dicer
[TFS 1.x] NPC Dicer
Marfito e um outro reagiu a Tricoder por uma resposta no tópico
2 pontosPreview Informações Configuravel quantidade minima e máxima de aposta. Configuravel bonus caso a pessoa ganhe a aposta. Não é necessário editar a posição, apenas deixe o NPC à esquerda e o player à direita. Conversão automática do money. Anti-Trash. Script <?xml version="1.0" encoding="UTF-8"?> <npc name="Dicer" script="dicer.lua" walkinterval="0" floorchange="0"> <health now="100" max="100"/> <look type="144" head="0" body="0" legs="0" feet="0" addons="0"/> </npc> local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) 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 local config = { bonusPercent = 2, minimumBet = 100, maximumBet = 10000000 } local storeMoneyAmount = 0 -- Do not touch [We store the amount cash which got betted here] local function getMoneyAmount(position) local moneyAmount = 0 for _, item in ipairs(Tile(position):getItems()) do local itemId = item:getId() if itemId == ITEM_GOLD_COIN then moneyAmount = moneyAmount + item.type elseif itemId == ITEM_PLATINUM_COIN then moneyAmount = moneyAmount + item.type * 100 elseif itemId == ITEM_CRYSTAL_COIN then moneyAmount = moneyAmount + item.type * 10000 end end storeMoneyAmount = moneyAmount return moneyAmount end local function handleMoney(cid, position, bonus) -- Lets remove the cash which was betted for _, item in ipairs(Tile(position):getItems()) do if isInArray({ITEM_GOLD_COIN, ITEM_PLATINUM_COIN, ITEM_CRYSTAL_COIN}, item:getId()) then item:remove() end end local npc = Npc(cid) if not npc then return end -- We lost, no need to continue if bonus == 0 then npc:say("You lost!", TALKTYPE_SAY) position:sendMagicEffect(CONST_ME_POFF) return end -- Cash calculator local goldCoinAmount = storeMoneyAmount * bonus local crystalCoinAmount = math.floor(goldCoinAmount / 10000) goldCoinAmount = goldCoinAmount - crystalCoinAmount * 10000 local platinumCoinAmount = math.floor(goldCoinAmount / 100) goldCoinAmount = goldCoinAmount - platinumCoinAmount * 100 if goldCoinAmount > 0 then Game.createItem(ITEM_GOLD_COIN, goldCoinAmount, position) end if platinumCoinAmount > 0 then Game.createItem(ITEM_PLATINUM_COIN, platinumCoinAmount, position) end if crystalCoinAmount > 0 then Game.createItem(ITEM_CRYSTAL_COIN, crystalCoinAmount, position) end position:sendMagicEffect(math.random(CONST_ME_FIREWORK_YELLOW, CONST_ME_FIREWORK_BLUE)) npc:say("You Win!", TALKTYPE_SAY) end local function startRollDice(cid, position, number) for i = 5792, 5797 do local dice = Tile(position):getItemById(i) if dice then dice:transform(5791 + number) break end end local npc = Npc(cid) if npc then npc:say(string.format("%s rolled a %d", npc:getName(), number), TALKTYPE_MONSTER_SAY) end end local function creatureSayCallback(cid, type, msg) -- Npc Variables local npc = Npc() local npcPosition = npc:getPosition() -- Check if player stand in position local playerPosition = Position(npcPosition.x + 2, npcPosition.y, npcPosition.z) local topCreature = Tile(playerPosition):getTopCreature() if not topCreature then npc:say("Please go stand next to me.", TALKTYPE_SAY) playerPosition:sendMagicEffect(CONST_ME_TUTORIALARROW) playerPosition:sendMagicEffect(CONST_ME_TUTORIALSQUARE) return false end -- Make sure also the player who stand there, is the one who is betting. To keep out people from disturbing if topCreature:getId() ~= cid then return false end -- Check money Got betted local moneyPosition = Position(npcPosition.x + 1, npcPosition.y - 1, npcPosition.z) if getMoneyAmount(moneyPosition) < config.minimumBet or getMoneyAmount(moneyPosition) > config.maximumBet then npc:say(string.format("You can only bet min: %d and max: %d gold coins.", config.minimumBet, config.maximumBet), TALKTYPE_SAY) return false end -- High or Low numbers local rollType = 0 if msgcontains(msg, "low") then rollType = 1 elseif msgcontains(msg, "high") then rollType = 2 else return false end -- Roll Number local rollNumber = math.random(6) -- Dice local dicePosition = Position(npcPosition.x, npcPosition.y - 1, npcPosition.z) addEvent(startRollDice, 500, npc:getId(), dicePosition, rollNumber) dicePosition:sendMagicEffect(CONST_ME_CRAPS) rolledDice = true -- Win or Lose local bonus = 0 if rollType == 1 and isInArray({1, 2, 3}, rollNumber) then bonus = config.bonusPercent elseif rollType == 2 and isInArray({4, 5, 6}, rollNumber) then bonus = config.bonusPercent end -- Money Handeling addEvent(handleMoney, 700, npc:getId(), moneyPosition, bonus) return true end function onThink() local npcPosition = Npc():getPosition() local moneyPosition = Position(npcPosition.x + 1, npcPosition.y - 1, npcPosition.z) for _, item in ipairs(Tile(moneyPosition):getItems()) do if not isInArray({ITEM_GOLD_COIN, ITEM_PLATINUM_COIN, ITEM_CRYSTAL_COIN}, item:getId()) and ItemType(item:getId()):isMovable() then item:remove() end end npcHandler:onThink() end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) Créditos à Printer.2 pontos -
[v32] GlobalFull 11/12 - New Asuras, Falcons, Warzones 4,5,6 . (Updates Frequentes)
[v32] GlobalFull 11/12 - New Asuras, Falcons, Warzones 4,5,6 . (Updates Frequentes)
anderson de souza reagiu a Qwizer por uma resposta no tópico
1 pontoGlobal 11/12x [v32] - New Falcons - New Asuras - Warzone 4,5,6 - Exercise Training - Raids 100% - Monstros 100% - Trainer Offline 100% - Trainer Online 100% - Taming system funcionando 100%; - Database completa - War System 100% - Global MAP Full - Store 100% - Imbuement - Prey System - Entre outros sistemas. Projeto no: GITHUB Scan Vírus Total IMAGES Créditos:1 ponto -
Global 8.70 Full [Chaito Soft e Otprojects]
Global 8.70 Full [Chaito Soft e Otprojects]
poverelo reagiu a Gustavo Ferreira por uma resposta no tópico
1 pontoGlobal Chaito Soft 8.70 Servidor que está sendo vendido pela chaito soft e otshop Fala galera estou aqui para apresentar Global que a chaito soft vende no seu site, Bom estou disponibilizando grátis para vocês, Otimo servidor testei aqui , Agora de graça para vocês que querem um bom server global, Confira abaixo alguns detalhes do servidor!!!! • Cidades: ├ Carlin ├ Thais ├ Ab'Dendriel ├ Venore ├ Liberty Bay ├ Outlaw Camp ├ Ankrahmun ├ Zao + Razachai! ├ Edron ├ Kazordoon ├ Port Hope ├ Svargrund ├ Yalahar ├ Darashia └ e muitas outras.. • O Que Contêm no Servidor: - War of Emperium (Evento) - Zombie Attack (Evento) - Raids Automáticas (Script) - Bonus 50+ (Script) - Database completa (DB) - Wrath of Emperor (Mapa-quest) - Zao e New Banuta Piece (Mapa) - TFS 0.4 (Distro: Anti-Divulgação, War System e No-otbm check) - Task 100% RL (Script: Com ranking e bonus bosses) - War System com escudos (Script) - VIP System (Script) - 10 Cidades e 15 Ilhas VIPS (Mapa) • Lista Das Principais Quests (Todas Funcionando 100%): The Annihilator Quest ├ Demon Helmet Quest ├ The Elemental Spheres Quest ├ Firewalker Boots Quest ├ The Inquisition Quest ├ Killing in the Name of... Quest ├ The Pits of Inferno Quest ├ Shadows of Yalahar Quest ├ Children of the Revolution Quest ├ The New Frontier Quest ├ The Demon Oak Quest ├ Tomes of Knowledge Quest └ In Service of Yalahar Quest • Proibido postar?: Me manda PM se achar ruim! Ta ae de GRAÇA! Lembrando que o servidor está sem DLLS e Distro Mais vou Disponibilizar uma aqui! DOWNLOADS MAPA http://www.mediafire...qk0yyueloljej9t DISTRO E SOURCES [Distro 0.4] [Executável]1 ponto -
Fuzion Global | Trainer Offline, Teleports, Servidor estável e +
Fuzion Global | Trainer Offline, Teleports, Servidor estável e +
Carlos Ortega reagiu a Tricoder por uma resposta no tópico
1 pontoFuzion Global 8.60 Informações Mapa Global 100%. Rashid está de cidade em cidade em cada dia da semana. Todas as quests 100%. Spells 100%. Monstros 100%. Teleports; Teleports para as quests 100%. Offline Trainer 100%. Servidor 100% estável. Teleports para as cidades 100%. E muito mais! Quests The Annihilator Quest Demon Helmet Quest The Elemental Spheres Quest Firewalker Boots Quest The Inquisition Quest Killing in the Name of... Quest The Pits of Inferno Quest Shadows of Yalahar Quest Children of the Revolution Quest The New Frontier Quest The Demon Oak Quest Tomes of Knowledge Quest In Service of Yalahar Quest Cidades Carlin Thais Ab'Dendriel Venore Liberty Bay Outlaw Camp Ankrahmun Zao + Razachai! Edron Kazordoon Port Hope Svargrund Yalahar Darashia E muitas outras... Download http://www.4shared.com/rar/PLed471h/westelation-fusion.html Scan https://www.virustotal.com/en/file/e6fe9b5b05b8bcbd1928891a0159c02dce783a08661c2096bf9aaf7d3bc13027/analysis/1375810285/ Créditos totais à Lordfireot.1 ponto -
[CTF] Capture The Flag 2.0(Automático)
[CTF] Capture The Flag 2.0(Automático)
Deathstroke reagiu a MaXwEllDeN por uma resposta no tópico
1 ponto#Introdução Este é um sistema de rouba bandeira, no qual tem dois times que se enfrentam e tentam se infiltrar na fortaleza do inimigo, roubar a bandeira dele e retornar para sua base com ela. #Instalação Faça o download do sistema (anexado ao tópico) e cole na pasta do seu servidor. Atualizado 28/03/2014 Após ter instalado os arquivos nas suas respectivas pastas e instalado as tags nos arquivos xml, abra a pasta do seu servidor, e em seguida abra a pasta spells/scripts/support, e abra o arquivo invisible.lua com algum editor de texto, depois de function onCastSpell(cid, var) cole isso: if (getPlayerStorageValue(cid, 16700) ~= -1) then return doPlayerSendCancel(cid, "Você não pode usar invisible durante o CTF!") and doSendMagicEffect(getThingPos(cid), 2) end ficando assim: local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_RED) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false) local condition = createConditionObject(CONDITION_INVISIBLE) setConditionParam(condition, CONDITION_PARAM_TICKS, 200000) setCombatCondition(combat, condition) function onCastSpell(cid, var) if (getPlayerStorageValue(cid, 16700) ~= -1) then return doPlayerSendCancel(cid, "Você não pode usar invisible durante o CTF!") and doSendMagicEffect(getThingPos(cid), 2) end return doCombat(cid, combat, var) end #Configuração Como na maioria dos meus códigos: as configurações ficam na lib, então: waitpos = {x = 93, y = 117, z = 6}, -- Posição da sala de espera tppos = {x = 92, y = 117, z = 7}, -- Onde o TP vai aparecer days = {2, 5, 7}, -- Dias que o evento vai abrir xp_percent = 0.5, -- Porcentagem de xp que o player vai receber quando ganhar timeclose = 1, -- Tempo para iniciar o CTF winp = 10, waitpos = {x = 93, y = 117, z = 6}, -- Posição da sala de espera Posição onde os players que entrarem no teleport vão ficar esperando, até o evento iniciar tppos = {x = 92, y = 117, z = 7}, -- Onde o TP vai aparecer Posição de onde o teleport vai aparecer days = {2, 5, 7}, -- Dias que o evento vai abrir Dias que o evento vai iniciar. xp_percent = 0.5, -- Porcentagem de exp que o player vai ganhar Quando o evento acaba, os players da equipe que venceu ganham uma quantidade de experiência baseada na experiência que eles já têm, exemplo: Meu player tem 1200000000 de exp, quando o evento acabar, ele vai ganhar 0.5% da exp que ele tem, no caso desse exemplo 6000000 de exp. timeclose = 1, -- Tempo, em minutos, para iniciar o CTF Tempo para o teleport sumir e os players que estão na sala de espera serem teletransportados para o evento. winp = 10, -- Quantos pontos uma equipe precisa marcar para vencer Quantos pontos uma equipe precisa marcar para vencer o evento. Para configurar o horário que o evento vai abrir, é só você modificar na tag do globalevents.xml: <globalevent name="CTFCheck" time="19:33:00" event="script" value="CTFMax.lua"/> Você não precisa criar as bandeiras pelo map editor. O script irá adicioná-las automaticamente. É isso, essa versão é uma remake, vários bugs reportados pela galera na v.1 foram corrigidos, o script ficou mais simples Capture The Flag.rar1 ponto -
Adicionando comando !spells
Adicionando comando !spells
uesleirodrigues reagiu a MonsterOt por uma resposta no tópico
1 pontoIsso serve para os players do seu ot saberem as magias. abra: data/talkactions/script/ copie cole renomei para spells e cole isso: agora em talkactions.xml bote: <talkaction words="!spells" event="script" value="spells.lua"/> agora voce cria um bloco de notas com o nome "spells" na pasta do seu ot, bem aonde ta o seu config.lua, seu loader.. ai vc edita do jeito q quiser, e quando alguem falar !spells no ot ira aparecer oq vc escreveu no bloco de notas se te ajudei rep+1 ponto -
(Resolvido)Meu antivirus acusa o cliente após ser compilado, como resolver?
Faça um scan no VirusTotal e veja quais outros anti-virus detecta esse problema, e avisa no seu site que o anti-virus X, Y e Z estão detectando que o cliente possui vírus, porém é um falso-positivo. Infelizmente é o que eu posso te ajudar devido ao meu pouco conhecimento sobre servidores derivados, e não ter nenhum interesse em aprender também.1 ponto
-
ERRO AO DELETA SQL
1 pontoBaixe um servidor com database limpa.1 ponto
-
ERRO AO DELETA SQL
1 ponto@japakkk Ok, mas deletar o que? Você tem que especificar mais.1 ponto
-
(Resolvido)Sempre pega red battle!
(Resolvido)Sempre pega red battle!
Henrique Rezende reagiu a vankk por uma resposta no tópico
1 pontoErrado, é apenas mudar as configurações para 321 ponto -
[10.90] - Eternia Evolution 2016
[10.90] - Eternia Evolution 2016
JonatasLucasf reagiu a vankk por uma resposta no tópico
1 pontoQuests Room Free [14/28] Tps Rooms Free [26/30] Estou trabalhando no máximo que consigo para abrir o servidor em Janeiro, nas férias ainda.1 ponto -
(Resolvido)criar conta no site e 1/1
(Resolvido)criar conta no site e 1/1
alexandre2014 reagiu a Vida Loka por uma resposta no tópico
1 pontoObrigado amigo ajudo muinto..1 ponto -
Script RESET 10.76
Script RESET 10.76
Zzjj reagiu a Fir3element por uma resposta no tópico
1 pontofunction onSay(cid, words, param) local player = Player(cid) local hasAccess = player:getGroup():getAccess() local players = Game.getPlayers() local playerCount = Game.getPlayerCount() player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, playerCount .. " players online.") local i = 0 local msg = "" for k, tmpPlayer in ipairs(players) do local function getPlayerResets() local resets = tmpPlayer:getStorageValue(500) return resets < 0 and 0 or resets end if hasAccess or not tmpPlayer:isInGhostMode() then if i > 0 then msg = msg .. ", " end msg = msg .. tmpPlayer:getName() .. " (" .. tmpPlayer:getLevel() .. ") [Resets: " .. getPlayerResets() .. "]" i = i + 1 end if i == 10 then if k == playerCount then msg = msg .. "." else msg = msg .. "," end player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, msg) msg = "" i = 0 end end if i > 0 then msg = msg .. "." player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, msg) end return false end1 ponto -
Script RESET 10.76
Script RESET 10.76
Zzjj reagiu a Fir3element por uma resposta no tópico
1 pontofunction onSay(cid, words, param) local player = Player(cid) local function getPlayerResets() local resets = player:getStorageValue(500) return resets < 0 and 0 or resets end local hasAccess = player:getGroup():getAccess() local players = Game.getPlayers() local playerCount = Game.getPlayerCount() player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, playerCount .. " players online.") local i = 0 local msg = "" for k, tmpPlayer in ipairs(players) do if hasAccess or not tmpPlayer:isInGhostMode() then if i > 0 then msg = msg .. ", " end msg = msg .. tmpPlayer:getName() .. " (" .. tmpPlayer:getLevel() .. ") [Resets: " .. getPlayerResets() .. "]" i = i + 1 end if i == 10 then if k == playerCount then msg = msg .. "." else msg = msg .. "," end player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, msg) msg = "" i = 0 end end if i > 0 then msg = msg .. "." player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, msg) end return false end1 ponto -
Script RESET 10.76
Script RESET 10.76
Zzjj reagiu a Fir3element por uma resposta no tópico
1 pontoConsegui testar agora. player.cpp, troque sua função getDescription por essa:1 ponto