Code:

if {[llength [userlist]] == 0} { putserv "NOTICE $nick :No users found in my userlist for $chan" return 0} foreach user [userlist] { putserv "NOTICE $nick :$user"}putserv "NOTICE $nick :End of list."

Code:

bind pub o|f !userlist user_listproc user_list {nick uhost hand chan text} {if {[userlist] == ""} {putserv "NOTICE $nick :No users found in my userlist for $chan"return 0}putserv "NOTICE $nick :Userlist for $chan "foreach user [userlist $chan] {putserv "NOTICE $nick :\(( $user \|| +[lindex [split [chattr $user -|- $chan] \|] $user]}putserv "NOTICE $nick :End of list."}