24/12/2011, 18:18
(Modification du message : 24/12/2011, 18:19 par aliasangelius.)
ça se trouve ici :
ici c'est lorsque tu tape !msg .... sur salon la première proc
la seconde c'est en /msg
tcl
###
### Un utilisateur veut envoyer un message
###
proc MDS::pub_sendmsg {nick host hand chan arg} {
if { (![channel get $chan MDS]) || (($MDS::antiflood == 1) && ([MDS::antiflood [MDS::clean_data $chan] $hand "msg"])) } { return }
if { $MDS::DEBUGMODE } { putlog "\00304\[$MDS::scriptname - DEBUG\]\003 pub_sendmsg : $nick \00307|\003 $host \00307|\003 $hand \00307|\003 $chan \00307|\003 $arg" }
MDS::check_identity $nick $host $hand $chan "pub" "send" $arg
}
proc MDS::priv_sendmsg {nick host hand arg} {
if { (($MDS::antiflood == 1) && ([MDS::antiflood [MDS::clean_data $nick] $hand "msg"])) } { return }
if { ![onchan $nick] } {
puthelp "$MDS::delivery_mode $nick :\003[set MDS::num_sec_color]Vous devez vous trouver sur un chan où $::botnick est présent pour utiliser la messagerie.\003"
return
}
if { $MDS::DEBUGMODE } { putlog "\00304\[$MDS::scriptname - DEBUG\]\003 priv_sendmsg : $nick \00307|\003 $host \00307|\003 $hand \00307|\003 $arg" }
MDS::check_identity $nick $host $hand $nick "priv" "send" $arg
}
ici c'est lorsque tu tape !msg .... sur salon la première proc
la seconde c'est en /msg