BinaryWorks.it Official Forum
BinaryWorks.it Official Forum
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
Password:
Save Password
Forgot your Password? | Admin Options

 All Forums
 eXtreme Movie Manager (Rel. 7), No More Updates
 Scripts
 New script for Allocine : no actors downloaded
 New Topic  Reply to Topic
 Printer Friendly
Author Previous Topic Topic Next Topic Lock Topic Edit Topic Delete Topic New Topic Reply to Topic

SpareParts
Starting Member

France
2 Posts

Posted - 31 Oct 2004 :  15:30:44  Show Profile  Edit Topic  Reply with Quote  View user's IP address  Delete Topic
Hi,
I just tried the new script for Allocine. I have 2 problems :
- The actors list returned is html garbage
- The pictures are downloaded fine from the pictures tab of allocine, but the cover picture of the main page is ignored.

Thanks for help.

kris38
Starting Member

France
5 Posts

Posted - 06 Nov 2004 :  11:11:30  Show Profile  Edit Reply  Reply with Quote  View user's IP address  Delete Reply
Hi,
take a look to the same topics. I have given an answer to the problems.
Go to Top of Page

smusat
Starting Member

France
10 Posts

Posted - 07 Nov 2004 :  14:48:29  Show Profile  Edit Reply  Reply with Quote  View user's IP address  Delete Reply
I'm afraid your script is out of date, kris38 ...

The new script from CSU run fine in Magic Script Editor, but not in the Import Engine !?
This is confusing, maybe could someone explain that ?

However, about the actors bug, I've found that duplicating the #READNEXTLINE# tags in CSU script will do the job :D
And additionally, this will also correct the movies list, as the script was first designed :)

I think it would be more difficult to get the "main" cover, because Allocine stores all covers and photos on a sub-page ...
Go to Top of Page

aragorn006
Starting Member

5 Posts

Posted - 14 Nov 2004 :  20:01:16  Show Profile  Edit Reply  Reply with Quote  View user's IP address  Delete Reply
Hi,
I've try to enhance CSU script but I spent hours in vain!!! Same problem as smusat.
Evrything is fine in Magic Script Editor (v2.9 b4), but no actors in the Import Engine!?

Duplicating #READNEXTLINE# in CSU script works fine but it should not, that's crazy!!!

Here is my work, please take a look at the actors section (try testing with Nikita for example)

Thanks

------------------------------------------------------------------
- eXtreme Movie Manager -
- MagicScript Technology -
- 2002 Alessio "AleTsg" Viti -
- 2003 Emmanuel "Manette" Jacobs -
- 2003 Updated by MacGyver -
- 2004 Rewritten by CSU -
------------------------------------------------------------------
- Web : ALLOCINE.FR -
- Author : CSU some part form the former script -
- Alessio Viti / Emmanuel Jacobs / MacGyver -
- Date : 29/10/2004 -
- Comments : Import All Information available except comments -
- Report bugs/comments to csu333-xmmscripts@yahoo.fr -
- Modified : 14/11/2004 Leretour -
- Actors sans les roles -
- (sympa mais pollu base acteurs) -
- Actors avec les roles dans TagLine -
- Country sans "film " et "." -
------------------------------------------------------------------
#MADEBY#=CSU
#DATEBUILD#=1/06/2003
#WEBSITE#=ALLOCINE.FR - (FRENCH)
#NOTE#=Import All Information Available with Big Pictures
#SCRIPTQUALITY#=4
#ICONQUALITY#=4
#REPLACESPACES#=+
#WEBQUERY#=http://www.allocine.fr/recherche/?motcle=#MOVIE#&f=3&rub=1

#RIGHTPAGEFOUND#

#STARTREADWEB#

#FINDLINE#=(1 rponse)#12##ONERROR#=*STOP*

#PUT#=0#00#

#CONDITIONRIGHTPAGE# #12#<>#00#

#ENDRIGHTPAGEFOUND#

#CREATEMOVIELIST#
#STARTREADWEB#
#FINDLINE#=Films #12##ONERROR#=*STOP*

#PUT#=0#00#
#PUT#=0#50#

#WRITETITLELIST#=Films

#FIND#=Pas de résultats#12##ONERROR#=*OK*

#IF# #00#<>#12#
#WRITETITLELIST#=Aucun résultat
#GOTO#=NoResult
#ENDIF#

:ReadNewPage

#FINDLINE#=<a href="/film/fichefilm_gen_cfilm=#12##ONERROR#=*OK*

#REPEAT#

#FIND#=">#01##ONERROR#=*OK*
#COMPUTEVAR#=#01#=+1
#FIND#=</a>#02##ONERROR#=*OK*

#TAKEWORD#=#03#,#01#,#02#

#CHECKVARIABLE#=#03#
#STARTDELETETAGS#

:GetMovieSiteID

#SETCURSOR#=1
#FIND#=_cfilm#01##ONERROR#=*OK*
#COMPUTEVAR#=#01#=+6
#FIND#=.html#02##ONERROR#=*OK*

#TAKEWORD#=#09#,#01#,#02#

:SeekForOriginalTitle

#READNEXTLINE#

#FIND#=(#01##ONERROR#=*OK*
#IF# #01#<>#00#
#FIND#=)#02##ONERROR#=*OK*
#TAKEWORD#=#04#,#01#,#02#
#CHECKVARIABLE#=#04#
#STARTDELETETAGS#
#STRING#=#03#=#03# (#04#)
#READNEXTLINE#
#ENDIF#

#STRING#=#06#=http://www.allocine.fr/film/fichefilm_gen_cfilm=#09#.html

#WRITETITLELIST#=#06# ---> #03#

#READNEXTLINE#

#FIND#=<br />#01##ONERROR#=*OK*

#IF# #01#==#00#

:SearchForDetailMain

#FIND#=>#01##ONERROR#=*OK*
#FIND#=<#02##ONERROR#=*OK*
#TAKEWORD#=#04#,#01#,#02#

#CHECKVARIABLE#=#04#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#

:SearchForDetailSecond

#READNEXTLINE#

#FIND#=>#01##ONERROR#=*OK*
#FIND#=<#02##ONERROR#=*OK*
#TAKEWORD#=#05#,#01#,#02#

#CHECKVARIABLE#=#05#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#

#STRING#=#03#= #04##05#

#WRITETITLELIST#=#03#
#ENDIF#

:ExitWhilePage

#FINDLINE#=<a href="/film/fichefilm_gen_cfilm=#12##ONERROR#=*OK*

#WHILE# #00#<>#12#

#STARTREADWEB#
#FINDLINE#=Films suivants#10##ONERROR#=*STOP*

#IF# #10#<>#00#
#SETCURSOR#=1
#FIND#="/recherche#01##ONERROR#=*OK*
#COMPUTECURSOR#=+1
#FIND#="#02##ONERROR#=*OK*
#TAKEWORD#=#03#,#01#,#02#
#STRING#=#03#=http://www.allocine.fr#03#
#ENDIF#

#IF# #50#<>#00#
#RESTOREWEB#
#ENDIF#

#IF# #10#<>#00#
#PUT#=1#50#
#OPENNEWWEB#=#03#
#GOTO#=ReadNewPage
#ENDIF#
:NoResult

#ENDCREATEMOVIELIST#

#MOVIETITLE#
#STARTREADWEB#

#PUT#=0#00#

#FINDLINE#=<h1 style="color: #D20000">#12# #ONERROR#=*STOP*
#READNEXTLINE#

#FIND#=>#01##ONERROR#=*STOP*
#FIND#=<#02##ONERROR#=*STOP*

#TAKEWORD#=#03#,#01#,#02#
#CHECKVARIABLE#=#03#
#STARTDELETETAGS#

#FINDLINE#=Titre original :#12# #ONERROR#=*OK*

#IF# #12#==#00#
#GOTO#=TakeTitle
#ENDIF#

#FIND#=>#01##ONERROR#=*STOP*
#FIND#=<#02##ONERROR#=*STOP*

#TAKEWORD#=#03#,#01#,#02#
#CHECKVARIABLE#=#03#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#

:TakeTitle

#TITLE#=#03# #ONERROR#=*ASK*
#ENDMOVIETITLE#

#DIRECTOR#
#STARTREADWEB#
#FINDLINE#=Réalisé par#12##ONERROR#=*STOP*
#PUT#=0#09#
#REPEAT#
#FIND#=Href="#10# #ONERROR#=*OK*
#IF# #10#==#09#
#GOTO#=GOLABEL
#ENDIF#
#FIND#=>#01# #ONERROR#=*ASK*
#FIND#=<#02# #ONERROR#=*ASK*
#TAKEWORD#=#03#,#01#,#02#
#CHECKVARIABLE#=#03#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#
#TAKEDIRECTOR#=#03#
#WHILE# #09#<>#10#
:GOLABEL
#PUT#= #03#
#TAKEDIRECTOR#=#03#
#ENDDIRECTOR#

#ACTORS#
#STARTREADWEB#
#PUT#=0#00#
#FINDLINE#=Voir tout le casting...#12##ONERROR#=*STOP*
#READNEXTLINE#

#FIND#=<a class="link1"#01##ONERROR#=*STOP*
#REPEAT#

#FIND#=target="">#01##ONERROR#=*OK*
#COMPUTEVAR#=#01#=+9
#FIND#=</a>#02##ONERROR#=*OK*
#TAKEWORD#=#03#,#01#,#02#
#CHECKVARIABLE#=#03#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#

#TAKEACTOR#=#03#
#FIND#=<a class="link1"#01##ONERROR#=*OK*

#WHILE# #01#<>#00#

#ENDACTORS#

#GENRE#
#STARTREADWEB#

#FINDLINE#=Genre :#12##ONERROR#=*STOP*

#FIND#=:#01# #ONERROR#=*OK*
#COMPUTEVAR#=#01#=+1
#FIND#=<#02# #ONERROR#=*OK*
#TAKEWORD#=#03#=#01#=#02#

#TAKEGENRE#=#03#

#ENDGENRE#

#RATING#
#STARTREADWEB#
#FINDLINE#=class="link1">Spectateurs#12##ONERROR#=*STOP*
#FIND#=etoile_#01# #ON ERROR#=*OK*
#FIND#=_#01# #ON ERROR#=*OK*
#FIND#=.gif#02# #ON ERROR#=*OK*
#TAKEWORD#=#03#,#01#,#02#
#TAKERATING#=#03#
#ENDRATING#

#PLOT#
#STARTREADWEB#

#PUT#=0#00#
#PUT#=#04#
#PUT#=</tr>#05#

#FINDLINE#=>Synopsis<#12##ONERROR#=*STOP*
#FINDLINE#=<td valign="top" style="padding:10 0 0 0">#12##ONERROR#=*STOP*

