| View previous topic :: View next topic |
| Author |
Message |
whittinghamj
Op
Joined: 21 May 2006
Posts: 103
|
 Posted: Mon Jun 05, 2006 1:16 am Post subject: Script Request |
 |
|
howdy yall. I know this kind of script exists, just not sure where.
I am looking for a script to do the following.
<user>!user <nick>
<botnick> <nick> is in my list as <hangle-in-bot-userfile> (eg Quest is quest)
<botnick> User hosts are *!ident@*.domain.net
<botnick> <nick> was added by <person> on <added-date>
Any suggestions? Its just reading the userfile and sending the info back to the channel. Suggestions would be great. Thanks |
|
| Back to top |
|
 |
whittinghamj
Op
Joined: 21 May 2006
Posts: 103
|
| Posted: Wed Jun 07, 2006 10:25 pm Post subject: |
|
|
| does anyone have any suggestions for this please? |
|
| Back to top |
|
|
Alchera
Revered One
Joined: 11 Aug 2003
Posts: 3344
Location: Ballarat Victoria, Australia
|
| Posted: Wed Jun 07, 2006 10:43 pm Post subject: |
|
|
There are tonnes of scripts in the Tcl Archive that would meet your requirements.
_________________
Add [SOLVED] to the thread title if your issue has been.
Search | FAQ | RTM |
|
| Back to top |
|
|
whittinghamj
Op
Joined: 21 May 2006
Posts: 103
|
| Posted: Wed Jun 07, 2006 11:01 pm Post subject: |
|
|
I found a script in the TCL section and modded it to do kind of what I want. The script I found was designed the show users for a specific channel and not the whole list. I modded it to list the entire file and not just for a specific channel.
The question I have now is this. Right now its lists EVERYTONE in the user file on the !userlist command. I need to use !userlist <nick> and the code goes off and shows only the userlist info for that specific user. Here is the code so fare, FULLY WORKING which shows everyone in the userlist.
| Code: |
bind pub o|o !userlist user_list
proc user_list {nick uhost hand chan text} {
if { [userlist |amnovf $chan] == "" } {
foreach user [userlist |amnovf] {
set usersnick [hand2nick $user]
if { $usersnick == "" } {
putquick "PRIVMSG $chan :1Handle: 4$user"
putquick "PRIVMSG $chan :1Nickname: 4$usersnick"
putquick "PRIVMSG $chan :1Host(s): 4[getuser $user HOSTS]"
} else {
putquick "PRIVMSG $chan :1Handle: 4$user"
putquick "PRIVMSG $chan :1Nickname: 4$usersnick"
putquick "PRIVMSG $chan :1Host(s): 4[getuser $user HOSTS]"
}
}
putquick "NOTICE $nick :End of list."
}
}
|
Hope someone can help me with this please to show just the $arg part eg a specific user.
Cheers guys. Any help would be extremly usful and greatfully received. |
|
| Back to top |
|
|
whittinghamj
Op
Joined: 21 May 2006
Posts: 103
|
| Posted: Thu Jun 08, 2006 4:32 pm Post subject: |
|
|
anyone? dragnlord? sir fitz? please......
danke |
|
| Back to top |
|
|
Alchera
Revered One
Joined: 11 Aug 2003
Posts: 3344
Location: Ballarat Victoria, Australia
|
| Posted: Fri Jun 09, 2006 3:25 am Post subject: |
|
|
Read tcl-commands.doc in your bots ~doc folder.
_________________
Add [SOLVED] to the thread title if your issue has been.
Search | FAQ | RTM |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
