Jump to content

pal script help? (2 questions)


simplisticpc

Recommended Posts

ok now before you say search the forum or web i have done that already to no avail.

 

ok here's my questions or what I'm trying to do.

 

1. i would like to setup a pc with sam for just auto djing but i want my other dj's to be able to go to a webpage or something and be able to stop the encoder on the autodj system but i don't want them going into the radio control panel and stopping the server and restarting it and then when they are done with their show they can go back and restart the encoders on the autodj system now these dj's don't have scheduled times they just jump on whenever they feel like it.

 

2. this question is a little trickier when i do my show i only talk between each song or between sets and switching between manual and queue is a pain what i'm looking for is a script that when i press the mic button that the current song will fade out and the next won't start till i have released the mic button.

 

I hope anybody can help me with these. it would make things so much easier for me

Link to comment
Share on other sites

ok now before you say search the forum or web i have done that already to no avail

 

Dont Panic this isnt the Spacial Forum were Far friendlier!!!

 

 

As far as im aware there is no PAL script that could accomplish this.

 

But the only option that i could see working would be Remote desktop onto the machine that is running auto DJ!

 

Hope that helps.

My Blog https://djgarybaldy.blogspot.com

User of RadioDJ FREE radio playout software since 2010.

How to Install RadioDJ: https://djgarybaldy.blogspot.com/2020/08/how-to-install-radiodj-free-radio.html

RadioDJ is my most FAVOURITE piece of software EVER

 

 

Link to comment
Share on other sites

Part 1 can be done with what SAM calls 'Events'. Basically, you set up a PAL script that waits for an event. the event is triggered when your remote dj's follow a link. You can find some help on that in the Spacial Audio forum. I may be able to write the script for you, but that wouldnt be till later tonight.

 

Part 2 is not possible. There is no script command to check the status of the mic button.

SpazzRadio.com

Home of Absolute Rockz, Absolute Spazz, Always HOT Country, and Absolute Hitz

Link to comment
Share on other sites

Thanks alot that would be great if you could write me up a code for that

 

and i'm not entirely sure your right about the second because i have seen scripts for active player or something to that effect and i do beleive sam see voice fx as a player but not sure. but hey if you could at least help me with the first one it would be a great help

Link to comment
Share on other sites

answer 1 : Give your members the IP Port shoutcast page where they can login to the admin page (admin + password)

At that page they can "kick" the stream from your mainstudio and they can start their own broadcast ... after they finished your SAM gonna reconnect at once

Solution two is to use a script who pulls in their IP port at a specific time

 

answer 2 : if you are doing a live set ... I guess you can switch at any time from auto dj to songs in queue

Afterall ... thats what live radio is all about

 

Any other solutions ... see my sticky topics :

http://forums.broadcastingworld.net/showthread.php?t=7199

Link to comment
Share on other sites

This is best done in 2 scripts to ensure that it does not get caught waiting for the wrong event...

var I : Integer;

PAL.Loop := True;

I := 0; //Encoder number (1st encoder is zero, 2nd is one etc)

PAL.WaitForEvent('Stop');
if Encoders[i].Started then
 Encoders[i].Stop;
WriteLn('Encoder Stopped!');

var I : Integer;

PAL.Loop := True;

I := 0; //Encoder number (1st encoder is zero, 2nd is one etc)

PAL.WaitForEvent('Start');
if not Encoders[i].Started then
 Encoders[i].Start;
WriteLn('Encoder Started!');

To trigger these events, the DJs will need to visit one of 2 urls ...

 

http://:1221/event/Stop

http://:1221/event/Start

 

Simple insert the IP address of the SAM in question and make sure that port 1221 is open and working for SAM

SpazzRadio.com

Home of Absolute Rockz, Absolute Spazz, Always HOT Country, and Absolute Hitz

Link to comment
Share on other sites

And as for Question 2 ...

 

It used to be possible to use VoiceFX like a player in scripts. but that has been depreciated.

 

Note: This function is depreciated and should not be used.

 

Declaration

 

function VoiceFX: TPlayer;

 

Description

 

In SAM2 this function returned the VoiceFX player object.

 

In SAM3, this function will return the Aux3 player object.

SpazzRadio.com

Home of Absolute Rockz, Absolute Spazz, Always HOT Country, and Absolute Hitz

Link to comment
Share on other sites

We think the best way to have remote DJ's is to connect to a small server (1 or 2 ports). Then at the assigned time SAM picks up the feed and broadcasts it.

 

SAM can check to see if they are on-the-air. If not, then don't pick up the feed.

 

That way, they don't have access to your main server / control panel.

Spacial SVS Support Team

http://support.spacialaudio.com/forums/

Get help with PAL Scripts at http://www.palscripts.com

Link to comment
Share on other sites

