Autor Tópico: Script Adorocinema  (Lida 59017 vezes)

0 Membros e 1 Visitante estão vendo este tópico.

Offline Jefferson

  • Zelador
  • Hero Member
  • *****
  • Mensagens: 1854
  • Aprovação: +0/-0
    • Ver Perfil
    • http://ryan.com.br
Script Adorocinema
« Online: Setembro 13, 2006, 12:36:22 am »
Este tópico tem o objetivo de apontar erros e sugerir correções no script adorocinema.ifs do Ant Movie Catalog
 
Você poderá ver uma cópia do script original, formatada e comentada por mim, aqui:
http://ryan.com.br/script_adorocinema.htm

Se você está "boiando" e não sabe sequer o que é o Ant Movie Catalog, comece por aqui: http://ryan.com.br/amc.htm

As versões antigas que estavam anexadas aos posts foram deletadas. Para encontrar a versão mais recente, vá seguindo o tópico que ela estará anexada a algum post.
« Última modificação: Fevereiro 08, 2007, 11:12:51 pm por Jefferson »
http://jefferson-ryan.blogspot.com
http://ryan.com.br

Se o que você escreve não merece sua atenção, vai merecer a atenção de quem?!

Offline Jefferson

  • Zelador
  • Hero Member
  • *****
  • Mensagens: 1854
  • Aprovação: +0/-0
    • Ver Perfil
    • http://ryan.com.br
Script Adorocinema
« Responder #1 Online: Setembro 13, 2006, 01:42:18 am »
Dicas:


Substitua
Citar
AnalyzePage('http://www.google.com.br/search?hl=pt-BR&lr=&rls=GGLO,GGLO:2006-03,GGLO:pt-
BR&q=+site:adorocinema.cidadeinternet.com.br+'+MovieName);

por
Citar
AnalyzePage(BaseAddress+MovieName);

Isto vai tornar o código um pouco mais legível


Substitua
Citar
BaseAddress = 'http://www.google.com.br/search?hl=pt-BR&lr=&rls=GGLO,GGLO:2006-03,GGLO:pt-
BR&q=+site:adorocinema.cidadeinternet.com.br+';

por
Citar
BaseAddress = 'http://www.google.com.br/search?hl=pt-BR&num=100&lr=&rls=GGLO,GGLO:2006-03,GGLO:pt-
BR&q=+site:adorocinema.cidadeinternet.com.br+';

Isso vai aumentar o número de respostas do Google de 10 para 100 e achar mais filmes

Por exemplo, procurar por "Below" com o script original encontra dois filmes. Com esta modificação encontra quatro.

Você tem que fazer as duas modificações para que funcione!
« Última modificação: Setembro 13, 2006, 04:34:11 am por Jefferson »
http://jefferson-ryan.blogspot.com
http://ryan.com.br

Se o que você escreve não merece sua atenção, vai merecer a atenção de quem?!

FORUM.RYAN.COM.BR

Script Adorocinema
« Responder #1 Online: Setembro 13, 2006, 01:42:18 am »

Offline Jefferson

  • Zelador
  • Hero Member
  • *****
  • Mensagens: 1854
  • Aprovação: +0/-0
    • Ver Perfil
    • http://ryan.com.br
Script Adorocinema
« Responder #2 Online: Setembro 13, 2006, 01:58:54 am »
Nota: A dica abaixo é só para quem quer aprender a debugar o script. Não vai ajudar em nada no funcionamento do programa.

Já descobri porque alguns filmes não liberam o botão OK: falta o endereço.

Substitua
        nome_filme:=Line+' - '+nome_filme;


Por
        nome_filme:=Line+' - '+nome_filme;
        ShowMessage('Filme: '+nome_filme+' URL: '+url);

E a cada filme encontrado na resposta do Google você verá um diálogo dizendo que URL foi encontrada. Para desativar esta mensagem basta comentá-la, assim:

       // ShowMessage('Filme: '+nome_filme+' URL: '+url);

Você pode usar a função ShowMessage() em qualquer lugar do script, para ver o que se passa no programa, durante a execução.
« Última modificação: Setembro 13, 2006, 06:35:04 am por Jefferson »
http://jefferson-ryan.blogspot.com
http://ryan.com.br

Se o que você escreve não merece sua atenção, vai merecer a atenção de quem?!

Offline Jefferson

  • Zelador
  • Hero Member
  • *****
  • Mensagens: 1854
  • Aprovação: +0/-0
    • Ver Perfil
    • http://ryan.com.br
Script Adorocinema
« Responder #3 Online: Setembro 13, 2006, 03:28:06 am »
Acabo de encontrar mais dois problemas:

1)Algumas páginas de adorocinema terminam em .htm, mas o script só procurava as mais recentes, que terminam em .asp.


substitua
Citar
  //if url = '' then begin
   // EndPos := pos('.htm">',Line)+4;
   // url:=(copy(line,StartPos,EndPos-StartPos));
   //end;

por
Citar
       if pos('http://adorocinema.cidadeinternet.com.br/filmes/', url)=0 then
        begin
         EndPos := pos('.htm">',Line)+4;
         url:=(copy(line,StartPos,EndPos-StartPos));
        end;


2) (não espere entender isso se você não estiver querendo analisar os scripts) o script não inicializa corretamente a variável startpos após o primeiro filme ser achado. Isso estava fazendo com que EndPos se tornasse menor que StartPos, porque EndPos encontrava uma página anterior, que nada tinha a ver.

Substitua
 
Citar
      StartPos := pos('http://adorocinema.cidadeinternet.com.br/filmes/', Line)+0;

por
Citar
StartPos := pos('http://adorocinema.cidadeinternet.com.br/filmes/', Line)+0;       
        Delete(line, 1, startpos-1);
        Startpos:=1;

