[ Action ] Montaria

[ChAiN 1]

ANTES DE LER, CERTIFIQUE SE DE ESTAR NO XTibia!

 

Atenção!

Os créditos são 100% pra MIM!(Chain). Fiz o sistema INTEIRO ontem.

 

☻Introdução:

O mount system, é o sistema onde você dá USE no item 2176,então, você "sobe em sua montaria" por 60 segundos. O único problema, é que se você não fizer cliente próprio, os sprites da montaria não vão existir, mas em meu sistema, você virará o próprio monstro, com um fácil sistema de configurar o skin da montaria.

OBS!: Ele vai gastar 80 de soul pra subir na montaria!

 

 

→Agora, vamos parar de chatisse e vamos para a hora da ação!

 

Vá em data/actions/scripts e crie um arquivo chamado 'montaria.lua';

 

Insira o seguinte dentro:

-- Montaria system by Chain

local function montar(parametros)

cid = params[1]

if getPlayerStorageValue(cid, 5555) == 1 then

setPlayerStorageValue(cid,montado,-1)

doPlayerSendTextMessage(cid,22,"Voce desceu da montaria.")

if voc == 1 or voc == 5 then

--aqui é a acão (para sorcerers) que acontecerá depois que o player descer da montaria.

elseif voc == 2 or voc == 6 then

--aqui é a acão (para druids) que acontecerá depois que o player descer da montaria.

elseif voc == 3 or voc == 7 then

--aqui é a acão (para paladins) que acontecerá depois que o player descer da montaria.

elseif voc == 4 or voc == 8 then

--aqui é a acão (para knights) que acontecerá depois que o player descer da montaria.

end

end

end

function onUse(cid, item, frompos, item2, topos)

--Configs--

local mount_orb = 2176 -- id da mount orb

local vipstorage = 1111 -- id do storagevalue do vip

local voc = getPlayerVocation(cid)

local sex = getPlayerSex(cid)

params = { [1]=cid, [2]=lvl, [3]=voc, [4]=ml }

roupamontado1 = {lookType = 16, lookHead = 20, lookBody = 30, lookLegs = 40, lookFeet = 50, lookAddons = 0}

roupamontado2 = {lookType = 42, lookHead = 20, lookBody = 30, lookLegs = 40, lookFeet = 50, lookAddons = 0}

roupamontado3 = {lookType = 101, lookHead = 20, lookBody = 30, lookLegs = 40, lookFeet = 50, lookAddons = 0}

roupamontado4 = {lookType = 4, lookHead = 20, lookBody = 30, lookLegs = 40, lookFeet = 50, lookAddons = 0}

montado = getPlayerStorageValue(cid,5555)

vip = getPlayerStorageValue(cid,vipstorage)

soul = getPlayerSoul(cid)

--end of configs--

 

--ACTION TIME!--

if item.itemid == mount_orb then

if soul >= 80 and montado == -1 then

addEvent(montar, 60000, params)

--Sorc

if voc == 1 or voc == 5 then

doSetCreatureOutfit(cid,roupamontado1, 60000)

--aqui é o que acontecerá com o player (sorcerer) ao subir na montaria.

doPlayerSendTextMessage(cid,22,"Voce subiu em sua montaria.")

setPlayerStorageValue(cid,montado,1)

doPlayerSay(cid,"Ha-Yoh", 17)

doPlayerAddSoul(cid, -80)

--Druid

elseif voc == 2 or voc == 6 then

--aqui é o que acontecerá com o player (sorcerer) ao subir na montaria.