#FIND#=<h4>#01##ONERROR#=*OK*
#COMPUTEVAR#=#01#=+3

:ReadLine

#REPEAT#
#TAKEWORD#=#03#=#01#=#00#

#STRING#=#04#=#04##03#

#READNEXTLINE#

#PUT#=0#01#
#TAKEWORD#=#02#=#01#=#00#
#WHILE# #02#<>#05#

#CHECKVARIABLE#=#04#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#
#TAKEPLOT#=#04# #ONERROR#=*ASK*

#ENDPLOT#

#RUNTIME#
#STARTREADWEB#
#FINDLINE#=Durée#12##ONERROR#=*STOP*
#FIND#=:#01# #ONERROR#=*STOP*
#COMPUTEVAR#=#01#=+1
#FIND#=.#02# #ONERROR#=*STOP*
#TAKEWORD#=#03#,#01#,#02#
#TAKERUNTIME#=#03# #ONERROR#=*ASK*
#ENDRUNTIME#

#COUNTRY#
#STARTREADWEB#
#FINDLINE#=Voir tout le casting...#12##ONERROR#=*STOP*
#READNEXTLINE#
#READNEXTLINE#
#READNEXTLINE#

#FIND#=>Film #01##ONERROR#=*OK*
#COMPUTEVAR#=#01#=+5
#FIND#=.<#02##ONERROR#=*OK*
#TAKEWORD#=#03#=#01#=#02#

#TAKECOUNTRY#=#03#
#ENDCOUNTRY#

#YEAR#
#STARTREADWEB#
#FINDLINE#=Année de production#12##ONERROR#=*STOP*
#FIND#=:#01# #ONERROR#=*STOP*
#COMPUTEVAR#=#01#=+1
#FIND#=<#02# #ONERROR#=*STOP*
#TAKEWORD#=#03#,#01#,#02#

#TAKEYEAR#=#03# #ONERROR#=*ASK*
#ENDYEAR#

#POSTER#
#STARTREADWEB#

#PUT#=http://www.allocine.fr/ext2#50#
#PUT#=0#00#

#FINDLINE#=Toute la Galerie Photos#12##ONERROR#=*STOP*
#SETCURSOR#=1
#FIND#=/film/galerie#01# #ONERROR#=*STOP*
#FIND#=.htm#02# #ONERROR#=*STOP*
#TAKEWORD#=#03#,#01#,#02#
#STRING#=#03#=http://www.allocine.fr/#03#.html

:TakeNextPoster

#OPENNEWWEB#=#03#
#FINDLINE#=class="galerie"#12##ONERROR#=*STOP*
#SETCURSOR#=1
#FIND#="#01# #ONERROR#=*ASK*
#COMPUTECURSOR#=+1
#FIND#="#02# #ONERROR#=*ASK*
#TAKEWORD#=#03#,#01#,#02#

#TAKEPOSTER#=#03#

:NextPoster

#FINDLINE#=>>#12##ONERROR#=*STOP*
#COMPUTECURSOR#=-100
#FIND#="#01# #ONERROR#=*OK*
#IF# #12#<>#00#
#COMPUTECURSOR#=+1
#PUTCURSOR#=#01#
#FIND#="#02# #ONERROR#=*ASK*
#TAKEWORD#=#03#,#01#,#02#
#STRING#=#03#=http://www.allocine.fr/#03#
#ENDIF#

#RESTOREWEB#

#IF# #03#<>#50#
#GOTO#=TakeNextPoster
#ENDIF#

#ENDPOSTER#

#TAGLINE#
#STARTREADWEB#

#FINDLINE#=Voir tout le casting...#12##ONERROR#=*STOP*

#SETCURSOR#=1
#FIND#="/film/#01##ONERROR#=*OK*
#COMPUTECURSOR#=+1
#FIND#="#02##ONERROR#=*OK*
#TAKEWORD#=#03#=#01#=#02#
#STRING#=#03#=http://www.allocine.fr#03#

#OPENNEWWEB#=#03#

#FINDLINE#=<b>Acteur(s)</b>#12##ONERROR#=*STOP*

#FINDLINE#=<tr style="background-color#10##ONERROR#=*STOP*
#PUT#=Casting#05#

#REPEAT#

#READNEXTLINE#
#READNEXTLINE#
#SETCURSOR#=2

#FIND#=<h5>#01##ONERROR#=*OK*
#COMPUTECURSOR#=+3
#PUTCURSOR#=#01#
#FIND#=</h5>#02##ONERROR#=*OK*
#TAKEWORD#=#03#=#01#=#02#

#READNEXTLINE#
#READNEXTLINE#

#FIND#=class="link1"><h4>#01##ONERROR#=*OK*
#COMPUTECURSOR#=+17
#PUTCURSOR#=#01#
#FIND#=</h4>#02##ONERROR#=*OK*
#TAKEWORD#=#04#=#01#=#02#

#STRING#=#05#=#05# - #04# (#03#)

#FINDLINE#=<tr style="background-color#10##ONERROR#=*OK*

#WHILE# #10#<>#00#

#TAKETAGLINE#=#05#
#RESTOREWEB#

#ENDTAGLINE#

#DELETETAGS#
#DELETEWORD#=<sup>
#DELETEWORD#=</sup>
#DELETEWORD#=<BR>
#DELETEWORD#=<BR />
#DELETEWORD#=<br />
#DELETEWORD#=</BR>
#DELETEWORD#=</br>
#DELETEWORD#=<P>
#DELETEWORD#=</P>
#DELETEWORD#=<p>
#DELETEWORD#=</p>
#DELETEWORD#=<BLOCKQUOTE>
#DELETEWORD#=</BLOCKQUOTE>
#DELETEWORD#=<blockquote>
#DELETEWORD#=</blockquote>
#DELETEWORD#=<B>
#DELETEWORD#=</B>
#DELETEWORD#=<b>
#DELETEWORD#=</b>
#DELETEWORD#=<I>
#DELETEWORD#=</I>
#DELETEWORD#=<h4>
#DELETEWORD#=</h4>
#DELETEWORD#=<div>
#DELETEWORD#=</div>
#DELETEWORD#=<td>
#DELETEWORD#=</td>

#DELETEWORD#=<i>
#DELETEWORD#=</i>
#DELETEWORD#=<U>
#DELETEWORD#=</U>
#DELETEWORD#=<u>
#DELETEWORD#=</u>
#DELETEWORD#=<font size=2>
#DELETEWORD#=<FONT Class="size2">
#DELETEWORD#=</FONT>
#DELETEWORD#=</A>
#DELETEWORD#=</font>
#DELETEWORD#=</a>
#ENDDELETETAGS#

#SUBSTITUTETAGS#
#SUBSTITUTEWORD#=<br>=#NEWLINE#
#SUBSTITUTEWORD#= =
#SUBSTITUTEWORD#=&NBSP;=
#SUBSTITUTEWORD#=#160;=
#SUBSTITUTEWORD#=#161;=¡
#SUBSTITUTEWORD#=#162;=¢
#SUBSTITUTEWORD#=#163;=£
#SUBSTITUTEWORD#=#164;=¤
#SUBSTITUTEWORD#=#165;=¥
#SUBSTITUTEWORD#=#166;=¦
#SUBSTITUTEWORD#=#167;=§
#SUBSTITUTEWORD#=#168;=¨
#SUBSTITUTEWORD#=#169;=©
#SUBSTITUTEWORD#=#170;=ª
#SUBSTITUTEWORD#=#171;=«
#SUBSTITUTEWORD#=#172;=¬
#SUBSTITUTEWORD#=#173;=­
#SUBSTITUTEWORD#=#174;=®
#SUBSTITUTEWORD#=#175;=¯
#SUBSTITUTEWORD#=#176;=°
#SUBSTITUTEWORD#=#177;=±
#SUBSTITUTEWORD#=#178;=²
#SUBSTITUTEWORD#=#179;=³
#SUBSTITUTEWORD#=#180;=´
#SUBSTITUTEWORD#=#181;=µ
#SUBSTITUTEWORD#=#182;=¶
#SUBSTITUTEWORD#=#183;=·
#SUBSTITUTEWORD#=#184;=¸
#SUBSTITUTEWORD#=#185;=¹
#SUBSTITUTEWORD#=#186;=º
#SUBSTITUTEWORD#=#187;=»
#SUBSTITUTEWORD#=#188;=¼
#SUBSTITUTEWORD#=#189;=½
#SUBSTITUTEWORD#=#190;=¾
#SUBSTITUTEWORD#=#191;=¿
#SUBSTITUTEWORD#=#192;=À
#SUBSTITUTEWORD#=#193;=Á
#SUBSTITUTEWORD#=#194;=Â
#SUBSTITUTEWORD#=#195;=Ã
#SUBSTITUTEWORD#=#196;=Ä
#SUBSTITUTEWORD#=#197;=Å
#SUBSTITUTEWORD#=#198;=Æ
#SUBSTITUTEWORD#=#199;=Ç
#SUBSTITUTEWORD#=#200;=È
#SUBSTITUTEWORD#=#201;=É
#SUBSTITUTEWORD#=#202;=Ê
#SUBSTITUTEWORD#=#203;=Ë
#SUBSTITUTEWORD#=#204;=Ì
#SUBSTITUTEWORD#=#205;=Í
#SUBSTITUTEWORD#=#206;=Î
#SUBSTITUTEWORD#=#207;=Ï
#SUBSTITUTEWORD#=#208;=Ð
#SUBSTITUTEWORD#=#209;=Ñ
#SUBSTITUTEWORD#=#210;=Ò
#SUBSTITUTEWORD#=#211;=Ó
#SUBSTITUTEWORD#=#212;=Ô
#SUBSTITUTEWORD#=#213;=Õ
#SUBSTITUTEWORD#=#214;=Ö
#SUBSTITUTEWORD#=#215;=×
#SUBSTITUTEWORD#=#216;=Ø
#SUBSTITUTEWORD#=#217;=Ù
#SUBSTITUTEWORD#=#218;=Ú
#SUBSTITUTEWORD#=#219;=Û
#SUBSTITUTEWORD#=#220;=Ü
#SUBSTITUTEWORD#=#221;=Ý
#SUBSTITUTEWORD#=#222;=Þ
#SUBSTITUTEWORD#=#223;=ß
#SUBSTITUTEWORD#=#224;=à
#SUBSTITUTEWORD#=#225;=á
#SUBSTITUTEWORD#=#226;=â
#SUBSTITUTEWORD#=#227;=ã
#SUBSTITUTEWORD#=#228;=ä
#SUBSTITUTEWORD#=#229;=å
#SUBSTITUTEWORD#=#230;=æ
#SUBSTITUTEWORD#=#231;=ç
#SUBSTITUTEWORD#=#232;=è
#SUBSTITUTEWORD#=#233;=é
#SUBSTITUTEWORD#=#234;=ê
#SUBSTITUTEWORD#=#235;=ë
#SUBSTITUTEWORD#=#236;=ì
#SUBSTITUTEWORD#=#237;=í
#SUBSTITUTEWORD#=#238;=î
#SUBSTITUTEWORD#=#239;=ï
#SUBSTITUTEWORD#=#240;=ð
#SUBSTITUTEWORD#=#241;=ñ
#SUBSTITUTEWORD#=#242;=ò
#SUBSTITUTEWORD#=#243;=ó
#SUBSTITUTEWORD#=#244;=ô
#SUBSTITUTEWORD#=#245;=õ
#SUBSTITUTEWORD#=#246;=ö
#SUBSTITUTEWORD#=#247;=÷
#SUBSTITUTEWORD#=#248;=ø
#SUBSTITUTEWORD#=#249;=ù
#SUBSTITUTEWORD#=#250;=ú
#SUBSTITUTEWORD#=#251;=û
#SUBSTITUTEWORD#=#252;=ü
#SUBSTITUTEWORD#=#253;=ý
#SUBSTITUTEWORD#=#254;=þ
#SUBSTITUTEWORD#=#255;=ÿ
#ENDSUBSTITUTETAGS#
Go to Top of Page

