how to make a bot respond to !<something>

[Melkimo]

@Melkimo> !beer nadine
* +SecsyDiva gives a beer to nadine

atm it says: * +SecsyDiva gives a beer to Melkimo

I am looking for how to make the bot respond to !(something) <nick refered too) message
But at this point I got to where it responds to the nick saying the !something (and ignores the $nick it should respond too)

Code: Select all

proc pub_water {nick uhost hand channel arg} {
 global botnick
 putserv "PRIVMSG $channel :\001ACTION gives $nick a bottle of water\001"
 return 0
 }
bind pub - !water pub_water

What should I change or add to make this work
It should be easy, but uhmm yea, I am looking over it.

[doggo]

Code: Select all

bind pub - !water pub_water

proc pub_water {nick uhost hand channel arg} { 
set who [lindex $arg 0]
if {$who == ""} {set who $nick}
putserv "PRIVMSG $channel :\001ACTION gives $who a bottle of water\001" 
}

[05:58pm] <doggo> !water
[05:58pm] * [spunky] gives doggo a bottle of water
[05:58pm] <doggo> !water [spunky]
[05:58pm] * [spunky] gives [spunky] a bottle of water
[06:00pm] <doggo> !water nadine
[06:00pm] * [spunky] gives nadine a bottle of water

Code: Select all

set who [lindex $arg 0]

sets the VAR who to the nick you want to give water to

Code: Select all

if {$who == ""} {set who $nick}

if who is empty then your nick or whoever triggered the cmd will be used

hope this helped

[Melkimo]

Yea that works ! Thanks

Is it possible to make the same !command in private with the bot but sending the output to a specified channel?

Like

/msg <bot> !beer Nadine #channel
And it responds in
#channel <botnick> /me gives Nadine a beer

[TCL_no_TK]

Code: Select all

proc pub_water {nick uhost hand channel arg} { 

should be

Code: Select all

proc pub_water {nick uhost hand channel text} { 

arg is special. and remenber to use

Code: Select all

[lindex [split $text] 0]

[speechles]

Actually, arg is fine. It's the word "A R G S" or args, which has special meaning. Just to clarify that part.

[TCL_no_TK]

lol was close enough arg today, args tomorrow maybe

[Amr]

What about adding more , for example !shoot it will be "bot shoots $who"
!kill ..etc.