egghelp/eggheads community

bots share command list

2003-12-12T12:34:50-04:00

hehe

Statistics: Posted by MeJseL — Fri Dec 12, 2003 12:34 pm

bots share command list

2003-12-12T12:30:07-04:00

thx man ur the best

don't say that to me, I allready know
just say that to anybody you meet

Statistics: Posted by CrazyCat — Fri Dec 12, 2003 12:30 pm

bots share command list

2003-12-12T12:08:25-04:00

thx man ur the best

Statistics: Posted by MeJseL — Fri Dec 12, 2003 12:08 pm

bots share command list

2003-12-12T11:34:36-04:00

you can put all the lines you want...
each line is read and sent to the good eggdrop, with cycling them.

Code:

incr cur_eggif { $cur_egg == [llength $com_list] } {set cur_egg 0

This is the way to cycle: if we are further than the items number (ie the number of eggs), we restart from 0

And to use notice, it's a little more difficult: you must send the recipient'nick to each egg, and each egg must split the line...
so, it could be like this:
### MASTA script

Code:

putbot [lindex $egglist $cur_egg] [concat ">say" $cur_com]becomes:putbot [lindex $egglist $cur_egg] [concat ">say $nick" $cur_com]andputhelp "PRIVMSG $chan :$cur_com"becomesputhelp "NOTICE $nick :$cur_com"

### SLAVE script

Code:

proc list:say { from cmd arg } {   global saychan master_egg   if { $from == $master_egg } {      puthelp "PRIVMSG $saychan :$arg"   }} becomesproc list:say { from cmd arg } {   global saychan master_egg   set nick [lindex $arg 0]   set text [lrange $arg 1 end]   if { $from == $master_egg } {      puthelp "NOTICE $nick :$text"   }}

Statistics: Posted by CrazyCat — Fri Dec 12, 2003 11:34 am

bots share command list

2003-12-12T09:20:59-04:00

but hmm i have more then 4 lines in the command list and the bot only msg 4 of them .. how do i make them msg all commands like 10 lines ?
and how about notice nick insted of msg chan ? .. i know thats a lot of thing and im a pain in the ass but it would been so nice if u could help me

Statistics: Posted by MeJseL — Fri Dec 12, 2003 9:20 am

bots share command list

2003-12-12T09:00:19-04:00

It worked thx a lot

Statistics: Posted by MeJseL — Fri Dec 12, 2003 9:00 am

bots share command list

2003-12-12T03:35:15-04:00

Yes, I understand
I'd inverted arguments in lindex command, this is now tested

Code:

proc list:send {nick uhost handle chan arg} {   global egglist comlist botnick   set cur_egg 0   foreach cur_com $comlist {      if { [lindex $egglist $cur_egg] == $botnick } {         puthelp "PRIVMSG $chan :$cur_com"      } else {         putbot [lindex $egglist $cur_egg] [concat ">say" $cur_com]      }      incr cur_egg      if { $cur_egg == [llength $comlist] } {         set cur_egg 0      }   }}

Statistics: Posted by CrazyCat — Fri Dec 12, 2003 3:35 am

bots share command list

2003-12-11T16:09:24-04:00

Same error ^^ :

Code:

Tcl error [list:send]: bad index "apa": must be integer or end?-integer?

Statistics: Posted by MeJseL — Thu Dec 11, 2003 4:09 pm

bots share command list

2003-12-11T13:39:15-04:00

sorry, I made some mistakes (forgetting some $)

Code:

proc list:send {nick uhost handle chan arg} {   global egglist comlist   set cur_egg 0   foreach cur_com $comlist {      if { [lindex $cur_egg $egglist] == $botnick } {         puthelp "PRIVMSG $chan :$cur_com"      } else {         putbot [lindex $cur_egg $egglist] [concat ">say" $cur_com]      }      incr cur_egg      if { $cur_egg == [llength $com_list] } {         set cur_egg 0      }   }}

replace the procedure with this one

Statistics: Posted by CrazyCat — Thu Dec 11, 2003 1:39 pm

bots share command list

2003-12-11T12:33:56-04:00

Didnt work :

Code:

Tcl error [list:send]: bad index "aPa": must be integer or end?-integer?

Statistics: Posted by MeJseL — Thu Dec 11, 2003 12:33 pm

bots share command list

2003-12-11T11:40:37-04:00

No, I can't
Ok, here's a *complete* example, with a rare thing when I script: some comments
The code is in 2 parts, the master on the master egg, the slave on the others eggs.

Code:

# Master script### SETTINGSset egglist { "egg1" "egg2" "egg3" "egg4"}# Masta must be in this list, the better position is first# nicks in the list are botnet-nickset comlist {"command1 is usefull for nothing""command2 won't be used""command3 is the best for n00b""command4 is the last"}# that's the array containning all the texts, refer to escape characters to avoid troubles...### BINDSbind pub - "!command" list:send# just a bind :)### PROCEDURESproc list:send {nick uhost handle chan arg} {   global egglist comlist   set cur_egg 0   foreach cur_com $comlist {      if { [lindex cur_egg $egglist] == $botnick } {         puthelp "PRIVMSG $chan :$cur_com"      } else {         putbot [lindex cur_egg $egglist] [concat ">say" $cur_com]      }      incr cur_egg      if { $cur_egg == [llength $com_list] } {         set cur_egg 0      }   }}# end of master script# Slave script### SETTINGSset master_egg "egg1"# The botnet-nick of the senderset saychan "#yourchan"### BINDSbind bot - ">say" list:say### PROCEDURESproc list:say { from cmd arg } {   global saychan master_egg   if { $from == $master_egg } {      puthelp "PRIVMSG $saychan :$arg"   }}# end of slave script

It's a simple one, you can improve it with having some feedback from each eggdrops, indicating they have said the sentence.
It could be a security (only one sentence in global queue), but you have enough elements to make the best you need

Statistics: Posted by CrazyCat — Thu Dec 11, 2003 11:40 am

bots share command list

2003-12-11T09:44:18-04:00

hehe the second one was that i thought about but i dont realy know how to do that in tcl im use to mirc scripting .. cant u show just a little example ? .. that would be verry nice

Statistics: Posted by MeJseL — Thu Dec 11, 2003 9:44 am

bots share command list

2003-12-11T07:42:50-04:00

you can make it easily following 2 different ways.
1st: each eggdrop bind for the previous command explanation, and tell the next one.
- contraint: you can't easily change the command list.

2nd: a master eggdrop have the list of all commands/explanations and of all eggdrops, and send each bot the command it must explain via botnet.
The receiver just repeat in channel what it receives.
- contraint: due to lag, botnet might be faster than putserv, so the order might be a random one

Statistics: Posted by CrazyCat — Thu Dec 11, 2003 7:42 am

bots share command list

2003-12-11T05:24:42-04:00

Anyone know a script or somthing to make the bot share command help list , like if i type "!commands" and i have 4 bots on .. one bot notice the first command help line then another bot notice the second and then the 3 bot notice the third line and so on .. hope somone can help me with this problem .. i have seen bots that have the same thing but they are not eggdrops.

Statistics: Posted by MeJseL — Thu Dec 11, 2003 5:24 am