Author Topic: Personal Video Database 1.0.2.7 MOD  (Read 15558 times)

0 Members and 1 Guest are viewing this topic.

Offline Ivek23

  • Global Moderator
  • *****
  • Posts: 2190
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #180 on: March 07, 2019, 08:22:20 am »
Hallo
first of all, thanks for this grat job
i discovered it only now

Thanks for the name of the program's author and others, who help the program continue to work in some way.

1) is there a localized version of PVD in Italian ? if not, is there a way to contribute to create it ?

If you use 0.9.9.21 version, it already has an Italian translation. V1.0.2.7 does not have an Italian translation. However, there is a possibility to translate the english.rc file into the Italian language and rename it to custom.lng and copy it to the program folder. Now PVD will be in your language.

More info:
http://www.videodb.info/forum_en/index.php/topic,3186.msg15802.html#msg15802


The english.rc file is attached.


2) i would like to have the search script work for italian movie (so to add also [IT] language to script, but i don't know what to do.

In the script, add the following as shown below
Quote
  SCRIPT_LANG  = $09; //English //$0a es-Spanish   $0c fr-French   $09 en-English   $10 it-Italian
of course, if the website supports or is in the Italian language. A good example of this is TMDB web page.

There is currently no operating script for the PVD MOD version in the Italian language.

Perhaps what works in v0.9.9.2.1 and v1.0.2.7 with the help of
Proxomitron program, where it is necessary to add certain web pages in default.cfg, so that everything works together.

Write the addresses and links for which web pages you need, then we will then see what can be edited and helped.
« Last Edit: March 07, 2019, 11:16:41 am by Ivek23 »
Ivek23
Win 7 32bit, 64bit   PVD v0.9.9.21, PVD v1.0.2.7 + MOD


Offline webmasterone

  • Member
  • *
  • Posts: 3
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #181 on: March 07, 2019, 01:53:49 pm »
Ok
i'm translating language file
as soon as i will end it, i will give it to you, so that you can include it also in the installation files

I copied the [EN] file and renamed it TheMovieDB_[IT][API].psf
Than I modified the file as you told me (  SCRIPT_LANG  = $10; //$07=DE-German, $09=EN-English, $0a=ES-Spanish, $0c=FR-French, $10 it-Italian )
but i noted that the description still remained in english
i found that after modifying (in the same file) also the 128 line
  LANG_API_STR    = '&language=it'; //'&language=en', '&language=de', '&language=en', '&language=es', '&language=fr' //WEB_SPECIFIC
the description of the movie is now written in italian

just another thing
i read in the script that:
"TheMovieDB "keywords" info goes to ~tags~ PVD field"
but i can see that all the tags (TheMovieDB Keywords) are still in english (see image attached)

can you suggest to me how to solve it ?

thanks





Offline Ivek23

  • Global Moderator
  • *****
  • Posts: 2190
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #182 on: March 07, 2019, 03:44:07 pm »
Nice work and congratulations that something has just succeeded.

Ok
i'm translating language file
as soon as i will end it, i will give it to you, so that you can include it also in the installation files.

You do not send it to me, because I can not add it to the installation files. Attach it (in 7z or zip formats) to a forum in this topic for other users, which is then added as custom.lng to its PVD program folder.

just another thing
i read in the script that:
"TheMovieDB "keywords" info goes to ~tags~ PVD field"
but i can see that all the tags (TheMovieDB Keywords) are still in english (see image attached)

can you suggest to me how to solve it ?

It will probably be everywhere because it is not translated into the Italian language. Unfortunately, this can not be corrected. There is, however, the possibility that it will be OK when the website is also translated into the Italian language.
Ivek23
Win 7 32bit, 64bit   PVD v0.9.9.21, PVD v1.0.2.7 + MOD


Offline afrocuban

  • Power User
  • ****
  • Posts: 210
    • View Profile
Re: Possibles improving Custom Fields working in MOD version
« Reply #183 on: March 07, 2019, 09:55:45 pm »
Hello, and thank you, thank you, thank you for your great work, guys!

I wanted to ask you if it's possible to include custom fields "IMDb.com", "AllMovie.com", "Rottentomatoes.com" and "FilmAffinity.com" in the scripts?

Thank you in advance!

Offline Ivek23

  • Global Moderator
  • *****
  • Posts: 2190
    • View Profile
Re: Possibles improving Custom Fields working in MOD version
« Reply #184 on: March 08, 2019, 09:22:23 pm »
Hello, and thank you, thank you, thank you for your great work, guys!

I wanted to ask you if it's possible to include custom fields "IMDb.com", "AllMovie.com", "Rottentomatoes.com" and "FilmAffinity.com" in the scripts?

Thank you in advance!

Of course, it depends on why you will need them, or for what purpose is the transfer of information that you need (what you will download to these custom fields).
Ivek23
Win 7 32bit, 64bit   PVD v0.9.9.21, PVD v1.0.2.7 + MOD


Offline VVV_Easy_Programing

  • Power User
  • ****
  • Posts: 193
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #185 on: March 08, 2019, 09:36:26 pm »
Quote from: Ivek23
Attach it (in 7z or zip formats) to a forum in this topic for other users, which is then added as custom.lng to its PVD program folder.
This is a good idea: If people attach here his Custom.lng files I'll include its in the MOD version (even perhaps I can do a little batch program in order to ask to user and tralate PVD auto).
Quote from: webmasterone
I copied the [EN] file and renamed it TheMovieDB_[IT][API].psf
Than I modified the file as you told me (  SCRIPT_LANG  = $10; //$07=DE-German, $09=EN-English, $0a=ES-Spanish, $0c=FR-French, $10 it-Italian )
but i noted that the description still remained in english
i found that after modifying (in the same file) also the 128 line
  LANG_API_STR    = '&language=it'; //'&language=en', '&language=de', '&language=en', '&language=es', '&language=fr' //WEB_SPECIFIC
the description of the movie is now written in italian
Well done! You have found the good solution.
And perhpas more ... the diferent language versions of the TheMovieDB scripts are automatic translations using the attached files. If you give me the italian file I'll traslate it and include in the version MOD
Quote from: webmasterone
i read in the script that:
"TheMovieDB "keywords" info goes to ~tags~ PVD field"
but i can see that all the tags (TheMovieDB Keywords) are still in english (see image attached)
Ivek23 has reason: This information is in english in the TheMovieDB website for the films in all languages. In the other hand the Genre are normaly translated.

Offline VVV_Easy_Programing

  • Power User
  • ****
  • Posts: 193
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #186 on: March 08, 2019, 10:21:26 pm »
Changelog:
  • MOD V.2019.03.08; Ivek23, VVV: A lot of corrections and improvements (read PVD forum). Update "mandatory"  ;D
Last version always in the first post

Offline Ivek23

  • Global Moderator
  • *****
  • Posts: 2190
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #187 on: March 16, 2019, 09:11:59 am »
Quote from: VVV_Easy_Programing
Quote from: Ivek23
Attach it (in 7z or zip formats) to a forum in this topic for other users, which is then added as custom.lng to its PVD program folder.
This is a good idea: If people attach here his Custom.lng files I'll include its in the MOD version (even perhaps I can do a little batch program in order to ask to user and tralate PVD auto).

Slovenian.lng file for PVD and PVD MOD 1.0.2.7 version you will find on this link:

http://www.videodb.info/forum_en/index.php/topic,1752.msg20918.html#msg20918
« Last Edit: March 16, 2019, 03:26:53 pm by Ivek23 »
Ivek23
Win 7 32bit, 64bit   PVD v0.9.9.21, PVD v1.0.2.7 + MOD


Offline afrocuban

  • Power User
  • ****
  • Posts: 210
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #188 on: March 17, 2019, 11:43:02 pm »
Hello, and thank you, thank you, thank you for your great work, guys!

I wanted to ask you if it's possible to include custom fields "IMDb.com", "AllMovie.com", "Rottentomatoes.com" and "FilmAffinity.com" in the scripts?

Thank you in advance!

Of course, it depends on why you will need them, or for what purpose is the transfer of information that you need (what you will download to these custom fields).

Thank you in advance.

I use them, for example:

Code: [Select]
//Get ~mfURL~ or ~IMDb Url~
endPos := Pos('/ "><meta property="og:url"', HTML);
if endPos > 0 then begin
curPos := PrevPos('"canonical" href="', HTML, endPos);
AddFieldValue(mfURL, Copy(HTML, curPos + 18, endPos - curPos - 18));
end else
AddFieldValue(mfURL, MovieURL);
AddCustomFieldValueByName('IMDb.com', '<link url="' + MovieURL + '">IMDb.com</link>');
TmpStr := StringRepl


Just to get URL in a form:

<link url="http://www.allmovie.com/movie/upgrade-v699248">AllMovie.com</link>

But, this code above only works in some old IMDb script and Allmovie_new_HTTPS.psf with Proxomitron, and Rottentomatoes HTTPS script without Proxomitron, but I always have to edit them after their update/upgrade to insert those custom fields...

Thank you in advance
« Last Edit: March 17, 2019, 11:52:11 pm by afrocuban »

Offline Ivek23

  • Global Moderator
  • *****
  • Posts: 2190
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #189 on: March 21, 2019, 08:12:29 am »
We will add and edit this in the following updates.
Ivek23
Win 7 32bit, 64bit   PVD v0.9.9.21, PVD v1.0.2.7 + MOD


Offline Ivek23

  • Global Moderator
  • *****
  • Posts: 2190
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #190 on: April 14, 2019, 07:16:15 am »
We will add and edit this in the following updates.
Will this be arranged with the next update, but it will be necessary to make for each script its own custom field to save the url of the address. Each update in this field changes the record and needs to be corrected. Also, in the scripts, it will be necessary to add this part of the code to the custom field.
Ivek23
Win 7 32bit, 64bit   PVD v0.9.9.21, PVD v1.0.2.7 + MOD


Offline jippo

  • Member
  • *
  • Posts: 24
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #191 on: June 16, 2019, 10:36:52 pm »
I'm having this since two weeks ago.

I'm scanning with IMDB.

Offline Ivek23

  • Global Moderator
  • *****
  • Posts: 2190
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #192 on: June 18, 2019, 03:44:12 pm »
I'm having this since two weeks ago.

I'm scanning with IMDB.

Which IMDB version of the script, or which IMDB script you are using. Which film title is problematic for this error. We need the name and url of the movie title to help solve the problem.
Ivek23
Win 7 32bit, 64bit   PVD v0.9.9.21, PVD v1.0.2.7 + MOD


Offline jondak

  • Member
  • *
  • Posts: 29
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #193 on: June 19, 2019, 06:46:27 pm »
I'm having this since two weeks ago.

I'm scanning with IMDB.

Same error:
IMDB_[EN][HTTPS].psf V 1.4.1.0 (10/02/2019)

For now 2 movies triggered the error:
https://www.imdb.com/title/tt1210059/ Flying Lessons (2010)

https://www.imdb.com/title/tt1877647/ Ghoul (2012)

Seems the movies with this error have no Plot Keywords


Offline Ivek23

  • Global Moderator
  • *****
  • Posts: 2190
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #194 on: June 20, 2019, 08:19:06 am »
I'm having this since two weeks ago.

I'm scanning with IMDB.

Same error:
IMDB_[EN][HTTPS].psf V 1.4.1.0 (10/02/2019)

For now 2 movies triggered the error:
https://www.imdb.com/title/tt1210059/ Flying Lessons (2010)

https://www.imdb.com/title/tt1877647/ Ghoul (2012)

Seems the movies with this error have no Plot Keywords

Thanks for the error message. It's true, what you have already mentioned, that your movie titles have no Plot Keywords. I corrected this error.

Quote
CHANGE LOG :
            V 1.4.1.1 (20/06/2019) Ivek23: ParsePage_PLOTKEYWORDS small corrections and fix in the parts of the code 18-19/6/2019 forum alerts.
.
.
.
Function ParsePage_IMDBMoviePLOTKEYWORDS(HTML:String):Cardinal; //BlockOpen
    //Returns:
    //     Result:=prFinished; Script has finished gathering data
    //     Result:=prError; If ¿any big problem? with exit
    //Retrieve: ~Tags~
  Var
      curPos,endPos,index:Integer;
      //curPos,endPos:Integer;
      //ItemValue:String;
     ItemValue,ItemList:String;
     //Category,URL,Name:String;
     Category,Name:String;
     ItemArray:TWideArray;    
  Begin
    LogMessage('Function ParsePage_IMDBMoviePLOTKEYWORDS BEGIN======================|');
    Result:=prFinished;  //It will change to prError if any big problem with exit;   
   //Get "Plot Keywords" info
    curPos:=Pos('<h1 class="header">Plot Keywords</h1>',HTML);
    if (curPos=0) then Exit;
    EndPos:=curPos;   
   //Get "Plot Keywords" info
   //If Pos('<h1 class="header">Plot Keywords</h1>',HTML)>0 Then Begin
   curPos:=Pos('<h1 class="header">Plot Keywords</h1>',HTML);
   If 0<curPos Then Begin   
      EndPos:=curPos;   
      Category:=TextBetween(HTML,'<h1 class="header">','</h1>',True,curPos);
      LogMessage('      Get result Category:'+Category+'||');
      Name:=TextBetween(HTML,'<div class="header"><div class="nav"><div class="desc">','</div></div></div>',True,curPos);
      LogMessage('      Get result Name:'+Name+'||');
      AddCustomFieldValueByName('Plot Keywords','<link url="'+GetFieldValueXML('url')+'keywords">'+Category+'</link>'+'     '+Name);
   End;         
   //Get "Plot Keywords" info
If (Pos('It looks like we don'+Chr(39)+'t have any Plot Keywords for this title yet.',HTML)>0) then Exit;
   curPos:=Pos('<h1 class="header">Plot Keywords</h1>',HTML);
   If 0<curPos Then Begin   
      //EndPos:=curPos;
      //Go Tags list
      curPos:=Pos('<table class="dataTable evenWidthTable2Col"><tbody>',HTML);
      curPos:=curPos+Length('<table class="dataTable evenWidthTable2Col"><tbody>');
      endPos:=PosFrom('</table>',HTML,curPos);
      //ItemList:=Copy(HTML,curPos,endPos-curPos);
      ItemList:=Trim(Copy(HTML,curPos,endPos-curPos));
      curPos:=Pos('tp://ogp.me/ns#"',ItemList);
        If 0<curPos then ItemList:=Copy(ItemList,0,curPos-1);
      ItemList:=RemoveTagsEx(ItemList);      
      ItemList:=StringReplace(ItemList,'    </div>','|',True,True,False);               
      ItemList:=RemoveTags(ItemList, False);
      //LogMessage('           Parse results ('+IntToStr(curPos)+','+IntToStr(endPos)+') complex ItemList:'+ItemList+'||'+#13);         
      //LogMessage('           Parse results ItemList:'+#13+ItemList+' ||');
      //LogMessage('           Parse results ItemList: '+ItemList+' ||');
      ExplodeString(ItemList,ItemArray,'|');
      For index:=Low(ItemArray) To High(ItemArray) Do Begin        //Remember index begin in 0
            If (index=PLOTKEYWORDS_LIMIT) Then break;     //Limited depassed. Compares with = (not with >) because index begin in 0
         ItemValue:=ItemValue+ItemArray[index]+', ';
         LogMessage('    Get result Keyword: #'+IntToStr(index+1)+' | '+ItemArray[index]+', '+'||');
      End;
      index:=index+1;      
      If ItemValue <> '' then AddFieldValueXML('tags',ItemValue);
      LogMessage('      Get result Plot Keywords: '+ItemValue+'||');
    End;   
    LogMessage('Function ParsePage_IMDBMoviePLOTKEYWORDS END=====================||');
  End; //BlockClose

It's attached IMDB_ [EN] [HTTPS] V 1.4.1.1 script.
Ivek23
Win 7 32bit, 64bit   PVD v0.9.9.21, PVD v1.0.2.7 + MOD


Offline jippo

  • Member
  • *
  • Posts: 24
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #195 on: June 23, 2019, 10:41:46 pm »
Thanks.

Offline jondak

  • Member
  • *
  • Posts: 29
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #196 on: July 02, 2019, 11:08:53 am »
Thank you.

Offline Ivek23

  • Global Moderator
  • *****
  • Posts: 2190
    • View Profile
Re: Personal Video Database 1.0.2.7 MOD
« Reply #197 on: July 21, 2019, 06:24:12 am »
I'm having this since two weeks ago.

I'm scanning with IMDB.

Same error:
IMDB_[EN][HTTPS].psf V 1.4.1.0 (10/02/2019)

For now 2 movies triggered the error:
https://www.imdb.com/title/tt1210059/ Flying Lessons (2010)

https://www.imdb.com/title/tt1877647/ Ghoul (2012)

Seems the movies with this error have no Plot Keywords

Thanks for the error message. It's true, what you have already mentioned, that your movie titles have no Plot Keywords. I corrected this error.

Quote
CHANGE LOG :
            V 1.4.1.1 (20/06/2019) Ivek23: ParsePage_PLOTKEYWORDS small corrections and fix in the parts of the code 18-19/6/2019 forum alerts.
.
.
.
Function ParsePage_IMDBMoviePLOTKEYWORDS(HTML:String):Cardinal; //BlockOpen
    //Returns:
    //     Result:=prFinished; Script has finished gathering data
    //     Result:=prError; If ¿any big problem? with exit
    //Retrieve: ~Tags~
  Var
      curPos,endPos,index:Integer;
      //curPos,endPos:Integer;
      //ItemValue:String;
     ItemValue,ItemList:String;
     //Category,URL,Name:String;
     Category,Name:String;
     ItemArray:TWideArray;    
  Begin
    LogMessage('Function ParsePage_IMDBMoviePLOTKEYWORDS BEGIN======================|');
    Result:=prFinished;  //It will change to prError if any big problem with exit;   
   //Get "Plot Keywords" info
    curPos:=Pos('<h1 class="header">Plot Keywords</h1>',HTML);
    if (curPos=0) then Exit;
    EndPos:=curPos;   
   //Get "Plot Keywords" info
   //If Pos('<h1 class="header">Plot Keywords</h1>',HTML)>0 Then Begin
   curPos:=Pos('<h1 class="header">Plot Keywords</h1>',HTML);
   If 0<curPos Then Begin   
      EndPos:=curPos;   
      Category:=TextBetween(HTML,'<h1 class="header">','</h1>',True,curPos);
      LogMessage('      Get result Category:'+Category+'||');
      Name:=TextBetween(HTML,'<div class="header"><div class="nav"><div class="desc">','</div></div></div>',True,curPos);
      LogMessage('      Get result Name:'+Name+'||');
      AddCustomFieldValueByName('Plot Keywords','<link url="'+GetFieldValueXML('url')+'keywords">'+Category+'</link>'+'     '+Name);
   End;         
   //Get "Plot Keywords" info
If (Pos('It looks like we don'+Chr(39)+'t have any Plot Keywords for this title yet.',HTML)>0) then Exit;
   curPos:=Pos('<h1 class="header">Plot Keywords</h1>',HTML);
   If 0<curPos Then Begin   
      //EndPos:=curPos;
      //Go Tags list
      curPos:=Pos('<table class="dataTable evenWidthTable2Col"><tbody>',HTML);
      curPos:=curPos+Length('<table class="dataTable evenWidthTable2Col"><tbody>');
      endPos:=PosFrom('</table>',HTML,curPos);
      //ItemList:=Copy(HTML,curPos,endPos-curPos);
      ItemList:=Trim(Copy(HTML,curPos,endPos-curPos));
      curPos:=Pos('tp://ogp.me/ns#"',ItemList);
        If 0<curPos then ItemList:=Copy(ItemList,0,curPos-1);
      ItemList:=RemoveTagsEx(ItemList);      
      ItemList:=StringReplace(ItemList,'    </div>','|',True,True,False);               
      ItemList:=RemoveTags(ItemList, False);
      //LogMessage('           Parse results ('+IntToStr(curPos)+','+IntToStr(endPos)+') complex ItemList:'+ItemList+'||'+#13);         
      //LogMessage('           Parse results ItemList:'+#13+ItemList+' ||');
      //LogMessage('           Parse results ItemList: '+ItemList+' ||');
      ExplodeString(ItemList,ItemArray,'|');
      For index:=Low(ItemArray) To High(ItemArray) Do Begin        //Remember index begin in 0
            If (index=PLOTKEYWORDS_LIMIT) Then break;     //Limited depassed. Compares with = (not with >) because index begin in 0
         ItemValue:=ItemValue+ItemArray[index]+', ';
         LogMessage('    Get result Keyword: #'+IntToStr(index+1)+' | '+ItemArray[index]+', '+'||');
      End;
      index:=index+1;      
      If ItemValue <> '' then AddFieldValueXML('tags',ItemValue);
      LogMessage('      Get result Plot Keywords: '+ItemValue+'||');
    End;   
    LogMessage('Function ParsePage_IMDBMoviePLOTKEYWORDS END=====================||');
  End; //BlockClose

It's attached IMDB_ [EN] [HTTPS] V 1.4.1.1 script.

The IMDB_ [EN] [HTTPS] 1.4.1.1 script is also available via the program's auto-update system.

http://www.videodb.info/forum_en/index.php?action=down
« Last Edit: July 27, 2019, 04:19:14 pm by Ivek23 »
Ivek23
Win 7 32bit, 64bit   PVD v0.9.9.21, PVD v1.0.2.7 + MOD