101

Re: Скрипты PAL для Sam Broadcaster

http://s005.radikal.ru/i211/1003/84/127a51270f37.jpg

102

Re: Скрипты PAL для Sam Broadcaster

ты блондинка?
поставь кодировку 1251

103

Re: Скрипты PAL для Sam Broadcaster

стоит а опера вообще страницу не отображает и не только у одного меня кракозябры

104

Re: Скрипты PAL для Sam Broadcaster

нет, все таки ты блондинка ))
во первых шоуткаст пускает на страницу только мозилоподобные браузеры, тому надо ставить идентификацию
во вторых КОДИРОВКА И ЕЩЕ РАЗ КОДИРОВКА 1251

Отредактировано tarasian666 (09-03-2010 14:49:05)

105

Re: Скрипты PAL для Sam Broadcaster

Господа!! Помогите, пожалуйста smile)

Мне нужно запускать джинглы из плеера AUX (в деках нельзя, т.к. заставочки короткие и некорректно миксуются часто) через указанное время (напр. 5 минут)

Т.е. нужен скрипт такой - в Queue список сам по себе составляется по правилам ротации:

Dir['D:\radio\music\instrument\temp'].QueueBottom(smLemmingLogic, EnforceRules);
Dir['D:\radio\music\pop en\80\temp'].QueueBottom(smLemmingLogic, EnforceRules);
Dir['D:\radio\music\pop en\00\temp'].QueueBottom(smLemmingLogic, EnforceRules); и т.д.

треки звучат поочерёдно в деках, само собой. Но нужно, чтобы когда подходит время джингла он дождался бы окончания песни в одной деке, запускался бы из плеера AUX (1 или 2 неважно) и потом миксовался бы со следующей песней в другой деке.

В шаблонах PAL скриптов есть скрипт Лайнеров - но они накладываются на начало песни в момент вступления, а мне нужно, чтоб джинглы просто миксовались бы с песнями.

Прошу вашей помощи, т.к. далёк от программирования.

Отредактировано radio-roman (22-03-2010 02:20:46)

http://zeitgeist-union.org/radio-bar.png

106

Re: Скрипты PAL для Sam Broadcaster

пишет radio-roman:

в деках нельзя, т.к. заставочки короткие и некорректно миксуются часто

есть такая функцыя как "не микшировать если трек короче 'n' секунд"

107

Re: Скрипты PAL для Sam Broadcaster

пишет tarasian666:

intervision достаточно задать в schedule

а можно подрообнее про это?

http://twilightradio.ru/radio/userbar/index.png

108

Re: Скрипты PAL для Sam Broadcaster

нажмите + там где schedule и там разберетесь, ни чего сложного

109

Re: Скрипты PAL для Sam Broadcaster

аа все ))) спасибо )))

http://twilightradio.ru/radio/userbar/index.png

110

Re: Скрипты PAL для Sam Broadcaster

пишет tarasian666:

пишет radio-roman:

в деках нельзя, т.к. заставочки короткие и некорректно миксуются часто

есть такая функцыя как "не микшировать если трек короче 'n' секунд"

Такой вариант не подходит, и обрезание "хвостов песен" тоже т.к. звучит слишком топорно, а мне нужен профессиональный эфир. Вот так:
http://s08.radikal.ru/i181/1003/10/8156f44c1aaa.jpg

Вот стандартный скрипт для лайнеров (джингл поверх песни) в СЭМЕ

{ About:
   This script will play a liner in Aux1 as soon as a new track starts
   The liner will only be played if
    a) The song has an intro of specified minimem duration
    b) The song is of type S, i.e. a normal song.

   Then the script will wait the specified amount of time before
   it tries to play another liner.

   This script can help brand your station and make it sound like a true
   commercial terrestrial station.
    any source connected

   Usage:
    a) Make sure you use the song information editor to specify intro times for your tracks!
    b) Make sure the AGC settings on Aux1 is to your liking. Also set the volume a bit louder
       on Aux1 so you cna clearly hear the liner above the active Deck audio.
    c) Edit the configuration details below.
       Make sure to change the category to the one you use to store your liners.
}
{ CONFIGURATION }
{==================================================}
const MIN_INTRO = 5*1000; //5 seconds
const MIN_WAIT  = '+00:15:00'; //Wait 15 minutes between liners
const LINERS_CATEGORY = 'Liners';