smusat
Starting Member

France
10 Posts

Posted - 23 Nov 2004 :  07:45:12  Show Profile  Edit Reply  Reply with Quote  View user's IP address  Delete Reply
I tried your script, the search does not work at all, aragorn006 !
Maybe a copy/paste behaviour ... ? ;)
Here is my working script :
------------------------------------------------------------------
-            eXtreme Movie Manager                               -
-            MagicScript Technology                              -
-          2002 Alessio "AleTsg" Viti                            -
-          2003 Emmanuel "Manette" Jacobs                        -
-          2003 Updated by MacGyver                              -
-          2004 Rewritten by CSU                                 -
------------------------------------------------------------------
- Web      : ALLOCINE.FR                                         -
- Author   : CSU some part form the former script                -
-            Alessio Viti / Emmanuel Jacobs / MacGyver           -
- Date     : 29/10/2004                                          -
- Comments : Import All Information available except comments    -
-            Report bugs/comments to csu333-xmmscripts@yahoo.fr  -
------------------------------------------------------------------
#MADEBY#=CSU
#DATEBUILD#=1/06/2003
#WEBSITE#=ALLOCINE.FR - (FRENCH)
#NOTE#=Import All Information Available with Big Pictures
#SCRIPTQUALITY#=4
#ICONQUALITY#=4
#REPLACESPACES#=+
#WEBQUERY#=http://www.allocine.fr/recherche/?motcle=#MOVIE#&f=3&rub=1

#RIGHTPAGEFOUND#

    #STARTREADWEB#

    #FINDLINE#=(1 réponse)#12##ONERROR#=*STOP*

    #PUT#=0#00#

    #CONDITIONRIGHTPAGE# #12#<>#00#

#ENDRIGHTPAGEFOUND#

#CREATEMOVIELIST#
    #STARTREADWEB#
    #FINDLINE#=Films #12##ONERROR#=*STOP*

    #PUT#=0#00#
    #PUT#=0#50#

    #WRITETITLELIST#=Films déjà sortis
    
    #FIND#=Pas de résultats#12##ONERROR#=*OK*

    #IF# #00#<>#12#
      #WRITETITLELIST#=Aucun résultat
      #GOTO#=NoResult
    #ENDIF#

    :ReadNewPage

    #FINDLINE#=<a href="/film/fichefilm_gen_cfilm=#12##ONERROR#=*OK*

    #REPEAT#
    
        #FIND#=">#01##ONERROR#=*OK*
        #COMPUTEVAR#=#01#=+1
        #FIND#=</a>#02##ONERROR#=*OK*
          
        #TAKEWORD#=#03#,#01#,#02#

        #CHECKVARIABLE#=#03#
        #STARTDELETETAGS#

        :GetMovieSiteID

        #SETCURSOR#=1
        #FIND#=_cfilm#01##ONERROR#=*OK*
        #COMPUTEVAR#=#01#=+6
        #FIND#=.html#02##ONERROR#=*OK*
          
        #TAKEWORD#=#09#,#01#,#02#

        :SeekForOriginalTitle
   
         #READNEXTLINE#
         #READNEXTLINE#

        #FIND#=(#01##ONERROR#=*OK*
        #IF# #01#<>#00#
            #FIND#=)#02##ONERROR#=*OK*
            #TAKEWORD#=#04#,#01#,#02#
            #CHECKVARIABLE#=#04#
            #STARTDELETETAGS#
            #STRING#=#03#=#03# (#04#)
            #READNEXTLINE#
            #READNEXTLINE#
        #ENDIF#

        #STRING#=#06#=http://www.allocine.fr/film/fichefilm_gen_cfilm=#09#.html

        #WRITETITLELIST#=#06#                        ---> #03#

        #READNEXTLINE#
        #READNEXTLINE#

        #FIND#=<br />#01##ONERROR#=*OK*

        #IF# #01#==#00#

            :SearchForDetailMain

            #FIND#=>#01##ONERROR#=*OK*
            #FIND#=<#02##ONERROR#=*OK*
            #TAKEWORD#=#04#,#01#,#02#

            #CHECKVARIABLE#=#04#
            #STARTDELETETAGS#
            #STARTSUBSTITUTETAGS#

            :SearchForDetailSecond

            #READNEXTLINE#
            #READNEXTLINE#

            #FIND#=>#01##ONERROR#=*OK*
            #FIND#=<#02##ONERROR#=*OK*
            #TAKEWORD#=#05#,#01#,#02#
    
            #CHECKVARIABLE#=#05#
            #STARTDELETETAGS#
            #STARTSUBSTITUTETAGS#

            #STRING#=#03#=  #04##05#

            #WRITETITLELIST#=#03#
        #ENDIF#

    :ExitWhilePage

    #FINDLINE#=<a href="/film/fichefilm_gen_cfilm=#12##ONERROR#=*OK*

    #WHILE# #00#<>#12#

    #STARTREADWEB#
    #FINDLINE#=Films suivants#10##ONERROR#=*STOP*

    #IF# #10#<>#00#
        #SETCURSOR#=1
        #FIND#="/recherche#01##ONERROR#=*OK*
        #COMPUTECURSOR#=+1
        #FIND#="#02##ONERROR#=*OK*
        #TAKEWORD#=#03#,#01#,#02#
        #STRING#=#03#=http://www.allocine.fr#03#
    #ENDIF#

    #IF# #50#<>#00#
        #RESTOREWEB#
    #ENDIF#

    #IF# #10#<>#00#
        #PUT#=1#50#
        #OPENNEWWEB#=#03#
        #GOTO#=ReadNewPage
    #ENDIF#
    :NoResult    
    
#ENDCREATEMOVIELIST#

#MOVIETITLE#
    #STARTREADWEB#

    #PUT#=0#00#

    #FINDLINE#=<h1 style="color: #D20000">#12# #ONERROR#=*STOP*
    #READNEXTLINE#
    #READNEXTLINE#

    #FIND#=>#01##ONERROR#=*STOP*
    #FIND#=<#02##ONERROR#=*STOP*

    #TAKEWORD#=#03#,#01#,#02#
    #CHECKVARIABLE#=#03#
    #STARTDELETETAGS#

    #FINDLINE#=Titre original :#12# #ONERROR#=*OK*

    #IF# #12#==#00#
        #GOTO#=TakeTitle
    #ENDIF#

    #FIND#=>#01##ONERROR#=*STOP*
    #FIND#=<#02##ONERROR#=*STOP*

    #TAKEWORD#=#03#,#01#,#02#
    #CHECKVARIABLE#=#03#
    #STARTDELETETAGS#
    #STARTSUBSTITUTETAGS#

    :TakeTitle

    #TITLE#=#03# #ONERROR#=*ASK*
#ENDMOVIETITLE#

#DIRECTOR#
    #STARTREADWEB#
    #FINDLINE#=Réalisé par#12##ONERROR#=*STOP*
    #PUT#=0#09#
    #REPEAT#
	#FIND#=Href="#10# #ONERROR#=*OK*
	#IF# #10#==#09#
            #GOTO#=GOLABEL
	#ENDIF#
        #FIND#=>#01# #ONERROR#=*ASK*
        #FIND#=<#02# #ONERROR#=*ASK*
        #TAKEWORD#=#03#,#01#,#02#
        #CHECKVARIABLE#=#03#
        #STARTDELETETAGS#
        #STARTSUBSTITUTETAGS#
        #TAKEDIRECTOR#=#03#
    #WHILE# #09#<>#10#
    :GOLABEL
    #PUT#= #03#
    #TAKEDIRECTOR#=#03#
#ENDDIRECTOR#

#ACTORS#
    #STARTREADWEB#

    #FINDLINE#=Voir tout le casting...#12##ONERROR#=*STOP*

    #SETCURSOR#=1
    #FIND#="/film/#01# #ONERROR#=*OK*
    #COMPUTECURSOR#=+1
    #FIND#="#02# #ONERROR#=*OK*
    #TAKEWORD#=#03#,#01#,#02#
    #STRING#=#03#=http://www.allocine.fr#03#

    #OPENNEWWEB#=#03#

    #FINDLINE#=<b>Acteur(s)</b>#12# #ONERROR#=*STOP*

    :LookForActors

    #FINDLINE#=<tr style="background-color#10# #ONERROR#=*STOP*

    #REPEAT#
        
        #READNEXTLINE#
        #READNEXTLINE#

        #FIND#=<h5>#01# #ONERROR#=*ASK*
        #COMPUTECURSOR#=+3
        #PUTCURSOR#=#01#
        #FIND#=<#02# #ONERROR#=*ASK*
        #TAKEWORD#=#03#=#01#=#02#

        #READNEXTLINE#
        #READNEXTLINE#

        #FIND#=class="link1"><h4>#01# #ONERROR#=*OK*
        #COMPUTECURSOR#=+17
        #PUTCURSOR#=#01#
        #FIND#=<#02# #ONERROR#=*OK*
        #TAKEWORD#=#04#=#01#=#02#

        #STRING#=#03#=#04# (#03#)

        #TAKEACTOR#=#03#

        #FINDLINE#=<tr style="background-color#10# #ONERROR#=*OK*

    #WHILE# #10#<>#00#

    #RESTOREWEB#

#ENDACTORS#

#GENRE#
    #STARTREADWEB#

    #FINDLINE#=Genre :#12##ONERROR#=*STOP*

    #FIND#=:#01# #ONERROR#=*OK*
    #COMPUTEVAR#=#01#=+1
    #FIND#=<#02# #ONERROR#=*OK*
    #TAKEWORD#=#03#=#01#=#02#

    #TAKEGENRE#=#03#

