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 18 matches

by pollar
Sat Apr 23, 2005 5:21 am
Forum: Archive
Topic: timer - does not give exact results (1minute approx 45 secs)
Replies: 6
Views: 2773

Code: Select all

set seconds [expr $minutes * 60]

Code: Select all

utimer [expr $minutes * 60] [list puthelp "PRIVMSG $nick :\0034TIMERARLARM!!!: \0030$xtmsg ist fertig!"] 
by pollar
Sat Apr 23, 2005 4:00 am
Forum: Archive
Topic: tail file & exec question
Replies: 2
Views: 1780

Code: Select all

set fileout [exec cat $file | grep -E "sshd|kernel"]
by pollar
Sat Apr 23, 2005 3:55 am
Forum: Archive
Topic: How to add a script ?
Replies: 2
Views: 1612

Just put your script into 'scripts' directory and add line at the end of your config file:

Code: Select all

source scripts/script.tcl
Then rehash or restart your bot using dcc chat commands '.rehash' or '.restart'.
by pollar
Fri Oct 31, 2003 4:34 am
Forum: Archive
Topic: Lots of eggdrops in my shell
Replies: 5
Views: 1494

Thank you very much :). It really helped. I have recompiled Tcl on my pc with threads disabled option. It seems everything works fine.
by pollar
Thu Oct 30, 2003 3:31 pm
Forum: Archive
Topic: Lots of eggdrops in my shell
Replies: 5
Views: 1494

Yes u r right. When i killed one of these processes, others died too.
by pollar
Thu Oct 30, 2003 3:09 pm
Forum: Archive
Topic: Lots of eggdrops in my shell
Replies: 5
Views: 1494

Lots of eggdrops in my shell

hello, I compiled eggdrop on my shell. Processes on my shell before eggdrop execution was: viktorina@alus:~/eggdrop$ ps x PID TTY STAT TIME COMMAND 4758 pts/8 S 0:00 bash 4773 pts/8 R 0:00 ps x viktorina@alus:~/eggdrop$ Then I started my bot: viktorina@alus:~/eggdrop$ ./eggdrop tr.conf Eggdrop v1.6....
by pollar
Sun Jun 22, 2003 9:21 am
Forum: Archive
Topic: replace part of string
Replies: 4
Views: 1383

A little correction :)


Code: Select all


proc removeamp {string} { 
  regsub -all " " $string "" string
  regsub -all "amp;" $string "" string 
  return $string 
} 

by pollar
Sun Jun 22, 2003 9:18 am
Forum: Archive
Topic: replace part of string
Replies: 4
Views: 1383

Try this:

Code: Select all


proc removeamp {string} {
  regsub -all "amp;" $string "" string
  return $string
}
by pollar
Sun Jun 22, 2003 9:04 am
Forum: Archive
Topic: Starting a Value to count.
Replies: 1
Views: 719

I think you should define testupdate as global variable in status:evnt:connect. Try this: proc status:evnt:connect {filter} { global testuptime if {![info exits $testuptime]} { set testuptime [clock clicks -milliseconds] } putlog "$test" } proc status:evnt:disconnect {filter} { global test...
by pollar
Sun Jun 22, 2003 8:57 am
Forum: Archive
Topic: error detection and correction
Replies: 1
Views: 685

You don't need any correction procedures As I understood you have a PUBM bind, witch binds a procedure named bdkb_check_proc. Here's an example code: proc bdkb_check_proc { nick host hand chan text } { global bdkb_badwords set text [split $text] # now you can check a text for "bad words" b...
by pollar
Wed Jun 18, 2003 6:53 am
Forum: Archive
Topic: I need help with TCL script
Replies: 3
Views: 1665

:))

Well...
When you'll start writing your own scripts and will stop ripping you will be able to repair scripts and make your own ones.

:evil: I hate [censored]' ripperzzz!!! :evil:
by pollar
Wed Jun 18, 2003 6:36 am
Forum: Archive
Topic: help please
Replies: 4
Views: 1491

You should use: \[Only When Doing Pranks\] instead of [Only When Doing Pranks] When you use [Only When Doing Pranks], you are calling a procedure named Only with 3 args (When, Doing, Pranks). It's wrong for your situation. So replace [ ] with \[ \] and help will work I think... :wink: I don't unders...
by pollar
Tue Feb 04, 2003 5:33 am
Forum: Archive
Topic: Just wanting a smal script
Replies: 4
Views: 1403

Try this: # config. set your-chan "#test" set patch-to-your-html-file "/home/patch/to/test.html" # script: bind TOPC - "${your-chan} *" topc:change proc topc:change {nick host hand chan topic} { global {patch-to-your-html-file} if {![catch {set file [open ${patch-to-you...
by pollar
Thu Jan 09, 2003 5:46 pm
Forum: Archive
Topic: Getting file timestamp ;)
Replies: 3
Views: 980

Shorter way...

Code: Select all

set newsfile [::http::geturl http://xxx.xxx.xxx/xxx.xxx] 
upvar #0 $newsfile state

array set meta $state(meta)

#just for testing :)
putquick "PRIVMSG $nick :Last Modified : $meta(Last-Modified)"       
putquick "PRIVMSG $nick :File date : $meta(Date)"
by pollar
Thu Jan 09, 2003 2:00 pm
Forum: Archive
Topic: kickban script problem
Replies: 14
Views: 2664

hm..

You are right, there will be extra \'s, but these simbols is not important in nicks or channel names also they are not printed in messages, when they r sent to an IRC server. I think the author of this topic should try my suggested method and then say to us who was right. Do you agree with this stri...