| View previous topic :: View next topic |
| Author |
Message |
djdem Voice
Joined: 01 Mar 2008 Posts: 4
|
Posted: Sat Mar 01, 2008 7:13 pm Post subject: Need a custom bot for a radio station |
|
|
| If a bot coder could please e-mail me at deminsia@comcast.net or on irc.gamesurge.net #eglnradio and pm EGLN|R|Dem thanks. |
|
| Back to top |
|
 |
iamdeath Master

Joined: 11 Feb 2005 Posts: 323 Location: *HeLL*
|
Posted: Sun Mar 02, 2008 9:02 am Post subject: |
|
|
I'd suggest you to ask your request here and wait if someone reply to you if he wants. In this case we will get to learn many things and in future the question wont be repeated as it will be already answered.
Hope you get my point
peace
death _________________ |AmDeAtH @ Undernet
Death is only the *Beginning*... |
|
| Back to top |
|
 |
djdem Voice
Joined: 01 Mar 2008 Posts: 4
|
Posted: Sun Mar 02, 2008 12:53 pm Post subject: |
|
|
| Good point well basicly i need a shoutcast script that will allow me to add djs and kick the auto dj also each dj needs to be able to set his or her own playlist. Also be able to set sponsors and band list of the bands we sponsor. I have tried a few i found in the archives but they do not have all the features needed. If more info needed let me know. |
|
| Back to top |
|
 |
djdem Voice
Joined: 01 Mar 2008 Posts: 4
|
Posted: Thu Mar 06, 2008 9:48 am Post subject: |
|
|
Ok well i found a script i could change if needed but I need to only I do not know what to change if someone could offer some help.
when i try to !kickdj or !kick which should kick the current dj it says it did but does not can someone look at this line of script and tell me why it does not work.
kick {
putquick "privmasg $nick :Source successfully kicked"
if {[lindex $streamdata 15] == 1} {
set sock [socket $sc::vars(ip) $sc::vars(port)]
puts $sock "GET /admin.cgi?mode=kicksrc HTTP/1.1"
puts $sock "User-Agent:Mozilla"
puts $sock "Host: $sc::vars(ip)"
puts $sock "Authorization: Basic $sc::vars(adpass)"
puts $sock ""
flush $sock
Somewhere in that its not kicking the source any ideas anyone. Would be greatly appreciated. |
|
| Back to top |
|
 |
YooHoo Owner

Joined: 13 Feb 2003 Posts: 939 Location: Redwood Coast
|
Posted: Thu Mar 06, 2008 6:10 pm Post subject: |
|
|
thats not the part thats gonna kick anyone. p.s. it is 'privmsg', not 'privmasg' _________________
Johoho's TCL for beginners
 |
|
| Back to top |
|
 |
djdem Voice
Joined: 01 Mar 2008 Posts: 4
|
Posted: Sat Mar 08, 2008 6:22 pm Post subject: |
|
|
| ok then what should it look like to kick the dj |
|
| Back to top |
|
 |
speechles Revered One

Joined: 26 Aug 2006 Posts: 1398 Location: emerald triangle, california (coastal redwoods)
|
Posted: Thu May 15, 2008 4:17 pm Post subject: |
|
|
| Code: | kick {
putquick "privmsg $nick :Source successfully kicked"
if {[lindex [split $streamdata] 15] == 1} {
set sock [socket $sc::vars(ip) $sc::vars(port)]
### Here is the kick call, cgi event will kicksrc
puts $sock "GET /admin.cgi?mode=kicksrc HTTP/1.1"
puts $sock "User-Agent:Mozilla"
puts $sock "Host: $sc::vars(ip)"
### That password must be correct to authorize the kick
### This is your issue ------------v
puts $sock "Authorization: Basic $sc::vars(adpass)"
puts $sock ""
### Here is the flush which will purge this thru the socket
flush $sock |
All of that is fine, the cgi would kicksrc if you had the correct authorization password set in $sc::vars(adpass)....
** Note: Revived this thread because shoutcast scripts are asked for alot lately... see this post for proof..heh |
|
| Back to top |
|
 |
|