Re: Скрипты!
var Aux : TPlayer;
вы что гуглом пользоваться не умеете?
Первый русскоязычный форум посвященный интернет-радиовещанию
Чтобы отправить ответ, вы должны войти или зарегистрироваться
дайте пожалуста полный код!
heeeeeeeeeeeelp
куда и как лепить блин вы можете нормально сказать? у меня неполучилось он не выводит файл
var Song : TSongInfo;
//скрипт будет выполнятся постоянно(многократно)
PAL.Loop := True;
//ставим задержку на 3 песни
PAL.WaitForTime('+00:01:00');
//выбираем трек наугад
Song := CAT['Station IDs (All)'].ChooseSong(smRandom,NoRules);
//добавляем его в начало очереди
var Aux : TPlayer;
Aux.QueueSong(Song);
Aux.play;
Song.Free;
если давать все сразу готовое то так ничему и не научитесь
Aux := Aux1; пропустил
К сожалению у нас люди разбираться не хотят и даже такое чувство не пытаются.. Смотрят тупым взглядом на код и молят о помощи. печально (
Смори я код слепил. включаю он робит но невоспроизводит! \\\ вот учусь))) что нужно добавить или убрать?
подумай сам, ты ведь учишся ))
у меня все работает, этот же скрипт только со всеми моими замечаниями
я просто не пойму. строчки заменить или дописать? кинь пожалуста код я буду знать 9((
Пельмень, ну ты вообще лошара, тебе так подробно объяснили, даже я понял с первого раза(смеюсь). Тебе тупо лень самому экспериментировать, менять местами строчки, пытаться компилировать. При компиляции у тебя возникнет ошибка и сэм коричневой строчкой укажет на то место, где косяк. НЕ надо бояться, этим ты Сэм не удалишь, если ты уж так трясёшься что нить нечаянно сделать не так. Если ты на такой простой трудности валишься, то какого хрена ты вообще затеял всё это. Учи сначала мат.часть, а потом уже доставай людей по форумам. Разжевать и в рот положить?
какой коричневой строчкой? не понимаю я язык етот((( lua знаю
Еееееееееееееееееееее разобрался)))
var Song : TSongInfo;
//ñêðèïò áóäåò âûïîëíÿòñÿ ïîñòîÿííî(ìíîãîêðàòíî)
PAL.Loop := True;
//ñòàâèì çàäåðæêó íà 3 ïåñíè
PAL.WaitForTime('+00:01:00');
//âûáèðàåì òðåê íàóãàä
Song := CAT['Station IDs (All)'].ChooseSong(smRandom,NoRules);
//äîáàâëÿåì åãî â íà÷àëî î÷åðåäè
var Aux : TPlayer;
Aux := Aux1;
Aux.QueueSong(Song);
Aux.play;
Song.Free;
Чтобы отправить ответ, вы должны войти или зарегистрироваться