[FR] Jeuxvideo.com

Post by **antp** » 2005-10-21 09:39:05

< -1 ça me semble étrange, vu que = -1 signifie ligne non trouvée et > -1 signifie qu'on a un n° de ligne

DRAG@N · Post by **DRAG@N** » 2005-10-21 10:12:23

Bonjour Antoine,

Oui, je sais que ça peut paraître étrange (et TRES artisanal), mais le but de cette manip' (digne d'un débutant

)est de "forcer" l'éxécution du code pour la récupération du titre, en intervenant sur la structure conditionnelle If...Then (même en mettant =-1). Dans la pratique, ça nepose pas (trop) de pb car le code se répète un peu, et lors de l'éxécution de ce passage du script, on est déjà au bon endroit sur la page du site.
Mais bon, j'attend moi aussi avec impatience une correction "propre".

Post by **antp** » 2005-10-21 11:27:09

Oui mais justement ce qui m'intigue c'est que ça marche vu que < -1 est un cas qui n'arrive jamais. À moins qu'il y ait un "else" un peu plus loin dans lequel on passe alors systématiquement grâce au if toujours faux ?

Crevette · Post by **Crevette** » 2005-10-21 11:37:39

désolé je n'étais pas très présent ces derniers temps mais je vais tacher de regarder rapidement ce problème...A+

Krevette

DRAG@N · Post by **DRAG@N** » 2005-10-21 12:33:35

Bonjour Krevette,
je commençais à me sentir bien seul

En fait, le pb se situe selon moi à la ligne 217 :

Code: Select all

217:   LineNr := FindLine('img src="http://image.jeuxvideo.com/pics/', Page, LineNr) ;
218:   if LineNr > -1 then

L'expression "img src="http://image.jeuxvideo.com/pics/" est déjà présente en haut de la page du jeu, dans le bandeau de publicité. Du coup, la ligne trouvée n'est pas la bonne.

Il faudrait pouvoir ajouter un élément distinctif, comme le nom de la plateforme qui apparaît immédiatement après le chemin qui nous intéresse. Mais le pb est que ce nom est une variable (PC, XBOX, etc.). A l'inverse, le bandeau pub semble quant à lui toujours avoir le même chemin (du moins en ce moment) : "http://image.jeuxvideo.com/pics/autopromo/". C'est peut-être une piste, mais je ne sais pas comment l'exploiter...

En attendant la prochaine mise à jour, voici encore une astuce de débutant (un peu plus "propre" que la précédente

) : ajouter manuellement à la ligne 217 le nom de la plateforme qui nous intéresse (pc ou ps2, xbox, psp, gba, nds...), comme dans l'exemple ci-dessous :

Code: Select all

LineNr := FindLine('img src="http://image.jeuxvideo.com/pics/pc', Page, LineNr) ;

Les plus aventureux

peuvent même aller jusqu'à modifier la ligne 498 pour spécifier entre les 2 quotes le nom de leur plateforme préférée, et n'afficher ainsi que les jeux en accords avec la modification précédente :

Code: Select all

Plateform := AnsiLowerCase('pc');

cryofu · Post by **cryofu** » 2005-10-24 14:54:34

Bonjour à tous,

le site jeuxvideo.com aurait il changé sa mise en page ? le script ne récupère plus le test des jeux (description).

Autre chose, serait il possible que le script récupère les soluces ? (à mettre a la place des commentaires par exemple ? (ce n'est pas un voeu de ma part, je suis en train de chercher de moi meme et je galere un peu, alors si pour certain c'est faisable en quelques minutes je suis preneur))

Merci

Crevette · Post by **Crevette** » 2005-10-24 16:05:19

Mince, Samedi soir tout fonctionnait bien encore

bon bah dès que je peux je regarde où ça déconne...

cryofu · Post by **cryofu** » 2005-10-24 16:10:53

je dirai même qu'hier ca fonctionnait tres bien, j'espere que ca ne vient pas seulement de chez moi, dans ce cas désolé pour l'intox.
ca ne viendrai pas de "lire le test de" ?

merci encore pour ce script Crevette.

Crevette · Post by **Crevette** » 2005-10-24 16:15:00

hélas non

je viens de tester et pareil je ne récupère pas les infos de test

Là j'ai pas trop le temps de regarder, peut-être ce soir où demain...
tenez-bon

cryofu · Post by **cryofu** » 2005-10-24 16:20:38

