leoleo

function onStepIn(cid, item, position, fromPosition)

-- Script desenvolvido por Leoleo -- Não remova os creditos
local playerguild = getPlayerGuildId(cid)
local preco = 1000
local dono = getItemDescriptions(item.uid)
local player = getCreatureName(cid)
local erro = fromposition

if (dono == nil) then


if (playerguild >= nil) then

if (getPlayerMoney(cid) >= preco) then 
 doPlayerRemoveMoney(cid, preco)
 doSetItemSpecialDescription(item, playerguild)
 doPlayerSendTextMessage(cid,24, "Parabens você acaba de adquirir uma area para sua guild")
 doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE)
 
elseif (getPlayerMoney(cid) <= preco) then                  
doPlayerSendTextMessage(cid,24, "Você não tem dinheiro suficiente")
doTeleportThing(cid, erro, true)
end
elseif (playerguild == nil)then 
 doPlayerSendTextMessage(cid,24, "Você não tem guild")
 doTeleportThing(cid, erro, true)
end 
 
elseif (dono ~= nil) then
if (dono == playerguild) then 
 doPlayerSendTextMessage(cid,24, "Bem vindo a guild area")
elseif (dono ~= playerguild) then 
 doPlayerSendTextMessage(cid,24, "Essa area é de outra guild")
doTeleportThing(cid, erro, true) --
end
end
end

veja se da certo agora!!

Não tenho muita familiaridade com esse tema, acho que não irei participar.

Mais desejo sorte a todos.

Veja se funciona :

function onStepIn(cid, item, pos)     -- Ao pisar em cima

-- Script desenvolvido por Leoleo -- Não remova os creditos
local playerguild = getPlayerGuildId(cid)
local preco = 1000
local dono = getItemDescriptions(item.uid)
local player = getCreatureName(cid)

if (dono == nil) then -- se nao tiver dono


if (playerguild >= nil) then -- se tiver guild

if (getPlayerMoney(cid) >= preco) then   -- se tiver dinheiro
 doPlayerRemoveMoney(cid, preco)
 doSetItemSpecialDescription(item, playerguild)
 doPlayerSendTextMessage(cid,24, "Parabens você acaba de adquirir uma area para sua guild")
 doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE)
 
elseif (getPlayerMoney(cid) <= preco) then -- se não tiver dinheiro                  
doPlayerSendTextMessage(cid,24, "Você não tem dinheiro suficiente")
doTeleportThing(cid, fromPosition, true)
end
elseif (playerguild == nil)then --se não tiver guild
 doPlayerSendTextMessage(cid,24, "Você não tem guild")
 doTeleportThing(cid, fromPosition, true)
end 
 
elseif (dono ~= nil) then -- se tiver dono
if (dono == playerguild) then 
 doPlayerSendTextMessage(cid,24, "Bem vindo a guild area")
elseif (dono ~= playerguild) then 
 doPlayerSendTextMessage(cid,24, "Essa area é de outra guild")
doTeleportThing(cid, fromPosition, true) --
end
end
end

Não testei então aguardo seu retorno flz!!

Isso. Dá pra substituir o sistema de compra de house via Talkaction por esse sistema e com a vantagem que o player quando vende a house recebe o dinheiro pago de volta.

Mais 1 script desenvolvido por min.
Não ficou exatamente do jeito que eu queria, então futuramente irei modifica-lo
So não farei isso agora pois ele me tirou 2 dias quebrando a cabeça.
 
Com tudo estou muito empolgado com meu aprendizado da linguagem lua e já tenho uma nova ideia para desenvolver mais um script.
 
Bom vamos lá.
 
Video do script em funcionamento
 
 https://www.youtube.com/watch?v=Q3KWqE_i0zs
 
Tag para intalação no Actions.xml:
 

    <action itemid="10091" script="key.lua"/>

 
 
Script:

function onUse(cid, item, fromPosition, itemEx, toPosition)

-- Script desenvolvido por Leoleo ~~ Não remova os creditos, pois ele é a maior satisfação de todo autor.

local compra = configManager.getNumber(configKeys.HOUSE_PRICE)
local venda = configManager.getNumber(configKeys.HOUSE_PRICE)
local item2 = Item(itemEx.uid)
local housepos = item2:getPosition()
local house = getTileHouseInfo(housepos)
local size = getHouseTilesSize(house)

if (itemEx.itemid == 19841 or itemEx.itemid == 19843 or itemEx.itemid == 19849 or itemEx.itemid == 19852)  then
     
