Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ##################### Cervellone Tcl ###############################
- ############# Creato da RobotMan ###################################
- ##### Per informazioni scrivetemi a r0b0t@xoom.it ##################
- ####################################################################
- bind pubm - "*regist*cana*" pub:regchan
- bind pubm - "*regist*sala*" pub:regchan
- bind pubm - "*cri*sala*" pub:regchan
- bind pubm - "*cri*cana*" pub:regchan
- bind pubm - "*regist*nick*" pub:regnick
- bind pubm - "*regist*nome*" pub:regnick
- bind pubm - "*vhost*" pub:vhost
- bind pubm - "*ocult*ip*" pub:vhost
- bind pubm - "*ban*" pub:ban
- bind pubm - "*expuls*" pub:ban
- bind pubm - "*entrar*" pub:join
- bind pubm - "*ent*can*" pub:join
- bind pubm - "*ent*sal*" pub:join
- proc pub:regchan { nick uhost handle chan arg } {
- putserv "PRIVMSG $chan :$nick para registar um canal escreve o comando: /ChanServ register #CANAL DESCRICAO-DO-CANAL" }
- proc pub:regnick { nick uhost handle chan arg } {
- putserv "PRIVMSG $chan :$nick para registar um nick escreve o comando: /NickServ register PASSWORD EMAIL" }
- proc pub:vhost { nick uhost handle chan arg } {
- putserv "PRIVMSG $chan :$nick para definir uma vhost escreve o comando: /HostServ default" }
- proc pub:join { nick uhost handle chan arg } {
- putserv "PRIVMSG $chan :$nick para entrar num canal escreve o comando: /Join #CANAL , em caso de ban, este tipicamente dura algumas horas ou dias." }
- proc pub:ban { nick uhost handle chan arg } {
- 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." }
- putlog "\002Cervellone Tcl\002 caricata con successo."
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement