Miscellany
public text v1 · immutable## BINDS ##
bind notc |o * notc:log
## CONFIGS ##
set canal "#World"
set arquivo $logs/$botnick/$canal.onotice.log
## PROCS ##
proc notc:log {n u h a d} {
set msg [lrange $a 0 end]
logon [strftime "%H:%M"] $n $msg
}
proc logon {t n m} {
global botnick arquivo
set tmp [open $arquivo a+]
puts $tmp "\[$t\] <$n> $m"
close $tmp
}