{ IMPLEMENTATION }
{--------------------------------------------------}
function ExtractIntro(Song : TSongInfo):Integer; forward;

var Song, Liner : TSongInfo;
var Waiting : Boolean = True;
var Intro : Integer = 0;
Aux1.Eject;

{Step1: Queue up the deck, ready for play}
Liner := CAT[LINERS_CATEGORY].ChooseSong(smLRP,NoRules);
if (Liner=nil) then
 WriteLn('No valid liner found')
else if (not Aux1.QueueSong(Liner)) then
 WriteLn('Failed to queue song: '+Liner['filename']);

{Wait for a valid song with intro}
while Waiting do
 begin
  {Step2: Wait for the song to change}
  PAL.WaitForPlayCount(1);

  {Step3: Grab current song information}
  Song := ActivePlayer.GetSongInfo;

  if (Song=nil) then
   WriteLn('The active player contained no song info??')
  else
   begin
    {Extract the intro time - this is a bit tricky}
    Intro := ExtractIntro(Song);

    {Start playing the liner if the current song matches our rules}
    if(Song['songtype']='S') and (Intro>=MIN_INTRO) then
     begin
      Aux1.Play;
      Waiting := False;
     end;
    Song.Free; Song := nil;
   end;
end;

{Wait 5 minutes before we do this all again}
PAL.WaitForTime(MIN_WAIT);
PAL.Loop := True;

{................................................}
function ExtractIntro(Song : TSongInfo):Integer;
var
 P : Integer;
 XFade : String;
begin
 Result := -1;
 XFade := Trim(Song['xfade']);

 WriteLn('Decoding XFade string');
 WriteLn('XFade: '+XFade);

 if XFade = '' then
  Result := -1
 else
  begin
   P := Pos('&i=',XFade);
   if (P > 0) then
    begin
     Delete(XFade,1,P+2);
     P := Pos('&',XFade);
     if (P>0) then
      Delete(XFade,P,Length(XFade));

     Result := StrToIntDef(XFade,-1);
     WriteLn('Intro time detected: '+XFade);
    end;
  end;
end;

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

Как его исправить, чтобы вместо лайнеров поверх песни на AUX выводились бы джинглы и миксовались с другими треками?

Кстати, в этом скрипте почему-то прога выбирает один единственный лайнер и крутит только его, а не дёргает из папки новые sad

Помогите! Иначе придётся на винампе с плагином кроссфейда по пересечению уровня Дб сидеть sad

Отредактировано radio-roman (25-03-2010 11:37:51)

http://zeitgeist-union.org/radio-bar.png

111

Re: Скрипты PAL для Sam Broadcaster

Легче не мучиться с этим в SAM, а перейти на нормальный софт для профессионального вещания, например, Sound Empire.

112

Re: Скрипты PAL для Sam Broadcaster

пишет Nick Pheomotion:

Легче не мучиться с этим в SAM, а перейти на нормальный софт для профессионального вещания, например, Sound Empire.

Ну тогда уж RADIO Player Pro лучше - он удобнее и функциональнее.
НО
1.СЭМ специальное ПО для онлайн радио, вё в одной программе от вывода микрофон до интерфейса на сайт
2. Качественный ротатор - можно месяцами не заглядывать в него, всё сам  без лишних телодвижений делает правильно
3. В империи и RADIO Player Pro нужно персонально настраивать звучание и фейд каждого файла в базе, что физически нереально, поэтому нужен автомикс по пересечению уровня начала и конца песен (в RADIO Player Pro просто удаление тишины)
ну и другие доводы в пользу СЭМа.
Если бы я хоть немного понимал скрипты, то изменил бы сам, но не умею sad тем более, что дополнительные проигрыватели изначально для этого и придуманы - не думаю, что это сложно.

Отредактировано radio-roman (25-03-2010 11:50:51)

http://zeitgeist-union.org/radio-bar.png

113

Re: Скрипты PAL для Sam Broadcaster

Здравствуйте! Я может невнимательно читал, но проблема вот в чем значит. Мне нужно, чтобы PAL скрипт отображал информацию вместо названия песен (какие либо объявления, сообщения). Но не получается настроить (не знаю почему). Помогите. А лучше у кого работает, скопируйте готовый код, дальше может разберусь. А то я там может напортачил много, вот и не работает.

