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

Go to advanced search

by micky
Mon Jan 24, 2005 2:03 pm
Forum: Archive
Topic: first/last line
Replies: 4
Views: 2906

very thx!:)
by micky
Mon Jan 24, 2005 12:41 pm
Forum: Archive
Topic: first/last line
Replies: 4
Views: 2906

but "file" is: FIR random text1 random text2 random text3 FIRST random text4 random text5 random text6 LAST random text7 random text8 random text9 NEXT [...] and i need to write to channel: nick: .s FIRST LAST bot: random text4 bot: random text5 bot: random text6 :) thx for help:)
by micky
Mon Jan 24, 2005 8:27 am
Forum: Archive
Topic: first/last line
Replies: 4
Views: 2906

first/last line

Someone write script like this:

cmd: .s FIRST LAST

Code: Select all

FIR
text1
text2
text3
FIRST
text4
text5
text6
LAST
text7
text8
text9
NEXT
[...]
script return:
text4
text5
text6
all between FIRST and LAST.
Thx for help
by micky
Sun Jan 23, 2005 8:43 am
Forum: Archive
Topic: Help..
Replies: 0
Views: 926

Help..

Someone write this in one script? proc bf_callback {sock} { global bfNICK bfCOU foreach line [split [egghttp:data $sock] \n] { if {[string match "*<font size=3 class="text3"><b>*" $line] && [string match "*$bfCOU*" $line]} { regsub -all -- {<[^>]*>} $line "...
by micky
Sat Jan 15, 2005 2:51 pm
Forum: Archive
Topic: Jump to line
Replies: 3
Views: 1515

this code not work :/
by micky
Sat Jan 15, 2005 9:55 am
Forum: Archive
Topic: Jump to line
Replies: 3
Views: 1515

Jump to line

How i can jump to line in txt:

Code: Select all

RANDOM0
Constant  
RANDOM1 
RANDOM2
RANDOM3 
RANDOM4
RANDOM5
Code:

Code: Select all

foreach line [split [egghttp:data $sock] \n] {
if {[string match "*Constant*" $line]} {
putlog "$line"
# And i need to write line RANDOM4
}}
thx
by micky
Wed Dec 29, 2004 4:37 pm
Forum: Scripting Help
Topic: Encrypt
Replies: 29
Views: 21602

no, no, i need crypt like that http://www.tclshack.com/modules.php?op= ... tit&lid=22
by micky
Wed Dec 29, 2004 3:43 pm
Forum: Scripting Help
Topic: Encrypt
Replies: 29
Views: 21602

Encrypt

Some of you know how encrypt tcl? (http://mini.net/tcl/728)
Maybe some of you would be so kind and tell me how i can encrypt scripts or how to use obfuscation.
by micky
Mon Dec 20, 2004 9:45 am
Forum: Archive
Topic: Global variables?
Replies: 4
Views: 1853

awyeah:

Code: Select all

Tcl error [back]: can't read "test_nick": no such variable
:/

user:
1. bind msgm - * back
2. Bot always replay: $arg1[1]: http://link.com/FYTD

[1] my arg1 from procedure test

Walked it about it? ;]
Sorry, for my monkey language :>
by micky
Mon Dec 20, 2004 7:14 am
Forum: Archive
Topic: Global variables?
Replies: 4
Views: 1853

Global variables?

bind pub !test test bind msgm - back proc back {n u h a} { if {$nick != "askBOT"} {return 0} set arg1 [lindex $a 0] set arg2 [lrange $a 1 end] puthelp "PRIVMSG #my_channel :$arg1 $arg2" } proc test {n uh h c a} { set arg1 [lindex $a 0] puthelp "PRIVMSG $askBOT :$arg1" ...
by micky
Mon Dec 13, 2004 11:17 am
Forum: Archive
Topic: parser
Replies: 17
Views: 6510

parser

Hi, i need script who parse mode +o. Like this:

1. mode +ooo n1 n2 n3
tokick: n1 n2 n3
2.
mode +o-v+o n1 n2 n3
tokick: n1 n3
3.
mode +v+o-o n1 n2 n3
tokic: n2
etc..
:)

Go to advanced search