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

by Jag
Mon Mar 22, 2004 11:25 am
Forum: Archive
Topic: lreplace question
Replies: 6
Views: 3745

Thank you all :)
by Jag
Mon Mar 22, 2004 8:28 am
Forum: Archive
Topic: lreplace question
Replies: 6
Views: 3745

Thanks, it works! :)

last question, how can i regsub all the colors/bolds/italics (\003,\002\037) from line?

Thanks again :P
by Jag
Sun Mar 21, 2004 2:32 pm
Forum: Archive
Topic: lreplace question
Replies: 6
Views: 3745

lreplace question

I have the line:
1.2.3.4
How can i replace these lines to be:
1*2*3*3
With the [lreplace] command?

I have read the manual of this command, but i didn't understand.
Hope that you'll help me, thanks :)
by Jag
Tue Mar 16, 2004 1:27 pm
Forum: Archive
Topic: .tcl
Replies: 2
Views: 864

10x man :P
by Jag
Tue Mar 16, 2004 12:11 pm
Forum: Archive
Topic: .tcl
Replies: 2
Views: 864

.tcl

(jag) .tcl putserv "PRIVMSG jag :?"
(Jagbot) What? You need '.help'
(jag) .chattr jag
(Jagbot) [18:07] #jag# chattr jag
(Jagbot) Global flags for jag are now +hjmnoptvx.
I'm the owner of the bot.
Why it's not working:
?:(
by Jag
Wed Dec 10, 2003 8:23 am
Forum: Archive
Topic: Reading from a file
Replies: 8
Views: 2704

It works!
Thanks man :)
by Jag
Wed Dec 10, 2003 6:09 am
Forum: Archive
Topic: Reading from a file
Replies: 8
Views: 2704

Thanks, it helps.
But, what about the:
Jag wrote: But, how can i do that when it get to the end of the file, it will go back to the start (go again from the first line to the end of the file) ?
?
10x :P
by Jag
Tue Dec 09, 2003 2:44 pm
Forum: Archive
Topic: Sockets question
Replies: 3
Views: 1756

10x :P
by Jag
Tue Dec 09, 2003 2:35 pm
Forum: Archive
Topic: Reading from a file
Replies: 8
Views: 2704

Thanks, i tried this: proc slowmsg {file {pos 0}} { set f [open $file] seek $f $pos if {[gets $f line]>-1} { putserv "privmsg #Jag $line" timer 3 [list slowmsg $file [tell $f]] } { } close $f } slowmsg "news.txt" And it's works fine. But, how can i do that when it get to the end ...
by Jag
Fri Dec 05, 2003 3:36 pm
Forum: Archive
Topic: Sockets question
Replies: 3
Views: 1756

Sockets question

Hi, I have a little question about this script: proc socks_monitor {nick ip} { global hst prt sport set hst "$ip" set prt "1080" catch {socket $hst $prt} sport if {([string range $sport 0 3] == "sock") && ([lindex $sport 1] == "")} { close $sport putse...
by Jag
Sun Nov 30, 2003 3:30 pm
Forum: Archive
Topic: bind time
Replies: 15
Views: 5066

Thanks :P
by Jag
Sun Nov 30, 2003 1:43 pm
Forum: Archive
Topic: bind time
Replies: 15
Views: 5066

bind time

what is the bind time of every 90 mins?
10x :)
by Jag
Sun Nov 16, 2003 1:55 pm
Forum: Archive
Topic: foreach question
Replies: 6
Views: 2005

it's

Code: Select all

[userlist #jag |A]
Thanks :P
by Jag
Sun Nov 16, 2003 10:24 am
Forum: Archive
Topic: foreach question
Replies: 6
Views: 2005

Code: Select all

foreach user [chanlist #jag |A] {
  putlog "$user"
}
(jag) .chattr jag #jag
(KarishBot) [16:21] #jag# (#jag) chattr jag
(KarishBot) Channel flags for jagr on #jag are now +A.
and it didn't work :(
by Jag
Sun Nov 16, 2003 8:26 am
Forum: Archive
Topic: foreach question
Replies: 6
Views: 2005

foreach question

Code: Select all

foreach user [userlist |v #jag] {
whats wrong with this? :(