26

Re: Скрипты!

var Aux : TPlayer;

вы что гуглом пользоваться не умеете?

27

Re: Скрипты!

дайте пожалуста полный код!

28

Re: Скрипты!

heeeeeeeeeeeelp

29

Re: Скрипты!

все нужное уже есть, а дальше сам

30

Re: Скрипты!

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

31

Re: Скрипты!

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;

32

Re: Скрипты!

если давать все сразу готовое то так ничему и не научитесь

Aux := Aux1; пропустил

33

Re: Скрипты!

К сожалению у нас люди разбираться не хотят и даже такое чувство не пытаются.. Смотрят тупым взглядом на код и молят о помощи. печально (

В здоровом теле - здоровый дух!

34

Re: Скрипты!

Смори я код слепил. включаю он робит но невоспроизводит! \\\ вот учусь))) что нужно добавить или убрать?

35

Re: Скрипты!

подумай сам, ты ведь учишся ))

у меня все работает, этот же скрипт только со всеми моими замечаниями

36

Re: Скрипты!

я просто не пойму. строчки заменить или дописать? кинь пожалуста код я буду знать 9((

37

Re: Скрипты!

Пельмень, ну ты вообще лошара, тебе так подробно объяснили, даже я понял с первого раза(смеюсь). Тебе тупо лень самому экспериментировать, менять местами строчки, пытаться компилировать. При компиляции у тебя возникнет ошибка и сэм коричневой строчкой укажет на то место, где косяк. НЕ надо бояться, этим ты Сэм не удалишь, если ты уж так трясёшься что нить нечаянно сделать не так. Если ты на такой простой трудности валишься, то какого хрена ты вообще затеял всё это. Учи сначала мат.часть, а потом уже доставай людей по форумам. Разжевать и в рот положить?

38

Re: Скрипты!

какой коричневой строчкой? не понимаю я язык етот((( lua знаю

39

Re: Скрипты!

Еееееееееееееееееееее разобрался)))

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;

40

Re: Скрипты!

Можешь, когда хочешь