[Encerrado] [Pedido] Script Elevador

Por GuhPk, 24 de nov. de 2012 em Tópicos Sem Resposta

guhpk

script

GuhPkRep+ ai se ajudei? asusah'GConde Conde

info

Grupo: Conde

Registrado: 18/10/12

Posts: 757

Reputação: +111

24 de novembro de 2012 às 11:42

Olá pessoinhas, estou querendo se tem como criar um script, se tiver e alguém souber fazer... Por favor posta ai que dou uns rep's!!! xD

Como funciona:

O player entra em um local (elevador), e em uma parede terá um item que quando ele clicar irá abrir uma janela com algumas opções para ele selecionar...

Quando ele escolher 1, ele será teleportado para um local determinado.

Exemplo:

Cliquei no item apareceu a janela:

________________

|1º Andar - Entrada |

|2º Andar - Loja.......|

|_[Cancel]_[_Ok_]_|

Ai eu escolho o 2 andar e vou para x= 1000 y=1000 z=7...

Escolho a 1 vou para x=1000 y=1000 z=6

Tenderam??? xD Se fizer posta ai que vou recompensar!!!

Editado Novembro 24 por GuhPk

SlicerInsanitySPríncipe

info

Grupo: Príncipe

Registrado: 19/08/10

Posts: 4k

Reputação: +1.1k

Gênero: Masculino

24 de novembro de 2012 às 21:28

oia mano.. o maximo q da pra fazer eh isso..

1* vai em XML/vocation.xml, e adicione isso la..

</vocation>

2* vai em XML/channels.xml, e adiciona isso la..

</channel>

</channel>

3* vai em actions/scripts/, cria um arquivo la com qlqr nome e cola isso nele..

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

doPlayerSetVocation(cid, 10)

openChannelDialog(cid)

return true

end

tag do actions.xml, xxxx = id do item....

<action itemid="xxxx" event="script" value="NOME DO ARQUIVO.lua"/>

4* vai em creaturescripts/scripts/tvsys.lua, e adiciona isso la..

if channelId >= 22 and channelId <= 23 then

local teleport = {

[22] = {x=1045, y=1057, z=7}, --muda aki as posiçoes...

[23] = {x= 1059, y=1057, z=7},

}

doTeleportThing(cid, teleport[channelId])

doSendMagicEffect(getThingPos(cid), 21)

doPlayerSetVocation(cid, 1)

return false

end

GuhPkRep+ ai se ajudei? asusah'GConde Conde

info

Grupo: Conde

Registrado: 18/10/12

Posts: 757

Reputação: +111

24 de novembro de 2012 às 21:52

Cara, eu fiz tudinho aqui, porém quando escolho 1 andar ou 2 andar... Não teleporta, e sim abre outra janela do chat!!!

Eu quero, que quando eu clique no item abra aquela janela mesmo (tirando o NPC que aparece)...

Porém, quero que quando eu escolha uma das opções eu seja teleportado para um certo local!! usaaushasu'

Editado Novembro 24 por GuhPk

falcon02 FCampones

info

Grupo: Campones

Registrado: 27/10/12

Posts: 60

Reputação: 0

Char no Tibia: Skypiea

24 de novembro de 2012 às 22:00