if (getHouseOwner(house) ~= 0) and (getHouseOwner(house) ~= getPlayerGUID(cid)) then
doPlayerSendTextMessage(cid,24, "Essa casa tem dono")

elseif (getHouseOwner(house) == 0) and (getPlayerMoney(cid) >= compra) then
doPlayerSendTextMessage(cid,24, "Voce comprou uma casa")
doSetItemSpecialDescription(itemEx.uid, getCreatureName(cid))
setHouseOwner(house, getPlayerGUID(cid))
doSendMagicEffect(getPlayerPosition(cid), 15)
doPlayerRemoveMoney(cid, compra)
 
elseif (getHouseOwner(house) == getPlayerGUID(cid)) then
doPlayerSendTextMessage(cid,24, "Voce vendeu uma casa")
doSetItemSpecialDescription(itemEx.uid, "Casa disponivel")
setHouseOwner(house, nil)
doPlayerAddMoney(cid, venda)
doSendMagicEffect(getPlayerPosition(cid), 15)
doTeleportThing(cid, getHouseEntry(house), pushMovement)

elseif (getHouseOwner(house) == 0) and (getPlayerMoney(cid) <= compra) then
doPlayerSendTextMessage(cid,24, "Voce não tem dinheiro")

else
doPlayerSendTextMessage(cid,24, "Use na porta de uma casa disponivel")
end
end end 

Espero que gostem
 
Obrigado~~

@TibiaHamachiBrasil, no TFS 1.0 além de ser group_id de god, tua acc precisa ter um valor 3 na coluna "type" na tabela accounts. 

É como o nosso amigo luanluciano93 , porém o valor deve ser  5 e não 3.

Curti muito a ideia do mapa 2.   Vamo que vamo pro próximo concurso. Muita gente participando, to gostando de ver!!!

Parábens a todos.

valeuz, eu resolvi de outra forma, adicionando uma função nas libs pois a posição da house é diferente da do player, porém obrigado pela ajuda.

Massa demais, parabens, belo trabalho.

Boa noite amigos, gostaria de pedir ajuda de vocês para terminar um script o qual vou postar aqui no tibiaking.

Estou agarrado desde hoje de manha pois tnão consigo achar uma forma de buscar o house-id

ja tentei com

getHouseFromPos(pos)

getTileHouseInfo(pos)

.. e etc ...

Estou usando TFS 1.0

Desde já agradesço

Tava sem conseguir entrar no meu topico, então resolvi começar a fazer scripts para o servidor, aproveitei e fiz um video passeando pelo mapa para explicar o script.

Vejam abaixo:

 http://youtu.be/Lrw1lhTxp8E

Pois é, estou começando a aprender script, é um dos meus primeiros scripts, gostei muito de fazer e vou continuar aprendendo. Obrigado pelo rep.

Bem, venho trazer para vocês hoje um sistema de train  funcionando 100% em TFS 1.0.
Direto ao assunto postei um video para verem o funcionamento
 
 http://youtu.be/Lrw1lhTxp8E
 
 
 
Instalação
Primeiramente pessoal, deverão abrir a pasta data/movements/scripts/  . Copie qualquer arquivo  renomeando-o como 'train.lua' sem as aspas. Abra esse arquivo e cole o seguinte codigo.

function onStepIn(cid, item, pos)     -- Ao pisar em cima
  
if (item.itemid == 7121) and (getPlayerLookDir(cid) == 0)  then
doSetItemOutfit(cid, 7132, 500)
addEvent(doMoveCreature, 1 * 500, cid, cid, 0)
elseif (item.itemid == 7121) and (getPlayerLookDir(cid) == 2)  then
doSetItemOutfit(cid, 7132, 500)
addEvent(doMoveCreature, 1 * 500, cid, 2)
elseif (item.itemid == 7122) and (getPlayerLookDir(cid) == 1)  then
doSetItemOutfit(cid, 7131, 500)
addEvent(doMoveCreature, 1 * 500, cid, 1)
elseif (item.itemid == 7122) and (getPlayerLookDir(cid) == 3)  then
doSetItemOutfit(cid, 7131, 500)
addEvent(doMoveCreature, 1 * 500, cid, 3)
elseif (item.itemid == 7123) and (getPlayerLookDir(cid) == 0)  then
doSetItemOutfit(cid, 7131, 500)
addEvent(doMoveCreature, 1 * 500, cid, 1)
elseif (item.itemid == 7123) and (getPlayerLookDir(cid) == 3)  then
doSetItemOutfit(cid, 7132, 500)
addEvent(doMoveCreature, 1 * 500, cid, 2)
elseif (item.itemid == 7124) and (getPlayerLookDir(cid) == 1)  then
 doSetItemOutfit(cid, 7132, 500)