Estas duas mudanças vão tornar acessíveis um monte de filmes que não liberavam o botão OK. Ainda existem problemas, mas estou investigando
« Última modificação: Setembro 13, 2006, 09:11:20 am por Jefferson »
http://jefferson-ryan.blogspot.com
http://ryan.com.br

Se o que você escreve não merece sua atenção, vai merecer a atenção de quem?!

Offline Rudi_Ps2

  • Novato
  • *
  • Mensagens: 4
  • Aprovação: +0/-0
    • Ver Perfil
Script Adorocinema
« Responder #4 Online: Setembro 13, 2006, 03:30:46 am »
Olá Jefferson, primeiramente obrigado por ajudar na solução desse problema!!

Fiz as alterações que você indicou e vi que ele acabou trazendo mais registros quando digito matrix. Mas mesmo assim ainda não consigo selecionar o matrix para a minha biblioteca.

Isso não acontece apenas com o matrix... mas o homem aranha também....

Abraços
« Última modificação: Setembro 13, 2006, 03:51:50 am por Rudi_Ps2 »

Offline Jefferson

  • Zelador
  • Hero Member
  • *****
  • Mensagens: 1854
  • Aprovação: +0/-0
    • Ver Perfil
    • http://ryan.com.br
Script Adorocinema
« Responder #5 Online: Setembro 13, 2006, 03:35:43 am »
Eu acabo de resolver esse problema :)

Está no meu post anterior.

Mas Matrix, especificamente, dá erro mesmo assim. Só que é por outro motivo. Estou checando.

O arquivo, com as alterações já feitas, está anexo:
« Última modificação: Setembro 13, 2006, 04:35:10 am por Jefferson »
http://jefferson-ryan.blogspot.com
http://ryan.com.br

Se o que você escreve não merece sua atenção, vai merecer a atenção de quem?!

Offline Jefferson

  • Zelador
  • Hero Member
  • *****
  • Mensagens: 1854
  • Aprovação: +0/-0
    • Ver Perfil
    • http://ryan.com.br
Script Adorocinema
« Responder #6 Online: Setembro 13, 2006, 03:40:21 am »
Homem Aranha 1 e 2 já estão acessíveis com a solução acima.

O script ainda precisa de muito polimento, para entregar as informações já formatadas bonitinhas, mas acho que do jeito que está já ajuda muito!
http://jefferson-ryan.blogspot.com
http://ryan.com.br

Se o que você escreve não merece sua atenção, vai merecer a atenção de quem?!

Offline Rudi_Ps2

  • Novato
  • *
  • Mensagens: 4
  • Aprovação: +0/-0
    • Ver Perfil
Script Adorocinema
« Responder #7 Online: Setembro 13, 2006, 03:41:26 am »
Citar
Eu acabo de resolver esse problema :)

Está no post acima.

Mas Matrix, especificamente, dá erro mesmo assim. Só que é por outro motivo. Estou checando.

O arquivo, com as alterações já feitas, está anexo:
Então eu vi agora... Hauhauahuahu mas mesmo assim esse problema do matrix está super estranho..... ele deveria trazer os 3 filmes do matrix e não outros que não tem nada a ver com o filme né.... está estranho pacas isso....

Poxa está legal analizar o que você está fazendo hauahuahuaha... eu trabalho com java  então entendo um pouco o que está no codigo...... mas valeu pela ajuda.

abraços
« Última modificação: Setembro 13, 2006, 03:53:50 am por Rudi_Ps2 »

Offline Jefferson

  • Zelador
  • Hero Member
  • *****
  • Mensagens: 1854
  • Aprovação: +0/-0
    • Ver Perfil
    • http://ryan.com.br
Script Adorocinema
« Responder #8 Online: Setembro 13, 2006, 03:58:37 am »

Isso acontece porque o script original é muito rudimentar. Se você fizer uma busca manual no google vai ver que vem muita coisa que não tem nada a ver com o filme mesmo.

Por exemplo, se você acessar a busca:

http://www.google.com.br/search?hl=pt-BR&n...t.com.br+matrix

que equivale a buscar por
site:adorocinema.cidadeinternet.com.br matrix

Vai ver que um monte de filmes aparece na resposta simplesmente porque a palavra Matrix aparece em algum lugar na página, incluindo os comentários dos usuários.

Eu já tenho uma idéia de como aperfeiçoar isso e estou fazendo uns testes, mas existem efeitos colaterais, como a incapacidade de buscar, com o mesmo script, pelo título original ou traduzido.
« Última modificação: Setembro 13, 2006, 04:00:47 am por Jefferson »
http://jefferson-ryan.blogspot.com
http://ryan.com.br

Se o que você escreve não merece sua atenção, vai merecer a atenção de quem?!

Offline Rudi_Ps2

  • Novato
  • *
  • Mensagens: 4
  • Aprovação: +0/-0
    • Ver Perfil
Script Adorocinema
« Responder #9 Online: Setembro 13, 2006, 03:58:42 am »
Citar
Homem Aranha 1 e 2 já estão acessíveis com a solução acima.

O script ainda precisa de muito polimento, para entregar as informações já formatadas bonitinhas, mas acho que do jeito que está já ajuda muito!
Eu olhei que está ficando bom os ajustes feitos por você. Mas como você mesmo disse.... precisa de mais ajustes o código. Mas já esta ficando bom. Eu mandei um e-mail também para o rapaz que fez o script. Porem o mesmo não respondeu com a mesma rapidez que você.

Abraços

FORUM.RYAN.COM.BR

Script Adorocinema
« Responder #9 Online: Setembro 13, 2006, 03:58:42 am »