#ENDGENRE#

#RATING#
    #STARTREADWEB#
    #FINDLINE#=class="link1">Spectateurs#12##ONERROR#=*STOP*
    #FIND#=etoile_#01# #ON ERROR#=*OK*
    #FIND#=_#01# #ON ERROR#=*OK*
    #FIND#=.gif#02# #ON ERROR#=*OK* 
    #TAKEWORD#=#03#,#01#,#02#
    #TAKERATING#=#03#
#ENDRATING#

#PLOT#
    #STARTREADWEB#

    #PUT#=0#00#
    #PUT#=#04#
    #PUT#=</tr>#05#

    #FINDLINE#=>Synopsis<#12##ONERROR#=*STOP*
    #FINDLINE#=<td valign="top" style="padding:10 0 0 0">#12##ONERROR#=*STOP*

    #FIND#=<h4>#01##ONERROR#=*OK*
    #COMPUTEVAR#=#01#=+3

    :ReadLine

    #REPEAT#
        #TAKEWORD#=#03#=#01#=#00#

        #STRING#=#04#=#04##03#

        #READNEXTLINE#
        #READNEXTLINE#

        #PUT#=0#01#
        #TAKEWORD#=#02#=#01#=#00#
    #WHILE# #02#<>#05#

    #CHECKVARIABLE#=#04#
    #STARTDELETETAGS#
    #STARTSUBSTITUTETAGS#
    #TAKEPLOT#=#04# #ONERROR#=*ASK*

#ENDPLOT#

#RUNTIME#
    #STARTREADWEB#
    #FINDLINE#=Durée#12##ONERROR#=*STOP*
    #FIND#=:#01# #ONERROR#=*STOP*
    #COMPUTEVAR#=#01#=+1
    #FIND#=.#02# #ONERROR#=*STOP*
    #TAKEWORD#=#03#,#01#,#02#
    #TAKERUNTIME#=#03# #ONERROR#=*ASK*
#ENDRUNTIME#

#COUNTRY#
    #STARTREADWEB#
    #FINDLINE#=Avec #12##ONERROR#=*STOP*
    #READNEXTLINE#
    #READNEXTLINE#

    #FIND#=>#01##ONERROR#=*OK*
    #FIND#=<#02##ONERROR#=*OK*
    #TAKEWORD#=#03#=#01#=#02#

    #TAKECOUNTRY#=#03#
#ENDCOUNTRY#

#YEAR#
    #STARTREADWEB#
    #FINDLINE#=Année de production#12##ONERROR#=*STOP*
    #FIND#=:#01# #ONERROR#=*STOP*
    #COMPUTEVAR#=#01#=+1
    #FIND#=<#02# #ONERROR#=*STOP*
    #TAKEWORD#=#03#,#01#,#02#

    #TAKEYEAR#=#03# #ONERROR#=*ASK*
#ENDYEAR#

#POSTER#
    #STARTREADWEB#

    #PUT#=http://www.allocine.fr/ext2#50#
    #PUT#=0#00#

    #FINDLINE#=Toute la Galerie Photos#12##ONERROR#=*STOP*
    #SETCURSOR#=1
    #FIND#=/film/galerie#01# #ONERROR#=*STOP*
    #FIND#=.htm#02# #ONERROR#=*STOP*
    #TAKEWORD#=#03#,#01#,#02#
    #STRING#=#03#=http://www.allocine.fr/#03#.html

    :TakeNextPoster
    
    #OPENNEWWEB#=#03#
        #FINDLINE#=class="galerie"#12##ONERROR#=*STOP*
        #SETCURSOR#=1
        #FIND#="#01# #ONERROR#=*ASK*
        #COMPUTECURSOR#=+1
        #FIND#="#02# #ONERROR#=*ASK*
        #TAKEWORD#=#03#,#01#,#02#

        #TAKEPOSTER#=#03#

        :NextPoster

        #FINDLINE#=>>#12##ONERROR#=*STOP*
        #COMPUTECURSOR#=-100
        #FIND#="#01# #ONERROR#=*OK*
        #IF# #12#<>#00#
            #COMPUTECURSOR#=+1
            #PUTCURSOR#=#01#
            #FIND#="#02# #ONERROR#=*ASK*
            #TAKEWORD#=#03#,#01#,#02#
            #STRING#=#03#=http://www.allocine.fr/#03#
        #ENDIF#

    #RESTOREWEB#

    #IF# #03#<>#50#
        #GOTO#=TakeNextPoster
    #ENDIF#

#ENDPOSTER#

#DELETETAGS#
    #DELETEWORD#=<sup>
    #DELETEWORD#=</sup>
    #DELETEWORD#=<BR>
    #DELETEWORD#=<BR />
    #DELETEWORD#=<br />
    #DELETEWORD#=</BR>
    #DELETEWORD#=</br>
    #DELETEWORD#=<P>
    #DELETEWORD#=</P>
    #DELETEWORD#=<p>
    #DELETEWORD#=</p>
    #DELETEWORD#=<BLOCKQUOTE>
    #DELETEWORD#=</BLOCKQUOTE>
    #DELETEWORD#=<blockquote>
    #DELETEWORD#=</blockquote>
    #DELETEWORD#=<B>
    #DELETEWORD#=</B>
    #DELETEWORD#=<b>
    #DELETEWORD#=</b>
    #DELETEWORD#=<I>
    #DELETEWORD#=</I>
    #DELETEWORD#=<h4>
    #DELETEWORD#=</h4>
    #DELETEWORD#=<div>
    #DELETEWORD#=</div>
    #DELETEWORD#=<td>
    #DELETEWORD#=</td>

    #DELETEWORD#=<i>
    #DELETEWORD#=</i>
    #DELETEWORD#=<U>
    #DELETEWORD#=</U>
    #DELETEWORD#=<u>
    #DELETEWORD#=</u>
    #DELETEWORD#=<font size=2>
    #DELETEWORD#=<FONT Class="size2">
    #DELETEWORD#=</FONT>
    #DELETEWORD#=</A>
    #DELETEWORD#=</font>
    #DELETEWORD#=</a>
#ENDDELETETAGS#

#SUBSTITUTETAGS#
    #SUBSTITUTEWORD#=<br>=#NEWLINE#
    #SUBSTITUTEWORD#= = 
    #SUBSTITUTEWORD#=&NBSP;= 
    #SUBSTITUTEWORD#=#160;= 
    #SUBSTITUTEWORD#=#161;=¡
    #SUBSTITUTEWORD#=#162;=¢
    #SUBSTITUTEWORD#=#163;=£
    #SUBSTITUTEWORD#=#164;=¤
    #SUBSTITUTEWORD#=#165;=¥
    #SUBSTITUTEWORD#=#166;=¦
    #SUBSTITUTEWORD#=#167;=§
    #SUBSTITUTEWORD#=#168;=¨
    #SUBSTITUTEWORD#=#169;=©
    #SUBSTITUTEWORD#=#170;=ª
    #SUBSTITUTEWORD#=#171;=«
    #SUBSTITUTEWORD#=#172;=¬
    #SUBSTITUTEWORD#=#173;=­
    #SUBSTITUTEWORD#=#174;=®
    #SUBSTITUTEWORD#=#175;=¯
    #SUBSTITUTEWORD#=#176;=°
    #SUBSTITUTEWORD#=#177;=±
    #SUBSTITUTEWORD#=#178;=²
    #SUBSTITUTEWORD#=#179;=³
    #SUBSTITUTEWORD#=#180;=´
    #SUBSTITUTEWORD#=#181;=µ
    #SUBSTITUTEWORD#=#182;=¶
    #SUBSTITUTEWORD#=#183;=·
    #SUBSTITUTEWORD#=#184;=¸
    #SUBSTITUTEWORD#=#185;=¹
    #SUBSTITUTEWORD#=#186;=º
    #SUBSTITUTEWORD#=#187;=»
    #SUBSTITUTEWORD#=#188;=¼
    #SUBSTITUTEWORD#=#189;=½
    #SUBSTITUTEWORD#=#190;=¾
    #SUBSTITUTEWORD#=#191;=¿
    #SUBSTITUTEWORD#=#192;=À
    #SUBSTITUTEWORD#=#193;=Á
    #SUBSTITUTEWORD#=#194;=Â
    #SUBSTITUTEWORD#=#195;=Ã
    #SUBSTITUTEWORD#=#196;=Ä
    #SUBSTITUTEWORD#=#197;=Å
    #SUBSTITUTEWORD#=#198;=Æ
    #SUBSTITUTEWORD#=#199;=Ç
    #SUBSTITUTEWORD#=#200;=È
    #SUBSTITUTEWORD#=#201;=É
    #SUBSTITUTEWORD#=#202;=Ê
    #SUBSTITUTEWORD#=#203;=Ë
    #SUBSTITUTEWORD#=#204;=Ì
    #SUBSTITUTEWORD#=#205;=Í
    #SUBSTITUTEWORD#=#206;=Î
    #SUBSTITUTEWORD#=#207;=Ï
    #SUBSTITUTEWORD#=#208;=Ð
    #SUBSTITUTEWORD#=#209;=Ñ
    #SUBSTITUTEWORD#=#210;=Ò
    #SUBSTITUTEWORD#=#211;=Ó
    #SUBSTITUTEWORD#=#212;=Ô
    #SUBSTITUTEWORD#=#213;=Õ
    #SUBSTITUTEWORD#=#214;=Ö
    #SUBSTITUTEWORD#=#215;=×
    #SUBSTITUTEWORD#=#216;=Ø
    #SUBSTITUTEWORD#=#217;=Ù
    #SUBSTITUTEWORD#=#218;=Ú
    #SUBSTITUTEWORD#=#219;=Û
    #SUBSTITUTEWORD#=#220;=Ü
    #SUBSTITUTEWORD#=#221;=Ý
    #SUBSTITUTEWORD#=#222;=Þ
    #SUBSTITUTEWORD#=#223;=ß
    #SUBSTITUTEWORD#=#224;=à
    #SUBSTITUTEWORD#=#225;=á
    #SUBSTITUTEWORD#=#226;=â
    #SUBSTITUTEWORD#=#227;=ã
    #SUBSTITUTEWORD#=#228;=ä
    #SUBSTITUTEWORD#=#229;=å
    #SUBSTITUTEWORD#=#230;=æ
    #SUBSTITUTEWORD#=#231;=ç
    #SUBSTITUTEWORD#=#232;=è
    #SUBSTITUTEWORD#=#233;=é
    #SUBSTITUTEWORD#=#234;=ê
    #SUBSTITUTEWORD#=#235;=ë
    #SUBSTITUTEWORD#=#236;=ì
    #SUBSTITUTEWORD#=#237;=í
    #SUBSTITUTEWORD#=#238;=î
    #SUBSTITUTEWORD#=#239;=ï
    #SUBSTITUTEWORD#=#240;=ð
    #SUBSTITUTEWORD#=#241;=ñ
    #SUBSTITUTEWORD#=#242;=ò
    #SUBSTITUTEWORD#=#243;=ó
    #SUBSTITUTEWORD#=#244;=ô
    #SUBSTITUTEWORD#=#245;=õ
    #SUBSTITUTEWORD#=#246;=ö
    #SUBSTITUTEWORD#=#247;=÷
    #SUBSTITUTEWORD#=#248;=ø
    #SUBSTITUTEWORD#=#249;=ù
    #SUBSTITUTEWORD#=#250;=ú
    #SUBSTITUTEWORD#=#251;=û
    #SUBSTITUTEWORD#=#252;=ü
    #SUBSTITUTEWORD#=#253;=ý
    #SUBSTITUTEWORD#=#254;=þ
    #SUBSTITUTEWORD#=#255;=ÿ
