221
Support / Re: New changes on ImdB made PVD 1.0.2.7 Unusable
« on: December 07, 2021, 08:04:05 am »
I am glad that now the script works according to your wishes.
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
• Directed
• Writing Credits
• Cast (in credits order) // Only data info in normal Actors field
• Produced
• Music
• Cinematography
• Film Editing
• Casting
• Production Design
• Art Direction
• Set Decoration
• Costume Design
• Production Management
• Second Unit Director or Assistant Director
• Directed by
• Writing Credits (WGA)
• Cast (in credits order) verified as complete
• Produced by
• Music by
• Cinematography by
• Film Editing by
• Casting By
• Production Design by
• Art Direction by
• Set Decoration by
• Costume Design by
• Makeup Department
• Production Management
• Second Unit Director or Assistant Director
• Art Department
• Sound Department
• Special Effects by
• Visual Effects by
• Stunts
• Camera and Electrical Department
• Casting Department
• Costume and Wardrobe Department
• Editorial Department
• Location Management
• Music Department
• Script and Continuity Department
• Transportation Department
• Additional Crew
GET_ORIGINAL_TITLE = True ; //Download the alternate title info in your language in your country in of the principal movie page if it exists there for to replace the original title in the Title field.like this
// GET_ORIGINAL_TITLE = False ; //Download the alternate title info in your language in your country in of the principal movie page if it exists there for to replace the original title in the Title field.
// GET_ORIGINAL_TITLE = True ; //Download the alternate title info in your language in your country in of the principal movie page if it exists there for to replace the original title in the Title field.
GET_ORIGINAL_TITLE = False ; //Download the alternate title info in your language in your country in of the principal movie page if it exists there for to replace the original title in the Title field.
Hello Ivek. Am i wrong or "Episode aired" field is still not working?
I hope you will help me 2 more questions.
in the script code, I found:QuoteIf (Length(ItemValue)=0) Then ItemValue:=titleValue; //Provider hides the original title if same that title. WEB_SPECIFIC
Is there a way to unhide both origtitle and title when they're the same?
//Get ~alternatetitle~
ItemValue:=TextBetWeenFirst(ItemList,'","alternateName":"','","'); //Strings which opens/closes the data. WEB_SPECIFIC
AddCustomFieldValueByName('Localized title',ItemValue);
if GET_LOCAL_TITLE then AddFieldValueXML('title',ItemValue);
if ItemValue <> '' then LogMessage(' Get result alternatetitle:'+ItemValue+'||');
If ItemValue <> '' then AddCustomFieldValueByName('Imdb_Title',ItemValue+#13+titleValue+' (original title)')
Else AddCustomFieldValueByName('Imdb_Title',titleValue);
//Get ~IMDB_Movietype~
And maybe the biggest challenge for me. Is it possible to get/import English (International) title to a Title field while at the same time importing Localized Title too? Or to some other custom field for example?
Function ParsePage_IMDBMovieAKA(HTML:String):Cardinal; //BlockOpen
//Returns:
// Result:=prFinished; Script has finished gathering data
// Result:=prError; If żany big problem? with exit;
//Retrieve: ~aka~ "Also Known As"
Var
curPos,endPos,index:Integer;
ItemValue,ItemList:String;
ItemValue1:String;
ItemList2:String;
Name,Role,ItemValue2:String;
ItemArray: TWideArray;
Begin
LogMessage('Function ParsePage_IMDBMovieAKA BEGIN=====================||');
Result:=prFinished; //It will change to prError if any big problem with exit;
//Get ~aka~ (several values in a line break separated list) Be careful don't repeat
.
.
.
//Get all aka list ~Imdb Aka~
ItemValue1:=StringReplace(ItemValue1,'|','',True,True,False);
ItemValue1:=StringReplace(ItemValue1,' ',#13,True,True,False);
AddCustomFieldValueByName('Imdb Aka',ItemValue1);
//Get ~aka~ (English title)
curPos:=Pos('<table class="ipl-zebra-list akas-table-test-only">',ItemList2) //String which opens the subList data. WEB_SPECIFIC
While curPos>0 Do Begin
Name:=TextBetWeen(ItemList2,'<td class="aka-item__name">','</td>',false,curPos);
if Name <> '' then LogMessage(' Get result Name:'+Name+'||');
Role:=TextBetWeen(ItemList2,'<td class="aka-item__title">','</td>',false,curPos);
if Role <> '' then LogMessage(' Get result Role:'+Role+'||');
if ItemValue2 <> '' then ItemValue2:=ItemValue2+#13;
if Name <> '' then ItemValue2:=ItemValue2+Name;
if Role <> '' then ItemValue2:=ItemValue2+#160#160+Role;
if ItemValue2 <> '' then LogMessage(' Get results aka 2:'+ItemValue2+'||');
If Pos('(English title)',Name) > 1 then Role:=Role else Role:='';
if ItemValue2 <> '' then LogMessage(' Get results aka2:'+Role+'||');
AddCustomFieldValueByName('English title',Role);
//AddFieldValueXML('title',Role);
curPos:=PosFrom('<tr class="ipl-zebra-list__item aka-item">',ItemList2,curPos) //String which opens the subList data. WEB_SPECIFIC
End;
LogMessage('Function ParsePage_IMDBMovieAKA END=====================||');
End; //BlockClose