Code: Select all
bind PUB - !testing pPubTesting
proc pPubTesting {nick uhost hand chan text} {
putquick "PRIVMSG $chan :I heard that!"
return 0
}
putlog "testing.tcl loaded"
Code: Select all
source scripts/testing.tcl
Code: Select all
Eggdrop v1.6.19+SSL (C) 1997 Robey Pointer (C) 2008 Eggheads
[16:51] --- Loading eggdrop v1.6.19+SSL (Mon Nov 2 2009)
[16:51] Listening at telnet port **** (all).
[16:51] Module loaded: channels
[16:51] Module loaded: dns
[16:51] Module loaded: transfer (with lang support)
[16:51] Module loaded: share
[16:51] Module loaded: server
[16:51] Module loaded: ctcp
[16:51] Module loaded: irc
[16:51] Module loaded: notes (with lang support)
[16:51] Module loaded: console (with lang support)
[16:51] Module loaded: blowfish
[16:51] Module loaded: uptime
[16:51] Loaded cmd_resolve.tcl successfully.
[16:51] testing.tcl. loaded
[16:51] Userfile loaded, unpacking...
[16:51] === <botname>: 2 channels, 2 users.
Launched into the background (pid: 3316)
Code: Select all
bind PUB - !testing pPubTesting
proc pPubTesting {nick uhost hand chan text} {
putlog "I heard that in $chan"
putquick "PRIVMSG $chan :I heard that!"
return 0
}
putlog "testing.tcl loaded"