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 

netbots

 
Post new topic   Reply to topic    egghelp.org community Forum Index -> Script Support & Releases
View previous topic :: View next topic  
Author Message
geek
Voice


Joined: 24 Oct 2008
Posts: 24

PostPosted: Mon Dec 28, 2020 6:40 am    Post subject: netbots Reply with quote

I find that netbots are still the best well written tcl.. but last release was for egg1.6

are netbots still working in new eggdrops 1.8.4?

or are there some compatibility errors and security issue?
Back to top
View user's profile Send private message
CrazyCat
Owner


Joined: 13 Jan 2002
Posts: 796
Location: France

PostPosted: Mon Dec 28, 2020 11:39 am    Post subject: Reply with quote

If you're speaking about netbots1.16 from slennox, it's normally still working with eggdrop1.8, and I don't remember any security issue about it.

I use bnusers from cmouse, but it doesn't do exactly the same things
_________________
https://www.eggdrop.fr
Offer me a coffee - Do not ask me help in PM, we are a community.
Back to top
View user's profile Send private message Visit poster's website
geek
Voice


Joined: 24 Oct 2008
Posts: 24

PostPosted: Mon Dec 28, 2020 1:10 pm    Post subject: Reply with quote

thanks CrazyCat

complete netbots.tcl v4.10 of 8/8/2005 from slennox

but yes, I try it in my bots and they seem to work still good

my only doubt is about ipv6...
Back to top
View user's profile Send private message
CrazyCat
Owner


Joined: 13 Jan 2002
Posts: 796
Location: France

PostPosted: Mon Dec 28, 2020 7:56 pm    Post subject: Reply with quote

netbots use... botnet, so it doesn't care about ipv4 or ipv6, it only cares about your botnet Smile
I'll have a check on this plugin but I don't think you'll have any trouble with it.
_________________
https://www.eggdrop.fr
Offer me a coffee - Do not ask me help in PM, we are a community.
Back to top
View user's profile Send private message Visit poster's website
ComputerTech
Master


Joined: 22 Feb 2020
Posts: 362

PostPosted: Tue Dec 29, 2020 2:21 am    Post subject: Reply with quote

A friend of mine created a Botnet script, and best part is that its VERY easy to add more commands, i'll find it in my Database tomorrow, if you want to give it a go Cool

Probably not as good as slennox's script, But it's a good way to learn/pratice Tcl Smile
_________________
ComputerTech
Back to top
View user's profile Send private message Send e-mail Visit poster's website
geek
Voice


Joined: 24 Oct 2008
Posts: 24

PostPosted: Wed Dec 30, 2020 9:33 am    Post subject: Reply with quote

ok, very thanks Smile
Back to top
View user's profile Send private message
ComputerTech
Master


Joined: 22 Feb 2020
Posts: 362

PostPosted: Mon Jan 04, 2021 1:52 pm    Post subject: Reply with quote

Sorry for the late response (been busy with new years) here is the code.

Code:

#Creator Spyda,

#made for ComputerTech


 bind PUB B .join bn:pub:join
 proc bn:pub:join {nick uhost hand chan args} {
  global botnick
  set c 0
  if {[llength [join $args]] > 0} {
   if {![string match -nocase [lindex [join $args] 0] $botnick]} {
    return
   }
   if {[llength [join $args]] > 1} {
    incr c
   }
  }
  if {$c} {
   putquick "PRIVMSG $chan :\[ok, channel add $botnick joining [lindex [join $args] 1]\]"
   channel add [lindex [join $args] 1]
  }
 }


 bind PUB B .part bn:pub:part
 proc bn:pub:part {nick uhost hand chan args} {
  global botnick
  set c 0
  if {[llength [join $args]] > 0} {
   if {![string match -nocase [lindex [join $args] 0] $botnick]} {
    return
   }
   if {[llength [join $args]] > 1} {
    incr c
   }
  }
  if {$c} {
   putquick "PRIVMSG $chan :\[ok, channel removed $botnick parting [lindex [join $args] 1]\]"
   channel remove [lindex [join $args] 1]
  }
 }


 bind PUB B .jump bn:pub:jump
 proc bn:pub:jump {nick uhost hand chan args} {
  global botnick
  set c 0
  if {[llength [join $args]] > 0} {
   if {![string match -nocase [lindex [join $args] 0] $botnick]} {
    return
   }
   if {[llength [join $args]] > 1} {
    incr c
   }
  }
  if {$c} {
   putquick "PRIVMSG $chan :\[ok, jumping $botnick to [lindex [join $args] 1]:[lindex [join $args] 2]\]"
   jump [lindex [join $args] 1] [lindex [join $args] 2]
  } else {
   putquick "PRIVMSG $chan :\[ok, jumping $botnick to default\]"
   jump
  }
 }

bind pub B .restart do:restart

proc do:restart {nick uhost hand chan args} {
  global botnick
  set c 0
  if {[llength [join $args]] > 0} {
   if {![string match -nocase [lindex [join $args] 0] $botnick]} {
    return
   }
   if {[llength [join $args]] > 1} {
    incr c
   }
  }
 
  putquick "PRIVMSG $chan :Restart Requested By $nick Restarting...)"
  restart
}

bind pub B .rehash do:rehash

proc do:rehash {nick uhost hand chan args} {
   global botnick
  set c 0
  if {[llength [join $args]] > 0} {
   if {![string match -nocase [lindex [join $args] 0] $botnick]} {
    return
   }
   if {[llength [join $args]] > 1} {
    incr c
   }
  }

  putquick "PRIVMSG $chan :Rehash Requested By $nick Rehashing...)"
  rehash
}

bind pub B .die do:die

proc do:die {nick uhost hand chan args} {
   global botnick
  set c 0
  if {[llength [join $args]] > 0} {
   if {![string match -nocase [lindex [join $args] 0] $botnick]} {
    return
   }
   if {[llength [join $args]] > 1} {
    incr c
   }
  }
  putquick "PRIVMSG $chan :Shutdown Requested By $nick Shutting Down...)"
  die
}

bind pub B .say do:say

proc do:say {nick uhost hand chan args} {
  global botnick
  set c 0
  if {[llength [join $args]] > 0} {
   if {![string match -nocase [lindex [join $args] 0] $botnick]} {
    return
   }
   if {[llength [join $args]] > 1} {
    incr c
   }
  }

set msg [lrange [lindex $text 0] 1 end]
putserv "privmsg $chan :$msg"
}

as you can see how it is made Cool
_________________
ComputerTech
Back to top
View user's profile Send private message Send e-mail Visit poster's website
CrazyCat
Owner


Joined: 13 Jan 2002
Posts: 796
Location: France

PostPosted: Mon Jan 04, 2021 6:48 pm    Post subject: Reply with quote

This is not a botnet script but a way to use party-line commands in public channel.
_________________
https://www.eggdrop.fr
Offer me a coffee - Do not ask me help in PM, we are a community.
Back to top
View user's profile Send private message Visit poster's website
ComputerTech
Master


Joined: 22 Feb 2020
Posts: 362

PostPosted: Tue Jan 05, 2021 8:59 pm    Post subject: Reply with quote

Correct CrazyCat, but it does control any bots on that Botnet, so better using partyline commands than not Smile but as i said, it's not as good as slennox's script, but it is much easier to add any command you wish to it Razz
_________________
ComputerTech
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic    egghelp.org community Forum Index -> Script Support & Releases 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