| View previous topic :: View next topic |
| Author |
Message |
spamyboy Voice
Joined: 07 Jan 2006 Posts: 9 Location: Lithuania
|
Posted: Thu Mar 09, 2006 11:29 am Post subject: seeker (PLEAS HELP WITH THIS !!!!) |
|
|
Could anyone make bot, which would go every where wehre I go, for e.g. here is what I wrote
bind raw - 319 nickchan;proc nickchan {from key arg} {;putserv "PRIVMSG #spamyboy :Nick: [lrange [split $arg] 0 0] , Channels:[lrange [split $arg] 2 end]";}
But this is onlly begin, bot should check my whoise & go to channels where i'm he should also part them when I part them, pleas I need it wery, wery much.  |
|
| Back to top |
|
 |
Alchera Revered One

Joined: 11 Aug 2003 Posts: 3344 Location: Ballarat Victoria, Australia
|
Posted: Thu Mar 09, 2006 6:02 pm Post subject: |
|
|
This would be for the purpose of following you into channels to flood/spam? _________________ Add [SOLVED] to the thread title if your issue has been.
Search | FAQ | RTM |
|
| Back to top |
|
 |
spamyboy Voice
Joined: 07 Jan 2006 Posts: 9 Location: Lithuania
|
Posted: Thu Mar 09, 2006 6:51 pm Post subject: |
|
|
dam, no ! ( Don's look to my nick )
I just want to upgrade my security bot, pleas I need it wery much. |
|
| Back to top |
|
 |
cache Master
Joined: 10 Jan 2006 Posts: 306 Location: Mass
|
Posted: Thu Mar 09, 2006 7:54 pm Post subject: |
|
|
| Quote: | | I just want to upgrade my security bot, pleas I need it wery much. |
How is asking for a script to follow you, have anything to do with upgrading security?? |
|
| Back to top |
|
 |
Alchera Revered One

Joined: 11 Aug 2003 Posts: 3344 Location: Ballarat Victoria, Australia
|
Posted: Thu Mar 09, 2006 10:42 pm Post subject: |
|
|
If you're an Admin of a network and it's spam you're trying to catch then possibly (if I am correct) spambuster is what you're after. It causes a bot to randomly join channels (revolving door). _________________ Add [SOLVED] to the thread title if your issue has been.
Search | FAQ | RTM |
|
| Back to top |
|
 |
spamyboy Voice
Joined: 07 Jan 2006 Posts: 9 Location: Lithuania
|
Posted: Fri Mar 10, 2006 5:39 am Post subject: |
|
|
| No, I'm not admin on any network, just I have bot witch guards, for e.g. someone try to kick me/deop/ban, what ever he, !kb that person & all I need that bot would follow to channels where I go. Pleas. |
|
| Back to top |
|
 |
Ian-Highlander Op
Joined: 24 Sep 2001 Posts: 165 Location: Ely, Cambridgeshire
|
Posted: Fri Mar 10, 2006 12:11 pm Post subject: |
|
|
So you and your bot both get ops in every channel you go? If not then this script would be pointless unless your bot is a sysop as it wouldnt be able to kickban anyone if it wasnt an op. Just a minor point. _________________ "Insanity Takes Its Toll, Please Have Exact Change" |
|
| Back to top |
|
 |
spamyboy Voice
Joined: 07 Jan 2006 Posts: 9 Location: Lithuania
|
Posted: Sat Mar 11, 2006 5:36 am Post subject: |
|
|
| He, get's everywhere OP where I go, couse I use aop script in my mirc client, which gives GLOBAL op to bot, so pleas, some one ! |
|
| Back to top |
|
 |
metroid Owner
Joined: 16 Jun 2004 Posts: 771
|
Posted: Sun Mar 12, 2006 6:03 pm Post subject: |
|
|
| Code: | # Set this to your own handle.
set followhand "handle"
bind time - {?5 * * * *} check:channels
proc check:channels {args} {
global followhand
if {[expr [clock seconds] - $::uptime] < 200 || ![llength [set nick [hand2nick $followhand]]]} { return }
bind RAW - 319 check:raw
putserv "WHOIS $nick"
}
proc check:raw {f k arguments} {
# we are going to assume that we aren't whois'ing anyone else so we shouldn't get other results.
unbind raw - 319 check:raw
foreach chan [string trim [string range [lrange [split $arguments] 2 end] 1 end]] {
while {[string index $chan 0] != "#"} {
set chan [string range $chan 1 end]
}
if {![validchan $chan]} {
# we don't know this channel yet
channel add $chan
}
}
} |
Trust me when i say i couldn't care less if it doesn't work because it sounds like a stupid thing to make a bot follow you around anyway. |
|
| Back to top |
|
 |
spamyboy Voice
Joined: 07 Jan 2006 Posts: 9 Location: Lithuania
|
Posted: Mon Mar 13, 2006 5:55 am Post subject: |
|
|
doesnt work, I gess..  _________________ www.spamyboy.com - all you need is there |
|
| Back to top |
|
 |
r0t3n Owner
Joined: 31 May 2005 Posts: 507 Location: UK
|
Posted: Mon Mar 13, 2006 8:23 am Post subject: |
|
|
Try this:
| Code: | foreach min {0 1 2 3 4 5 6 7 8 9} {
bind time -|- {?$min * * * *} proc:follow
}
bind raw -|- 319 proc:follow:channels
set ::follow_handle "handle"
proc proc:follow {min hour day month year} {
set nickname [hand2nick $::follow_handle]
set ::follow_raw "$nickname"
putquick "WHOIS $nickname" -next
}
proc proc:follow:channels {from server arguments} {
set nickname [lindex [split $arguments] 1]
set channels [lrange $arguments 2 end]
if {$::follow_raw != "$nickname"} { return 0 }
foreach chann [split $channels] {
if {[string index $chann 0] == "@" || [string index $chann 0] == "+" || [string index $chann 0] != "#"} {
set chann [string range $chann 1 end]
}
if {[validchan $chann] && ![botonchan $chann]} {
putquick "JOIN $chann"
} elseif {![validchan $chann]} {
channel add $chann
}
if {![onchan $nickname $chann]} {
channel remove $chann
}
}
unset ::follow_raw
} |
_________________ r0t3n @ #r0t3n @ Quakenet |
|
| Back to top |
|
 |
metroid Owner
Joined: 16 Jun 2004 Posts: 771
|
Posted: Mon Mar 13, 2006 1:52 pm Post subject: |
|
|
| spamyboy wrote: | doesnt work, I gess..  |
Instead of pointless comments, how about any errors?
(also tosser, what's the point of your script check for @/+ and then check if the character is still not #.
Do you even have a clue what your doing?) |
|
| Back to top |
|
 |
Sir_Fz Revered One

Joined: 27 Apr 2003 Posts: 3793 Location: Lebanon
|
Posted: Tue Mar 14, 2006 1:23 pm Post subject: |
|
|
| Tosser^^ wrote: |
| Code: | foreach min {0 1 2 3 4 5 6 7 8 9} {
bind time -|- {?$min * * * *} proc:follow
} |
|
This can be replaced with just
| Code: | | bind time - * proc:follow |
_________________ Follow me on GitHub
- Opposing
Public Tcl scripts |
|
| Back to top |
|
 |
|