doPlayerSendTextMessage(cid,22,\"Voce subiu em sua montaria.\")

setPlayerStorageValue(cid,montado,1)

doPlayerSay(cid,"Ha-Yoh", 17)

doPlayerAddSoul(cid, -80)

doSetCreatureOutfit(cid,roupamontado2, 60000)

--Pally

elseif voc == 3 or voc == 7 then

--aqui é o que acontecerá com o player (sorcerer) ao subir na montaria.

doPlayerSendTextMessage(cid,22,\"Voce subiu em sua montaria.\")

setPlayerStorageValue(cid,montado,1)

doPlayerSay(cid,"Ha-Yoh", 17)

doPlayerAddSoul(cid, -80)

doSetCreatureOutfit(cid,roupamontado3, 60000)

--Kina

elseif voc == 4 or voc == 8 then

--aqui é o que acontecerá com o player (sorcerer) ao subir na montaria.

doPlayerSendTextMessage(cid,22,"Voce subiu em sua montaria.")

setPlayerStorageValue(cid,montado,1)

doPlayerSay(cid,\"Ha-Yoh\", 17)

doPlayerAddSoul(cid, -80)

doSetCreatureOutfit(cid,roupamontado4, 60000)

--No Voc

elseif voc == 0 then

doPlayerSay(cid,"Eu nao tenho voc!", 17)

---

end

elseif soul < 80 then

end

end

end

--Its over--

E agora?

 

Agora vá na pasta anterior, abra o arquivo 'actions.xml' e coloque a seguinte linha:

 

<action itemid="2176" script="montaria.lua" />

 

 

Outra coisa, Dúvidas, reclamações, críticas.. É pra isso que serve o forum, mande sua resposta!

Editado Setembro 22, 2008 por ChAiN

[Abobalhado 0]

Opa,como sempre se melhorando a cada dia!

Até lá,

MidGard.

[leandro1404 0]

Muito Bom !!!

 

Mano Muito Bom Msm!!

 

Sistema Perfect !!

 

So Isso MSM !

 

VLW Pelo Script !!!

[gustavocordeiro 0]

Bem interessante

 

Vou testar depois Bela Action

 

Parabens :smile_positivo:

[careca21 0]

Veio Ponhe ss Ae Poxa eses Scripits asim Tinha que ter senpre uma ss !!

 

Sim Sim Mas Eu Fiz Aqui e Testei e VC Merese Nota 10000

Pos Seu Scripit e Simples, e Muito Eficiente, Meu vc ta de Parabens !!!

e a 1 vez que vejo iso aqui, mas nao esperava ver tao simples !!!

e Funciona Direitnho

Merece Fixo!!!

Aprovadao

 

So Quero Lhe Dizer 1 coisa para Melhorar o Scripit...

Quando o cara Subir na Motaria Aumentase e velocidade...i o Atk, faz Iso Pa Min ae veio

Editado Setembro 7, 2008 por careca21

[gustavocordeiro 0]

Chain tem como colocar uma foto ?

Ficaria 10 o tuto com ss

Naum tenho cliente proprio =/

Te+ :smile_positivo:

[lucas1000 0]

Poe Screen ae please chain ^^

[ChAiN 1]

também nao tenho cliente proprio, nao fiz as sprites ainda

:-(

[coutoo 0]

ChAiN

 

 

Veja o que dá:

 

[17/09/2008 20:51:37] >> Loading script systems

[17/09/2008 20:51:37] Warning: [Event::loadScript] Can not load script. data/actions/scripts/montaria.lua

[17/09/2008 20:51:37] data/actions/scripts/montaria.lua:4: '=' expected near 'PlayerStorageValue'

 

O que tenho que fazer para corrigir esse erro? :smile_positivo:

[ChAiN 1]

Arrumado!

[KonanZenha 0]

Muito bomotimo mesmo Adorei depois que vi isso eu gostaria de uma parceria com voce se fosse possivel, porque tipo, eu tenhu uns projetos de um servidor naruto Tibia ta prontinho ja so que em faze de testes mais ja com todas outifits de naruto e talz mais tipo eu gostaria de parceria porque a um tempo acompanho seus trabalhos e gostaria que voce me fornecesse recursos pra eu terminar o Ot

Obrigada BEijos KonanZenha /^^

[Brasildani 0]

Chain

Veja o erro q da cando eu tento abri o ot

 

 

se conseguir corrijir agradeço

se conseguir manda pm ou add msn :daniel_brozoski@hotmail.com

 

Vlw desde já fui

[mtkevil 1]

quem estiver com problema ali no server por causa deste script use este aqui

 

-- Montaria system by Chain

local function montar(parametros)

cid = params[1]

if getPlayerStorageValue(cid, 5555) == 1 then

setPlayerStorageValue(cid,montado,-1)

doPlayerSendTextMessage(cid,22,"Voce desceu da montaria.")

if voc == 1 or voc == 5 then

--aqui é a acão (para sorcerers) que acontecerá depois que o player descer da montaria.

elseif voc == 2 or voc == 6 then

--aqui é a acão (para druids) que acontecerá depois que o player descer da montaria.

elseif voc == 3 or voc == 7 then

--aqui é a acão (para paladins) que acontecerá depois que o player descer da montaria.

elseif voc == 4 or voc == 8 then

--aqui é a acão (para knights) que acontecerá depois que o player descer da montaria.

end

end

end

function onUse(cid, item, frompos, item2, topos)

--Configs--

local mount_orb = 2176 -- id da mount orb

local vipstorage = 1111 -- id do storagevalue do vip

local voc = getPlayerVocation(cid)

local sex = getPlayerSex(cid)

params = { [1]=cid, [2]=lvl, [3]=voc, [4]=ml }

roupamontado1 = {lookType = 16, lookHead = 20, lookBody = 30, lookLegs = 40, lookFeet = 50, lookAddons = 0}

roupamontado2 = {lookType = 42, lookHead = 20, lookBody = 30, lookLegs = 40, lookFeet = 50, lookAddons = 0}

roupamontado3 = {lookType = 101, lookHead = 20, lookBody = 30, lookLegs = 40, lookFeet = 50, lookAddons = 0}

roupamontado4 = {lookType = 4, lookHead = 20, lookBody = 30, lookLegs = 40, lookFeet = 50, lookAddons = 0}

montado = getPlayerStorageValue(cid,5555)

vip = getPlayerStorageValue(cid,vipstorage)

soul = getPlayerSoul(cid)

--end of configs--

 

--ACTION TIME!--

if item.itemid == mount_orb then

if soul >= 80 and montado == -1 then

addEvent(montar, 60000, params)

--Sorc

if voc == 1 or voc == 5 then

doSetCreatureOutfit(cid,roupamontado1, 60000)

--aqui é o que acontecerá com o player (sorcerer) ao subir na montaria.

doPlayerSendTextMessage(cid,22,"Voce subiu em sua montaria.")

setPlayerStorageValue(cid,montado,1)

doPlayerSay(cid,"Ha-Yoh", 17)

doPlayerAddSoul(cid, -80)

--Druid

elseif voc == 2 or voc == 6 then

--aqui é o que acontecerá com o player (sorcerer) ao subir na montaria.

doPlayerSendTextMessage(cid,22,"Voce subiu em sua montaria.")

setPlayerStorageValue(cid,montado,1)

doPlayerSay(cid,"Ha-Yoh", 17)

doPlayerAddSoul(cid, -80)

doSetCreatureOutfit(cid,roupamontado2, 60000)

--Pally

elseif voc == 3 or voc == 7 then

--aqui é o que acontecerá com o player (sorcerer) ao subir na montaria.

doPlayerSendTextMessage(cid,22,"Voce subiu em sua montaria.")

setPlayerStorageValue(cid,montado,1)

doPlayerSay(cid,"Ha-Yoh", 17)

doPlayerAddSoul(cid, -80)

doSetCreatureOutfit(cid,roupamontado3, 60000)

--Kina

elseif voc == 4 or voc == 8 then

--aqui é o que acontecerá com o player (sorcerer) ao subir na montaria.

doPlayerSendTextMessage(cid,22,"Voce subiu em sua montaria.")

setPlayerStorageValue(cid,montado,1)

doPlayerSay(cid,"Ha-Yoh", 17)

doPlayerAddSoul(cid, -80)

doSetCreatureOutfit(cid,roupamontado4, 60000)

--No Voc

elseif voc == 0 then

doPlayerSay(cid,"Eu nao tenho voce!", 17)

---

end

elseif soul < 80 then

end

end

end

--Its over--

 

ou mude as linhas:

 

49 ->

doPlayerSendTextMessage(cid,22,"\Voce subiu em sua montaria.\")

para

doPlayerSendTextMessage(cid,22,"Voce subiu em sua montaria.")

 

57 ->

doPlayerSendTextMessage(cid,22,\"Voce subiu em sua montaria.\")

para

doPlayerSendTextMessage(cid,22,"Voce subiu em sua montaria.")

 

67 ->

doPlayerSay(cid,\"Ha-Yoh"\, 17)

para

doPlayerSay(cid,"Ha-Yoh", 17)

 

apenas removendo as duas barras "/ e \"

 

 

e também, Parabéns pelo script!

Editado Junho 4, 2010 por mtkevil

[refi 2]

Seria bom mesmo uns ss.

E pra qual versão é?

[beto06 304]

SS plx? Mas pelo visto ele só muda a outfit, sendo precisado criar as sprites?