testei aqui tbm nao deu =(

SlicerInsanitySPríncipe

info

Grupo: Príncipe

Registrado: 19/08/10

Posts: 4k

Reputação: +1.1k

Gênero: Masculino

24 de novembro de 2012 às 22:05

veio eu testei aki e deu tudo certo.. aonde exatamente vc colocou aqueles arquivos? ;x poste os scripts pra eu ver...

-e n tem como tirar o NPCs ali e nem o chat da guild ;/ -

qlqr coisa tenta mudar isso..

if channelId >= 22 and channelId <= 23 then

para isso..

if channelId == 22 or channelId == 23 then

Editado Novembro 24 por Slicer

GuhPkRep+ ai se ajudei? asusah'GConde Conde

info

Grupo: Conde

Registrado: 18/10/12

Posts: 757

Reputação: +111

24 de novembro de 2012 às 22:16

Não sei local correto de colocar o script no tvsys.lua!! sauhsauhs'

Poderia colocar para mim ai???

function onJoinChannel(cid, channelId, users, isTv)

if channelId == 10 then

doShowPokemonStatistics(cid)

return false

end

if channelId == 11 then

if reloadHighscoresWhenUsingPc then

doReloadHighscores()

end

doPlayerPopupFYI(cid, getHighscoreString(8))

return false

end

if channelId == 12 then

if reloadHighscoresWhenUsingPc then

doReloadHighscores()

end

doPlayerPopupFYI(cid, getHighscoreString(6))

return false

end

--////////////////////////////////////////////////////////////////////////////////////////--

if channelId >= 13 and channelId <= 18 then

local sid = getPlayerByName(getPlayerStorageValue(cid, 52482))

local pokes1 = getLivePokeballs(cid, getPlayerSlotItem(cid, 3).uid) --alterado v2.6.1

local pokes2 = getLivePokeballs(sid, getPlayerSlotItem(sid, 3).uid)

if #pokes1 < (channelId-12) or (isCreature(sid) and #pokes2 < (channelId-12)) then

doPlayerSendTextMessage(cid, 20, "You or your opponent doesn't have that amount of pokemons in their bags! Duel are canceled!")

doPlayerSetVocation(cid, 1)

setPlayerStorageValue(cid, 52480, -1)

setPlayerStorageValue(cid, 6598754, -1) --alterado v2.6.1

setPlayerStorageValue(cid, 52482, -1)

setPlayerStorageValue(cid, 52483, -1)

doCreatureSetSkullType(cid, 0)

return false

end

doSendAnimatedText(getThingPos(cid), (channelId-12).." Poke"..(channelId > 13 and "s" or ""), COLOR_BURN)

setPlayerStorageValue(cid, 52481, (channelId-12))

if isCreature(sid) then

setPlayerStorageValue(sid, 52481, (channelId-12)) --alterado v2.6.1

doPlayerSendTextMessage(sid, 20, getCreatureName(cid).." is inviting you to a duel! Use order in him to accept it! You have 40segs to accept the invit.")

end

addEvent(endInviting, 40000, cid)

addEvent(doSendAnimatedText, 1000, getThingPos(cid), "BATTLE", COLOR_ELECTRIC)

doPlayerSetVocation(cid, 1)

return false

end

--////////////////////////////////////////////////////////////////////////////////////////--

if channelId >= 100 and channelId <= 10000 then

local owner = getPlayerByGUID(getChannelOwner(channelId))

if isChannelTv(channelId) then

if isCreature(owner) then

if owner ~= cid then

doPlayerWatchOther(cid, owner)

local plural = #users == 1 and "" or "s"

doPlayerSendChannelMessage(owner, "TV Channel", getCreatureName(cid)..' is now watching your channel (currently '..#users..' player'..plural..' watching this channel).', 15, channelId)

else

setPlayerStorageValue(cid, 99284, 1)

end

elseif owner == cid then

setPlayerStorageValue(cid, 99284, 2)

end

return true

end

return true

end

function onLeaveChannel(cid, channelId, users)

if channelId >= 100 and channelId <= 10000 then

local owner = getPlayerByGUID(getChannelOwner(channelId))

if isChannelTv(channelId) then

if owner ~= cid and getCreatureOutfit(cid).lookType == 814 then

doPlayerStopWatching(cid)

local plural = #users == 2 and "" or "s"

doPlayerSendChannelMessage(owner, "TV Channel", getCreatureName(cid)..' is not watching your channel anymore (currently '..#users - (1)..' player'..plural..' watching this channel).', 15, channelId)

elseif owner == cid then

setPlayerStorageValue(cid, 99284, -1)

doSendAnimatedText(getThingPos(cid), "CAM OFF", 180)

for stops = 1, #users do

if users[stops] ~= owner then

doPlayerStopWatching(users[stops])

end

elseif owner == cid then

setPlayerStorageValue(cid, 99284, -1)

end

return true

end

return true

end

function onWalk(cid, fromPosition, toPosition)

-- Código não é mais necessário, feito em c++

-- Code deprecated, made in c++

--if not canWalkOnPos(toPosition, false, false, false, true, false) and getPlayerStorageValue(cid, 17000) >= 1 then

-- doTeleportThing(cid, fromPosition, false)

-- doPlayerSendCancel(cid, "Sorry, not possible.")

--end

if getPlayerStorageValue(cid, 99284) <= 0 then return true end

local speed = getCreatureSpeed(cid)

local a = getWatchingPlayersFromPos(cid, fromPosition)

for b = 1, #a do

if getCreatureSpeed(a) ~= speed then

doChangeSpeed(a, - getCreatureSpeed(a))

doChangeSpeed(a, speed)

end

doTeleportThing(a, toPosition, true)

end

return true

end

local permited = {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s",

"t", "u", "v", "x", "w", ",", "'", '"',

"y", "z", "1", "2", "3", "4", "5", "6", "7", "8", "9", "0", ".", "!", "@", "#", "$", "%", "&", "*", "(", ")",

"-", "_", "+", "/", ";", ":", "?", "^", "~", "{", "[", "}", "]", ">", "<", "£", "¢", "¬"}

function onTextEdit(cid, item, newText)

if item.itemid == 12330 then

if getPlayerStorageValue(cid, 99284) >= 1 then

doPlayerSendCancel(cid, "You are already on air!")

return false

end

local channelName = getCreatureName(cid).."'s TV Channel"

if string.len(newText) <= 0 then

doPlayerSendCancel(cid, "Your channel is going to be shown as \""..getCreatureName(cid).."'s TV Channel\".")

elseif string.len(newText) > 25 then

doPlayerSendCancel(cid, "Your channel name can't have more than 25 characters.")

return false

else

channelName = newText

end

setPlayerStorageValue(cid, 99284, 1)

setPlayerStorageValue(cid, 99285, "")

setPlayerStorageValue(cid, 99285, channelName)

doPlayerCreatePrivateChannel(cid, channelName)

doSendAnimatedText(getThingPos(cid), "ON AIR!", COLOR_GRASS)

return false

end

SlicerInsanitySPríncipe

info

Grupo: Príncipe

Registrado: 19/08/10

Posts: 4k

Reputação: +1.1k

Gênero: Masculino

24 de novembro de 2012 às 22:21

function onJoinChannel(cid, channelId, users, isTv)

if channelId >= 22 and channelId <= 23 then

local teleport = {

[22] = {x=1045, y=1057, z=7}, --muda aki as posiçoes...

[23] = {x= 1059, y=1057, z=7},

}

doTeleportThing(cid, teleport[channelId])

doSendMagicEffect(getThingPos(cid), 21)

doPlayerSetVocation(cid, 1)

return false

end

if channelId == 10 then

doShowPokemonStatistics(cid)

return false

end

if channelId == 11 then

if reloadHighscoresWhenUsingPc then

doReloadHighscores()

end

doPlayerPopupFYI(cid, getHighscoreString(8))

return false

end

if channelId == 12 then

if reloadHighscoresWhenUsingPc then

doReloadHighscores()

end

doPlayerPopupFYI(cid, getHighscoreString(6))

return false

end

--////////////////////////////////////////////////////////////////////////////////////////--

if channelId >= 13 and channelId <= 18 then

local sid = getPlayerByName(getPlayerStorageValue(cid, 52482))

local pokes1 = getLivePokeballs(cid, getPlayerSlotItem(cid, 3).uid) --alterado v2.6.1

local pokes2 = getLivePokeballs(sid, getPlayerSlotItem(sid, 3).uid)

if #pokes1 < (channelId-12) or (isCreature(sid) and #pokes2 < (channelId-12)) then

doPlayerSendTextMessage(cid, 20, "You or your opponent doesn't have that amount of pokemons in their bags! Duel are canceled!")

doPlayerSetVocation(cid, 1)

setPlayerStorageValue(cid, 52480, -1)

setPlayerStorageValue(cid, 6598754, -1) --alterado v2.6.1

setPlayerStorageValue(cid, 52482, -1)

setPlayerStorageValue(cid, 52483, -1)

doCreatureSetSkullType(cid, 0)

return false

end

doSendAnimatedText(getThingPos(cid), (channelId-12).." Poke"..(channelId > 13 and "s" or ""), COLOR_BURN)

setPlayerStorageValue(cid, 52481, (channelId-12))

if isCreature(sid) then

setPlayerStorageValue(sid, 52481, (channelId-12)) --alterado v2.6.1

doPlayerSendTextMessage(sid, 20, getCreatureName(cid).." is inviting you to a duel! Use order in him to accept it! You have 40segs to accept the invit.")

end

addEvent(endInviting, 40000, cid)

addEvent(doSendAnimatedText, 1000, getThingPos(cid), "BATTLE", COLOR_ELECTRIC)

doPlayerSetVocation(cid, 1)

return false

end

--////////////////////////////////////////////////////////////////////////////////////////--

if channelId >= 100 and channelId <= 10000 then

local owner = getPlayerByGUID(getChannelOwner(channelId))

if isChannelTv(channelId) then

if isCreature(owner) then

if owner ~= cid then

doPlayerWatchOther(cid, owner)

local plural = #users == 1 and "" or "s"

doPlayerSendChannelMessage(owner, "TV Channel", getCreatureName(cid)..' is now watching your channel (currently '..#users..' player'..plural..' watching this channel).', 15, channelId)

else

setPlayerStorageValue(cid, 99284, 1)

end

elseif owner == cid then

setPlayerStorageValue(cid, 99284, 2)

end

return true

end

return true

end

function onLeaveChannel(cid, channelId, users)

if channelId >= 100 and channelId <= 10000 then

local owner = getPlayerByGUID(getChannelOwner(channelId))

if isChannelTv(channelId) then

if owner ~= cid and getCreatureOutfit(cid).lookType == 814 then

doPlayerStopWatching(cid)

local plural = #users == 2 and "" or "s"

doPlayerSendChannelMessage(owner, "TV Channel", getCreatureName(cid)..' is not watching your channel anymore (currently '..#users - (1)..' player'..plural..' watching this channel).', 15, channelId)

elseif owner == cid then

setPlayerStorageValue(cid, 99284, -1)

doSendAnimatedText(getThingPos(cid), "CAM OFF", 180)

for stops = 1, #users do

if users[stops] ~= owner then

doPlayerStopWatching(users[stops])

end

elseif owner == cid then

setPlayerStorageValue(cid, 99284, -1)

end

return true

end

return true

end

function onWalk(cid, fromPosition, toPosition)

-- Código não é mais necessário, feito em c++

-- Code deprecated, made in c++

--if not canWalkOnPos(toPosition, false, false, false, true, false) and getPlayerStorageValue(cid, 17000) >= 1 then

-- doTeleportThing(cid, fromPosition, false)

-- doPlayerSendCancel(cid, "Sorry, not possible.")

--end

if getPlayerStorageValue(cid, 99284) <= 0 then return true end

local speed = getCreatureSpeed(cid)

local a = getWatchingPlayersFromPos(cid, fromPosition)

for b = 1, #a do

if getCreatureSpeed(a) ~= speed then

doChangeSpeed(a, - getCreatureSpeed(a))

doChangeSpeed(a, speed)

end

doTeleportThing(a, toPosition, true)

end

return true

end

local permited = {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s",

"t", "u", "v", "x", "w", ",", "'", '"',

"y", "z", "1", "2", "3", "4", "5", "6", "7", "8", "9", "0", ".", "!", "@", "#", "$", "%", "&", "*", "(", ")",

"-", "_", "+", "/", ";", ":", "?", "^", "~", "{", "[", "}", "]", ">", "<", "£", "¢", "¬"}

function onTextEdit(cid, item, newText)

if item.itemid == 12330 then

if getPlayerStorageValue(cid, 99284) >= 1 then

doPlayerSendCancel(cid, "You are already on air!")

return false

end

local channelName = getCreatureName(cid).."'s TV Channel"

if string.len(newText) <= 0 then

doPlayerSendCancel(cid, "Your channel is going to be shown as \""..getCreatureName(cid).."'s TV Channel\".")

elseif string.len(newText) > 25 then

doPlayerSendCancel(cid, "Your channel name can't have more than 25 characters.")

return false

else

channelName = newText

end

setPlayerStorageValue(cid, 99284, 1)

setPlayerStorageValue(cid, 99285, "")

setPlayerStorageValue(cid, 99285, channelName)

doPlayerCreatePrivateChannel(cid, channelName)

doSendAnimatedText(getThingPos(cid), "ON AIR!", COLOR_GRASS)

return false

end

GuhPkRep+ ai se ajudei? asusah'GConde Conde

info

Grupo: Conde

Registrado: 18/10/12

Posts: 757

Reputação: +111

25 de novembro de 2012 às 12:29

Deu esses erro's aqui :

[02/12/2012 12:30:34] [Error - LuaScriptInterface::loadFile] data/creaturescripts/scripts/tvsys.lua:178: 'end' expected (to close 'function' at line 150) near '<eof>'

[02/12/2012 12:30:34] [Warning - Event::loadScript] Cannot load script (data/creaturescripts/scripts/tvsys.lua)

[02/12/2012 12:30:34] data/creaturescripts/scripts/tvsys.lua:178: 'end' expected (to close 'function' at line 150) near '<eof>'