News/test (dialog) jeuxvideo.com

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 854 fois - Téléchargée 25 fois

Contenu du snippet

Voila je m'explique : Ancienement appeler nossou13 j'ai du recréer un compte et c'est la nouvelle version de mon ancien code "News et test jeuxvideo.Com"
Dans cette version , il y a un ajout de dialog pour regrouper les news et les tests . J'ai essayé que le code sois rapide.

Source / Exemple :


dialog TeNe { 
  title "Test & News de Jeuxvideo.com by noss" 
  size -1 -1 384 249 
  option dbu notheme 
  list 1, 0 27 381 208, hsbar extsel 
  button "Generer les tests", 2, 112 2 54 13 
  button "Generer les news", 3, 173 2 53 13 
  button "Dire ", 4, 234 2 54 13 
  text " Date/Url - Url/News - Test - Console ", 5, 109 16 181 9 
  button "Fermer", 6, 53 234 278 11, ok 
} 

on *:dialog:TeNe:*:*:{ 
  if ($devent == init) { .write -c jvn.txt | .write jvn.txt News : | .write -c jv.txt | .write jv.txt Test : | did -ra Tene 1 Bienvenue sur l'addon de JV.com by noss , generer votre test ou votre news ! Bonne utilisation . } 
  if ($devent == sclick) { 
    if ($did == 2) { set %tnj test | /jv } 
    if ($did == 3) { set %tnj news | /jvn } 
    if ($did == 4) { 
      if (%tnj == test) { .echo -a 12Test JeuxVideo.com by noss (Date/Url/Test/Console) : $did(1).seltext } 
      if (%tnj == news) { .echo -a 12News JeuxVideo.com by noss (Url/News) : $did(1).seltext } 
    } 
  } 
} 

alias jv { 
  sockclose jv 
  write -c jv.txt 
  sockopen jv www.jeuxvideo.com 80 
} 
on *:sockopen:jv:{ 
  sockwrite -n $sockname GET http://www.jeuxvideo.com/tests.htm HTTP/1.0 
  sockwrite -n $sockname $crlf 
} 
on *:sockread:jv:{ 
  sockread %a 
  if (http://image.jeuxvideo.com/images isin %a) || (TEST COMPLET isin %a) || (TEST PS2 isin %a) || (TEST xbox isin %a) || (TEST GameCube isin %a) || (<img isin %a) || (titre_accroche isin %a) { return }
  elseif (http://www.jeuxvideo.com/articles/0000/ isin %a) { var %b = $replace($remove(%a,<a,href=,"><span ,class=aclien>,</span>,</a>,>,<br>,<br,class=,<strong,<li,</li,</strong,http://),",$chr(32)) | write jv.txt %b | reboot.liste | var %tnj = test } 
  unset %a 
} 
menu channel,query { 
  - 
  News/Test 
  .Lancer le dialog:/dialog -md tene tene 
} 
alias jvn { 
  sockclose jvn 
  write -c jvn.txt 
  sockopen jvn www.jeuxvideo.com 80 
} 
on *:sockopen:jvn:{ 
  sockwrite -n $sockname GET http://www.jeuxvideo.com/news.htm HTTP/1.0 
  sockwrite -n $sockname $crlf 
} 
on *:sockread:jvn:{ 
  sockread %c 
  if (<p isin %c) { return } 
  if (<img isin %c) { return } 
  if (http://www.jeuxvideo.com/news/ isin %c) { var %d = $replace($remove(%c,<a,href=,"><span ,class=aclien>,</span>,</a>,>,<br>,<br,class=,<strong,<li,</li,</strong,<h4,</h4),",$chr(32)) | write jvn.txt %d | reboot.liste2 } 
  unset %a 
} 

alias reboot.liste did -r TeNe 1 | var %t = 1 | while %t <= $lines(jv.txt) { did -a TeNe 1 $read(jv.txt,%t) | inc %t } 
alias reboot.liste2 did -r TeNe 1 | var %t = 1 | while %t <= $lines(jvn.txt) { did -a TeNe 1 $read(jvn.txt,%t) | inc %t }

Conclusion :


Pour demarrer l'addon , allez sur n'importe quelle fenetre sur mIRC et clickez droit et vous verez "News/Test" marqué .

A voir également

Ajouter un commentaire Commentaires
Bestdoud
Messages postés
243
Date d'inscription
mercredi 22 janvier 2003
Statut
Membre
Dernière intervention
28 décembre 2008

9 déc. 2006 à 11:10
Je l'ai quand même lancé hier soi et ça marche
Nossoux
Messages postés
8
Date d'inscription
vendredi 10 février 2006
Statut
Membre
Dernière intervention
9 décembre 2006

9 déc. 2006 à 11:04
ah merde je suis con pour les regroupement de if tu me les a regrouper merci ! je vais mettre ca a jour tout de suite !
Nossoux
Messages postés
8
Date d'inscription
vendredi 10 février 2006
Statut
Membre
Dernière intervention
9 décembre 2006

9 déc. 2006 à 10:40
Pour les accolades je trouve ca plus beau et puis les if en boucle j'aimerai bien les regroupés mais j'y arrive pas ya toujours un bug :s Et pour les on dialog , dans mes anciennes sources on m'a dit de regroupé mes dialogs , avec $devent .

Merci de tes commentaires ^^.
Au faite l'addon ouvre un dialog , et tu à 3boutons : "Generer tests" , "Generer news" et "Dire"
Generer tests : Genere les derniers tests de jeuxvideo.com dans le dialog.
Generer news : Genere les dernieres news de jeuxvideo.com dans le dialog.
Dire : cité avec echo -a $did(*).seltext . Ca cite la news ou le test selecionner dans le dialog .
Bestdoud
Messages postés
243
Date d'inscription
mercredi 22 janvier 2003
Statut
Membre
Dernière intervention
28 décembre 2008

9 déc. 2006 à 00:20
Tu n'ais pas obligé de mettre des accolades lorsqu'il n'y a qu'une action
exemple mon commentaire juste au dessus, les accolades ne sont pas nécessaires

J'espère que mes commentaires t'auront aidé à progresser
Bestdoud
Messages postés
243
Date d'inscription
mercredi 22 janvier 2003
Statut
Membre
Dernière intervention
28 décembre 2008

9 déc. 2006 à 00:18
if (%tnj == test) { echo -a 12Test JeuxVideo.com by noss (Date/Url/Test/Console) : $did(1).seltext }
elseif (%tnj == news) { echo -a 12News JeuxVideo.com by noss (Url/News) : $did(1).seltext }
Afficher les 9 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.