educolo

Utilitário ll

Jun 29th, 2014
427
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. -- Utilitario
  2. -- Créditos:Stooucommedo
  3. -- Tables
  4. nomedobot="Stooucommedo"
  5. cmm="BR";
  6. mensagens={
  7.  
  8. ["boasvindas"]="Bem Vindo(a) , ao cafofo da tribo!";
  9. ["recrute"]="Recrute bastante!";
  10. ["minigames"]="Temos alguns minigames como : Deathmatch , prophunt e Muito Mais !";
  11. ["regras"]="As regras são:Sem flood , sem Spam , sem xingamentos e sem tentar comandar o cafofo.";
  12. };
  13. msg={
  14. ["atv"]=false;
  15. };
  16. -- Inicio do script
  17. print("<VP>Bot messagens<V> inciado!")
  18. ui.addTextArea(0,"<#EB1D51='#F0A78E'>> [".. cmm.."] [<#EB1D51='#E88F4F'><a href='event:fechar'>".. nomedobot.."</a></font>] ".. mensagens.boasvindas.."</font>",NIL,6,368,478,30,0x1C3C41,0x1C3C41,0.9,true)
  19. -- Novo jogador entra na sala
  20. function eventNewPlayer(player)
  21. ui.addTextArea(0,"<font color='#F0A78E'>> [".. cmm.."] [<#EB1D51='#E88F4F'><a href='event:fechar'>".. nomedobot.."</a></font>] ".. mensagens.boasvindas.."</font>",NIL,6,368,478,30,0x1C3C41,0x1C3C41,0.9,true)
  22. end
  23. -- Comandos
  24. function eventChatCommand(player,cm)
  25. if mensagens[cm] then
  26. textarea(player,mensagens[cm])
  27. end
  28. system.disableChatCommandDisplay(cm, true)
  29. end
  30. -- Text ara
  31. function textarea(player,msg)
  32. ui.addTextArea(0,"<font color='#F0A78E'>> [".. cmm.."] [<r='#E88F4F'><a href='event:fechar'>".. nomedobot.."</a></font>] ".. msg.."</font</font>",player,6,368,478,30,0x1C3C41,0x1C3C41,0.9,true)
  33. end
  34. -- Links de uma textarea
  35.  
  36. function eventTextAreaCallback(id,player,link)
  37. if link == "fechar" then
  38. ui.removeTextArea(0,player)
  39. end
  40. end
Advertisement
Add Comment
Please, Sign In to add comment