15/12/2020, 06:15
Bonjour,
J'essaye de modifier le tapavu.tcl que j'utilise depuis des années afin qu'il accepte les "!tapavu" seulement de la part d'utilisateurs identifiés (+r).
Voici le morceau de code du pub de "!tapavu" que j'voudrais modifier:
Comment il faudrait faire pour faire ce genre de fonction ?
Cordialement
J'essaye de modifier le tapavu.tcl que j'utilise depuis des années afin qu'il accepte les "!tapavu" seulement de la part d'utilisateurs identifiés (+r).
Voici le morceau de code du pub de "!tapavu" que j'voudrais modifier:
tcl
bind pub -|- $tapavu(command)tapavu tapavu:pub:req
proc tapavu:pub:req {nick uhost hand channel arg} {
if { !isIdentifiedToNs($nick) } { // une fonction à créer isIdentifiedToNs($nick) qui retourne true si l'utilisateur est +r sinon false
puthelp "NOTICE $nick :04$nick12, je n'accepte les demandes des utilisateurs non-enregistrés."
return 1
}
if {$arg == ""} {
puthelp "PRIVMSG $channel :12Qui ça 04$nick12 ?"
return 1
}
tapavu:pubreq $nick $uhost $hand $channel $arg 0
}
Comment il faudrait faire pour faire ce genre de fonction ?
Cordialement