Krono

Achei esse script magnifico na internet que tira qualquer servidor da mesmisse dando um ar mais RPG e inovador a qualquer otserver!!

Este script randomiza o item ganho em uma quest, levando em consideração.

Os itens do dia: 1 dos itens disponiveis no dia é dado ao player (escolhido aleatoriamente)
A quantidade: alguns dos itens tem a possibilidade de ganhos em dobro triplo..etc.
Vamos ao Script

Em data/actions/actions/scripts adicione um arquivo com o nome de questxday.lua
function onUse(cid, item, fromPosition, itemEx, toPosition, isHotkey) local config = { storage = 45392, exstorage = 40822, days = { ["Monday"] = { {itemid = 8839, count = math.random(1, 3)} }, ["Tuesday"] = { {itemid = 2681, count = 1}, {itemid = 2682, count = 1}, {itemid = 2683, count = 1} }, ["Wednesday"] = { {itemid = 2674, count = math.random(1, 10)}, {itemid = 2675, count = math.random(1, 10)}, {itemid = 2676, count = math.random(1, 10)}, {itemid = 2673, count = math.random(1, 10)} }, ["Thursday"] = { {itemid = 2679, count = math.random(2, 15)}, {itemid = 2680, count = math.random(1, 5)} }, ["Friday"] = { {itemid = 2788, count = math.random(1, 3)} }, ["Saturday"] = { {itemid = 6393, count = 1} }, ["Sunday"] = { {itemid = 2389, count = math.random(2, 12)}, {itemid = 2690, count = math.random(1, 5)} } } } local player = Player(cid) local x = config.days[os.date("%A")] if player:getStorageValue(config.storage) == tonumber(os.date("%w")) and player:getStorageValue(config.exstorage) > os.time() then return player:sendCancelMessage("The chest is empty, come back tomorrow for a new reward.") end local c = math.random(#x) local info = ItemType(x[c].itemid) if x[c].count > 1 then text = x[c].count .. " " .. info:getPluralName() else text = info:getArticle() .. " " .. info:getName() end local itemx = Game.createItem(x[c].itemid, x[c].count) if player:addItemEx(itemx) ~= RETURNVALUE_NOERROR then player:getPosition():sendMagicEffect(CONST_ME_POFF) text = "You have found a reward weighing " .. itemx:getWeight() .. " oz. It is too heavy or you have not enough space." else text = "You have received " .. text .. "." player:setStorageValue(config.storage, tonumber(os.date("%w"))) player:setStorageValue(config.exstorage, os.time() + 24*60*60) end player:sendTextMessage(MESSAGE_INFO_DESCR, text) return true end Em actions.xml adicione a tag:
<action uniqueid="3001" script="questxday.lua"/> Espero que gostem e utilizem!!
 
Credito :Vancinis

xml:
<?xml version="1.0" encoding="UTF-8"?> <npc name="NPCNAME" script="bless_heal.lua" walkinterval="2000" floorchange="0" speechbubble="1"> <health now="100" max="100"/> <look type="138" head="58" body="114" legs="87" addons="3"/> <parameters> <parameter key="module_keywords" value="1" /> <parameter key="keywords" value="bless;blessings" /> <parameter key="keyword_reply1" value="I can grant you blessings such as {Wisdom} {of} {Solitude}, {Spark} {of} {The} {Phoenix}, our {Fire} {of} {Two} {Suns}, {Spiritual} {Shielding} and {The Embrace}. I can also grant you {all} of these blessings, just ask me." /> <parameter key="keyword_reply2" value="I can grant you blessings such as {Wisdom} {of} {Solitude}, {Spark} {of} {The} {Phoenix}, our {Fire} {of} {Two} {Suns}, {Spiritual} {Shielding} and {The Embrace}. I can also grant you {all} of these blessings, just ask me." /> </parameters> </npc> bless_heal.lua
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 onPlayerEndTrade(cid) npcHandler:onPlayerEndTrade(cid) end function onPlayerCloseChannel(cid) npcHandler:onPlayerCloseChannel(cid) end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = cid local p = Player(cid) local heal = false local hp = p:getHealth() if msgcontains(msg, "heal") then if getCreatureCondition(cid, CONDITION_FIRE) then selfSay("You are burning. I will help you.", cid) doRemoveCondition(cid, CONDITION_FIRE) heal = true elseif getCreatureCondition(cid, CONDITION_POISON) then selfSay("You are poisoned. I will cure you.", cid) doRemoveCondition(cid, CONDITION_POISON) heal = true elseif getCreatureCondition(cid, CONDITION_ENERGY) then selfSay("You are electrificed. I will help you.", cid) doRemoveCondition(cid, CONDITION_ENERGY) heal = true elseif getCreatureCondition(cid, CONDITION_PARALYZE) then selfSay("You are paralyzed. I will cure you.", cid) doRemoveCondition(cid, CONDITION_PARALYZE) heal = true elseif getCreatureCondition(cid, CONDITION_DROWN) then selfSay("You are drowing. I will help you.", cid) doRemoveCondition(cid, CONDITION_DROWN) heal = true elseif getCreatureCondition(cid, CONDITION_FREEZING) then selfSay("You are cold! I will help you.", cid) doRemoveCondition(cid, CONDITION_FREEZING) heal = true elseif getCreatureCondition(cid, CONDITION_BLEEDING) then selfSay("You are bleeding! I will help you.", cid) doRemoveCondition(cid, CONDITION_BLEEDING) heal = true elseif getCreatureCondition(cid, CONDITION_DAZZLED) then selfSay("You are dazzled! Do not mess with holy creatures anymore!", cid) doRemoveCondition(cid, CONDITION_DAZZLED) heal = true elseif getCreatureCondition(cid, CONDITION_CURSED) then selfSay("You are cursed! I will remove it.", cid) doRemoveCondition(cid, CONDITION_CURSED) heal = true elseif hp < 65 then selfSay("You are looking really bad. Let me heal your wounds.", cid) p:addHealth(65 - hp) heal = true elseif hp < 2000 then selfSay("I did my best to fix your wounds.", cid) p:addHealth(2000 - hp) heal = true end if heal then p:getPosition():sendMagicEffect(CONST_ME_MAGIC_BLUE) else local msgheal = { "You aren't looking really bad, " .. getCreatureName(cid) .. ". I only help in cases of real emergencies. Raise your health simply by eating {food}.", "Seriously? It's just a scratch", "Don't be a child. You don't need any help with your health.", "I'm not an expert. If you need help find a medic.", "Don't even waste my time, I have bigger problems than your scratched armor." } selfSay("" .. msgheal[math.random(1, #msgheal)] .. "", cid) end return true end if msgcontains(msg, "yes") and talkState[talkUser] > 90 and talkState[talkUser] < 96 then if getPlayerBlessing(cid, talkState[talkUser] - 90) then selfSay("You already have this blessing!", cid) else b_price = (2000 + ((math.min(130, getPlayerLevel(cid)) - 30) * 200)) if b_price < 2000 then b_price = 2000 end if doPlayerRemoveMoney(cid, b_price) then selfSay("You have been blessed by one of the five gods!", cid) doPlayerAddBlessing(cid, talkState[talkUser] - 90) doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE) else selfSay("I'm sorry. We need money to keep this temple up.", cid) end end talkState[talkUser] = 0 return true end if msgcontains(msg, "yes") and talkState[talkUser] == 96 then havebless = {} for i = 1, 5 do if(getPlayerBlessing(cid, i)) then table.insert(havebless,i) end end if #havebless == 5 then selfSay('You already have all available blessings.',cid) talkState[talkUser] = 0 return true end b_price = (2000 + ((math.min(130, getPlayerLevel(cid)) - 30) * 200)) if b_price < 2000 then b_price = 2000 end b_price = ((5 - #havebless) * b_price) if doPlayerRemoveMoney(cid, b_price) then selfSay("You have been blessed by the five gods!", cid) for i = 1, 5 do doPlayerAddBlessing(cid, i) end doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE) else selfSay("I'm sorry. We need money to keep this temple up.", cid) end talkState[talkUser] = 0 return true end if msgcontains(msg, "all") then havebless = {} b_price = (2000 + ((math.min(130, getPlayerLevel(cid)) - 30) * 200)) if b_price < 2000 then b_price = 2000 end for i = 1, 5 do if(getPlayerBlessing(cid, i)) then table.insert(havebless,i) end end b_price = ((5 - #havebless) * b_price) if b_price == 0 then selfSay('You already have all available blessings.',cid) talkState[talkUser] = 0 return true end selfSay('Do you want to receive all blessings for ' .. b_price .. ' gold?',cid) talkState[talkUser] = 96 return true end local blesskeywords = {'wisdom', 'spark', 'fire', 'spiritual', 'embrace'} local blessnames = {'Wisdom of Solitude', 'Spark of The Phoenix', 'Fire of Two Suns', 'Spiritual Shielding', 'The Embrace'} for i = 1, #blesskeywords do if msgcontains(msg, blesskeywords[i]) then b_price = (2000 + ((math.min(130, getPlayerLevel(cid)) - 30) * 200)) if b_price < 2000 then b_price = 2000 end selfSay('Do you want me to grant you ' .. blessnames[i] .. ' blessing for ' .. b_price .. ' gold?',cid) talkState[talkUser] = 90 + i return true end end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) Créditos : zbisu

Basicamente é um sistema onde permite chuva e solte raios em determinado local do mapa, use sua criatividade ao usar o sistema.
 
 
 
 
 

 
 
 
Features :
 
Chuva só nos jogadores, para economizar memória do servidor, em vez de enviar todo o mapa. Se não tiver um telhado, vai enviar o efeito dentro do local mesmo. Assim, se você estiver sob um teto, vai enviar para fora do local. Quando água bate no chão, envia o efeito de splash. Efeito do trovão causa dano.
Em global.lua adicione :
weatherConfig = { groundEffect = CONST_ME_LOSEENERGY, fallEffect = CONST_ANI_ICE, thunderEffect = true, minDMG = 5, maxDMG = 10 } function Player.sendWeatherEffect(self, groundEffect, fallEffect, thunderEffect) local position, random = self:getPosition(), math.random position.x = position.x + random(-4, 4) position.y = position.y + random(-4, 4) local fromPosition = Position(position.x + 1, position.y, position.z) fromPosition.x = position.x - 7 fromPosition.y = position.y - 5 local tile, getGround for Z = 1, 7 do fromPosition.z = Z position.z = Z tile = Tile(position) if tile then -- If there is a tile, stop checking floors fromPosition:sendDistanceEffect(position, fallEffect) position:sendMagicEffect(groundEffect, self) getGround = tile:getGround() if getGround and ItemType(getGround:getId()):getFluidSource() == 1 then position:sendMagicEffect(CONST_ME_WATERSPLASH, self) end break end end if thunderEffect and tile then if random(2) == 1 then local topCreature = tile:getTopCreature() if topCreature and topCreature:isPlayer() then position:sendMagicEffect(CONST_ME_BIGCLOUDS, self) doTargetCombatHealth(0, self, COMBAT_ENERGYDAMAGE, -weatherConfig.minDMG, -weatherConfig.maxDMG, CONST_ME_NONE) self:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You were hit by lightning and lost some health.") end end end end modo de uso :
player:sendWeatherEffect(weatherConfig.groundEffect, weatherConfig.fallEffect, weatherConfig.thunderEffect) Em breve vou fazer uns scripts bacana em cima desse sistema, aceito sugestões.
 
 
Créditos : Printer.

Tp com Limite de Players é um script que determina quantos players podem acessar cada area por vez. Com esse script dá para deixar as hunts mais distribuidas.
 
Veja como funciona com Imagen.
 

 
 
Instalando o script:
 
Em data/movements/scripts crie um arquivo com o nome Limitetp.lua e cole este script dentro:
local c = { limit = 5, -- Limite de jogadores msgCancel = 'Tp bloqueado. Maximo de jogadores atingido', -- Mensagem quando o limite de jogadores estiver atingido area = { From = {x = 1069, y = 1027, z = 6}, -- Coordenada maxima superior esquerda To = {x = 1071, y = 1030, z = 7}, -- Coordenada minima inferior direita }, pos = {x = 1070, y = 1030, z = 7}, -- Coordenada onde será teletransportado local function getPlayersInArea(fromPos, toPos) local t = {} for _, cid in ipairs(getPlayersOnline()) do if isInRange(getThingPos(cid), fromPos, toPos) then table.insert(t, cid) end end return t end function onStepIn(cid, item, fromPos, toPos) if isPlayer(cid) then if table.getn(getPlayersInArea(c.area.From, c.area.To)) < c.limit then doSendMagicEffect(fromPos, CONST_ME_TELEPORT) doTeleportThing(cid, c.pos) doSendMagicEffect(getThingPos(cid), CONST_ME_TELEPORT) else doPlayerSendCancel(cid, c.msgCancel) doTeleportThing(cid, toPos, false) end end return true end Em movements.xml adicione a tag:
<movevent type="StepIn" uniqueid="9478" event="script" value="Limitetp.lua"/> Veja a imagem da configuração:

 
 
Espero que gostem e usem!!
 
Credito: Belerofonte

Hoje eu vim trazer um servidor de pokemon tibia chamado "Pokemon Whots"

Features:
Rep+ System Comando de Correr Comando de !luz Comando de !afk Comando de !bug (voltar ao cp) Sistema de Anúcio Ex: "!anucio aeae galera." Vai aparecer em verde [Anuncio]Seunick : aeae galera. Para todo o servidor Entre outros Sistemas Muito Legais!!!!! Pokemon da 1° até 6° Geração (Incompleta)  
Downloads:
Servidor Cliente  
Scans:
Servidor Cliente  
Créditos:
Equipe Skyfall - Base
Zet0N0Murmurou - Editar Muitas Coisas
Lucasmc - Por Umas sprites como Iniciais de Kalos e Sprite de Meloetta
 

Olá Xtibians. Upando Muito? Beleza então, mais tarde a cave é minha!! então leave.
 
Bom mais enquanto isso estou postando pra vocês um tutorial simples, porém util nesta seção, é uma forma facil de criar Conta God.
Espero com esse tutorial ajudar pelo menos 1 pessoa pois pra min ja vai valer a pena!!
(mesmo sabendo que escrevi esse tutorial 2 vezes)
 
Bom vamos lá.
 
1º Acesso o PhpMyAdmin --> Banco de dados do servidor
2º Abra a tabela Account
 

 
3 Procure pela Account Name ja criada para que a mesma se torne sua Conta God
4 Clique em Editar
5 Altere o valor Type para "5" e clique em execultar


5º Agora acesse a tabela "Player" e procure o character da mesma conta que será o seu God
6º Clique em editar.
7º Altere o valor de Group_Id para "3'
 
Pronto!! Facil não?
Até a proxima, vou pra minha cave agora.
~~Sujestão de tutoriais via PM acepted!!

Neptune Server + Website Completo
Servidor com alto nivel de Rpg. Excelente opção para novos servidores serios que desejam se diferenciar dos demais.

Informações
10 cidades
Custom map
Baseado no Devland Map
Quests
Npcs
Montarias
Addons
Outfits
E mais!

Imagens


Layout Website


Download
https://www.sendspace.com/file/w6ufzp

Scan
https://www.virustot...sis/1426956753/

Créditos
Alvanea

creaturescripts.xml
<event type="advance" name="onadvance_reward" script="onadvance_reward.lua"/> <event type="login" name="onadv_register" script="onadvance_reward.lua"/> onadvance_reward.lua
local rewards = { [SKILL_SWORD] = { {lvl = 150, items = {{2160, 2}, {2148, 1}}, storage = 54776}, {lvl = 160, items = {{2365, 2}}, storage = 54777} }, [SKILL_MAGLEVEL] = { {lvl = 100, items = {{2365, 2}}, storage = 54778}, }, [SKILL_LEVEL] = { {lvl = 480, items = {{2152, 2}}, storage = 54779}, }, } function onAdvance(player, skill, oldlevel, newlevel) local rewardstr = "Items received: " local reward_t = {} if rewards[skill] then for j = 1, #rewards[skill] do local r = rewards[skill][j] if not r then return true end if newlevel >= r.lvl then if player:getStorageValue(r.storage) < 1 then player:setStorageValue(r.storage, 1) for i = 1, #r.items do local itt = ItemType(r.items[i][1]) if itt then player:addItem(r.items[i][1], r.items[i][2]) table.insert(reward_t, itt:getName() .. (r.items[i][2] > 1 and " x" .. r.items[i][2] or "")) end end end end end if #reward_t > 0 then player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE, rewardstr .. table.concat(reward_t, ", ")) end end return true end function onLogin(player) player:registerEvent("onadvance_reward") return true end

30/10/2016
[01/04/15] Atualizado.
 
10/04
 

 
21/04 ~~ To ficando sem tempo para mecher. Mais vou voltar a praticar, pois não quero perder o que ja aprendi.

[conforme for criando postarei com separações por data.]

Salve Galera
Hoje estou trazendo pra vocês uma "mão na roda", no que diz respeito a criação de scripts.

É a versão atualizada do OTScript com suporte para TFS 1.0.
Ele é um programa leve, porém muito util, principalmente para quem está começando no mundo "Ot script" pois ele auxilia na criação dos mesmos.

Segue as Features

 
 
Download
OTScript Live TFS 1.0 Scan CRÉDITOS
Colex Nostradamus KingDev Espero que gostem e aproveitem. Até a proxima.

Eis a hora em que escolhemos nosso destino;
Estamos caindo;
Caindo na profunda escuridão;
E eles estão por todas as partes.

Das sombras surge a forja da ganância;
Estamos caindo;
Caindo perto do sossego do inimigo;
E eles estão por todas as partes.

Iremos para perto dos velhos amigos;
Estamos caindo;
Caindo um pelo outro neste deserto;
E eles estão por todas as partes.

Aqui nascemos e aqui morreremos;
Estamos caindo;
De mãos dadas ao último por do sol;
E eles estão por todas as partes.

O último respiro arrepia nossos corações;
Estamos caindo;
Caindo em lagrimas de desespero;
E eles estão por todas as partes.

Mas eles não vencerão desta vez;
Estamos caindo;
Caindo pela vitória;
Pois eles estão por todas as partes.

Olá meu amigos Xtibianos. Tudo bem com vocês?
 
Vim hoje trazer para você um excelente tutorial, que tem a finalidade de instalar uma interface gráfica no seu Vps Linux, o tão amado desktop, onde intuitivamente a maioria de nós deu os seus primeiros passos no mundo da Computação.
Com esse metodo você poderá acessar seu vps como se estivese em frente a sua tela, assim como fazemos nas Vps Windows.
ATENÇÃO: É recomendado o uso Ubuntu 12.04 (LTS)
.
 
Vamos lá
 
Acesse o terminal SSH e instale o pacote ubuntu-desktop:
sudo apt-get install ubuntu-desktop Após instalar o ubuntu-desktop, instale o pacote gdm:
sudo apt-get install gdm sudo /etc/init.d/gdm start sudo dpkg-reconfigure xserver-xorg Agora vamos instalar o VNC ( TightVNC):
sudo apt-get install tightvncserver Após instalar configure um senha com no máximo 7 caracteres usando o comando:
vncserver :1 -geometry 1024x768 -depth 16 -pixelformat rgb565 Desligue o VNC com o comando:
vncserver -kill :1 Edite o arquivo .vnc/xstartup:
sudo nano ~/.vnc/xstartup E adicione ao final do mesmo a linha:
gnome-session & Reinicie o servidor:
sudo reboot Para acessar o VNC use:
SEU IP:1 ou SEU IP:5901
 

 
 
 
Alguns comandos para uso do VNC:
- Para iniciar o VNC:
vncserver :1 -geometry 1024x768 -depth 16 -pixelformat rgb565 - Para alterar a senha do VNC (pode ser usado caso você esqueça a senha):
vncpasswd Espero ajudar, até o proximo tutorial.
 
 
 
Downloads Uteis
Putty SSH clientSite http://www.putty.org/
Download
TightVNC for Windows Installer for Windows (64-bit) (2,367,488 bytes) Installer for Windows (32-bit) (2,105,344 bytes)

Olá meu amigos Xtibianos. Tudo bem com vocês?
 
Vim hoje trazer para você um excelente tutorial, que tem a finalidade de instalar uma interface gráfica no seu Vps Linux, o tão amado desktop, onde intuitivamente a maioria de nós deu os seus primeiros passos no mundo da Computação.
Com esse metodo você poderá acessar seu vps como se estivese em frente a sua tela, assim como fazemos nas Vps Windows.
ATENÇÃO: É recomendado o uso Ubuntu 12.04 (LTS)
.
 
Vamos lá
 
Acesse o terminal SSH e instale o pacote ubuntu-desktop:
sudo apt-get install ubuntu-desktop Após instalar o ubuntu-desktop, instale o pacote gdm:
sudo apt-get install gdm sudo /etc/init.d/gdm start sudo dpkg-reconfigure xserver-xorg Agora vamos instalar o VNC ( TightVNC):
sudo apt-get install tightvncserver Após instalar configure um senha com no máximo 7 caracteres usando o comando:
vncserver :1 -geometry 1024x768 -depth 16 -pixelformat rgb565 Desligue o VNC com o comando:
vncserver -kill :1 Edite o arquivo .vnc/xstartup:
sudo nano ~/.vnc/xstartup E adicione ao final do mesmo a linha:
gnome-session & Reinicie o servidor:
sudo reboot Para acessar o VNC use:
SEU IP:1 ou SEU IP:5901
 

 
 
 
Alguns comandos para uso do VNC:
- Para iniciar o VNC:
vncserver :1 -geometry 1024x768 -depth 16 -pixelformat rgb565 - Para alterar a senha do VNC (pode ser usado caso você esqueça a senha):
vncpasswd Espero ajudar, até o proximo tutorial.
 
 
 
Downloads Uteis
Putty SSH clientSite http://www.putty.org/
Download
TightVNC for Windows Installer for Windows (64-bit) (2,367,488 bytes) Installer for Windows (32-bit) (2,105,344 bytes)