| 123456789101112131415161718 |
- # This script provides minimal Eggdrop user record manipulation in a channel.
- #
- # Primarily I'm interested in letting people know if the bot recognizes them.
- namespace eval ::ur {}
- proc ::ur::whoami {nick uhost hand chan argv} {
- if {$hand == "*"} {
- putserv "PRIVMSG $chan :I don't know you!"
- return
- }
- putserv "PRIVMSG $chan :You're $hand"
- }
- setudef flag userrec
- bind pub -|- .whoami ::ur::whoami
- putlog "userrec.tcl (https://github.com/horgh/eggdrop-scripts) loaded"
|