FS.LIFE (ex. FS.TO; ex. BDB.TO; ex. FS.UA)

Готовые конфигурации подкастов (RSS и Web)
PavelN65
Posts: 67
Joined: Wed Feb 15, 2012 11:23 am

FS.LIFE (ex. FS.TO; ex. BDB.TO; ex. FS.UA)

Post by PavelN65 »

Подкаст на ресурс FS.LIFE (ex. FS.TO; ex. BDB.TO; ex. FS.UA).

Краткая инструкция по пользованию подкастом!!
После загрузки данного подкаста он практически готов к использованию.
Для того чтобы в подкасте работали пункты с "01_В процессе" по "04_Избранное" необходимо:
1) быть зарегистрированным на сайте FS.TO (ex. BDB.TO, ex. FS.UA);
2) открыть подкаст (правая кнопка мышки - пункт "Изменить название/настройки") и в закладке "Подключение" вбить свой логин и пароль. После этого обновить подкаст - должно показать то что у вас в Избранном.

Весь подкаст можете переделать по своему вкусу.
Удаляете все ненужные пункты и добавляете то что вам нужно Например:
Создаете папку "Жанры". (ПКМ по подкасту - и пункт "Добавить папку")
Внутри папки создаете подкаст например "Ужасы" (ПКМ по созданной папке - и пункт "Добавить подкаст").
В открывшейся форме вводите заголовок: Ужасы.
На сайте FS.TO ищете то что вам нужно и копируете ссылку http://fs.to/video/films/film_genre/uzhasy/
и вставляете в поле "Ссылка" подкаста.
Жмете "Ок". И обновляете подкаст.
Аналогично со всеми фильтрами что есть на сайте.

Добавить пункт "Новые (фильмы, мультфильмы, сериалы)" можно по этой ссылке типа http://fs.to/films/?sort=new&view=list
Создаете подкаст и вставляете нужную ссылку с сортировкой по дате обновления.


Вот коротко по использованию.
Приятного просмотра!!

Данный сайт расчитан на просмотр на территории Украины.

UPDATE 08.05.2016
Исправлено обновление подкастов после изменений на сайте благодаря t.babich!!!
Поправлена ссылка в папке "Зарубежные сериалы" - там вместо fs.to было написано fa.to

UPDATE 09.07.2016
Внесены изменения в скрипт получения ссылок на ресурс. На сайте что-то изменили и теперь если зарегистрирован на сайте то стают доступны некоторые фильмы и сериалы для просмотра, а если не залогинится то пишет что файлы заблокированы, например тут попробуйте с логином и без и заметите разницу: http://fs.to/video/serials/i4u7BjvXSbTf ... aroda.html

UPDATE 02.04.2017
Ресурс после длительного перерыва начинает подниматься здесь!!!
Восстановлена работа подкаста.
Attachments
fs_life_15042017.zip
Обновлено 15.04.2017
(27.84 KiB) Downloaded 1881 times
Samsung UE32D5500RW, Assistant AP-110, Fly IQ4404 Spark
PavelN65
Posts: 67
Joined: Wed Feb 15, 2012 11:23 am

Re: FS.UA

Post by PavelN65 »

Немного изменил обновление подкастов. Добавляет все ссылки на фильм с разным качеством, звуком и т.д., что есть в пункте "Скачать" на сайте и к имени файла добавляет качество.
Samsung UE32D5500RW, Assistant AP-110, Fly IQ4404 Spark
mch
Posts: 235
Joined: Wed Nov 02, 2011 2:01 pm

Re: FS.UA

Post by mch »

PavelN65 wrote:Немного изменил обновление подкастов. Добавляет все ссылки на фильм с разным качеством, звуком и т.д., что есть в пункте "Скачать" на сайте и к имени файла добавляет качество.

Спасибо за подкаст. Возможно ли каждое качество распихивать по разным папкам внутри одного ресурса (фильм-сериал), в пункте "Скачать" на сайте лежат разные озвучки и разное качество мои женщины теряются когда видят так много ссылок))
SAMSUNG UE32D5000 - Samsung_led_D-Series_2011_dlna_16x9_1920x1080_Peremotka.cfg & Samsung_led5000_dlna_16x9_1920x1080.cfg
PavelN65
Posts: 67
Joined: Wed Feb 15, 2012 11:23 am

Re: FS.UA

Post by PavelN65 »

Теперь качество распихивает по разным папкам внутри одного ресурса (фильм-сериал).
Для транскодирования использую профиль "Фильмы - Molodejj.tv (HMSMPEG)", брал тут
Samsung UE32D5500RW, Assistant AP-110, Fly IQ4404 Spark
mch
Posts: 235
Joined: Wed Nov 02, 2011 2:01 pm

Re: FS.UA

Post by mch »