#ENDSUBSTITUTETAGS#

Edited by - smusat on 23 Nov 2004 07:46:36
Go to Top of Page

lankou
Starting Member

France
3 Posts

Posted - 23 Nov 2004 :  14:13:39  Show Profile  Edit Reply  Reply with Quote  View user's IP address  Delete Reply
It works fine for actors but there's an error on section #country#
modified :

------------------------------------------------------------------
- eXtreme Movie Manager -
- MagicScript Technology -
- 2002 Alessio "AleTsg" Viti -
- 2003 Emmanuel "Manette" Jacobs -
- 2003 Updated by MacGyver -
- 2004 Rewritten by CSU -
------------------------------------------------------------------
- Web : ALLOCINE.FR -
- Author : CSU some part form the former script -
- Alessio Viti / Emmanuel Jacobs / MacGyver -
- Date : 29/10/2004 -
- Comments : Import All Information available except comments -
- Report bugs/comments to csu333-xmmscripts@yahoo.fr -
------------------------------------------------------------------
#MADEBY#=CSU
#DATEBUILD#=1/06/2003
#WEBSITE#=ALLOCINE.FR - (FRENCH)
#NOTE#=Import All Information Available with Big Pictures
#SCRIPTQUALITY#=4
#ICONQUALITY#=4
#REPLACESPACES#=+
#WEBQUERY#=http://www.allocine.fr/recherche/?motcle=#MOVIE#&f=3&rub=1

#RIGHTPAGEFOUND#

#STARTREADWEB#

#FINDLINE#=(1 réponse)#12##ONERROR#=*STOP*

#PUT#=0#00#

#CONDITIONRIGHTPAGE# #12#<>#00#

#ENDRIGHTPAGEFOUND#

#CREATEMOVIELIST#
#STARTREADWEB#
#FINDLINE#=Films #12##ONERROR#=*STOP*

#PUT#=0#00#
#PUT#=0#50#

#WRITETITLELIST#=Films déjà sortis

#FIND#=Pas de résultats#12##ONERROR#=*OK*

#IF# #00#<>#12#
#WRITETITLELIST#=Aucun résultat
#GOTO#=NoResult
#ENDIF#

:ReadNewPage

#FINDLINE#=<a href="/film/fichefilm_gen_cfilm=#12##ONERROR#=*OK*

#REPEAT#

#FIND#=">#01##ONERROR#=*OK*
#COMPUTEVAR#=#01#=+1
#FIND#=</a>#02##ONERROR#=*OK*

#TAKEWORD#=#03#,#01#,#02#

#CHECKVARIABLE#=#03#
#STARTDELETETAGS#

:GetMovieSiteID

#SETCURSOR#=1
#FIND#=_cfilm#01##ONERROR#=*OK*
#COMPUTEVAR#=#01#=+6
#FIND#=.html#02##ONERROR#=*OK*

#TAKEWORD#=#09#,#01#,#02#

:SeekForOriginalTitle

#READNEXTLINE#
#READNEXTLINE#

#FIND#=(#01##ONERROR#=*OK*
#IF# #01#<>#00#
#FIND#=)#02##ONERROR#=*OK*
#TAKEWORD#=#04#,#01#,#02#
#CHECKVARIABLE#=#04#
#STARTDELETETAGS#
#STRING#=#03#=#03# (#04#)
#READNEXTLINE#
#READNEXTLINE#
#ENDIF#

#STRING#=#06#=http://www.allocine.fr/film/fichefilm_gen_cfilm=#09#.html

#WRITETITLELIST#=#06# ---> #03#

#READNEXTLINE#
#READNEXTLINE#

#FIND#=<br />#01##ONERROR#=*OK*

#IF# #01#==#00#

:SearchForDetailMain

#FIND#=>#01##ONERROR#=*OK*
#FIND#=<#02##ONERROR#=*OK*
#TAKEWORD#=#04#,#01#,#02#

#CHECKVARIABLE#=#04#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#

:SearchForDetailSecond

#READNEXTLINE#
#READNEXTLINE#

#FIND#=>#01##ONERROR#=*OK*
#FIND#=<#02##ONERROR#=*OK*
#TAKEWORD#=#05#,#01#,#02#

#CHECKVARIABLE#=#05#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#

#STRING#=#03#= #04##05#

#WRITETITLELIST#=#03#
#ENDIF#

:ExitWhilePage

#FINDLINE#=<a href="/film/fichefilm_gen_cfilm=#12##ONERROR#=*OK*

#WHILE# #00#<>#12#

#STARTREADWEB#
#FINDLINE#=Films suivants#10##ONERROR#=*STOP*

#IF# #10#<>#00#
#SETCURSOR#=1
#FIND#="/recherche#01##ONERROR#=*OK*
#COMPUTECURSOR#=+1
#FIND#="#02##ONERROR#=*OK*
#TAKEWORD#=#03#,#01#,#02#
#STRING#=#03#=http://www.allocine.fr#03#
#ENDIF#

#IF# #50#<>#00#
#RESTOREWEB#
#ENDIF#

#IF# #10#<>#00#
#PUT#=1#50#
#OPENNEWWEB#=#03#
#GOTO#=ReadNewPage
#ENDIF#
:NoResult

#ENDCREATEMOVIELIST#

#MOVIETITLE#
#STARTREADWEB#

#PUT#=0#00#

#FINDLINE#=<h1 style="color: #D20000">#12# #ONERROR#=*STOP*
#READNEXTLINE#
#READNEXTLINE#

#FIND#=>#01##ONERROR#=*STOP*
#FIND#=<#02##ONERROR#=*STOP*

#TAKEWORD#=#03#,#01#,#02#
#CHECKVARIABLE#=#03#
#STARTDELETETAGS#

#FINDLINE#=Titre original :#12# #ONERROR#=*OK*

#IF# #12#==#00#
#GOTO#=TakeTitle
#ENDIF#

#FIND#=>#01##ONERROR#=*STOP*
#FIND#=<#02##ONERROR#=*STOP*

#TAKEWORD#=#03#,#01#,#02#
#CHECKVARIABLE#=#03#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#

:TakeTitle

#TITLE#=#03# #ONERROR#=*ASK*
#ENDMOVIETITLE#

#DIRECTOR#
#STARTREADWEB#
#FINDLINE#=Réalisé par#12##ONERROR#=*STOP*
#PUT#=0#09#
#REPEAT#
#FIND#=Href="#10# #ONERROR#=*OK*
#IF# #10#==#09#
#GOTO#=GOLABEL
#ENDIF#
#FIND#=>#01# #ONERROR#=*ASK*
#FIND#=<#02# #ONERROR#=*ASK*
#TAKEWORD#=#03#,#01#,#02#
#CHECKVARIABLE#=#03#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#
#TAKEDIRECTOR#=#03#
#WHILE# #09#<>#10#
:GOLABEL
#PUT#= #03#
#TAKEDIRECTOR#=#03#
#ENDDIRECTOR#

#ACTORS#
#STARTREADWEB#

#FINDLINE#=Voir tout le casting...#12##ONERROR#=*STOP*

#SETCURSOR#=1
#FIND#="/film/#01# #ONERROR#=*OK*
#COMPUTECURSOR#=+1
#FIND#="#02# #ONERROR#=*OK*
#TAKEWORD#=#03#,#01#,#02#
#STRING#=#03#=http://www.allocine.fr#03#

#OPENNEWWEB#=#03#

#FINDLINE#=<b>Acteur(s)</b>#12# #ONERROR#=*STOP*

:LookForActors

#FINDLINE#=<tr style="background-color#10# #ONERROR#=*STOP*

#REPEAT#

#READNEXTLINE#
#READNEXTLINE#

#FIND#=<h5>#01# #ONERROR#=*ASK*
#COMPUTECURSOR#=+3
#PUTCURSOR#=#01#
#FIND#=<#02# #ONERROR#=*ASK*
#TAKEWORD#=#03#=#01#=#02#

#READNEXTLINE#
#READNEXTLINE#

#FIND#=class="link1"><h4>#01# #ONERROR#=*OK*
#COMPUTECURSOR#=+17
#PUTCURSOR#=#01#
#FIND#=<#02# #ONERROR#=*OK*
#TAKEWORD#=#04#=#01#=#02#

#STRING#=#03#=#04# (#03#)

#TAKEACTOR#=#03#

#FINDLINE#=<tr style="background-color#10# #ONERROR#=*OK*

#WHILE# #10#<>#00#

#RESTOREWEB#

#ENDACTORS#

#GENRE#
#STARTREADWEB#

#FINDLINE#=Genre :#12##ONERROR#=*STOP*

#FIND#=:#01# #ONERROR#=*OK*
#COMPUTEVAR#=#01#=+1
#FIND#=<#02# #ONERROR#=*OK*
#TAKEWORD#=#03#=#01#=#02#

#TAKEGENRE#=#03#

#ENDGENRE#

#RATING#
#STARTREADWEB#
#FINDLINE#=class="link1">Spectateurs#12##ONERROR#=*STOP*
#FIND#=etoile_#01# #ON ERROR#=*OK*
#FIND#=_#01# #ON ERROR#=*OK*
#FIND#=.gif#02# #ON ERROR#=*OK*
#TAKEWORD#=#03#,#01#,#02#
#TAKERATING#=#03#
#ENDRATING#

#PLOT#
#STARTREADWEB#

#PUT#=0#00#
#PUT#=#04#
#PUT#=</tr>#05#

#FINDLINE#=>Synopsis<#12##ONERROR#=*STOP*
#FINDLINE#=<td valign="top" style="padding:10 0 0 0">#12##ONERROR#=*STOP*

#FIND#=<h4>#01##ONERROR#=*OK*
#COMPUTEVAR#=#01#=+3

:ReadLine

#REPEAT#
#TAKEWORD#=#03#=#01#=#00#