addEvent(doMoveCreature, 1 * 500, cid, 2)
elseif (item.itemid == 7124) and (getPlayerLookDir(cid) == 0)  then
doSetItemOutfit(cid, 7131, 500)
addEvent(doMoveCreature, 1 * 500, cid, 3)
elseif (item.itemid == 7125) and (getPlayerLookDir(cid) == 3)  then
doSetItemOutfit(cid, 7132, 500)
addEvent(doMoveCreature, 1 * 500, cid, 0)
elseif (item.itemid == 7125) and (getPlayerLookDir(cid) == 2)  then
doSetItemOutfit(cid, 7131, 500)
addEvent(doMoveCreature, 1 * 500, cid, 1)
elseif (item.itemid == 7126) and (getPlayerLookDir(cid) == 1)  then
doSetItemOutfit(cid, 7132, 500)
addEvent(doMoveCreature, 1 * 500, cid, 0)
elseif (item.itemid == 7126) and (getPlayerLookDir(cid) == 2)  then
 doSetItemOutfit(cid, 7131, 500)
addEvent(doMoveCreature, 1 * 500, cid, 3)
elseif (item.itemid == 7127) and (getPlayerLookDir(cid) == 1)  then
doSetItemOutfit(cid, 7132, 500)
addEvent(doMoveCreature, 1 * 500, cid, 0)
elseif (item.itemid == 7127) and (getPlayerLookDir(cid) == 0)  then
doSetItemOutfit(cid, 7132, 500)
addEvent(doMoveCreature, 1 * 500, cid, 0)
elseif (item.itemid == 7127) and (getPlayerLookDir(cid) == 2)  then
doSetItemOutfit(cid, 7132, 500)
addEvent(doMoveCreature, 1 * 500, cid, math.random (2,3))
elseif (item.itemid == 7128) and (getPlayerLookDir(cid) == 3)  then
doSetItemOutfit(cid, 7131, 500)
addEvent(doMoveCreature, 1 * 500, cid, 3)
elseif (item.itemid == 7128) and (getPlayerLookDir(cid) == 0)  then
doSetItemOutfit(cid, 7131, 500)
addEvent(doMoveCreature, 1 * 500, cid, 3)
elseif (item.itemid == 7128) and (getPlayerLookDir(cid) == 1)  then
doSetItemOutfit(cid, 7131, 500)
addEvent(doMoveCreature, 1 * 500, cid, math.random (1,2))
elseif (item.itemid == 7129) and (getPlayerLookDir(cid) == 3)  then
doSetItemOutfit(cid, 7131, 500)
addEvent(doMoveCreature, 1 * 500, cid, 3)
elseif (item.itemid == 7129) and (getPlayerLookDir(cid) == 2)  then
doSetItemOutfit(cid, 7131, 500)
addEvent(doMoveCreature, 1 * 500, cid, 3)

elseif (item.itemid == 7129) and (getPlayerLookDir(cid) == 1)  then
doSetItemOutfit(cid, 7131, 500)
addEvent(doMoveCreature, 1 * 500, cid, math.random (0,1))
elseif (item.itemid == 7130) and (getPlayerLookDir(cid) == 0)  then
doSetItemOutfit(cid, 7132, 500)
addEvent(doMoveCreature, 1 * 500, cid, 0)
elseif (item.itemid == 7130) and (getPlayerLookDir(cid) == 3)  then
doSetItemOutfit(cid, 7132, 500)
addEvent(doMoveCreature, 1 * 500, cid, 0)
elseif (item.itemid == 7130) and (getPlayerLookDir(cid) == 2)  then
doSetItemOutfit(cid, 7132, 500)
addEvent(doMoveCreature, 1 * 500, cid, math.random (1,2))
else
doPlayerSendTextMessage(cid,20,'Perdeu o bond')
end  
end 

 

 
Feito isso pessoal, vão em data/movements/movements.xml  e cole isso logo apos o primeiro <movements> do arquivo

<movevent event="StepIn" itemid="7121-7130" script="train.lua"/>

