| |
| |
| |
|
Page: 1 2 3 4 5
Comments:
<0> info -> http://www.tcl.tk/man/tcl8.4/TclCmd/info.htm
<1> yeah
<1> wtf
<1> info
<1> not exists
<1> ![exists $invite($invite_who)]
<1> ggrrr
<1> paste buffer
<1> if([info exists cmdArray]) {
<1> for example
<1> +!
<1> :/
<2> i got it
<2> yeah
<2> ![info exists invite($invite_who)]
<2> thanks =]
<3> hello
<3> ell
<3> cibai
<4> how can i make my eggdrop ignore any msg-flood protection so it would just echo like 100 lines at the same time?
<5> just curious but i am looking for a public !search + !send or !get tcl to run a public file server on ... not dcc stuff...any ideas?
<6> is there a command to list all the users on a bot?
<7> userlist
<8> Robb`: #753 (1152 clicks) Tcl: Triton conqueror lindex {[skin]} {[tcl]} AltLimbo Ariel BMarley deadred digit Dodge dolby dukepower energize etch Flounder Founder- future Ghey gmail interp lappend lazyadmin Limbo lset lsort Lucky- maddox Melody MeridiaN Mmmmmmmmm move muaha nexus^ nyooooooo ookazi paste-me pgpkeys Proteus robboth SafeTcl script Sebastian Singles slimjim Slug-o SNERT sodium stable Stupito Superworm Sys1 System1 Ta
<6> ty
<7> np
<1> Robb`: out of intrest wants the performance gain of a string match command over a regexp if any?
<1> as I could clean my script up with regexp over this form of string matches I am using
<1> and might make it slightly more versatile
<4> how can i make my eggdrop ignore any msg-flood protection so it would just echo like 100 lines at the same time?
<1> there is puthelp putserv and putquick iirc
<1> in that order
<1> puthelp is slowest
<1> putquick <text> [options]
<1> Description: sends text to the server, like 'putserv', but it uses a different (and faster) queue.
<1> but echoing 100 lines very fast on some servers will get you kicked
<1> depending on setup
<4> row_ my bot is ircop
<4> so it will not be kicked
<1> :)
<4> but putquick is to slow.
<1> raw cmds then
<1> only other option
<1> can you not byp*** queue?
<4> how ?
<1> can't see a option
<4> i remember someone here made a proc putfast for me once
<1> can you not alter the queue rules in eggdrop.conf?
<4> row_ me neither
<1> meh sod this
<9> lol captus
<1> hmm maybe not infact
<9> captus is back
<4> th3dge
<4> hehe
<4> yeah
<4> how are you doing ;P ?
<9> fine fine, how about you/
<4> just fine... :)
<4> got some problem with eggy though :P
<4> as you can see
<9> ah
<1> how do you do loops in tclsh?
<1> it won't let me :/
<10> while/for
<1> ah it is
<1> hmm
<10> ;while {1==1} {puts "hello"}
<8> Skeddie: #797 (stdout) hello
<8> Skeddie: #797 (998544 clicks) Tcl error: Timed out after 999ms.
<8> Skeddie: There's 3755 lines, but I'm not gonna show you the rest of them! =P
<1> if $text is something like "--count 10 --hits foo" while ([regexp -- {--?([A-z]+)( |=)([^ ]+)} $text matches field skip1 value]) {set field ; set value ; regsub -- $matches $text "" text ; } <-- why does that not work?
<0> if -> http://www.tcl.tk/man/tcl8.4/TclCmd/if.htm
<1> do I need to escape the closing brackets in the regexp?
<10> cause it's while {} {}
<1> oops
<10> not while () {}
<1> my bad
<1> hmm did not work tho :/
<1> did not set anything it seems
<10> yeh, could be other eerors but can't read that
<1> hehe
<1> the regexp works, that I know.
<1> the regsub should be fine too
<10> ;set text "--ggfgfg" ;puts [regexp -- {--?([A-z]+)( |=)([^ ]+)} $text matches field skip1 value]
<8> Skeddie: #810 (stdout) 0
<1> you need a value after it
<10> what's this 0_o: $text matches field skip1 value
<1> :)
<1> the regexp does work
<10> ;set text "--count 10 --hits foo" ;puts [regexp -- {--?([A-z]+)( |=)([^ ]+)} $text matches field skip1 value]
<8> Skeddie: #815 (stdout) 1
<10> hmz
<10> just a sidenot, but you know that [A-z] also includes _
<1> it seems to of gone thro the while and regsubed it
<1> yeah infact I do
<1> needs to bee nocase
<10> oki :)
<1> or A-Za-z
<1> I am just been lazy for testing
<1> :P
<10> or use regexp -nocase ?
<1> nah, case is important for some of the values.
<1> so I will alter it before I use it in my script
<1> I just want to work out why it never echo'ed stuff with the sets in te while statement yet regsub removed the found matches
<1> skip1 is the space or = sign between the field and value, if I knew howto not capture it I would :/
<1> ah I do infact
<1> ?:
<1> is no capture
<10> do putlog "$field" or something
<10> instead of set
<1> putlog is a eggdrop thing
<10> ha k
<10> :p
<10> I'm off
<1> laters
<1> :)
<1> regexp -- {--?([^ ]+)(?: |=)([^ ]+)} $text matches field value
<8> row_: #841 (1506 clicks) Tcl: 1
<1> thats better
<1> :)
<11> !addword
<11> BL4DE
<12> yes ?
<11> add me to the !addword-bot
<12> 1. its leps
<12> 2. its !addwhat
<11> lol, k. sorry. =)
<11> !addwhat
<11> hm, could've been for +o's..
<12> it is
<12> chanmode not botmode tho :)
<11> btw, have you ever tried IPv6 with dynamic IPv4?
<12> why would i want to use ipv6
<12> as it is now its useless, we wont have it here in dk for years :)
<11> you'll be able to use it without rdns on your IPv4 (as vhost), that's the only thing i want to do (i'm bored as usual)
<12> :)
<12> i cant quite see how that'd work tho
<11> Reverse IPv6 hosting allows you to modify and maintain your reverse DNS records for your reverse IPv6 subnet. It is not for single IPv6 IPs, but rather the subnet which will get ***igned to you.
<11> /afraid.org
<1> how can I turn a string into a list by using split, and still insert a single list item if it has not spaces?
<1> nm
<1> worked it out
<1> :)
<1> list does do it
Return to
#eggtcl
or
Go to some related
logs:
#politics
#computers
#politics
#nintendo
Hardware for RAS
flash 8 load swf specific frame
fat wallrus
#winxp
PlexTools BlueScreen
#gamedev
|
|