#STRING#=#04#=#04##03#

#READNEXTLINE#
#READNEXTLINE#

#PUT#=0#01#
#TAKEWORD#=#02#=#01#=#00#
#WHILE# #02#<>#05#

#CHECKVARIABLE#=#04#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#
#TAKEPLOT#=#04# #ONERROR#=*ASK*

#ENDPLOT#

#RUNTIME#
#STARTREADWEB#
#FINDLINE#=Durée#12##ONERROR#=*STOP*
#FIND#=:#01# #ONERROR#=*STOP*
#COMPUTEVAR#=#01#=+1
#FIND#=.#02# #ONERROR#=*STOP*
#TAKEWORD#=#03#,#01#,#02#
#TAKERUNTIME#=#03# #ONERROR#=*ASK*
#ENDRUNTIME#

#COUNTRY#
#STARTREADWEB#
#FINDLINE#=<h4>Film#12##ONERROR#=*STOP*
#FIND#=>#01##ONERROR#=*OK*
#FIND#=<#02##ONERROR#=*OK*
#TAKEWORD#=#03#=#01#=#02#
#TAKECOUNTRY#=#03#
#ENDCOUNTRY#

#YEAR#
#STARTREADWEB#
#FINDLINE#=Année de production#12##ONERROR#=*STOP*
#FIND#=:#01# #ONERROR#=*STOP*
#COMPUTEVAR#=#01#=+1
#FIND#=<#02# #ONERROR#=*STOP*
#TAKEWORD#=#03#,#01#,#02#

#TAKEYEAR#=#03# #ONERROR#=*ASK*
#ENDYEAR#

#POSTER#
#STARTREADWEB#

#PUT#=http://www.allocine.fr/ext2#50#
#PUT#=0#00#

#FINDLINE#=Toute la Galerie Photos#12##ONERROR#=*STOP*
#SETCURSOR#=1
#FIND#=/film/galerie#01# #ONERROR#=*STOP*
#FIND#=.htm#02# #ONERROR#=*STOP*
#TAKEWORD#=#03#,#01#,#02#
#STRING#=#03#=http://www.allocine.fr/#03#.html

:TakeNextPoster

#OPENNEWWEB#=#03#
#FINDLINE#=class="galerie"#12##ONERROR#=*STOP*
#SETCURSOR#=1
#FIND#="#01# #ONERROR#=*ASK*
#COMPUTECURSOR#=+1
#FIND#="#02# #ONERROR#=*ASK*
#TAKEWORD#=#03#,#01#,#02#

#TAKEPOSTER#=#03#

:NextPoster

#FINDLINE#=>>#12##ONERROR#=*STOP*
#COMPUTECURSOR#=-100
#FIND#="#01# #ONERROR#=*OK*
#IF# #12#<>#00#
#COMPUTECURSOR#=+1
#PUTCURSOR#=#01#
#FIND#="#02# #ONERROR#=*ASK*
#TAKEWORD#=#03#,#01#,#02#
#STRING#=#03#=http://www.allocine.fr/#03#
#ENDIF#

#RESTOREWEB#

#IF# #03#<>#50#
#GOTO#=TakeNextPoster
#ENDIF#

#ENDPOSTER#

#DELETETAGS#
#DELETEWORD#=<sup>
#DELETEWORD#=</sup>
#DELETEWORD#=<BR>
#DELETEWORD#=<BR />
#DELETEWORD#=<br />
#DELETEWORD#=</BR>
#DELETEWORD#=</br>
#DELETEWORD#=<P>
#DELETEWORD#=</P>
#DELETEWORD#=<p>
#DELETEWORD#=</p>
#DELETEWORD#=<BLOCKQUOTE>
#DELETEWORD#=</BLOCKQUOTE>
#DELETEWORD#=<blockquote>
#DELETEWORD#=</blockquote>
#DELETEWORD#=<B>
#DELETEWORD#=</B>
#DELETEWORD#=<b>
#DELETEWORD#=</b>
#DELETEWORD#=<I>
#DELETEWORD#=</I>
#DELETEWORD#=<h4>
#DELETEWORD#=</h4>
#DELETEWORD#=<div>
#DELETEWORD#=</div>
#DELETEWORD#=<td>
#DELETEWORD#=</td>

#DELETEWORD#=<i>
#DELETEWORD#=</i>
#DELETEWORD#=<U>
#DELETEWORD#=</U>
#DELETEWORD#=<u>
#DELETEWORD#=</u>
#DELETEWORD#=<font size=2>
#DELETEWORD#=<FONT Class="size2">
#DELETEWORD#=</FONT>
#DELETEWORD#=</A>
#DELETEWORD#=</font>
#DELETEWORD#=</a>
#ENDDELETETAGS#

#SUBSTITUTETAGS#
#SUBSTITUTEWORD#=<br>=#NEWLINE#
#SUBSTITUTEWORD#= =
#SUBSTITUTEWORD#=&NBSP;=
#SUBSTITUTEWORD#=#160;=
#SUBSTITUTEWORD#=#161;=¡
#SUBSTITUTEWORD#=#162;=¢
#SUBSTITUTEWORD#=#163;=£
#SUBSTITUTEWORD#=#164;=¤
#SUBSTITUTEWORD#=#165;=¥
#SUBSTITUTEWORD#=#166;=¦
#SUBSTITUTEWORD#=#167;=§
#SUBSTITUTEWORD#=#168;=¨
#SUBSTITUTEWORD#=#169;=©
#SUBSTITUTEWORD#=#170;=ª
#SUBSTITUTEWORD#=#171;=«
#SUBSTITUTEWORD#=#172;=¬
#SUBSTITUTEWORD#=#173;=­
#SUBSTITUTEWORD#=#174;=®
#SUBSTITUTEWORD#=#175;=¯
#SUBSTITUTEWORD#=#176;=°
#SUBSTITUTEWORD#=#177;=±
#SUBSTITUTEWORD#=#178;=²
#SUBSTITUTEWORD#=#179;=³
#SUBSTITUTEWORD#=#180;=´
#SUBSTITUTEWORD#=#181;=µ
#SUBSTITUTEWORD#=#182;=¶
#SUBSTITUTEWORD#=#183;=·
#SUBSTITUTEWORD#=#184;=¸
#SUBSTITUTEWORD#=#185;=¹
#SUBSTITUTEWORD#=#186;=º
#SUBSTITUTEWORD#=#187;=»
#SUBSTITUTEWORD#=#188;=¼
#SUBSTITUTEWORD#=#189;=½
#SUBSTITUTEWORD#=#190;=¾
#SUBSTITUTEWORD#=#191;=¿
#SUBSTITUTEWORD#=#192;=À
#SUBSTITUTEWORD#=#193;=Á
#SUBSTITUTEWORD#=#194;=Â
#SUBSTITUTEWORD#=#195;=Ã
#SUBSTITUTEWORD#=#196;=Ä
#SUBSTITUTEWORD#=#197;=Å
#SUBSTITUTEWORD#=#198;=Æ
#SUBSTITUTEWORD#=#199;=Ç
#SUBSTITUTEWORD#=#200;=È
#SUBSTITUTEWORD#=#201;=É
#SUBSTITUTEWORD#=#202;=Ê
#SUBSTITUTEWORD#=#203;=Ë
#SUBSTITUTEWORD#=#204;=Ì
#SUBSTITUTEWORD#=#205;=Í
#SUBSTITUTEWORD#=#206;=Î
#SUBSTITUTEWORD#=#207;=Ï
#SUBSTITUTEWORD#=#208;=Ð
#SUBSTITUTEWORD#=#209;=Ñ
#SUBSTITUTEWORD#=#210;=Ò
#SUBSTITUTEWORD#=#211;=Ó
#SUBSTITUTEWORD#=#212;=Ô
#SUBSTITUTEWORD#=#213;=Õ
#SUBSTITUTEWORD#=#214;=Ö
#SUBSTITUTEWORD#=#215;=×
#SUBSTITUTEWORD#=#216;=Ø
#SUBSTITUTEWORD#=#217;=Ù
#SUBSTITUTEWORD#=#218;=Ú
#SUBSTITUTEWORD#=#219;=Û
#SUBSTITUTEWORD#=#220;=Ü
#SUBSTITUTEWORD#=#221;=Ý
#SUBSTITUTEWORD#=#222;=Þ
#SUBSTITUTEWORD#=#223;=ß
#SUBSTITUTEWORD#=#224;=à
#SUBSTITUTEWORD#=#225;=á
#SUBSTITUTEWORD#=#226;=â
#SUBSTITUTEWORD#=#227;=ã
#SUBSTITUTEWORD#=#228;=ä
#SUBSTITUTEWORD#=#229;=å
#SUBSTITUTEWORD#=#230;=æ
#SUBSTITUTEWORD#=#231;=ç
#SUBSTITUTEWORD#=#232;=è
#SUBSTITUTEWORD#=#233;=é
#SUBSTITUTEWORD#=#234;=ê
#SUBSTITUTEWORD#=#235;=ë
#SUBSTITUTEWORD#=#236;=ì
#SUBSTITUTEWORD#=#237;=í
#SUBSTITUTEWORD#=#238;=î
#SUBSTITUTEWORD#=#239;=ï
#SUBSTITUTEWORD#=#240;=ð
#SUBSTITUTEWORD#=#241;=ñ
#SUBSTITUTEWORD#=#242;=ò
#SUBSTITUTEWORD#=#243;=ó
#SUBSTITUTEWORD#=#244;=ô
#SUBSTITUTEWORD#=#245;=õ
#SUBSTITUTEWORD#=#246;=ö
#SUBSTITUTEWORD#=#247;=÷
#SUBSTITUTEWORD#=#248;=ø
#SUBSTITUTEWORD#=#249;=ù
#SUBSTITUTEWORD#=#250;=ú
#SUBSTITUTEWORD#=#251;=û
#SUBSTITUTEWORD#=#252;=ü
#SUBSTITUTEWORD#=#253;=ý
#SUBSTITUTEWORD#=#254;=þ
#SUBSTITUTEWORD#=#255;=ÿ
#ENDSUBSTITUTETAGS#

Go to Top of Page

lankou
Starting Member

France
3 Posts

Posted - 23 Nov 2004 :  14:22:39  Show Profile  Edit Reply  Reply with Quote  View user's IP address  Delete Reply
And if you want(like me) only the first poster :