PavelN65, дико извиняюсь, но реально ли сделать сортировку сперва по озвучке, а затем уж по качеству. Стало намного удобней, но все же зайдя в папку HD КАЧЕСТВО (720) первых серий и т.д. от 3 до 5 штук... Возможно ли сделать сортировку как у них на сайте с пункта "скачать": 01 сезон - Проф. (NewStudio) HD 1080, Проф. (LostFilm) HD 720 и т.д.?
SAMSUNG UE32D5000 - Samsung_led_D-Series_2011_dlna_16x9_1920x1080_Peremotka.cfg & Samsung_led5000_dlna_16x9_1920x1080.cfg
PavelN65
Posts: 67
Joined: Wed Feb 15, 2012 11:23 am

Re: FS.UA

Post by PavelN65 »

Mch, спасибо за подсказку. Я как-то этого момента не учел, что переводы разные, а качество одинаковое и оно в одну папку сваливало. Переделал.
Samsung UE32D5500RW, Assistant AP-110, Fly IQ4404 Spark
mch
Posts: 235
Joined: Wed Nov 02, 2011 2:01 pm

Re: FS.UA

Post by mch »

Большое спасибо!
SAMSUNG UE32D5000 - Samsung_led_D-Series_2011_dlna_16x9_1920x1080_Peremotka.cfg & Samsung_led5000_dlna_16x9_1920x1080.cfg
PavelN65
Posts: 67
Joined: Wed Feb 15, 2012 11:23 am

Re: FS.UA

Post by PavelN65 »

mch wrote:Большое спасибо!
Если примерно так как нужно то пожалуйста!!!
После твоей подсказки, самому понравилось. :)
Samsung UE32D5500RW, Assistant AP-110, Fly IQ4404 Spark
serj190
Posts: 1
Joined: Thu Jan 17, 2013 2:59 am

Re: FS.UA

Post by serj190 »

в скрипте чтения интернет ресурсов надо поменять процедуру FileList (изменения выделено жирным)
//---------------- Íà÷àëî ïðîöåäóðû Filelist -----------------------------------
// Åñëè ìåäèà - ýòî ñåðèàë òî ïðîöåäóðà âûáèðàåò ññûëêè íà ñåçîíû

procedure Filelist(const aItemDescr: string);
var
Qval_Films: TRegExpr;
id,a,playlist: String;
dop_str,F_q,F_i,F_s,F_e: Integer;
Film_qualiti: array[1..20] of String;

begin
a := aItemDescr;F_q := 0;
if sss then
begin
HmsRegExMatch(' rel="{parent_id: (.*?)}"', aItemDescr, id);
if (id = '') then id:='0';
id := total_id + '?ajax&folder=' + id;
a := ''; a := HmsDownloadURL(id); a := HmsUtf8Decode(a); a := HmsRemoveLineBreaks(a);
end;
id := '';
Qval_Films := TRegExpr.Create('class="link-subtype(.*?)class="material-date',PCRE_SINGLELINE);
try
if Qval_Films.Search(a) then
repeat //èñêàòü îáúåêò è ïîâòîðÿòü
inc(F_q);
Film_qualiti[F_q]:= Qval_Films.Match;
until not Qval_Films.SearchAgain; //
finally
Qval_Films.Free //îñâîáîäèòü îáúåêò
end;
for F_i := 1 to F_q do begin
playlist := '';Dop_Name := '';Dop_Trans:='';
HmsRegExMatch('">(.*?)</a>', Film_qualiti[F_i], Dop_Trans);
HmsRegExMatch('span class="material-size">(.*?)</span>', Film_qualiti[F_i], Dop_Name);
Dop_Name := Edit_Str(Dop_Name); Dop_Trans:= Edit_Str(Dop_Trans);
F_s := pos('(',Dop_Name);F_e := pos(')',Dop_Name);F_e := (F_e-F_s)+2;
Dop_Name := Copy(Dop_Name,F_s-1,F_e); Dop_Name := Format('%.2d', [F_i])+'_'+Dop_Trans+Dop_Name;
dop_str := pos('>Ñïèñîê ôàéëîâ<', Film_qualiti[F_i]);
if dop_str >0 then playlist := Copy(Film_qualiti[F_i],dop_str-75,70)
else exit;
HmsRegExMatch('href="(.*?)"', playlist, id);
id := total_id + id;
Films_Link(id);
id := '';
end;
end;
//---------------- Êîíåö ïðîöåäóðû Filelist -------------------------------
PavelN65
Posts: 67
Joined: Wed Feb 15, 2012 11:23 am

Re: FS.UA

Post by PavelN65 »

Обновил подкаст, небыло возможности обновлять сериалы. На сайте сменили немного структуру.
Спасибо Serj190 за подсказку.

UPDATE 21.01.2013
Samsung UE32D5500RW, Assistant AP-110, Fly IQ4404 Spark
Post Reply