Bon j'ai fait une petite modif, ca fonctionne, mais il doit y avoir mieux :

ligne 154

Avant

Code: Select all

    // Adresse du Test Complet
    LineNr := FindLine('Lire le test de', Page, 0);
    if LineNr > -1 then

Apres

Code: Select all

    // Adresse du Test Complet
    LineNr := FindLine('Lire le', Page, 0);
    if LineNr > -1 then

Ca passe comme ca en enlevant "test de", mais "Lire le" est présent aussi pour d'autres pages.

je tiens bon

ps : et pour récupérer les soluces tu en penses quoi ?

Crevette · Post by **Crevette** » 2005-10-24 16:31:23

merci pour ce pansement en attendant que puisse y jeter un oeil...
sinon pour les soluces pourquoi pas, je pourrais rajouter une variable pour gérer la récup des soluces ou pas !

cryofu · Post by **cryofu** » 2005-10-24 16:59:39

re,

pour les soluces, je voyait le truc un peu comme ca :

- virer "similaire à" pour le mette a la suite des notes (ou avant les notes)
- mettre les commentaires dans l'ancienne case "similaire à"
- mettre les soluces et astuces dans la case "commentaires"

voila ce que j'en pense, je ne sais pas si beaucoup sont de mon avis.

cryofu · Post by **cryofu** » 2005-10-30 19:28:45

salut,

merci pour la modif.
pas de problemes constatés, seulement le fait que le site utilise des images pour les touches dans les codes (triangle, carré ...) qui ne sont pas repris par le script.(pas dramatique).

Crevette · Post by **Crevette** » 2005-10-30 20:45:25

Oui effectivement j'avais déjà remarqué le problème, je vais voir si je peux répertorier toutes les images utilisées pour les remplacer par leur équivalent texte...

ça ne sera pas pour tout de suite mais je mets ça dans un coin pour une prochaine update !

A+
Krevette

Lobo · Post by **Lobo** » 2005-12-13 14:50:40

Bravo pour ce script très utile!

Il me manquait quand même une information utile: le nombre de joueurs possible!

Alors j'ai rajouté un petit bout de code dans AnalyzePageTest (ligne 334), pour récuperer les informations multijoueurs et support.

Code: Select all

// Support
LineNr := FindLine('<h4>Support :</h4>', Page, 0);
if LineNr > -1 then
begin
Line := Page.GetString(LineNr + 1);
BeginPos := pos('<p>', Line) + 3;
EndPos := pos('</p>', Line);
Value := copy(Line, BeginPos, EndPos - BeginPos);
HTMLDecode(Value);
SetField(fieldMediaType, Value);
end;
// Multijoueur
LineNr := FindLine('<h4>Multijoueurs :</h4>', Page, 0);
if LineNr > -1 then
begin
Line := Page.GetString(LineNr + 1);
BeginPos := pos('<p>', Line) + 3;
EndPos := pos('</p>', Line);
Value := copy(Line, BeginPos, EndPos - BeginPos);
HTMLDecode(Value);
SetField(fieldResolution, Value);
end;

sandmanweb · Post by **sandmanweb** » 2006-03-12 01:12:11

Quelques petites modifications que j'aimerais voir apportées à ce script:

Mettre la config minimum et conseillée dans ACTEURS
Mettre les notes dans COMMENTAIRES
Récupérer la page web de jeuxvidéo.com a la place de celle du développeur
Laisser tomber les Cheat Codes

C'est peut-être simple à faire, mais je n'y comprend vraiment rien à ces scripts :P
J'ai pourtant essayé...

Merci !

sandmanweb · Post by **sandmanweb** » 2006-03-12 22:38:39

quelqu'un peut m'aider svp ?

thepure · Post by **thepure** » 2006-03-13 07:55:08

magnifique ce script que du bon merci man pour ce boulot!!
EDIT

Pour la derniere question
"Laisser tomber les Cheat Codes"...t'as meme pas besoin de toucher au code, suffit de décocher la case commentaire lors de l'import!

xaxgo · Post by **xaxgo** » 2006-05-31 12:54:54

Bonjour,

Je viens de decouvrir ce script mais il semblerai qu'il ne marche plus.Quelqu'un a t il une copie qui fonctionne?

Merci de vos reponse
anthony

xaxgo · Post by **xaxgo** » 2006-06-06 11:51:31

Personne n'utilise ce script?Personne ne peux me repondre?