------------------------------------------------------------------
- eXtreme Movie Manager -
- MagicScript Technology -
- 2002 Alessio "AleTsg" Viti -
- 2003 Emmanuel "Manette" Jacobs -
- 2003 Updated by MacGyver -
- 2004 Rewritten by CSU -
------------------------------------------------------------------
- Web : ALLOCINE.FR -
- Author : CSU some part form the former script -
- Alessio Viti / Emmanuel Jacobs / MacGyver -
- Date : 29/10/2004 -
- Comments : Import All Information available except comments -
- Report bugs/comments to csu333-xmmscripts@yahoo.fr -
------------------------------------------------------------------
#MADEBY#=CSU
#DATEBUILD#=1/06/2003
#WEBSITE#=ALLOCINE.FR - (FRENCH)
#NOTE#=Import All Information Available with Big Pictures
#SCRIPTQUALITY#=4
#ICONQUALITY#=4
#REPLACESPACES#=+
#WEBQUERY#=http://www.allocine.fr/recherche/?motcle=#MOVIE#&f=3&rub=1

#RIGHTPAGEFOUND#

#STARTREADWEB#

#FINDLINE#=(1 réponse)#12##ONERROR#=*STOP*

#PUT#=0#00#

#CONDITIONRIGHTPAGE# #12#<>#00#

#ENDRIGHTPAGEFOUND#

#CREATEMOVIELIST#
#STARTREADWEB#
#FINDLINE#=Films #12##ONERROR#=*STOP*

#PUT#=0#00#
#PUT#=0#50#

#WRITETITLELIST#=Films déjà sortis

#FIND#=Pas de résultats#12##ONERROR#=*OK*

#IF# #00#<>#12#
#WRITETITLELIST#=Aucun résultat
#GOTO#=NoResult
#ENDIF#

:ReadNewPage

#FINDLINE#=<a href="/film/fichefilm_gen_cfilm=#12##ONERROR#=*OK*

#REPEAT#

#FIND#=">#01##ONERROR#=*OK*
#COMPUTEVAR#=#01#=+1
#FIND#=</a>#02##ONERROR#=*OK*

#TAKEWORD#=#03#,#01#,#02#

#CHECKVARIABLE#=#03#
#STARTDELETETAGS#

:GetMovieSiteID

#SETCURSOR#=1
#FIND#=_cfilm#01##ONERROR#=*OK*
#COMPUTEVAR#=#01#=+6
#FIND#=.html#02##ONERROR#=*OK*

#TAKEWORD#=#09#,#01#,#02#

:SeekForOriginalTitle

#READNEXTLINE#
#READNEXTLINE#

#FIND#=(#01##ONERROR#=*OK*
#IF# #01#<>#00#
#FIND#=)#02##ONERROR#=*OK*
#TAKEWORD#=#04#,#01#,#02#
#CHECKVARIABLE#=#04#
#STARTDELETETAGS#
#STRING#=#03#=#03# (#04#)
#READNEXTLINE#
#READNEXTLINE#
#ENDIF#

#STRING#=#06#=http://www.allocine.fr/film/fichefilm_gen_cfilm=#09#.html

#WRITETITLELIST#=#06# ---> #03#

#READNEXTLINE#
#READNEXTLINE#

#FIND#=<br />#01##ONERROR#=*OK*

#IF# #01#==#00#

:SearchForDetailMain

#FIND#=>#01##ONERROR#=*OK*
#FIND#=<#02##ONERROR#=*OK*
#TAKEWORD#=#04#,#01#,#02#

#CHECKVARIABLE#=#04#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#

:SearchForDetailSecond

#READNEXTLINE#
#READNEXTLINE#

#FIND#=>#01##ONERROR#=*OK*
#FIND#=<#02##ONERROR#=*OK*
#TAKEWORD#=#05#,#01#,#02#

#CHECKVARIABLE#=#05#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#

#STRING#=#03#= #04##05#

#WRITETITLELIST#=#03#
#ENDIF#

:ExitWhilePage

#FINDLINE#=<a href="/film/fichefilm_gen_cfilm=#12##ONERROR#=*OK*

#WHILE# #00#<>#12#

#STARTREADWEB#
#FINDLINE#=Films suivants#10##ONERROR#=*STOP*

#IF# #10#<>#00#
#SETCURSOR#=1
#FIND#="/recherche#01##ONERROR#=*OK*
#COMPUTECURSOR#=+1
#FIND#="#02##ONERROR#=*OK*
#TAKEWORD#=#03#,#01#,#02#
#STRING#=#03#=http://www.allocine.fr#03#
#ENDIF#

#IF# #50#<>#00#
#RESTOREWEB#
#ENDIF#

#IF# #10#<>#00#
#PUT#=1#50#
#OPENNEWWEB#=#03#
#GOTO#=ReadNewPage
#ENDIF#
:NoResult

#ENDCREATEMOVIELIST#

#MOVIETITLE#
#STARTREADWEB#

#PUT#=0#00#

#FINDLINE#=<h1 style="color: #D20000">#12# #ONERROR#=*STOP*
#READNEXTLINE#
#READNEXTLINE#

#FIND#=>#01##ONERROR#=*STOP*
#FIND#=<#02##ONERROR#=*STOP*

#TAKEWORD#=#03#,#01#,#02#
#CHECKVARIABLE#=#03#
#STARTDELETETAGS#

#FINDLINE#=Titre original :#12# #ONERROR#=*OK*

#IF# #12#==#00#
#GOTO#=TakeTitle
#ENDIF#

#FIND#=>#01##ONERROR#=*STOP*
#FIND#=<#02##ONERROR#=*STOP*

#TAKEWORD#=#03#,#01#,#02#
#CHECKVARIABLE#=#03#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#

:TakeTitle

#TITLE#=#03# #ONERROR#=*ASK*
#ENDMOVIETITLE#

#DIRECTOR#
#STARTREADWEB#
#FINDLINE#=Réalisé par#12##ONERROR#=*STOP*
#PUT#=0#09#
#REPEAT#
#FIND#=Href="#10# #ONERROR#=*OK*
#IF# #10#==#09#
#GOTO#=GOLABEL
#ENDIF#
#FIND#=>#01# #ONERROR#=*ASK*
#FIND#=<#02# #ONERROR#=*ASK*
#TAKEWORD#=#03#,#01#,#02#
#CHECKVARIABLE#=#03#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#
#TAKEDIRECTOR#=#03#
#WHILE# #09#<>#10#
:GOLABEL
#PUT#= #03#
#TAKEDIRECTOR#=#03#
#ENDDIRECTOR#

#ACTORS#
#STARTREADWEB#

#FINDLINE#=Voir tout le casting...#12##ONERROR#=*STOP*

#SETCURSOR#=1
#FIND#="/film/#01# #ONERROR#=*OK*
#COMPUTECURSOR#=+1
#FIND#="#02# #ONERROR#=*OK*
#TAKEWORD#=#03#,#01#,#02#
#STRING#=#03#=http://www.allocine.fr#03#

#OPENNEWWEB#=#03#

#FINDLINE#=<b>Acteur(s)</b>#12# #ONERROR#=*STOP*

:LookForActors

#FINDLINE#=<tr style="background-color#10# #ONERROR#=*STOP*

#REPEAT#

#READNEXTLINE#
#READNEXTLINE#

#FIND#=<h5>#01# #ONERROR#=*ASK*
#COMPUTECURSOR#=+3
#PUTCURSOR#=#01#
#FIND#=<#02# #ONERROR#=*ASK*
#TAKEWORD#=#03#=#01#=#02#

#READNEXTLINE#
#READNEXTLINE#

#FIND#=class="link1"><h4>#01# #ONERROR#=*OK*
#COMPUTECURSOR#=+17
#PUTCURSOR#=#01#
#FIND#=<#02# #ONERROR#=*OK*
#TAKEWORD#=#04#=#01#=#02#

#STRING#=#03#=#04# (#03#)

#TAKEACTOR#=#03#

#FINDLINE#=<tr style="background-color#10# #ONERROR#=*OK*

#WHILE# #10#<>#00#

#RESTOREWEB#

#ENDACTORS#

#GENRE#
#STARTREADWEB#

#FINDLINE#=Genre :#12##ONERROR#=*STOP*

#FIND#=:#01# #ONERROR#=*OK*
#COMPUTEVAR#=#01#=+1
#FIND#=<#02# #ONERROR#=*OK*
#TAKEWORD#=#03#=#01#=#02#

#TAKEGENRE#=#03#

#ENDGENRE#

#RATING#
#STARTREADWEB#
#FINDLINE#=class="link1">Spectateurs#12##ONERROR#=*STOP*
#FIND#=etoile_#01# #ON ERROR#=*OK*
#FIND#=_#01# #ON ERROR#=*OK*
#FIND#=.gif#02# #ON ERROR#=*OK*
#TAKEWORD#=#03#,#01#,#02#
#TAKERATING#=#03#
#ENDRATING#

#PLOT#
#STARTREADWEB#

#PUT#=0#00#
#PUT#=#04#
#PUT#=</tr>#05#

#FINDLINE#=>Synopsis<#12##ONERROR#=*STOP*
#FINDLINE#=<td valign="top" style="padding:10 0 0 0">#12##ONERROR#=*STOP*

#FIND#=<h4>#01##ONERROR#=*OK*
#COMPUTEVAR#=#01#=+3

:ReadLine

#REPEAT#
#TAKEWORD#=#03#=#01#=#00#

#STRING#=#04#=#04##03#

#READNEXTLINE#
#READNEXTLINE#

#PUT#=0#01#
#TAKEWORD#=#02#=#01#=#00#
#WHILE# #02#<>#05#

#CHECKVARIABLE#=#04#
#STARTDELETETAGS#
#STARTSUBSTITUTETAGS#
#TAKEPLOT#=#04# #ONERROR#=*ASK*

#ENDPLOT#

#RUNTIME#
#STARTREADWEB#
#FINDLINE#=Durée#12##ONERROR#=*STOP*
#FIND#=:#01# #ONERROR#=*STOP*
#COMPUTEVAR#=#01#=+1
#FIND#=.#02# #ONERROR#=*STOP*
#TAKEWORD#=#03#,#01#,#02#
#TAKERUNTIME#=#03# #ONERROR#=*ASK*
#ENDRUNTIME#

#COUNTRY#
#STARTREADWEB#
#FINDLINE#=<h4>Film#12##ONERROR#=*STOP*
#FIND#=>#01##ONERROR#=*OK*
#FIND#=<#02##ONERROR#=*OK*
#TAKEWORD#=#03#=#01#=#02#
#TAKECOUNTRY#=#03#
#ENDCOUNTRY#

#YEAR#
#STARTREADWEB#
#FINDLINE#=Année de production#12##ONERROR#=*STOP*
#FIND#=:#01# #ONERROR#=*STOP*
#COMPUTEVAR#=#01#=+1
#FIND#=<#02# #ONERROR#=*STOP*
#TAKEWORD#=#03#,#01#,#02#

#TAKEYEAR#=#03# #ONERROR#=*ASK*
#ENDYEAR#

#POSTER#
#STARTREADWEB#

#PUT#=http://www.allocine.fr/ext2#50#
#PUT#=0#00#