114

Re: Скрипты PAL для Sam Broadcaster

Здравствуйте, нужен скрип который бы в определенное время просматривал каталог на компе:
F:\music
к примеру, и если там есть изменения добавлял новые файлы в плейлист
пробовал через sheduler. Задал время выполнения, задал папку, но ничего не происходит. Там такой код:
{# Add files to queue script #}
Dir['F:\music'].Rescan;
Dir['F:\music'].QueueDir(ipBottom);

BelRadio - радио Белгорода online

Меняюсь ссылками, баннерами на главной и внутренних, пишите в ЛС

115

Re: Скрипты PAL для Sam Broadcaster

Здравствуйте! Как в скрипт отбивки времени после стартового часа добавить проигрывание трека из нужной мне папки, соответствующего сегодняшней дате в виде ччммгггг.mp3 ?
И где найти скрипт вывода надписи в мета-дате? Был где-то, но не нашел.
Скрипт удаления битых путей на файлы:

Показать / Cкрыть текст

Отредактировано Ruskat (11-05-2010 15:08:00)

Сайт и плейлист радио ZED-FM.

116

Re: Скрипты PAL для Sam Broadcaster

Как указать в коде:

Показать / Cкрыть текст

чтобы из категории Jazz в папке id брался нужный файл, который в начале джазового времени играл бы как регулярное вступление ?

Отредактировано Ruskat (02-06-2010 18:02:49)

Сайт и плейлист радио ZED-FM.

117

Re: Скрипты PAL для Sam Broadcaster

Возник такой вопрос.
Кто может попробует сделать, может кто-то где-то видел pal скрипт который работает по примерно такому принципу.
Он должен на N-ое кол-во часов отключать(т.е. вообще не принимать заказы) с web-сайта.
Кто поможет?

Интересно очень интересно.. Ведь Камчатка - это интересно. И там тоже есть люди которые ставят свои Локально-Интернетные радио станции! wink

118

Re: Скрипты PAL для Sam Broadcaster

Ruskat пробуй PAL.WaitForTime
Virtya1itu смотреть в сторону RequestPolicy.Enabled := False;

119

Re: Скрипты PAL для Sam Broadcaster

Спасибо. Работает smile

Интересно очень интересно.. Ведь Камчатка - это интересно. И там тоже есть люди которые ставят свои Локально-Интернетные радио станции! wink

Re: Скрипты PAL для Sam Broadcaster

Всем здрям!!! Вещание происходит через IceCast, необходима помощь в написании Pal Script'а:

1) Включение только отбивки часа (1 файл) в 0-ую минуту часа

2) На 20-ой и 50-й минутах часа информация для радиослушателей до неё и перед ней джинглы. (но только с 7-22 часов, ежедневно)

Буду благодарен. Если не затруднит, напишите мне в ICQ 593762970, есть ещё некоторые вопросы, уже не скриптам...

Отредактировано Владимир173 (07-07-2010 14:24:03)

121

Re: Скрипты PAL для Sam Broadcaster

Хых..ребята,научитесь пользоватся поиском по форуму...Таких скриптов тут куча...Понимаю трудно осилить,но писать каждый раз такие скрипты это маразм...

Первая сумская интернет радиостанция "LIVE" - http://www.radiolive.sumy.ua

122

Re: Скрипты PAL для Sam Broadcaster

а на оф. форуме сема просто изобилие скриптов

123

Re: Скрипты PAL для Sam Broadcaster

Народ, подскажите-ка: нашел я скрипт, который помогает незаметно переключать из автодиджея на ведущего из другого города незаметно для слушателя, чтоб не ждать того от кого идет вещание и не делать с ним мгновенное переключение на вещание с одной машины на другую, которое сбрасывает всех слушателей. Нашел скрипт этот здесь для шоуткаста. Подайте пожалуйста кто-то скрипт такой же для айскаста.
За ранее огромное спасибо smile

Южное радио - http://sunradio.at.ua

124

Re: Скрипты PAL для Sam Broadcaster

fallback на icecast вас не устраивает?

125

Re: Скрипты PAL для Sam Broadcaster

в общем про это нашел, как реализовать нашел. кому кинуть?

Отредактировано ivan_sh (22-10-2010 00:20:05)

Южное радио - http://sunradio.at.ua