| |
| |
| |
|
Page: 1 2
Comments:
<0> how do i kill the timer then <0> utimer 5 [list puts $whatever] <0> that one <0> if i dont want it to countdown anyway <1> oh <1> set timerID [utimer 5 [list puts $whatever]] <1> killutimer $timerID <1> or <0> ill just use that <1> ok <1> you can loop through all the timers and check to see if its the one you want <1> foreach timer [utimers] { if {[lindex $timer 1] == "my_proc_name"} { killutimer [lindex $timer 2]} } <0> ok <2> ; proc throw { angle speed } { puts "You throw the stone at a speed of $speed m/s it touches ground [expr round(($speed/9.81)*sin(2*angle*(3.14159265/180)))]m's away." } <3> Gotisch: #2068 (341 clicks) Tcl:
<2> ;throw 45 10 <3> Gotisch: #2069 (810 clicks) Tcl error: syntax error in expression "round((10/9.81)*sin(2*angle*(3.14159265/180)))": variable references require preceding $ <2> ; proc throw { angle speed } { puts "You throw the stone at a speed of $speed m/s it touches ground [expr round(($speed/9.81)*sin(2*$angle*(3.14159265/180)))]m's away." } <3> Gotisch: #2070 (395 clicks) Tcl: <2> ;throw 45 10 <3> Gotisch: #2071 (stdout) You throw the stone at a speed of 10 m/s it touches ground 1m's away. <2> ;throw 45 100 <3> Gotisch: #2072 (stdout) You throw the stone at a speed of 100 m/s it touches ground 10m's away. <2> i think my formula is wrong <2> ;throw 90 100 <3> Gotisch: #2074 (stdout) You throw the stone at a speed of 100 m/s it touches ground 0m's away. <2> ;throw -90 100 <3> Gotisch: #2075 (stdout) You throw the stone at a speed of 100 m/s it touches ground 0m's away. <2> ;throw -45 100 <3> Gotisch: #2076 (stdout) You throw the stone at a speed of 100 m/s it touches ground -10m's away. <2> ;throw -45 9.81 <3> Gotisch: #2077 (stdout) You throw the stone at a speed of 9.81 m/s it touches ground -1m's away. <2> ;throw 70 10 <3> Gotisch: #2078 (stdout) You throw the stone at a speed of 10 m/s it touches ground 1m's away. <2> ;throw 70 45 <3> Gotisch: #2079 (stdout) You throw the stone at a speed of 45 m/s it touches ground 3m's away. <4> socket ? <3> socket -> http://Tcl.Tk/man/tcl8.5/TclCmd/socket.htm <5> socket -> http://www.tcl.tk/man/tcl8.4/TclCmd/socket.htm <0> ;set b \00312 <3> anc: #2185 (149 clicks) Tcl: <0> ;set test test <3> anc: #2186 (139 clicks) Tcl: test <0> ;puts $b$test <3> anc: #2187 (stdout) test <0> ;puts ($b$test <3> anc: #2188 (stdout) (test <0> ;puts $b($b$test <0> ;puts \00311($b$test <3> anc: #2189 (stdout) (test <0> ;set test "1 2" <3> anc: #2190 (151 clicks) Tcl: 1 2 <0> ;llength $test <3> anc: #2191 (150 clicks) Tcl: 2 <6> startkeylogger <7> lol <7> why would one do that and not wait for the result ;) <8> too many morons in this world <7> yeh <7> seems so <8> i thought it was fun too, when i was 12 <7> i tried it once... but at least I stood there and waited to get kicked :D <8> if he had a bnc i'd mailed his provider :) <7> hehe <7> but obviously he doesn't <7> let's ddos him <7> ^^ <0> who ? <0> dan-r ? <8> mm <7> yeh <2> no <2> lets just give him no attention at all <8> he didnt answer my "reported to isp" pm :( <2> and btw. i have no idea who you are talking about because i dont pay attention to those peps <9> any1 used tclpro?
<10> =) <11> aye FireEgl op mee plz ;] <10> can't you ask the bot? <11> i havnt been added to the bots yet :/ <11> ive been man-opped ;p <10> uh, that's not true.. You're on the bots, with a p***word set. <11> which bots? <10> Are you the real smokey? You're scaring me.. <11> only bot i know im on is robb's bot <10> SafeTcl is one. <11> lemme try <11> well ill be dammed :x <11> btw thats my bot. <11> ill bbl in like 10-15 minutes. btw do i get a free shell?! :P <10> hrm.. make sure it's set -bitch -revenge -revengebot and stopnethack-mode 0 <11> it is <11> but the flood is set to default. <10> ssh to new@ariel.atlantica.us <11> alright. btw how did you make that ? <11> i'd love that myself :P <10> Make what? <11> the account auto create. <4> yo FireEgl: you ever tried using tcl-sockets to connect to msn messenger? <11> brb in 15mins <10> oh.. It's just a bash script...I just...wrote it. =P <10> hest: no <2> hest there is a wiki page about that imho <4> arg <4> there is? <4> i found a protocol, but cant get the socket to connect <4> found it, Gotisch, thanks <2> np <2> tell me if it works :] <12> anyone knows how to install irssi on mandrake? <12> =( <12> just compile as root? <10> That's one way I guess.. Don't they have a package for it already?? <4> i aint gonna try it <4> im gonna look at the sourcecode <12> no not for mandrake <10> Well install Debian or Ubuntu then.. They have a package for it. =P <12> bah :P <12> I just finnished installing mandrake :P <12> well im gonna compile the source see what happenes <12> happens* <10> =) <11> Robb, use ./configure; make; make install <11> ;] <11> BAH FireEgl it couldnt set my acct p***wd. <11> FIX! <10> You prolly typed it wrong the second time. <10> Hole on.. I'll add your account. =/ <11> wait <11> i did type it wrong, it worked. but i'm restricted! :/ <10> ffs <8> noone would allow u to do anything ;) <11> heh. <10> smokey: what's your account name? <11> narq <11> sorry, editing my menu for yur server <10> Okee, I gave you more access. <11> sweet ;D <11> danka <11> btw, do you still have the 1.6.17 ipv6 patch layin around? <10> It's on www.egghelp.org <11> ive tried it, it fails. <10> On my shell, you can just type "geteggdrop" and it'll install eggdrop-ipv6 <11> yeah i read /etc/motd :p <10> The one from egghelp is the one I used.
Return to
#tcl or Go to some related
logs:
#nhl callunacard ebay what does checking nvram mean
Setngs
#nintendo #politics #computers #politics vfinx cusip
#nintendo
|
|