SHARE
TWEET

Untitled

a guest Feb 20th, 2020 72 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ##################### Cervellone Tcl ###############################
  2. ############# Creato da RobotMan ###################################
  3. ##### Per informazioni scrivetemi a r0b0t@xoom.it ##################
  4. ####################################################################
  5.  
  6. bind pubm - "*regist*cana*" pub:regchan
  7. bind pubm - "*regist*sala*" pub:regchan
  8. bind pubm - "*cri*sala*" pub:regchan
  9. bind pubm - "*cri*cana*" pub:regchan
  10. bind pubm - "*regist*nick*" pub:regnick
  11. bind pubm - "*regist*nome*" pub:regnick
  12. bind pubm - "*vhost*" pub:vhost
  13. bind pubm - "*ocult*ip*" pub:vhost
  14. bind pubm - "*ban*" pub:ban
  15. bind pubm - "*expuls*" pub:ban
  16. bind pubm - "*entrar*" pub:join
  17. bind pubm - "*ent*can*" pub:join
  18. bind pubm - "*ent*sal*" pub:join
  19.  
  20. proc pub:regchan { nick uhost handle chan arg } {
  21. putserv "PRIVMSG $chan :$nick para registar um canal escreve o comando: /ChanServ register #CANAL DESCRICAO-DO-CANAL" }
  22.  
  23. proc pub:regnick { nick uhost handle chan arg } {
  24. putserv "PRIVMSG $chan :$nick para registar um nick escreve o comando: /NickServ register PASSWORD EMAIL" }
  25.  
  26. proc pub:vhost { nick uhost handle chan arg } {
  27. putserv "PRIVMSG $chan :$nick para definir uma vhost escreve o comando: /HostServ default" }
  28.  
  29. proc pub:join { nick uhost handle chan arg } {
  30. putserv "PRIVMSG $chan :$nick para entrar num canal escreve o comando: /Join #CANAL , em caso de ban, este tipicamente dura algumas horas ou dias." }
  31.  
  32. proc pub:ban { nick uhost handle chan arg } {
  33. putserv "PRIVMSG $chan :$nick Em caso algum poderemos resolver situações de ban (expulsão) de um canal. Os canais são geridos pelo seu fundador e operadores por si designados, funcionando de forma autónoma. Um ban dura tipicamente algumas horas ou dias." }
  34.  
  35. putlog "\002Cervellone Tcl\002 caricata con successo."
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Top