Pesquisar na Comunidade

Ola meus queridos estou aqui para demonstrar meu novo sistema de radio. Basicamente e um sistema de comunicação onde um determinado player cria um channel de radio e outro player se conecta a radio assim todas as mensagens que o player mandar sera recebida. Crie um arquivo lua chamado rad em creaturescripts e coloque isto: Na mesma pasta crie outro chamado radlogout Coloque esta tags: Agora vamos registrar evento. Bem e pratico vá em creaturescripts/scripts/login.lua e antes do ultimo return true coloque estas linhas: Ainda não acabou... Vamos agora em talkactions/scripts e crie dois arquivos lua chamados de rad e radio: Em rad coloque isto: function onSay(cid, words, param, channel) function doRegisterRad(cid) setPlayerStorageValue(cid, 82820, 1) setPlayerStorageValue(cid, 82828, param) setPlayerStorageValue(cid, 82826, param) setPlayerStorageValue(cid, 28214, 1) setPlayerStorageValue(cid, 42426, 1) end if(words == "/createrad") then local money = 22 ------------Money necessario para comprar o slot--- local level = 82 -----Level necessario-------- [color=#FF0000]local item = 1952 ----Coloca aki o item que vai ser ganho para gravar o mesmo item de escrever texto de creaturescripts------[/color] if(param == '') then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Diga um nome para criar a radio.") return false end for _, pid in ipairs(getPlayersOnline()) do radi = getPlayerStorageValue(pid, 82828) if (param == radi) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Ja existe o nome desta radio.") return false end end if #param < 5 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sua radio precisa ter pelo mais que 4 letras") return false end if getPlayerStorageValue(cid, 82820) == 1 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você ja tem a radio "..getPlayerStorageValue(cid, 82828).." para recriar uma radio diga /desrad ou deslogue") return false end if getPlayerStorageValue(cid, 42426) == 1 then doRegisterRad(cid) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Radio "..param.." foi criada") if getPlayerItemCount(cid, item) < 1 then doPlayerAddItem(cid, item) end return true end if not doPlayerRemoveMoney(cid, money) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem o dinheiro suficiente para criar uma slot de radio") return false end if getPlayerLevel(cid) <= level then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem o level suficiente para criar uma slot de radio") return false end if isPremium(cid) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem premium para criar uma slot de radio") return false end doPlayerRemoveMoney(cid, money) doRegisterRad(cid) doPlayerAddItem(cid, item) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Radio "..param.." foi criada") else str = "Radios Online:\n\n" for _, pid in ipairs(getPlayersOnline()) do if getPlayerStorageValue(pid, 82828) ~= -1 then str = str .. getPlayerStorageValue(pid, 82828) .. " - Dono [(".. getPlayerName(pid) ..")] Level ["..getPlayerLevel(pid).."]\n" end end doShowTextDialog(cid, 1397, str) return true end return true end function onSay(cid, words, param, channel) function doRetireAllStorageRadio(cid) setPlayerStorageValue(cid, 82820, nil) setPlayerStorageValue(cid, 82828, nil) setPlayerStorageValue(cid, 82826, nil) setPlayerStorageValue(cid, 28214, nil) end if(words == "/sintrad") then if(param == '') then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Diga um nome para sintonizar para a radio para ver as radios online diga /checkrad.") return true end if getPlayerStorageValue(cid, 28214) == 1 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce ja esta conectado a uma sintonia ou tem uma radio para conectar desligue com o comando /desrad") return true end setPlayerStorageValue(cid, 82826, param) setPlayerStorageValue(cid, 28214, 1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Esta conectado a radio "..param.."") return true end if(words == "/desrad") then if getPlayerStorageValue(cid, 28214) == 1 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você foi desconectado") doRetireAllStorageRadio(cid) return true end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem um radio conectada") return true end return true end Comandos: /createrad (nome da radio) -----Compra um slot infinito e cria uma radio adicionando o item /sintrad(Nome da radio) ---Sintoniza em uma radio /checkrad --------Verifica as radios online /desrad ----Desconecta um slot de radio e desconecta um player de uma radio Configuraçôes O script ja tem as configuraçoes e as explicaçoes. Destaquei em vermelho onde o item de escrita deve ser posto mais atenção não são todos os itens que tem a janela de escrita para que o item funcione deve ser modificados em item.xml eu ultilizei o document se quiser pode fazer uso dele. Bem isto ai vou mandar uma dicas que vão fazer a diferença no scripts: E interessante colocar bastante exigencias para comprar um slot de radio para ter um numero grande de sintonizados. Recomendo colocar exingencia de premuin. E interresante no item da escrita do texto mudar a sprite para uma gravador ou algo parecido pode ser ate uma camera. Você pode perceber um numero grande storage se quiser pode simplificar o script retirando algumas storages desnecessarias.