egghelp.org community Forum Index
[ egghelp.org home | forum home ]
egghelp.org community
Discussion of eggdrop bots, shell accounts and tcl scripts.
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Help with this script, random kick/nick

 
Post new topic   Reply to topic    egghelp.org community Forum Index -> Scripting Help
View previous topic :: View next topic  
Author Message
unb0rn
Voice


Joined: 08 Sep 2008
Posts: 26

PostPosted: Tue Jan 20, 2009 5:34 pm    Post subject: Help with this script, random kick/nick Reply with quote

I've been using this bnc for some time now, but since i've load the tcl, tcleggdrop_mcpsfuncs , it's not working completely.

Ex: !msg -> still works with the msg that i've define
: !kick -> not working, and i have no idea why


Here's the tcl:

Quote:

set textlist {
"random kick msg"
}

bind pub - !msg rand:cmd
bind pub - !kick rand:cmd

proc rand:cmd {nick uhost hand chan arg} {
global textlist lastbind
set msg [lindex $textlist [rand [llength $textlist]]]
set ns [chanlist $chan]
switch -- $lastbind {
"!msg" {
puthelp "privmsg $chan :[lindex [split $arg] 0] $msg"
}
"!kick" {
set n [lindex $ns [rand [llength $ns]]]
puthelp "kick $chan $n :$msg"
}
}
}


this tcl should kick someone when you do !kick the eggdrop should kick a random nick from the channel
but now, its not working, only the !msg works, and on !msg, it says the msg that i have on the "set textlist {"
and the !kick, should also use the same msg from !msg

Thank you[/quote]


Last edited by unb0rn on Fri Jan 23, 2009 7:16 pm; edited 1 time in total
Back to top
View user's profile Send private message
speechles
Revered One


Joined: 26 Aug 2006
Posts: 1398
Location: emerald triangle, california (coastal redwoods)

PostPosted: Tue Jan 20, 2009 7:53 pm    Post subject: Re: Help with this script, random kick/nick Reply with quote

unb0rn wrote:
I've been using this bnc for some time now, but since i've load the tcl, tcleggdrop_mcpsfuncs , it's not working completely.

Ex: !msg -> still works with the msg that i've define
: !kick -> not working, and i have no idea why


Here's the tcl, and some info attached: http://rafb.net/p/ZwmxmM79.html

Thank you

I sometimes am in awe at the level of common sense people have. It is quite clear why it doesn't work. Let me show you...
Code:
 switch -- $lastbind {
  "!msg" {
   puthelp "privmsg $chan :[lindex [split $arg] 0] $msg"
  }
  "!fode-te" {
   set n [lindex $ns [rand [llength $ns]]]
   puthelp "kick $chan $n :$msg"
  }
 }
}

You don't use !kick to kick others. You use.. Well.. What does that word mean?... Hmm...
Quote:
<speechles> !tr fode-te
<sp33chy> Google says: (auto->en) Translation: Portuguese (automatically detected) » English >> fuck you

So basically, it's Portuguese (figures..haw). You type the equivalent of !f***-you <msg> and someone is randomly kicked with your witty message. How cute. Rolling Eyes
_________________
speechles' eggdrop tcl archive
Back to top
View user's profile Send private message
unb0rn
Voice


Joined: 08 Sep 2008
Posts: 26

PostPosted: Wed Jan 21, 2009 8:04 am    Post subject: Reply with quote

Yes, you are right about that, i forgot to edit that part, so show here, but even if i change that (and i've tried) it stills doesnt work.

I was working with the !fod*-te, to kick people randomly, but i've edit that to paste the tcl here.

The thing is, since i started to use the tcleggdrop_mcpsfuncs, the !fod*-te function, it's just not working at all, no matter what...

Help, please
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    egghelp.org community Forum Index -> Scripting Help All times are GMT - 4 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Forum hosting provided by Reverse.net

Powered by phpBB © 2001, 2005 phpBB Group
subGreen style by ktauber