Spaz thank you so much for those scripts.

 

those scripts work perfectly and because of your help i was able to create a scripts that stops my encoder and using some of the kick source script can make it where another dj can stop my encoders and imediatly start his show so i have made basically a switchover script.

 

if you would like to see this script let me know i would gladly post it for to see:lol:

Link to comment
Share on other sites

ok i think i spoke too soon.

 

i didn't take into consideration lag time between the other dj and myself cause when i tested it it didn't work

 

var URL : String;

URL := 'http://djcontrolstop.hopto.org ';{this is the url i'm using for encoder stop on my system}

Encoders.StartAll;

 

{TIP: Use this to start a specific encoder:

Encoders[0].Start;

}

var P : TPlayer;

var Song : TSongInfo;

{## Detect the empty player and queue a station ID in it}

P := IdlePlayer;

if P nil then

begin

Song := CAT['Music (All)'].ChooseSong(smRandom,NoRules);

if Song nil then P.QueueSong(Song);

{## Detect the active player and start the fade-out}

P := QueuedPlayer;

if P nil then P.Play;

end;

now how do i make the script wait like 3-5 seconds after sending the stop signal to my system before it starts the encoders on the other dj's system?
Link to comment
Share on other sites

This will make it wait 5 seconds in your PAL script:

 

PAL.WaitForTime('+00:05:00');

 

OK where do i put it

var URL : String;

URL := 'http://71.79.134.107:1221/event/Stop';

 

{TIP: Use this to start a specific encoder:

Encoders[0].Start;

}

 

Encoders.StartAll;

var P : TPlayer;

var Song : TSongInfo;

{## Detect the empty player and queue a station ID in it}

P := IdlePlayer;

if P nil then

begin

Song := CAT['Music (All)'].ChooseSong(smRandom,NoRules);

if Song nil then P.QueueSong(Song);

{## Detect the active player and start the fade-out}

P := QueuedPlayer;

if P nil then P.Play;

end;

{--------------------------------------------------}

Link to comment
Share on other sites

  • 1 month later...

Ok All i must have screwed up somewhere:scared:

 

I gave my other DJ the script i created and everything works but the kicking part of the script.:eyebrow::mad:

 

now i know that the ip stop command works because he has typed the url manualy into a browser and it did stop the encoders just fine:thumbup:

but when he uses the kicksource script i created it doesn't work.:cursing:

 

did i screw something up:confused:

 

var URL : String;

URL := 'http://71.79.134.107:1221/event/Stop';

 

 

 

PAL.WaitForTime('+00:00:05');

{TIP: Use this to start a specific encoder:

Encoders[0].Start;

}

 

Encoders.StartAll;

var P : TPlayer;

var Song : TSongInfo;

{## Detect the empty player and queue a station ID in it}

P := IdlePlayer;

if P nil then

begin

Song := CAT['Music (All)'].ChooseSong(smRandom,NoRules);

if Song nil then P.QueueSong(Song);

PAL.WaitForTime('+00:00:05');

{## Detect the active player and start the fade-out}

P := QueuedPlayer;

if P nil then P.Play;

end;

{--------------------------------------------------}

Any help with this would be greatly appriceated.:yes:
Link to comment
Share on other sites

This is what you need to send out to kick the DNA's:

 

http://admin:xxxxxxxx@sc7.shoutcaststreaming.us:8000/admin.cgi?mode=kicksrc

 

Where, replace:

 

xxxxxxxx with your server password

and sc7.shoutcaststreaming.us:8000 with your server IP / Port #

SCS - Dedicated Bandwidth Servers

Shoutcast / Icecast / Windows Media

Transcoding - Auto DJ - Mobile Radio - FLASH Players - Auto DJ

Broadcasting World's Stream Host of the Month

Link to comment
Share on other sites

to my knowledge you can use seperated passwords ....

a) to your login account (control panel)

b) an other to your admin page of shoutcast, who is the same as needed to stream ...

So the idea of shoutcaststreaming looks to Me very interesting

Ok evidently you did not read the begining of this thread. I'm trying to do this without the other dj's going into the control panel and kicking the server i don't want them having the password that would give them access to the control panel.
Link to comment
Share on other sites

Ok evidently you did not read the begining of this thread.
I did read your post, however you can't 'kick' the Shoutcast server without the password.

 

The best way to do it, is what AJ suggested, is to have your DJ's stream to a separate Shoutcast server (with only one or two slots). Then at the assigned time, pick up the feed in your SAM (or whatever you use) and then revert back to the stream after their slot time is done. That way they don't have the main password(s).

SCS - Dedicated Bandwidth Servers

Shoutcast / Icecast / Windows Media

Transcoding - Auto DJ - Mobile Radio - FLASH Players - Auto DJ

Broadcasting World's Stream Host of the Month

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...