source:
data/tags/old_07_june/trunk/bin/irc.tcl
@
7301
Last change on this file since 7301 was 5180, checked in by dafrick, 16 years ago | |
---|---|
File size: 188 bytes |
Line | |
---|---|
1 | proc every {ms body} { eval $body; after $ms [list every $ms $body] } |
2 | package require irk |
3 | set conn [irk::connect datacore $nickname] |
4 | irk::join $conn #orxonox |
5 | every 25 {} |
6 | vwait termination |
Note: See TracBrowser
for help on using the repository browser.