#FINDLINE#=Toute la Galerie Photos#12##ONERROR#=*STOP*
#SETCURSOR#=1
#FIND#=/film/galerie#01# #ONERROR#=*STOP*
#FIND#=.htm#02# #ONERROR#=*STOP*
#TAKEWORD#=#03#,#01#,#02#
#STRING#=#03#=http://www.allocine.fr/#03#.html

:TakeNextPoster

#OPENNEWWEB#=#03#
#FINDLINE#=class="galerie"#12##ONERROR#=*STOP*
#SETCURSOR#=1
#FIND#="#01# #ONERROR#=*ASK*
#COMPUTECURSOR#=+1
#FIND#="#02# #ONERROR#=*ASK*
#TAKEWORD#=#03#,#01#,#02#

#TAKEPOSTER#=#03#

:NextPoster

#FINDLINE#=>>#12##ONERROR#=*STOP*
#COMPUTECURSOR#=-100
#FIND#="#01# #ONERROR#=*OK*
#IF# #12#<>#00#
#COMPUTECURSOR#=+1
#PUTCURSOR#=#01#
#FIND#="#02# #ONERROR#=*ASK*
#TAKEWORD#=#03#,#01#,#02#
#STRING#=#03#=http://www.allocine.fr/#03#
#ENDIF#

#RESTOREWEB#



#ENDPOSTER#

#DELETETAGS#
#DELETEWORD#=<sup>
#DELETEWORD#=</sup>
#DELETEWORD#=<BR>
#DELETEWORD#=<BR />
#DELETEWORD#=<br />
#DELETEWORD#=</BR>
#DELETEWORD#=</br>
#DELETEWORD#=<P>
#DELETEWORD#=</P>
#DELETEWORD#=<p>
#DELETEWORD#=</p>
#DELETEWORD#=<BLOCKQUOTE>
#DELETEWORD#=</BLOCKQUOTE>
#DELETEWORD#=<blockquote>
#DELETEWORD#=</blockquote>
#DELETEWORD#=<B>
#DELETEWORD#=</B>
#DELETEWORD#=<b>
#DELETEWORD#=</b>
#DELETEWORD#=<I>
#DELETEWORD#=</I>
#DELETEWORD#=<h4>
#DELETEWORD#=</h4>
#DELETEWORD#=<div>
#DELETEWORD#=</div>
#DELETEWORD#=<td>
#DELETEWORD#=</td>

#DELETEWORD#=<i>
#DELETEWORD#=</i>
#DELETEWORD#=<U>
#DELETEWORD#=</U>
#DELETEWORD#=<u>
#DELETEWORD#=</u>
#DELETEWORD#=<font size=2>
#DELETEWORD#=<FONT Class="size2">
#DELETEWORD#=</FONT>
#DELETEWORD#=</A>
#DELETEWORD#=</font>
#DELETEWORD#=</a>
#ENDDELETETAGS#

#SUBSTITUTETAGS#
#SUBSTITUTEWORD#=<br>=#NEWLINE#
#SUBSTITUTEWORD#= =
#SUBSTITUTEWORD#=&NBSP;=
#SUBSTITUTEWORD#=#160;=
#SUBSTITUTEWORD#=#161;=¡
#SUBSTITUTEWORD#=#162;=¢
#SUBSTITUTEWORD#=#163;=£
#SUBSTITUTEWORD#=#164;=¤
#SUBSTITUTEWORD#=#165;=¥
#SUBSTITUTEWORD#=#166;=¦
#SUBSTITUTEWORD#=#167;=§
#SUBSTITUTEWORD#=#168;=¨
#SUBSTITUTEWORD#=#169;=©
#SUBSTITUTEWORD#=#170;=ª
#SUBSTITUTEWORD#=#171;=«
#SUBSTITUTEWORD#=#172;=¬
#SUBSTITUTEWORD#=#173;=­
#SUBSTITUTEWORD#=#174;=®
#SUBSTITUTEWORD#=#175;=¯
#SUBSTITUTEWORD#=#176;=°
#SUBSTITUTEWORD#=#177;=±
#SUBSTITUTEWORD#=#178;=²
#SUBSTITUTEWORD#=#179;=³
#SUBSTITUTEWORD#=#180;=´
#SUBSTITUTEWORD#=#181;=µ
#SUBSTITUTEWORD#=#182;=¶
#SUBSTITUTEWORD#=#183;=·
#SUBSTITUTEWORD#=#184;=¸
#SUBSTITUTEWORD#=#185;=¹
#SUBSTITUTEWORD#=#186;=º
#SUBSTITUTEWORD#=#187;=»
#SUBSTITUTEWORD#=#188;=¼
#SUBSTITUTEWORD#=#189;=½
#SUBSTITUTEWORD#=#190;=¾
#SUBSTITUTEWORD#=#191;=¿
#SUBSTITUTEWORD#=#192;=À
#SUBSTITUTEWORD#=#193;=Á
#SUBSTITUTEWORD#=#194;=Â
#SUBSTITUTEWORD#=#195;=Ã
#SUBSTITUTEWORD#=#196;=Ä
#SUBSTITUTEWORD#=#197;=Å
#SUBSTITUTEWORD#=#198;=Æ
#SUBSTITUTEWORD#=#199;=Ç
#SUBSTITUTEWORD#=#200;=È
#SUBSTITUTEWORD#=#201;=É
#SUBSTITUTEWORD#=#202;=Ê
#SUBSTITUTEWORD#=#203;=Ë
#SUBSTITUTEWORD#=#204;=Ì
#SUBSTITUTEWORD#=#205;=Í
#SUBSTITUTEWORD#=#206;=Î
#SUBSTITUTEWORD#=#207;=Ï
#SUBSTITUTEWORD#=#208;=Ð
#SUBSTITUTEWORD#=#209;=Ñ
#SUBSTITUTEWORD#=#210;=Ò
#SUBSTITUTEWORD#=#211;=Ó
#SUBSTITUTEWORD#=#212;=Ô
#SUBSTITUTEWORD#=#213;=Õ
#SUBSTITUTEWORD#=#214;=Ö
#SUBSTITUTEWORD#=#215;=×
#SUBSTITUTEWORD#=#216;=Ø
#SUBSTITUTEWORD#=#217;=Ù
#SUBSTITUTEWORD#=#218;=Ú
#SUBSTITUTEWORD#=#219;=Û
#SUBSTITUTEWORD#=#220;=Ü
#SUBSTITUTEWORD#=#221;=Ý
#SUBSTITUTEWORD#=#222;=Þ
#SUBSTITUTEWORD#=#223;=ß
#SUBSTITUTEWORD#=#224;=à
#SUBSTITUTEWORD#=#225;=á
#SUBSTITUTEWORD#=#226;=â
#SUBSTITUTEWORD#=#227;=ã
#SUBSTITUTEWORD#=#228;=ä
#SUBSTITUTEWORD#=#229;=å
#SUBSTITUTEWORD#=#230;=æ
#SUBSTITUTEWORD#=#231;=ç
#SUBSTITUTEWORD#=#232;=è
#SUBSTITUTEWORD#=#233;=é
#SUBSTITUTEWORD#=#234;=ê
#SUBSTITUTEWORD#=#235;=ë
#SUBSTITUTEWORD#=#236;=ì
#SUBSTITUTEWORD#=#237;=í
#SUBSTITUTEWORD#=#238;=î
#SUBSTITUTEWORD#=#239;=ï
#SUBSTITUTEWORD#=#240;=ð
#SUBSTITUTEWORD#=#241;=ñ
#SUBSTITUTEWORD#=#242;=ò
#SUBSTITUTEWORD#=#243;=ó
#SUBSTITUTEWORD#=#244;=ô
#SUBSTITUTEWORD#=#245;=õ
#SUBSTITUTEWORD#=#246;=ö
#SUBSTITUTEWORD#=#247;=÷
#SUBSTITUTEWORD#=#248;=ø
#SUBSTITUTEWORD#=#249;=ù
#SUBSTITUTEWORD#=#250;=ú
#SUBSTITUTEWORD#=#251;=û
#SUBSTITUTEWORD#=#252;=ü
#SUBSTITUTEWORD#=#253;=ý
#SUBSTITUTEWORD#=#254;=þ
#SUBSTITUTEWORD#=#255;=ÿ
#ENDSUBSTITUTETAGS#

Go to Top of Page

smusat
Starting Member

France
10 Posts

Posted - 24 Nov 2004 :  14:50:57  Show Profile  Edit Reply  Reply with Quote  View user's IP address  Delete Reply
very good job, thanks ! :)

i'll try this asap

maybe we should contact CSU about all these modifications ?
Go to Top of Page

smusat
Starting Member

France
10 Posts

Posted - 29 Nov 2004 :  19:57:13  Show Profile  Edit Reply  Reply with Quote  View user's IP address  Delete Reply
it works fine, many thanks :)
Go to Top of Page

smusat
Starting Member

France
10 Posts

Posted - 01 Jan 2005 :  11:38:52  Show Profile  Edit Reply  Reply with Quote  View user's IP address  Delete Reply
new code for poster :
#POSTER#
    #STARTREADWEB#

    #PUT#=http://www.allocine.fr/ext2#50#
    #PUT#=0#00#

    #FINDLINE#=Toute la Galerie Photos#12##ONERROR#=*STOP*
    #SETCURSOR#=1
    #FIND#=/film/galerie#01# #ONERROR#=*STOP*
    #FIND#=.htm#02# #ONERROR#=*STOP*
    #TAKEWORD#=#03#,#01#,#02#
    #STRING#=#03#=http://www.allocine.fr/#03#.html

    #OPENNEWWEB#=#03#
        #FINDLINE#=/film/galerie_gen_cfilm=#12##ONERROR#=*STOP*
        #READNEXTLINE#
        #READNEXTLINE#
        #FIND#="#01# #ONERROR#=*ASK*
        #COMPUTECURSOR#=+1
        #FIND#="#02# #ONERROR#=*ASK*
        #TAKEWORD#=#03#,#01#,#02#
        #TAKEPOSTER#=#03#
    #RESTOREWEB#

#ENDPOSTER#

Go to Top of Page

lankou
Starting Member

France
3 Posts

Posted - 03 Jan 2005 :  01:44:52  Show Profile  Edit Reply  Reply with Quote  View user's IP address  Delete Reply
Ca à l'air d'etre bon :)
THKS


Happy New Year for all
Go to Top of Page
  Previous Topic Topic Next Topic Lock Topic Edit Topic Delete Topic New Topic Reply to Topic
 New Topic  Reply to Topic
 Printer Friendly
Jump To:
BinaryWorks.it Official Forum © Binaryworks.it Go To Top Of Page
Generated in 0.27 sec. Powered By: Snitz Forums 2000 Version 3.4.07