Gostaria de convida-los para visitar o topico onde estou desenvolvendo meu projeto. O Pronoba

Acesse o PRONOBA

Obrigado

Creditos pelo script 

LEOLEO

Se quiser eu lhe ajudo a abrir o servidor, porém depois de tudo funcionando, o servidor ficará por sua conta. 

Em compensação também não quero nada em troca.

Caso tenha interesse manda pm.

Massa, não se se alguem ja disse  xWhiteWolfja a musica é uma mrd mais o video fico da hora.

Atualizando o post mais tarde. A novidade é que consegui estruturar a base do servidor.

Versão será em 10.31 até o momento.

Gostei da cachoeira , como sera o nome do seu projeto? , como você quer fazer explique um pouco para agente , você quer cria um novo Ex: Tibia Thp , você quer fazer assim?

Obrigado. Bom o projeto é de tibia mesmo, o que tenho em mente e desenvolver um servidor base, assim como fizeram o Slayer, Yourots, Styler, Allisow, thyrania e Baiak.  Assim incentivando a diversificação de mapa.

aquele rosto no chão ta meio aleatório.

Cuidado com essa mistura de walls, as vezes acaba estragando o mapa..

continue postando

Ok, sugestão aceita, tirei o rosto.

No meu ponto de vista você exagerou demais na mistura das walls..

Creio que se você usasse um modelo diferente de walls em cada cidade, ficaria muito bacana, pois assim cada cidade iria ter uma característica diferente.

Mas enfim, boa sorte com o projeto. (:

Hm, vou aceitar sua sugestão ja que é o terceiro que me fala isso, irei escolher 2 walls para city.

Obrigado a todos. Mais tarde posto novas imagens, acho que termino a cidade ainda hoje até meia noite.

Boa tarde!!

Bom, acabou que ontem fui dormir muito cedo e não fiz nada. Então hoje a tarde terminei as construções e finalizei a city por enquanto (sofrerá modificações no futuro) , isso porque não quero ficar parado muito tempo na mesma coisa, irei agora estender os caminhos e hunts aos redores da city.

Send Map ! Participando também esta super legal o concurso.

Sim cara, como que 8.60 é a que tu mais curte, se tu acha os itens das outras versões melhores? Se fosse por versão vc só participaria de um MOTW e dos outros não? Acho que as várias versões estão ai pra quem tem criatividade de usa-las... Se você mappeia em 8.60, faça o teu melhor em 8.60 que se ficar bom vc vai ganhar =)

Entendo o ponto de vista dele, seria como por exemplo colocar o tibia 7.x contra o 10.x  obviamente o 10.x  é muito superior, cheio de sistemas e quests...e  tudo mais, porém quem gosta do clássico 7.x  todo limitado não troca..

Achei da hora, serve para quando você ta fugindo, basta subir uma escada por exemplo e se transformar, o cara vai passar direto..

se tirar o nome e por um tempo que o cara fica transformado ficará mt bom..

essa versão do baiak hollister,deixei bem diferenciado todo o projeto no mapa...

como o projeto do gustavo ferreira erá de 2011/2012 resolvi pega o projeto e melhorar no meu possivel...

e assim tinha criado minha versão 1 em 10/4...e hoje resolvi postar a versão 2 completa!

 

 

Scan adicionado!

Exclarecido / reputado.  Obrigado por compartilhar conosco.

 Eremes

gosto muito do seu estilo de mapper, tem muito a crescer. Não gostei da mistura na quina do deposito, em compensação achei o máximo esse segundo

deposito.

Servidor cheio de eventos e sistemas, o único problema era que tinha muitos bugs.

Show de bola, boa iniciativa.

Gostaria de saber se usou algum programa ou se foi no mouse?

Se foi no mouse você é muito F#d#!! mt bom

Obrigado pelo apoio e sugestões, que alias são muito bem vindas.

Mais algumas screens dos trabalhos de agora a noitinha.

Boa noite.

Queria apresentar ao Tk um novo projeto que irei desenvolver e distribuir livremente aqui no fórum.

O projeto será desenvolvido por min, porém quero deixar livre a contribuição de todos que assim quiserem.

O projeto se chama Pronoba - Projeto Nova Base e será tudo muito simples e jogavel pra andar rapido e aqui estarei postando o desenvolvimento do mapa.

Iniciando os trabalhos o temple.

Vamos ver o que vira esse projeto!!

Também to achando longe, se desse pra adiantar seria bom, dá até preguiça esperar tanto.