# proc reception of pub proc recv_pub {frm_bot command arg} { global eggdrops chans hlnick botnick snet networks if {[set him [lsearch $eggdrops $frm_bot]] >= 0} { set me [lsearch $eggdrops $botnick] set recvchan [lindex $chans $me] set speaker [make_user [lindex [split $arg] 0] $him] putquick "PRIVMSG $recvchan :$speaker> [lrange $arg 1 end]" } else { return 0 } } # proc reception of action proc recv_act {frm_bot command arg} { global eggdrops chans hlnick botnick snet networks if {[set him [lsearch $eggdrops $frm_bot]] >= 0} { set me [lsearch $eggdrops $botnick] set recvchan [lindex $chans $me] set speaker [make_user [lindex [split $arg] 0] $him] putquick "PRIVMSG $recvchan :* $speaker [lrange $arg 2 end]" } else { return 0 } }