This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.

For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.

Search found 86 matches

Go to advanced search

by Xpert
Sat Mar 13, 2004 6:27 am
Forum: Archive
Topic: eggdrop runs, but doesn't connect?
Replies: 8
Views: 2257

indigo wrote:set servers {
irc.quakenet.org
}
Should be:

Code: Select all

set servers { 
  irc.quakenet.org:6667 
}
by Xpert
Sat Mar 13, 2004 6:26 am
Forum: Archive
Topic: convert mirc script to tcl
Replies: 23
Views: 4578

Hmmmm....
So, do it every 20 or 30 seconds :)
by Xpert
Sat Mar 13, 2004 5:29 am
Forum: Archive
Topic: help with public command
Replies: 16
Views: 3515

Try this code: bind pub o|o !act pub:act proc pub:act {nick host hand chan arg} { global botnick if {![auth:check $hand]} { puthelp "NOTICE $nick :You aren't authorized." return 0 } if {[llength $arg] < 2} { notice $nick "Usage: !act <chan> <what>" return 0 } set thechan "[l...
by Xpert
Sat Mar 13, 2004 5:04 am
Forum: Archive
Topic: help with public command
Replies: 16
Views: 3515

detonated wrote:i've just edited the coding n rehashed the bot. and it doesnt seem to have any effect :cry: this stupid bot is even defying the bot-owner!
Do you have the "auth:check" proc?
by Xpert
Sat Mar 13, 2004 4:42 am
Forum: Archive
Topic: convert mirc script to tcl
Replies: 23
Views: 4578

Try to chagne the:

Code: Select all

utimer 10 [list slowmsg $file [tell $f]]
to:

Code: Select all

timer 1 [list slowmsg $file [tell $f]]
It will do the timer every 1 minute.
by Xpert
Sat Mar 13, 2004 4:39 am
Forum: Archive
Topic: help with public command
Replies: 16
Views: 3515

Re: help with public command

notice $nick "I'm not on that channel." TCL scripts doesn't support only "notice". You should insert the "notice" command into "puthelp" command, like this: puthelp "NOTICE $nick :MESSAGE" Your script should be like that: bind pub o|o !act pub:act p...
by Xpert
Fri Mar 12, 2004 3:37 pm
Forum: Archive
Topic: eggdrop runs, but doesn't connect?
Replies: 8
Views: 2257

Check these lines in your conf file:
set servers {
}
and:
# What is your network?
# 0 = EFnet (non +e/+I Hybrid)
# 1 = IRCnet
# 2 = Undernet
# 3 = DALnet
# 4 = +e/+I Hybrid
# 5 = Others
set net-type 5
by Xpert
Fri Mar 12, 2004 3:33 pm
Forum: Archive
Topic: error in relay.tcl
Replies: 1
Views: 819

You forgot the "vict" :)

Code: Select all

bind mode - * send_mode
proc send_mode {nick uhost hand chan mchg vict} {
  if {[string first "b" [lindex $mchg 0]]} {
    send_across "ban" $chan $nick $mchg
  }
}
by Xpert
Fri Mar 12, 2004 11:58 am
Forum: Archive
Topic: convert mirc script to tcl
Replies: 23
Views: 4578

No problem :)
by Xpert
Fri Mar 12, 2004 8:19 am
Forum: Archive
Topic: convert mirc script to tcl
Replies: 23
Views: 4578

bind join - * join:story proc join:story {nick host hand chan} { global botnick if {$nick == $botnick} { slowmsg "story.txt" "$chan" } } proc slowmsg {file chan {pos 0}} { set f [open $file] seek $f $pos if {[gets $f line]>-1} { putserv "privmsg $chan $line" utimer 10 ...
by Xpert
Thu Mar 11, 2004 2:08 pm
Forum: Archive
Topic: multiples conditions, have better way?
Replies: 8
Views: 1848

Sorry, i forgot about the strlwr :P
by Xpert
Thu Mar 11, 2004 1:52 pm
Forum: Archive
Topic: multiples conditions, have better way?
Replies: 8
Views: 1848

if {([lindex $text 0] == "commands") || ([lindex $text 0] == "rosters") || ([lindex $text 0] == "rules") || ([lindex $text 0] == "servers")} { pub:learn:add $nick $chan[lrange $text 0 end] return 0 } Don't forget the "(,)" if you have more than one ...
by Xpert
Thu Mar 11, 2004 1:46 pm
Forum: Archive
Topic: convert mirc script to tcl
Replies: 23
Views: 4578

bind join - * join:story proc join:story {nick host hand chan} { global botnick if {$nick == $botnick} { slowmsg "story.txt" } } proc slowmsg {file {pos 0}} { set f [open $file] seek $f $pos if {[gets $f line]>-1} { putserv "privmsg #channel $line" utimer 10 [list slowmsg $file ...
by Xpert
Thu Mar 11, 2004 1:09 pm
Forum: Archive
Topic: Some fairly easy TCL questions
Replies: 14
Views: 2965

user wrote:I think you should have read my previous post. Do you mean 'pub'
It worked on my eggdrop with the bind pubm.... :-?
by Xpert
Thu Mar 11, 2004 1:07 pm
Forum: Archive
Topic: convert mirc script to tcl
Replies: 23
Views: 4578

Replace:

Code: Select all

putserv "privmsg #channel $line"
to:

Code: Select all

putserv "privmsg #channel :$line"
:)

Go to advanced search