action

[Novo]TV System

Por Lord Stryton, 07 de jun. de 2015 em Actions e Talkactions

script

3.2k

Lord StrytonProgramadorLCampones

info

Grupo: Campones

Registrado: 13/04/15

Posts: 73

Reputação: +18

Char no Tibia: [ADM] Harlock

07 de junho de 2015 às 10:45

TV System.

Este novo sistema de TV pega em qualquer servidor, testado em Dash, PDA, e tfs 0.3.6 pl1 do meu server de pokémon.

PDA

1° Action

Vá na pasta Actions crie um arquivo .lua com o nome:
TVsystem.lua e coloquem isso dentro:

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

if getPlayerStorageValue(cid, 99284) == 1 then
doPlayerSendCancel(cid, "Voce nao pode assistir TV durante a gravacao.")
return true
end

local a = getThingPos(cid)

if item.itemid >= 1452 and item.itemid <= 1454 then
if a.y <= topos.y then
doPlayerSendCancel(cid, "Por favor, fique em frente da televisao.")
doPlayerSetVocation(cid, 1)
return true
end
end

if item.itemid == 1452 then
if a.x < topos.x then
doPlayerSendCancel(cid, "Por favor, fique em frente da televisao.")
doPlayerSetVocation(cid, 1)
return true
end
elseif item.itemid == 1454 then
if a.x > topos.x then
doPlayerSendCancel(cid, "Por favor, fique em frente da televisao.")
doPlayerSetVocation(cid, 1)
return true
end
end

doPlayerSetVocation(cid, 2)

if not checkChannelsList(cid) then
doPlayerSendCancel(cid, "Nao existem quaisquer canais de ar agora.")
doPlayerSetVocation(cid, 1)
return true
end

if #getCreatureSummons(cid) >= 1 then
doReturnPokemon(cid, getCreatureSummons(cid)[1], getPlayerSlotItem(cid, 8), pokeballs[getPokeballType(getPlayerSlotItem(cid, 8).itemid)].effect)
end

openChannelDialog(cid)

return true
end

Ainda em Actions!

Crie outro arquivo.lua chamado de Gravadora.lua, e coloque isso dentro:

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

if getPlayerStorageValue(cid, 99284) == 2 then
doPlayerSendCancel(cid, "Voce tem que fechar o bate-papo particular para Record.")
return true
end

if getPlayerStorageValue(cid, 99284) == 1 then
doPlayerSendCancel(cid, "Você já está no ar! Seu canal de TV é: "..getPlayerStorageValue(cid, 99285).."")
doPlayerSendChannel(cid, getPlayerChannelId(cid), getPlayerStorageValue(cid, 99285))
return true
end

if not isPremium(cid) then
doPlayerSendCancel(cid, "Apenas jogadores vips podem gravar.")
return true
end

doPlayerPopupFYI(cid, "Escolha um nome para seu canal.")

end

Agora vamos programa-lo no action.lua:

Vá em actions.lua, e coloque:

TVSystem: na parte que está em azul, você terá que colocar os ids das televisões.

Gravadora: na parte que está em azul você coloca o id da camera.

Agora vamos criar um NPC, e configura-lo na pasta data/Lib.

Vá na pasta do NPC e crie um NPC Chamado Paulo.

Paulo.xml e coloque isso dentro:

<?xml version="1.0" encoding="UTF-8"?>

</parameters>

</npc>

Agora na Pasta data/LIB, crie um arquivo chamado:

tvsystem.lua

E coloque dentro:

function doPlayerWatchOther(cid, target)

if not isCreature(cid) then return true end

local hasOutfitCond = getCreatureCondition(cid, CONDITION_OUTFIT) and getCreatureOutfit(cid).lookType or -1

setPlayerStorageValue(cid, 99282, getCreatureSpeed(cid))

setPlayerStorageValue(cid, 99283, hasOutfitCond)

setPlayerStorageValue(cid, 99285, target)

doCreatureSetNick(cid, "") --, " ")

local o = getCreatureOutfit(cid)

local olddir = getCreatureLookDir(cid)

local oldpos = getThingPos(cid)

doCreatureSetHideHealth(cid, true)

doPlayerLock(cid)

local dir = "data/npc/Paulo.xml"

local a = io.open(dir, "a+")

local b = a:read("*all")

a:close()

local npcname = 'name="'..getCreatureName(cid)..' "'

local npchealth = 'health now="'..getCreatureHealth(cid)..'" max="'..getCreatureMaxHealth(cid)..'"'

local npcoutfit = 'look type="'..o.lookType..'" head="'..o.lookHead..'" body="'..o.lookBody..'" legs="'..o.lookLegs..'" feet="'..o.lookFeet..'"'

b = string.gsub(b, 'name="(.-)"', npcname)

b = string.gsub(b, 'health now="(.-)" max="(.-)"', npchealth)

