egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2007-01-22T15:07:05-04:00 https://forum.eggheads.org/app.php/feed/topic/12992 2007-01-22T15:07:05-04:00 2007-01-22T15:07:05-04:00 https://forum.eggheads.org/viewtopic.php?p=69825#p69825 <![CDATA[little help please]]> thanx so much m8

Statistics: Posted by petea4 — Mon Jan 22, 2007 3:07 pm

]]> 2007-01-22T14:48:36-04:00 2007-01-22T14:48:36-04:00 https://forum.eggheads.org/viewtopic.php?p=69824#p69824 <![CDATA[little help please]]>

Code: 

0:$chan...
to

Code: 

1:$chan...

Statistics: Posted by Sir_Fz — Mon Jan 22, 2007 2:48 pm

]]> 2007-01-22T14:37:07-04:00 2007-01-22T14:37:07-04:00 https://forum.eggheads.org/viewtopic.php?p=69823#p69823 <![CDATA[little help please]]> seems to work but one of the 3 channels comes back as havin 0 in it when i can see one nick in all 3 channels. so seems to pick that nick up in 2 channels but not channel 3 it picked 5 up in channel 1 and 9 in channel 2 but 0 in channel 3 but one of the nicks was in all 3 channels..

Statistics: Posted by petea4 — Mon Jan 22, 2007 2:37 pm

]]> 2007-01-21T20:47:21-04:00 2007-01-21T20:47:21-04:00 https://forum.eggheads.org/viewtopic.php?p=69802#p69802 <![CDATA[little help please]]>

Code: 

bind PUB m|o !RDS find:rdsproc find:rds {nickname hostname handle channel arguments} {  foreach chan [channels] {    foreach user [chanlist $chan] {      if {[string match *RDS* $user]} {        set channels($chan) [expr {![info exists channels($chan)]?0:$channels($chan)+1}]      }    }  }  if {![array size channels]} {    putserv "NOTICE $nickname :Found no users."  } {    putserv "PRIVMSG $channel :[join [array get channels] " | "]."  }}

Statistics: Posted by Sir_Fz — Sun Jan 21, 2007 8:47 pm

]]> 2007-01-21T15:47:13-04:00 2007-01-21T15:47:13-04:00 https://forum.eggheads.org/viewtopic.php?p=69793#p69793 <![CDATA[little help please]]> as below

Code: 

bind PUB m|o !RDS find:rds proc find:rds {nickname hostname handle channel arguments} {   if {[array exists channels]} {     array unset channels   }   array set channels {}   foreach chan [channels] {     foreach user [chanlist $chan] {       if {[string match *RDS* $user]} {         set channels($chan) [expr {![info exists channels($chan)]?0:[incr $channels($chan)]}]       }     }   }   if {![array size channels]} {     putserv "NOTICE $nickname :Found no users."   } else {     putserv "PRIVMSG $channel :[join [array get channels] " | "]."   } }
but all i keep getting is
Tcl error [find:rds]: can't read "0": no such variable

thanks for trying

Statistics: Posted by petea4 — Sun Jan 21, 2007 3:47 pm

]]> 2007-01-21T15:02:23-04:00 2007-01-21T15:02:23-04:00 https://forum.eggheads.org/viewtopic.php?p=69789#p69789 <![CDATA[little help please]]>

Code: 

bind PUB m|o !RSC find:rscproc find:rsc {nickname hostname handle channel arguments} {  if {[array exists channels]} {     array unset channels  }  array set channels {}  foreach chan [channels] {    foreach user [chanlist $chan] {      if {[string match *RSC* $user]} {        set channels($chan) [expr {![info exists channels($chan)]?0:[incr $channels($chan)]}]      }    }  }  if {![array size channels]} {    putserv "NOTICE $nickname :Found no users."  } else {    putserv "PRIVMSG $channel :[join [array get channels] " | "]."  }}
Untested :)

Statistics: Posted by metroid — Sun Jan 21, 2007 3:02 pm

]]> 2007-01-21T11:14:58-04:00 2007-01-21T11:14:58-04:00 https://forum.eggheads.org/viewtopic.php?p=69787#p69787 <![CDATA[little help please]]> im lookin for a script that will scan all channels its in and report any nicks containing RSC

i.e
<me>!RSC
<bot> |channel A has 33| |channel B has 12| |channel C has 55| all nicks contain RSC

Statistics: Posted by petea4 — Sun Jan 21, 2007 11:14 am

]]>