world-art.ru (фильмы)

[Endimon]

Хороший скрипт !!

1) Есть предложение в категории добовлять не просто тип (OVA или TV), а еще количество эпизодов.

2) Столкнулся с проблемой... При проверке связей скрипт ищет в базе фильм только по первой строке, альтернативные не проверяет.

Вот пример...

#1  Saber Marionette R - OAV (3 эп.), первый сериал из цикла, 1995
#2  Saber Marionette J - ТВ (25 эп.), второй сериал из цикла, 1996
#3  Mata Mata Saber Marionette J - OAV (6 эп.), продолжение, 1997 - Saber Marionette J Again
#4  Saber Marionette J to X - ТВ (26 эп.), продолжение, 1998

В итоге он мне добавил в базу - Mata Mata Saber Marionette J

[NewSky]

Из мануала:
procedure Delete(var S: WideString; Index, Count: Integer)
Удаляет Count символов из строки S начиная с Index

Прошу прощения, я что-то пропустил, а где найти тот самый мануал?

[SolarMaster]

Исправил одну ошибку (после получаса мучений  ) в скрипте когда он устанавливает связи он добавлял [ТВ] к названию. Например Евангелион [ТВ]. Выкладываю может кому пригодится.

P.S. Nostra большое спасибо за мануал без него бы не справился

[вложение удалено Администратором]

[Tsume]

Прошу прощения, я что-то пропустил, а где найти тот самый мануал?

Personal Video Database > Русский > Разработчикам > Разработка скриптов

[SolarMaster]

Кто скачал перескачайте скрипт. Ошибку пропустил 

[вложение удалено Администратором]

[Tsume]

nostra!
Проверил, все вроде нормально работает. Попробую добавить для себя последнию вещь (Трансляция/Премьера, вместо не нужного мне MPAA) и попробую сделать скрипт для персон.

[Tsume]

Вот что у меня получается с Трансляция/Премьера:

//Premiere and translation
curPos := PosFrom('<b>Премьера</b>:', HTML, EndPos);
 if curPos > 0 then begin
  curPos := curPos + Length('<b>Премьера</b>:');
  EndPos := PosFrom('<br>', HTML, curPos); 

curPos := PosFrom('<b>Трансляция</b>:', HTML, EndPos);
 if curPos > 0 then begin
  curPos := curPos + Length('<b>Трансляция</b>:');
  EndPos := PosFrom('<br>', HTML, curPos); 

  AddFieldValue(mfMPAA, Trim(Copy(HTML, curPos, EndPos - curPos))); 
 end;
end;      

Вставляю после категории. Скрипт программой нормально видиться, но я пока проверить не могу - опять забанили!
Но я не совсем уверен в правильности, там у меня два варианта (я думаю не совсем так это надо писать) просто для одних аниме (если например фильм) указывается премьера, а для других (если например сериал, а главное был ТВ показ) указывается трансляция. Вот и нужно чтобы он находил во обоих случаях находил информацию и добавлял в поле MPAA.
Пример:для трансляции

Трансляция, Премьера:  c 04.11.2005 по 12.05.2006

или для премьеры

Трансляция, Премьера: 20.11.2004

Вот такая идея.

[nostra]

Ты ищи просто вначале оба, сравнивай позицию и бери ту, что больше

[Tsume]

Ты ищи просто вначале оба, сравнивай позицию и бери ту, что больше

Там присутствует только одна позиция: или Трансляция или Премьера (в зависимости от типа аниме).
А моя версия скрипта не работает, точнее работает, но не добавляет Трансляция/Премьера:
А какой оператор "Или", т.е. в моем случае надо или это или это. Т.е. если не нашел первый вариант, то искал бы второй; а если нашел первый вариант, то уже не проверял второй, а выполнял действие.

[Tsume]

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

[nostra]

Там присутствует только одна позиция: или Трансляция или Премьера (в зависимости от типа аниме).

Ну так и отлично. Это значит, чо у того, что отсутвует будет позиция 0 (т.е. не найден), а у того что есть позиция > 0

А какой оператор "Или", т.е. в моем случае надо или это или это. Т.е. если не нашел первый вариант, то искал бы второй; а если нашел первый вариант, то уже не проверял второй, а выполнял действие.

Оператор или - OR, но поверь мне так как я говорю будет работать и будет проще

[Tsume]

Сделал вот так:

//Premiere
 curPos := PosFrom('<b>Премьера</b>:', HTML, EndPos);
 if curPos > 0 then begin
  curPos := curPos + Length('<b>Премьера</b>:');
  EndPos := PosFrom('<br>', HTML, curPos);  

  AddFieldValue(mfMPAA, Trim(Copy(HTML, curPos, EndPos - curPos)));  
 end;

//Translation
curPos := PosFrom('<b>Трансляция</b>:', HTML, EndPos);
 if curPos > 0 then begin
  curPos := curPos + Length('<b>Трансляция</b>:');
  EndPos := PosFrom('<br>', HTML, curPos);  

  AddFieldValue(mfMPAA, Trim(Copy(HTML, curPos, EndPos - curPos)));  
 end;

Теперь он находит и премьеры и трансляции.  
Осталось исправить ошибку, чтобы он копировал только нужное!!!!

[nostra]

Отлично. Судя по всему ты уже и сам рабершься

[Tsume]

Ну вот только стал врубаться в тему, а они меня опять забанили. 

//Premiere
 curPos := PosFrom('<b>Премьера</b>:', HTML, EndPos);
 if curPos > 0 then begin
  curPos := curPos + Length('<b>Премьера</b>:');
  EndPos := PosFrom('<br>', HTML, curPos); 

  AddFieldValue(mfMPAA, HTMLValues2(HTML,
                             '<b>Премьера</b>:', '<br>',
                          '>', '</a>',
                          '. ', EndPos)); 
 end;

Проверь пожалуйста код. Вроде вот так он должен делать:

Трансляция, Премьера: 07.01.2006

Или я опять что-то напутал?

[Tsume]

Понял, наверное функция должна все таки вот так выглядить:

AddFieldValue(mfMPAA, HTMLValues2(HTML,
                             '<b>Премьера</b>:', '<br>',
                          'class=', '</a>',
                          '. ', EndPos)); 

Просто из-за пока нет возможности проверить.