////////////// // // IMDB v0.2a by Pri (30th of April 2010) // ////////////// // // Commands Included that you can use: // !IMDB [Film Name] - Perform a query to locate information about a film from IMDB // !PrivateIMDB - Typing this will set IMDB to only give results privately to those who use the command // !PublicIMDB - Typing this will set IMDB to give results to the entire room when someone uses the command // NOT DONE YET: !Hate [Film Name] - Rate a film by saying you hate it (ratings appear on the !IMDB command when used) // NOT DONE YET: !like [Film Name] - Rate a film by saying you like it (ratings appear on the !IMDB command when used) // // Dev commands: // /APIIMDB [Film Name] - This is for developers so that they can cache content from IMDB for later use by other scripts they make // NOT DONE YET: !Cache Off - Set the script not to use its Cache (This is just for testing, do not leave the cache off!) // NOT DONE YET: !Cache On - Set the script to use its cache again (Default behavier) // ////////////// // This usergroup is only for your admins so that they can control some of the special commands. // Everyone even if they are not in this usergroup will be able to type !IMDB [Film Name] and see the results * ®ÊN Pri * !imdb %PARAM% !imbd %PARAM% /apiimdb %PARAM% // Check that the command[s] were used at the beginning of a sentance %TRIGGER% // Check that the scripts folder and settings file has been setup. If it hasn't do it. cmd.exe /c MD C:\Pri.Script.Dependencies\IMDB\Ratings 1 // Download some special characters required for this to function (Metis by itself doesn't allow these characters inside the code so they have to be loaded as varibles) // Pop some varibles for later use 1 // Check if the script has been set to Public or Private Mode // If the user has selected to use private commands formulate how it should look for this query // Check if there is a Cache for this Movie already and if there is, output it to the room %PARAM% %USERVAR[Server_Private_Command]%%USERVAR[LOOKEDUPTODAY1]% #c63#(#c62#Cache#c63#) %USERVAR[Server_Private_Command]%%USERVAR[LOOKEDUPTODAY2]% %USERVAR[Server_Private_Command]%%USERVAR[LOOKEDUPTODAY3]% %USERVAR[Server_Private_Command]%%USERVAR[LOOKEDUPTODAY4]% %USERVAR[Server_Private_Command]%%USERVAR[LOOKEDUPTODAY5]% %USERVAR[Server_Private_Command]%%USERVAR[LOOKEDUPTODAY6]% %USERVAR[Server_Private_Command]%%USERVAR[LOOKEDUPTODAY7]% %USERVAR[Server_Private_Command]%%USERVAR[LOOKEDUPTODAY8]% %USERVAR[Server_Private_Command]%%USERVAR[LOOKEDUPTODAY9]% %USERVAR[Server_Private_Command]%%USERVAR[LOOKEDUPTODAY10]% %USERVAR[Server_Private_Command]%%USERVAR[LOOKEDUPTODAY11]% %USERVAR[Server_Private_Command]%#c1# #c62# %USERVAR[Server_Private_Command]%#c62# <· #c4#Room Rating %USERVAR[Server_Private_Command]%#c1# #c1# #c1# #c1# #c1# #c1#Liked By#c63#: #c10#%USERVAR[IMDB_LIKE]% #c62#·> %USERVAR[Server_Private_Command]%#c1# #c1# #c1# #c1# #c1# #c1#Hated By#c63#: #c10#%USERVAR[IMDB_HATE]% #c62#·> // Check for an updated version of this script v0.2a /opmsg #c4#IMDB #c63#(#c62#v0.2a#c63#): #c9#%USERVAR[Version_Release_Message]% %DATE% // Download Advertisement/Credit Message // Query the MXPulse IMDB API to get the films page ID %PARAM% http://imdb.mxpulse.com/query.php?film=%USERVAR[PARAMTHING]% %USERVAR[Server_Private_Command]%#c1# · #c9#Unable to locate this Movie at the IMDB, Please try again later. // Create the URL to query using the IMDB number from MXPulse.com http://www.imdb.com/title/tt%USERVAR[string01]%/ // Query the first 700 lines of the IMDB Page // Filter the results for reading back later on // Save the filtered output to file for reading back 1\n$string03$\n // Locate the Movie rating (out of 10) from the IMDB Page 0 // Filter the rating output for outputting to the room and saving #c8#0.0 // Output the Movie Name, Rating and Page URL %USERVAR[Server_Private_Command]%#c62# <· #c4#%USERVAR[string02]% #c1#· %USERVAR[RATING]%#c63#/#c1#10 #c63#(#c62#Web#c63#) %USERVAR[Server_Private_Command]%#c1# #c1# #c1# #c1# #c1# http://www.imdb.com/title/tt%USERVAR[string01]%/ #c62#·> // Pop some Varibles for later use // Output the Director[s] of the Movie %USERVAR[Server_Private_Command]%#c1# #c62# %USERVAR[Server_Private_Command]%#c62# <· #c4#Direction %USERVAR[Server_Private_Command]%#c1# #c1# #c1# #c1# #c1# %USERVAR[string04]% #c62#·> // Read in the previous temp cache, change some .'s to Newlines, and save again $string05$ // Filter some more stuff from the temp cache // Output the Actors of the film %USERVAR[Server_Private_Command]%#c1# #c62# %USERVAR[Server_Private_Command]%#c62# <· #c4#Actors of Significance %USERVAR[Server_Private_Command]%#c1# #c1# #c1# #c1# #c1# %USERVAR[string05]% #c62#·> // Read in all the Genre information for this film 0 // Process all the possible Genres so they look nice #c9#,#c62# Action $GENRE_DATA$#c9#,#c62# Adventure $GENRE_DATA$#c9#,#c62# Animation $GENRE_DATA$#c9#,#c62# Biography $GENRE_DATA$#c9#,#c62# Comedy $GENRE_DATA$#c9#,#c62# Crime $GENRE_DATA$#c9#,#c62# Documentary $GENRE_DATA$#c9#,#c62# Drama $GENRE_DATA$#c9#,#c62# Family $GENRE_DATA$#c9#,#c62# Fantasy $GENRE_DATA$#c9#,#c62# History $GENRE_DATA$#c9#,#c62# Horror $GENRE_DATA$#c9#,#c62# Music $GENRE_DATA$#c9#,#c62# Musical $GENRE_DATA$#c9#,#c62# Romance $GENRE_DATA$#c9#,#c62# Short $GENRE_DATA$#c9#,#c62# Sci-Fi $GENRE_DATA$#c9#,#c62# Thriller $GENRE_DATA$#c9#,#c62# War No Genre Found #c63#(#c62#%USERVAR[GENRE_DATA]%#c63#) // Process the Plot 0 No Plot for that Title could be Found, try visiting the IMDB page manually using the above Address. %USERVAR[Server_Private_Command]%#c1# #c62# %USERVAR[Server_Private_Command]%#c62# <· #c4#Plot Summary %USERVAR[GENRE_DATA]% %USERVAR[Server_Private_Command]%#c1# #c1# #c1# #c1# #c1# %USERVAR[ESRESULTENTRY]% #c62#·> %USERVAR[Server_Private_Command]%#c1# #c62# %USERVAR[Server_Private_Command]%#c62# <· #c4#Room Rating %USERVAR[Server_Private_Command]%#c1# #c1# #c1# #c1# #c1# #c1#Liked By#c63#: #c10#%USERVAR[IMDB_LIKE]% #c62#·> %USERVAR[Server_Private_Command]%#c1# #c1# #c1# #c1# #c1# #c1#Hated By#c63#: #c10#%USERVAR[IMDB_HATE]% #c62#·> // Break here if the Plot for the movie wasn't found // Show an Advertisment from Pri when the script is run, create a random number between 1 and 5. If its 1 = Ad shows %RANDOMNUM[5]% // Output to room if Randum Number = 1 %USERVAR[Server_Private_Command]%#c1# #c62# %USERVAR[Server_Private_Command]%#c62# <· #c4#Advertisement %USERVAR[Server_Private_Command]%#c1# #c1# #c1# #c1# #c1# %USERVAR[Advertisement]% #c62#·> // Create a local cache of this data so that it can later be read back. This cache can last a maximum of 1 month. %MONTH%\n #c62# <· #c4#%USERVAR[string02]% #c1#· %USERVAR[RATING]%#c63#/#c1#10\n #c1# #c1# #c1# #c1# #c1# http://www.imdb.com/title/tt%USERVAR[string01]% #c62#·>\n #c1# #c62#\n #c62# <· #c4#Direction\n #c1# #c1# #c1# #c1# #c1# %USERVAR[string04]% #c62#·>\n #c1# #c62#\n #c62# <· #c4#Actors of Significance\n #c1# #c1# #c1# #c1# #c1# %USERVAR[string05]% #c62#·>\n #c1# #c62#\n #c62# <· #c4#Plot Summary %USERVAR[GENRE_DATA]%\n #c1# #c1# #c1# #c1# #c1# %USERVAR[ESRESULTENTRY]% #c62#·>\n !privateimdb !publicimdb // Check if the command was typed at the start of a sentence, if not break %TRIGGER% // Process which command the user typed 1\n 0 // Output to the Admins if it was set to Public Mode /opmsg #c4#IMDB #c63#(#c62#v0.2a#c63#): #c1#IMDB Has been set to Public Mode /opmsg #c4#IMDB #c63#(#c62#v0.2a#c63#): #c62#When this is set to Public, all IMDB results will be shown to the entire room // Break if the user selected to use Public // If the user selected PrivateIMDB, work out which server is in use 0 /hidecmd /privnotice :@:RAWNAME:@::@:SPACE:@: /hidecmd /privnotice :@:RAWNAME:@::@:SPACE:@: /message :@:RAWNAME:@::@:SPACE:@: #private :@:RAWNAME:@: #message:@:SPACE:@: // Because ZCS does not report itself as ZCS and instead as WinMX we are just going to assume that WinMX = ZCS /privnotice :@:RAWNAME:@::@:SPACE:@: // Save the command for later use %USERVAR[Server_Private_Command]% // Server not recognised Message /opmsg #c4#IMDB #c63#(#c62#v0.2a#c63#): #c9#IMDB cannot be set to Private in your room as the Server #c63#(#c62#%SERVER%#c63#)#c9# is not supported by the script currently 0 // Output to the Admins if it was set to Private Mode /opmsg #c4#IMDB #c63#(#c62#v0.2a#c63#): #c1#IMDB Has been set to Private Mode /opmsg #c4#IMDB #c63#(#c62#v0.2a#c63#): #c62#When this is set to Private, only those who use the !IMDB command will see results