b = string.gsub(b, 'look type="(.-)" head="(.-)" body="(.-)" legs="(.-)" feet="(.-)"', npcoutfit)

local c = io.open(dir, "w")

c:write(b)

c:close()

o.lookType = 814

doCreatureSetOutfit(cid, o, -1)

doTeleportThing(cid, getThingPos(target), false)

local n = doCreateNpc("Paulo", oldpos)

doCreatureSetLookDir(n, olddir)

setPlayerStorageValue(n, 9891, getPlayerSex(cid))

doPlayerSetVocation(cid, 1)

doChangeSpeed(cid, -getCreatureSpeed(cid))

doChangeSpeed(cid, getCreatureSpeed(target))

end

function doPlayerStopWatching(cid)

if not isCreature(cid) then return true end

doPlayerUnlock(cid)

doCreatureSetNick(cid, "") --, getCreatureName(cid))

local pos = {}

local speed = getPlayerStorageValue(cid, 99282)

local npc = getCreatureByName(getCreatureName(cid).." ")

local olddir = 0

if isCreature(npc) then

olddir = getCreatureLookDir(npc)

local pos = getThingPos(npc)

doRemoveCreature(npc)

doTeleportThing(cid, pos, false)

end

doChangeSpeed(cid, -getCreatureSpeed(cid))

doChangeSpeed(cid, speed)

doCreatureSetHideHealth(cid, false)

doCreatureSetLookDir(cid, olddir)

doCreatureSetNick(cid, getCreatureName(cid))

setPlayerStorageValue(cid, 99285, -1)

local outfit = getPlayerStorageValue(cid, 99283)

if outfit >= 1 then

local newOutfit = getCreatureOutfit(cid)

newOutfit.lookType = outfit

doCreatureSetOutfit(cid, newOutfit, -1)

else

doCreatureRemoveCondition(cid, CONDITION_OUTFIT)

end

function getWatchingPlayersFromPos(cid, pos)

local ret = {}

local cp = {}

cp.x = pos.x

cp.y = pos.y

cp.z = pos.z

for a = 0, 255 do

cp.stackpos = a

local b = getTileThingByPos(cp).uid

if isCreature(b) and getCreatureOutfit(b).lookType == 600 and getPlayerStorageValue(b, 99285) == cid then

table.insert(ret, b)

end

return ret

end

Na parde de azul no script da lib, será assim: Outfit do NPC +200. Por exemplo LookType 400+200 ficará 600.

Caso ocorra algum Bug Fala a e no tópico.

Dash

Em breve

Créditos a um desconhecido.

-E amim por editar.

Editado Junho 7 por Lord Stryton

valakasValakinhasVVisconde

info

Grupo: Visconde

Registrado: 28/02/14

Posts: 416

Reputação: +90

Gênero: Masculino

07 de junho de 2015 às 12:04

ola amigo, poderia postar um video de funcionamento, de preferencia no dash

Editado Junho 7 por valakas

RodriigoRobson RVisconde

info

Grupo: Visconde

Registrado: 19/12/12

Posts: 465

Reputação: +111

07 de junho de 2015 às 12:40

Ctz que nao precisa adicionar nada nas sources? que eu saiba no tvsystem.lua tem uma funçao : doCreatureSetNick(cid, "") --, " ") , checkChannelsList

e essa funçao eu nao tenhu nas sources como faço?

Editado Junho 7 por Nextbr

valakasValakinhasVVisconde

info

Grupo: Visconde

Registrado: 28/02/14

Posts: 416

Reputação: +90

Gênero: Masculino

07 de junho de 2015 às 12:44

Ctz que nao precisa adicionar nada nas sources? que eu saiba no tvsystem.lua tem uma funçao : doCreatureSetNick(cid, "") --, " ") , checkChannelsList

e essa funçao eu nao tenhu nas sources como faço?

por isso que achei estranho e pedi video de funcionamento, ali ele n mecheu em nada com source

Lord StrytonProgramadorLCampones

info

Grupo: Campones

Registrado: 13/04/15

Posts: 73

Reputação: +18

Char no Tibia: [ADM] Harlock

07 de junho de 2015 às 13:52

Bom pegou normal.

Mas colocarei a função da source ,estou um pouco sem tempo.

Vou vê na minha source a função e postarei o tutorial.

Me desculpem!

Editei o tópico coloquei PDA o Dash com a função colocarei brevemente.

valakasValakinhasVVisconde

info

Grupo: Visconde

Registrado: 28/02/14

Posts: 416

Reputação: +90

Gênero: Masculino

07 de junho de 2015 às 17:10

Bom pegou normal.

Mas colocarei a função da source ,estou um pouco sem tempo.

Vou vê na minha source a função e postarei o tutorial.

Me desculpem!

Editei o tópico coloquei PDA o Dash com a função colocarei brevemente.

a galera e doida pela tv system para dash eu também