| View previous topic :: View next topic |
| Author |
Message |
caesar
Mint Rubber
Joined: 14 Oct 2001
Posts: 3741
Location: Mint Factory
|
 Posted: Thu Dec 12, 2013 11:28 am Post subject: |
 |
|
That doesn't seem to be Russian, or it is and Google Translate fails to recognize it.. Anyway, you don't need any translation cos it's quite simple and there aren't many stuff to configure.
All you have to edit is located here:
| Code: |
array set allmusic {
pref {!}
binds {allmusic allm amus}
searchres 3
biolength 500
msg 1
delay 10
color1 \00314
color2 \00303
color3 \00305
version "allmusic.tcl version 1.4"
author "tvrsh"
}
|
The pref (in this case it's "!") is the sign that comes in front of the commands it will answer to. Having a sign in front helps as you won't trigger it by accident when mentioning any of the words you set it to answer.
The binds combined with the pref are the exact commands it will answer to. In this case it will reply when someone uses: !allmusic, !allm or !amus.
The searchres it's used to limit the displayed result and the biolength should be self explanatory.
The msg is used to make it work with private messages sent to the bot, not just with commands on the channel.
The delay should be used to prevent users from flooding it with requests.
The color 1, 2 and 3 should be self explanatory.
Anything else? 
Edit:
| Quote: |
putserv "PRIVMSG $chan :$allmusic(color1)Используйте $allmusic(color2)$lastbind $allmusic(color3)<название коллектива> $allmusic(color1)для поиска и получаения информации о нем.\003"
|
Warns user about the correct syntax.
| Quote: |
putserv "NOTICE $nick :$allmusic(color1)Запрос не чаще одного раза в $allmusic(color2)$allmusic(delay) $allmusic(color1)[lindex {. секунду секунды секунд} [::allmusic::allmusic_numgrp $allmusic(delay)]]."
putserv "NOTICE $nick :$allmusic(color1)Подождите $allmusic(color3)[expr $allmusic(delay) - [expr [clock seconds] - $allmusic(lasttime,$chan)]] $allmusic(color1)[lindex {. секунду секунды секунд} [::allmusic::allmusic_numgrp [expr $allmusic(delay) - [expr [clock seconds] - $allmusic(lasttime,$chan)]]]] до следующего запроса."
|
My guess is that here it warns the user that he's flooding the bot and should wait a specified amount of time.
_________________
Once the game is over, the king and the pawn go back in the same box. |
|
| Back to top |
|
 |
janari
Voice
Joined: 12 Dec 2013
Posts: 4
|
| Posted: Wed Dec 18, 2013 11:36 am Post subject: |
|
|
Okay, thank you, it helps a lot.
My intentions were that the bot gives only one, perhaps two lines of info about each search, but I think I can get it configured so it's not too spammy even in an active chan.
And yeah, maybe that Запрос не чаще одного раза etc isn't russian language itself, but notepad++ gives me excactly that kind of jibberish and it might be because I don't have russian language pack installed, so it doesn't recognize it properly, the author of this script and the script itself are from egghelp.RU |
|
| Back to top |
|
|
username
Op
Joined: 06 Oct 2005
Posts: 196
Location: Russian Federation, Podolsk
|
| Posted: Thu Dec 19, 2013 12:11 pm Post subject: |
|
|
Its Russian.
| Code: | if {$text == ""} {
putserv "PRIVMSG $chan :$allmusic(color1)Use $allmusic(color2)$lastbind $allmusic(color3)<band name> $allmusic(color1)to get some information about choosen band.\003"
return 0
} |
| Code: | if {[info exists allmusic(lasttime,$chan)] && [expr $allmusic(lasttime,$chan) + $allmusic(delay)] > [clock seconds]} {
putserv "NOTICE $nick :$allmusic(color1)You can use one request in $allmusic(color2)$allmusic(delay) $allmusic(color1)[lindex {. second seconds seconds} [::allmusic::allmusic_numgrp $allmusic(delay)]]."
putserv "NOTICE $nick :$allmusic(color1)Wait $allmusic(color3)[expr $allmusic(delay) - [expr [clock seconds] - $allmusic(lasttime,$chan)]] $allmusic(color1)[lindex {. second seconds seconds} [::allmusic::allmusic_numgrp [expr $allmusic(delay) - [expr [clock seconds] - $allmusic(lasttime,$chan)]]]] and try again."
return 0
} |
_________________
Архив TCL скриптов для ботов Eggdrop/Windrop:
http://egghelp.ru/ |
|
| Back to top |
|
|
spithash
Master
Joined: 12 Jul 2007
Posts: 248
Location: Libera
|
| Posted: Thu Dec 19, 2013 5:29 pm Post subject: |
|
|
You are awesome
I love this script.
_________________
Libera ##rtlsdr & ##re - Nick: spithash
Click here for troll.tcl |
|
| Back to top |
|
|
username
Op
Joined: 06 Oct 2005
Posts: 196
Location: Russian Federation, Podolsk
|
| Posted: Fri Dec 20, 2013 10:54 am Post subject: |
|
|
Thank you, thank you, thank you.
_________________
Архив TCL скриптов для ботов Eggdrop/Windrop:
http://egghelp.ru/ |
|
| Back to top |
|
|
janari
Voice
Joined: 12 Dec 2013
Posts: 4
|
| Posted: Wed Dec 25, 2013 6:19 am Post subject: |
|
|
| Thank you, kind sir! |
|
| Back to top |
|
|
prashant
Voice
Joined: 10 Jan 2014
Posts: 11
Location: irc.rizon.net ~ #pd
|
| Posted: Sun Mar 09, 2014 3:36 pm Post subject: |
|
|
hello mate owner of allmusic script 
can you write these awesome script in English - please it request - thanks in advance mate
there some Error!
| Code: | Tcl error [::allmusic::allmusic_pub]: can't read "formedtext": no such variable
Tcl error [::allmusic::allmusic_pub]: Missing host part: http://www.allmusic.comhttp://www.allmusic.com/artist/mirror-lakes-mn0002917168 |
|
|
| Back to top |
|
|
G00gle
Voice
Joined: 29 Mar 2014
Posts: 2
|
| Posted: Tue Apr 01, 2014 2:25 am Post subject: |
|
|
Tried and not working.
!allmusic eminem
!music eminem
and nothing appeared. |
|
| Back to top |
|
|
username
Op
Joined: 06 Oct 2005
Posts: 196
Location: Russian Federation, Podolsk
|
| Posted: Sat Apr 05, 2014 6:42 am Post subject: |
|
|
| G00gle wrote: | Tried and not working.
!allmusic eminem
!music eminem
and nothing appeared. |
Updated:
| Quote: | <tvrsh> !allm eminem
<@bionic> #1 Name: Eminem, Genre: Rap, Years Active: 1990s - 2010s
<@bionic> #2 Name: Tiye Eminem
<@bionic> #3 Name: Edine, Genre: Pop/Rock, Years Active: 2010s
<@bionic> Eminem | Music Biography, Credits and Discography | AllMusic
<@bionic> Years active: Active 1990s - 2010s.
<@bionic> Genres: Rap. :: Styles: Hardcore Rap / Midwest Rap.
<@bionic> Themes: Cool & Cocky / Drinking / Freedom / Guys Night Out / Hanging Out / Late Night / Politics/Society.
<@bionic> Biography: The best-selling white rapper of all time, alternately comic and confrontational, both hugely talented and highly controversial.
<@bionic> Similar Artists: Influenced by Geto Boys / Influenced by Ice Cube / Associated with Trick Trick / Associated with D12 / Associated with Royce da 5'9" / Influenced by Run-D.M.C.. |
_________________
Архив TCL скриптов для ботов Eggdrop/Windrop:
http://egghelp.ru/ |
|
| Back to top |
|
|
username
Op
Joined: 06 Oct 2005
Posts: 196
Location: Russian Federation, Podolsk
|
| Posted: Sat Apr 05, 2014 6:58 am Post subject: |
|
|
| prashant wrote: | hello mate owner of allmusic script
can you write these awesome script in English - please it request - thanks in advance mate
there some Error!
| Code: | Tcl error [::allmusic::allmusic_pub]: can't read "formedtext": no such variable
Tcl error [::allmusic::allmusic_pub]: Missing host part: http://www.allmusic.comhttp://www.allmusic.com/artist/mirror-lakes-mn0002917168 |
|
And this.
| Quote: | <tvrsh> !allm mirror lakes
<@bionic> #1 Name: Mirror Lakes, Genre: International, Years Active: 2010s
<@bionic> #2 Name: Lake Street Dive, Genre: Jazz, Pop/Rock, R&B, Years Active: 2000s - 2010s
<@bionic> #3 Name: Emerson, Lake & Palmer, Genre: Pop/Rock, Classical, Years Active: 1970s - 2010s
<@bionic> Mirror Lakes | Discography | AllMusic
<@bionic> Years active: Active 2010s.
<@bionic> Genres: International. |
_________________
Архив TCL скриптов для ботов Eggdrop/Windrop:
http://egghelp.ru/ |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
