| View previous topic :: View next topic |
| Author |
Message |
username
Op
Joined: 06 Oct 2005
Posts: 196
Location: Russian Federation, Podolsk
|
 Posted: Thu Dec 27, 2012 3:34 pm Post subject: elspoke.tcl - Easy LastSpoke. |
 |
|
Hello.
This is lastspoke script. You can excemp some nick from output, and create output only for one nick.
Example:
| Quote: | # Show full output.
[23:08:22] <@tvrsh> !last
[23:08:22] <+bionic> [23:05:52] <tvrsh> np Assemblage 23 - Document (Schreibgeschutzt Remix) (MP3@192kbps, 6.62mb)
[23:08:22] <+bionic> [23:05:53] <Info> [video] Assemblage 23 - Document (lyrics) (05:13) @ http://youtu.be/ktBmwP8KfXc
[23:08:23] <+bionic> [23:05:56] <tvrsh> asdf
[23:08:23] <+bionic> [23:05:59] <tvrsh> man
[23:08:23] <+bionic> [23:05:59] <lamestbot> * synonims.tcl = Словарь синонимов деловой лексики. Выдает в канал синонимы указанного слова: http://forum.egghelp.ru/post1518.html#p1518 [tvrsh]
# The chosen nick only.
[23:08:33] <@tvrsh> !last +tvrsh
[23:08:33] <+bionic> [23:05:52] <tvrsh> np Assemblage 23 - Document (Schreibgeschutzt Remix) (MP3@192kbps, 6.62mb)
[23:08:33] <+bionic> [23:05:56] <tvrsh> asdf
[23:08:33] <+bionic> [23:05:59] <tvrsh> man
# Everyone except chosen nick.
[23:25:39] <@tvrsh> !last -tvrsh
[23:25:39] <+bionic> [23:05:53] <Info> [video] Assemblage 23 - Document (lyrics) (05:13) @ http://youtu.be/ktBmwP8KfXc
[23:25:39] <+bionic> [23:05:59] <lamestbot> * synonims.tcl = Словарь синонимов деловой лексики. Выдает в канал синонимы указанного слова: http://forum.egghelp.ru/post1518.html#p1518 [tvrsh]
|
All information keeps in memory, and it clears after .rehash.
Download it here: elspoke.tcl
_________________
Архив TCL скриптов для ботов Eggdrop/Windrop:
http://egghelp.ru/ |
|
| Back to top |
|
 |
spithash
Master
Joined: 12 Jul 2007
Posts: 248
Location: Libera
|
| Posted: Thu Dec 27, 2012 5:51 pm Post subject: |
|
|
Briliant!
If you only could translate the notices in english for us to use, it would be awesome 
_________________
Libera ##rtlsdr & ##re - Nick: spithash
Click here for troll.tcl |
|
| Back to top |
|
|
Football
Master
Joined: 26 Dec 2008
Posts: 205
Location: Quakenet, #Football
|
| Posted: Sat Dec 29, 2012 2:37 pm Post subject: |
|
|
I join that request please..
_________________
Idling at #Football, Quakenet. |
|
| Back to top |
|
|
username
Op
Joined: 06 Oct 2005
Posts: 196
Location: Russian Federation, Podolsk
|
| Posted: Sun Dec 30, 2012 10:59 am Post subject: |
|
|
| Code: | if {[info exists elspoke(lasttime,$chan)] && [expr $elspoke(lasttime,$chan) + $elspoke(delay)] > [clock seconds]} {
putserv "NOTICE $nick :$elspoke(color1)You can use one request in $elspoke(color2)$elspoke(delay) $elspoke(color1)[lindex {. second seconds seconds} [::elspoke::elspoke_numgrp $elspoke(delay)]]."
putserv "NOTICE $nick :$elspoke(color1)Wait $elspoke(color3)[expr $elspoke(delay) - [expr [clock seconds] - $elspoke(lasttime,$chan)]] $elspoke(color1)[lindex {. second seconds seconds} [::elspoke::elspoke_numgrp [expr $elspoke(delay) - [expr [clock seconds] - $elspoke(lasttime,$chan)]]]] and try again."
return 0
} |
_________________
Архив TCL скриптов для ботов Eggdrop/Windrop:
http://egghelp.ru/ |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
