begin process at 2008 05 16 06:40:11
1 173 219 membres
61 nouveaux aujourd'hui
13 970 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

METEOCONSULT


Information sur la source

Catégorie :AddOns Niveau : Débutant Date de création : 08/07/2004 Vu / téléchargé: 7 436 / 335

Note :
9,5 / 10 - par 2 personnes
9,50 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (7)
Ajouter un commentaire et/ou une note

Description

Bon ben vala ce que je suis ammené a faire quand l'ennui me prend
Voici un pti addon pour consulter la météo a 5 jours partout en France
Je me base sur le site de wanadoo qui lui meme tire ses infos du site de MeteoConsult.
Le code est en socket based et l'interface utilise mdx.dll et nhtml.dll

Source

  • dialog meteo {
  • title "MeteoConsult v1.0"
  • size -1 -1 360 446
  • option pixels
  • button "", 1, 3 29 355 415
  • text "Selectionnez une zone:", 2, 4 8 117 17
  • combo 3, 125 6 153 70, drop
  • button "Afficher", 4, 286 7 71 17
  • }
  • on 1:dialog:meteo:init:0: {
  • if ($exists($scriptdirmeteo) == $false) .mkdir $+(",$scriptdirmeteo,")
  • $iif($findfile(meteo,*.gif,0,0,.remove $+(",$1-,")),)
  • $iif($findfile(meteo,*.meteo,0,0,.remove $+(",$1-,")),)
  • did -ac $dname 3 France
  • var %n 1
  • while (%n <= $lines($scriptdirlist.txt)) { did -a $dname 3 $read($scriptdirlist.txt,%n) | inc %n }
  • if ($window(@meteo)) close -@ @meteo
  • mdx SetMircVersion $version
  • mdx MarkDialog $dname
  • mdx SetControlMDX $dname 1 Window > $scriptdirdialog.mdx
  • window -ahk0 +dL @meteo 0 0 320 320
  • did -i $dname 1 1 grab $window(@meteo).hwnd @meteo
  • if ($exists($scriptdirmeteo\load.meteo) == $true) .remove $+(",$scriptdirmeteo\load.meteo,")
  • if ($exists($scriptdirmeteo\select.meteo) == $true) .remove $+(",$scriptdirmeteo\select.meteo,")
  • write $+(",$scriptdirmeteo\load.meteo,") <html><head></head><body><p valign="center" align="center"><font face="Tahoma" size="3">Loading...</font></p></body></html>
  • write $+(",$scriptdirmeteo\select.meteo,") <html><head></head><body><p valign="center" align="center"><font face="Tahoma" size="3">MeteoConsult v1.0<br><br>by Seregon</font></p></body></html>
  • nhtml attach $window(@meteo).hwnd
  • nhtml select $window(@meteo).hwnd
  • nhtml navigate $scriptdirmeteo\select.meteo
  • }
  • alias -l nhtml dll $+(",$scriptdirnHTMLn_2.93.dll,") $1-
  • alias -l mdx dll $+(",$scriptdirmdx.dll,") $1-
  • on 1:dialog:meteo:sclick:4: {
  • meteo $iif($calc(128 + $did($dname,3).sel) == 129,map1,city $calc(128 + $did($dname,3).sel))
  • did -b $dname 4
  • }
  • alias -l meteo {
  • if ($1 != getimg) {
  • if (!$sock(meteo)) { sockopen meteo meteo.wanadoo.fr 80 | sockmark meteo $1- }
  • else { sockmark meteo $1- | .signal meteo }
  • }
  • else {
  • var %n = 4
  • while (%n >= 0) {
  • set $+($eval(%meteo.getst.,0),%n) 1
  • if ($exists($+($scriptdirmeteo\icn,%n,.gif)) == $true) .remove $+(",$scriptdirmeteo\icn,%n,.gif")
  • sockopen meteoget. $+ %n meteo.wanadoo.fr 80
  • dec %n
  • }
  • }
  • nhtml navigate $scriptdirmeteo\load.meteo
  • }
  • on 1:sockopen:meteo: {
  • if (map? iswm $sock($sockname).mark) {
  • if ($exists($scriptdirmeteo\mapfr.gif) == $true) .remove $+(",$scriptdirmeteo\mapfr.gif")
  • sockwrite -n $sockname GET /Images/france0.gif HTTP/ 1.1
  • }
  • elseif (city ??? iswm $sock($sockname).mark) sockwrite -n $sockname GET $+(/data/city/FR/,$gettok($sock($sockname).mark,2,32),.html) HTTP/ 1.1
  • elseif (4days ??? iswm $sock($sockname).mark) sockwrite -n $sockname GET $+(/data/city/FR/,$gettok($sock($sockname).mark,2,32),_4d.html) HTTP/ 1.1
  • sockwrite -n $sockname Host: meteo.wanadoo.fr
  • sockwrite -n $sockname Connection: Keep-Alive
  • sockwrite -n $sockname
  • }
  • on 1:signal:meteo: {
  • if (map? iswm $sock(meteo).mark) {
  • if ($exists($scriptdirmeteo\mapfr.gif) == $true) .remove $+(",$scriptdirmeteo\mapfr.gif")
  • sockwrite -n meteo GET /Images/france0.gif HTTP/ 1.1
  • }
  • elseif (city ??? iswm $sock(meteo).mark) sockwrite -n meteo GET $+(/data/city/FR/,$gettok($sock(meteo).mark,2,32),.html) HTTP/ 1.1
  • elseif (4days ??? iswm $sock(meteo).mark) sockwrite -n meteo GET $+(/data/city/FR/,$gettok($sock(meteo).mark,2,32),_4d.html) HTTP/ 1.1
  • sockwrite -n meteo Host: meteo.wanadoo.fr
  • sockwrite -n meteo Connection: Keep-Alive
  • sockwrite -n meteo
  • }
  • on 1:sockopen:meteoget.?: {
  • set %meteo.getst 1
  • sockwrite -n $sockname GET $eval($+($eval(%meteo.icn,0),$gettok($sockname,2,46)),2) HTTP/ 1.1
  • sockwrite -n $sockname Host: meteo.wanadoo.fr
  • sockwrite -n $sockname Connection: Close
  • sockwrite -n $sockname
  • inc %meteo.n 1
  • }
  • on 1:sockread:meteo: {
  • if ($sockerr > 0) || (!$sock($sockname)) { unset %meteo | halt }
  • :meteo
  • if (map? iswm $sock($sockname).mark) {
  • if (map1 == $sock($sockname).mark) { unset %meteomapf | sockread %meteo | if ($gettok(%meteo,1,32) == Content-Length:) { set %meteo.mapfrl $gettok(%meteo,2,32) } | if (!%meteo) { sockmark meteo map2 } | if ($exists($scriptdirmeteo\mapfr.gif) == $true) { .remove $+(",$scriptdirmeteo\mapfr.gif,") } }
  • elseif (map2 == $sock($sockname).mark) { sockread &meteo | bwrite $+(",$scriptdirmeteo\mapfr.gif") -1 &meteo | if ($file($scriptdirmeteo\mapfr.gif).size == %meteo.mapfrl) { inc %meteomapf 1 | if (%meteomapf == 2) { if ($exists($scriptdirmeteo\rapport.meteo) == $true) { .remove $+(",$scriptdirmeteo\rapport.meteo,") } | write $+(",$scriptdirmeteo\rapport.meteo,") <html><head></head><body><img src="mapfr.gif"></body></html> | nhtml navigate $scriptdirmeteo\rapport.meteo | did -e meteo 4 | unset %meteo* | dialog -t meteo MeteoConsult v1.0 } } }
  • }
  • elseif (city ??? iswm $sock($sockname).mark) {
  • sockread %meteo
  • if ($left($gettok(%meteo,1,32),5) == $str($chr(9),5)) {
  • tokenize 32 %meteo
  • if (<td class=titlecity isin $1-) set %meteo.city $gettok($gettok($1-,3,62),1,60)
  • elseif (<td class=subtitlecity isin $1-) set %meteo.date0 $gettok($gettok($1-,3,62),1,60)
  • elseif (<td class=cityprev isin $1-) { set %meteo.icn0 $+(/,$deltok($gettok($gettok($gettok($1-,3,62),1,60),2-,47),-1,32)) | set %meteo.weather0 $gettok($gettok($1-,5,62),1,60) | set %meteo.pm0 $gettok($gettok($1-,7,62),1,32) | set %meteo.am0 $gettok($gettok($1-,8,62),1,32) }
  • }
  • elseif (%meteo == 0) { %meteo.end = 1 }
  • if (%meteo.end) inc %meteo.end 1
  • if (%meteo.end >= 3) { unset %meteo.end | set %meteo.day 0 | .timer 1 5 meteo 4days $gettok($sock($sockname).mark,2,32) }
  • }
  • elseif (4days ??? iswm $sock($sockname).mark) {
  • sockread %meteo
  • if ($left(%meteo,11) == $str($chr(9),11)) {
  • tokenize 32 %meteo
  • if (<td class=subtitlecity4d isin $1-) { inc %meteo.day 1 | set $+($eval(%meteo.date,0),%meteo.day) $gettok($gettok($1-,2,62),1,60) }
  • elseif (<td class=cityprev isin $1-) { set $+($eval(%meteo.icn,0),%meteo.day) $gettok($gettok($gettok($1-,2,62),2,32),2,61) | set $+($eval(%meteo.weather,0),%meteo.day) $gettok($gettok($1-,-1,62),1,60) }
  • elseif (<td class=citytemp isin $1-) {
  • set $+($eval(%meteo.am,0),%meteo.day) $+($gettok($gettok($1-,2,38),-1,62),°C)
  • set $+($eval(%meteo.pm,0),%meteo.day) $+($gettok($gettok($1-,1,38),-1,62),°C)
  • if (%meteo.day == 4) { unset %meteo.day | set %meteo.n 0 | meteo getimg }
  • }
  • }
  • }
  • if ($sockbr > 0) goto meteo
  • unset %meteo
  • }
  • on 1:sockread:meteoget.?: {
  • :meteoget
  • if ($eval($+($eval(%meteo.getst.,0),$gettok($sockname,2,46)),2)) {
  • sockread %meteoget
  • if (!%meteoget) unset $+($eval(%meteo.getst.,0),$gettok($sockname,2,46))
  • }
  • else { sockread &meteoget | bwrite $+(",$scriptdirmeteo\icn,$gettok($sockname,2,46),.gif") -1 &meteoget }
  • if ($sockbr > 0) goto meteoget
  • }
  • on 1:sockclose:meteoget.?: {
  • inc %meteoget.end 1
  • if (%meteoget.end == 4) {
  • var %rp = $scriptdirmeteo\rapport.meteo
  • if ($exists(%rp) == $true) .remove $+(",%rp,")
  • write $+(",%rp,") <html><head></head><body><table border="1" cellpading="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#000000" width="320" height="320">
  • var %i = 0
  • while (%i <= 4) {
  • write $+(",%rp,") $+(<tr width="100%" height="64"><td width="75" height="64"><img border="0" src="icn,%i,.gif"></td>)
  • write $+(",%rp,") $+(<td width="245" height="64"><p align="center" valign="top"><font face="Tahoma" style="font-size: 11"><b>,$eval($+($eval(%meteo.date,0),%i),2),</b></p>)
  • write $+(",%rp,") $+(<p align="center" valign="top"><font face="Tahoma" style="font-size: 11">,$eval($+($eval(%meteo.weather,0),%i),2),</p>)
  • write $+(",%rp,") $+(<p align="center" valign="top"><b>AM:</b> $eval($+($eval(%meteo.am,0),%i),2) <b>-</b> <b>PM:</b> $eval($+($eval(%meteo.pm,0),%i),2),</p></font>)
  • write $+(",%rp,") </td></tr>
  • inc %i
  • }
  • write $+(",%rp,") </table></body></html>
  • did -e meteo 4
  • dialog -t meteo MeteoConsult v1.0 - %meteo.city
  • unset %meteo*
  • nhtml navigate $scriptdirmeteo\rapport.meteo
  • }
  • }
  • on 1:exit:$iif($findfile(meteo,*.gif,0,0,.remove $+(",$1-,")),)
dialog meteo {
  title "MeteoConsult v1.0"
  size -1 -1 360 446
  option pixels
  button "", 1, 3 29 355 415
  text "Selectionnez une zone:", 2, 4 8 117 17
  combo 3, 125 6 153 70, drop
  button "Afficher", 4, 286 7 71 17
}
on 1:dialog:meteo:init:0: {
  if ($exists($scriptdirmeteo) == $false) .mkdir $+(",$scriptdirmeteo,")
  $iif($findfile(meteo,*.gif,0,0,.remove $+(",$1-,")),)
  $iif($findfile(meteo,*.meteo,0,0,.remove $+(",$1-,")),)
  did -ac $dname 3 France
  var %n 1
  while (%n <= $lines($scriptdirlist.txt)) { did -a $dname 3 $read($scriptdirlist.txt,%n) | inc %n }
  if ($window(@meteo)) close -@ @meteo
  mdx SetMircVersion $version
  mdx MarkDialog $dname
  mdx SetControlMDX $dname 1 Window > $scriptdirdialog.mdx
  window -ahk0 +dL @meteo 0 0 320 320
  did -i $dname 1 1 grab $window(@meteo).hwnd @meteo
  if ($exists($scriptdirmeteo\load.meteo) == $true) .remove $+(",$scriptdirmeteo\load.meteo,")
  if ($exists($scriptdirmeteo\select.meteo) == $true) .remove $+(",$scriptdirmeteo\select.meteo,")
  write $+(",$scriptdirmeteo\load.meteo,") <html><head></head><body><p valign="center" align="center"><font face="Tahoma" size="3">Loading...</font></p></body></html>
  write $+(",$scriptdirmeteo\select.meteo,") <html><head></head><body><p valign="center" align="center"><font face="Tahoma" size="3">MeteoConsult v1.0<br><br>by Seregon</font></p></body></html>
  nhtml attach $window(@meteo).hwnd
  nhtml select $window(@meteo).hwnd
  nhtml navigate $scriptdirmeteo\select.meteo
}
alias -l nhtml dll $+(",$scriptdirnHTMLn_2.93.dll,") $1-
alias -l mdx dll $+(",$scriptdirmdx.dll,") $1-
on 1:dialog:meteo:sclick:4: {
  meteo $iif($calc(128 + $did($dname,3).sel) == 129,map1,city $calc(128 + $did($dname,3).sel))
  did -b $dname 4
}
alias -l meteo {
  if ($1 != getimg) {
    if (!$sock(meteo)) { sockopen meteo meteo.wanadoo.fr 80 | sockmark meteo $1- }
    else { sockmark meteo $1- | .signal meteo }
  }
  else {
    var %n = 4
    while (%n >= 0) {
      set $+($eval(%meteo.getst.,0),%n) 1
      if ($exists($+($scriptdirmeteo\icn,%n,.gif)) == $true) .remove $+(",$scriptdirmeteo\icn,%n,.gif")
      sockopen meteoget. $+ %n meteo.wanadoo.fr 80 
      dec %n
    }
  }
  nhtml navigate $scriptdirmeteo\load.meteo
}
on 1:sockopen:meteo: {
  if (map? iswm $sock($sockname).mark) {
    if ($exists($scriptdirmeteo\mapfr.gif) == $true) .remove $+(",$scriptdirmeteo\mapfr.gif")
    sockwrite -n $sockname GET /Images/france0.gif HTTP/ 1.1
  }
  elseif (city ??? iswm $sock($sockname).mark) sockwrite -n $sockname GET $+(/data/city/FR/,$gettok($sock($sockname).mark,2,32),.html) HTTP/ 1.1
  elseif (4days ??? iswm $sock($sockname).mark) sockwrite -n $sockname GET $+(/data/city/FR/,$gettok($sock($sockname).mark,2,32),_4d.html) HTTP/ 1.1
  sockwrite -n $sockname Host: meteo.wanadoo.fr
  sockwrite -n $sockname Connection: Keep-Alive
  sockwrite -n $sockname
}
on 1:signal:meteo: {
  if (map? iswm $sock(meteo).mark) {
    if ($exists($scriptdirmeteo\mapfr.gif) == $true) .remove $+(",$scriptdirmeteo\mapfr.gif")
    sockwrite -n meteo GET /Images/france0.gif HTTP/ 1.1
  }
  elseif (city ??? iswm $sock(meteo).mark) sockwrite -n meteo GET $+(/data/city/FR/,$gettok($sock(meteo).mark,2,32),.html) HTTP/ 1.1
  elseif (4days ??? iswm $sock(meteo).mark) sockwrite -n meteo GET $+(/data/city/FR/,$gettok($sock(meteo).mark,2,32),_4d.html) HTTP/ 1.1
  sockwrite -n meteo Host: meteo.wanadoo.fr
  sockwrite -n meteo Connection: Keep-Alive
  sockwrite -n meteo
}
on 1:sockopen:meteoget.?: {
  set %meteo.getst 1
  sockwrite -n $sockname GET $eval($+($eval(%meteo.icn,0),$gettok($sockname,2,46)),2) HTTP/ 1.1
  sockwrite -n $sockname Host: meteo.wanadoo.fr
  sockwrite -n $sockname Connection: Close
  sockwrite -n $sockname
  inc %meteo.n 1
}
on 1:sockread:meteo: {
  if ($sockerr > 0) || (!$sock($sockname)) { unset %meteo | halt }
  :meteo
  if (map? iswm $sock($sockname).mark) {
    if (map1 == $sock($sockname).mark) { unset %meteomapf | sockread %meteo | if ($gettok(%meteo,1,32) == Content-Length:) { set %meteo.mapfrl $gettok(%meteo,2,32) } | if (!%meteo) { sockmark meteo map2 } | if ($exists($scriptdirmeteo\mapfr.gif) == $true) { .remove $+(",$scriptdirmeteo\mapfr.gif,") } }
    elseif (map2 == $sock($sockname).mark) { sockread &meteo | bwrite $+(",$scriptdirmeteo\mapfr.gif") -1 &meteo | if ($file($scriptdirmeteo\mapfr.gif).size == %meteo.mapfrl) { inc %meteomapf 1 | if (%meteomapf == 2) { if ($exists($scriptdirmeteo\rapport.meteo) == $true) { .remove $+(",$scriptdirmeteo\rapport.meteo,") } | write $+(",$scriptdirmeteo\rapport.meteo,") <html><head></head><body><img src="mapfr.gif"></body></html> | nhtml navigate $scriptdirmeteo\rapport.meteo | did -e meteo 4 | unset %meteo* | dialog -t meteo MeteoConsult v1.0 } } }
  }
  elseif (city ??? iswm $sock($sockname).mark) {
    sockread %meteo
    if ($left($gettok(%meteo,1,32),5) == $str($chr(9),5)) {
      tokenize 32 %meteo
      if (<td class=titlecity isin $1-) set %meteo.city $gettok($gettok($1-,3,62),1,60)
      elseif (<td class=subtitlecity isin $1-) set %meteo.date0 $gettok($gettok($1-,3,62),1,60)
      elseif (<td class=cityprev isin $1-) { set %meteo.icn0 $+(/,$deltok($gettok($gettok($gettok($1-,3,62),1,60),2-,47),-1,32)) | set %meteo.weather0 $gettok($gettok($1-,5,62),1,60) | set %meteo.pm0 $gettok($gettok($1-,7,62),1,32) | set %meteo.am0 $gettok($gettok($1-,8,62),1,32) }
    }
    elseif (%meteo == 0) { %meteo.end = 1 }
    if (%meteo.end) inc %meteo.end 1
    if (%meteo.end >= 3) { unset %meteo.end | set %meteo.day 0 | .timer 1 5 meteo 4days $gettok($sock($sockname).mark,2,32) }
  }
  elseif (4days ??? iswm $sock($sockname).mark) {
    sockread %meteo
    if ($left(%meteo,11) == $str($chr(9),11)) {
      tokenize 32 %meteo
      if (<td class=subtitlecity4d isin $1-) { inc %meteo.day 1 | set $+($eval(%meteo.date,0),%meteo.day) $gettok($gettok($1-,2,62),1,60) }
      elseif (<td class=cityprev isin $1-) { set $+($eval(%meteo.icn,0),%meteo.day) $gettok($gettok($gettok($1-,2,62),2,32),2,61) | set $+($eval(%meteo.weather,0),%meteo.day) $gettok($gettok($1-,-1,62),1,60) }
      elseif (<td class=citytemp isin $1-) { 
        set $+($eval(%meteo.am,0),%meteo.day) $+($gettok($gettok($1-,2,38),-1,62),°C)
        set $+($eval(%meteo.pm,0),%meteo.day) $+($gettok($gettok($1-,1,38),-1,62),°C)
        if (%meteo.day == 4) { unset %meteo.day | set %meteo.n 0 | meteo getimg }
      }
    }
  }
  if ($sockbr > 0) goto meteo
  unset %meteo
}
on 1:sockread:meteoget.?: {
  :meteoget
  if ($eval($+($eval(%meteo.getst.,0),$gettok($sockname,2,46)),2)) { 
    sockread %meteoget
    if (!%meteoget) unset $+($eval(%meteo.getst.,0),$gettok($sockname,2,46))
  }
  else { sockread &meteoget | bwrite $+(",$scriptdirmeteo\icn,$gettok($sockname,2,46),.gif") -1 &meteoget }
  if ($sockbr > 0) goto meteoget
}
on 1:sockclose:meteoget.?: {
  inc %meteoget.end 1
  if (%meteoget.end == 4) { 
    var %rp = $scriptdirmeteo\rapport.meteo
    if ($exists(%rp) == $true) .remove $+(",%rp,")
    write $+(",%rp,") <html><head></head><body><table border="1" cellpading="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#000000" width="320" height="320">
    var %i = 0
    while (%i <= 4) {
      write $+(",%rp,") $+(<tr width="100%" height="64"><td width="75" height="64"><img border="0" src="icn,%i,.gif"></td>)
      write $+(",%rp,") $+(<td width="245" height="64"><p align="center" valign="top"><font face="Tahoma" style="font-size: 11"><b>,$eval($+($eval(%meteo.date,0),%i),2),</b></p>)
      write $+(",%rp,") $+(<p align="center" valign="top"><font face="Tahoma" style="font-size: 11">,$eval($+($eval(%meteo.weather,0),%i),2),</p>)
      write $+(",%rp,") $+(<p align="center" valign="top"><b>AM:</b> $eval($+($eval(%meteo.am,0),%i),2) <b>-</b> <b>PM:</b> $eval($+($eval(%meteo.pm,0),%i),2),</p></font>)
      write $+(",%rp,") </td></tr>
      inc %i
    }
    write $+(",%rp,") </table></body></html>
    did -e meteo 4
    dialog -t meteo MeteoConsult v1.0 - %meteo.city
    unset %meteo*
    nhtml navigate $scriptdirmeteo\rapport.meteo
  }
}
on 1:exit:$iif($findfile(meteo,*.gif,0,0,.remove $+(",$1-,")),)

Conclusion

Zinkietez pas okune update n'est prévue lol jvais me concentrer sur des projets un peu plus intéressants
Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
  •   meteo
    • dialog.mdxTélécharger ce fichier [Réservé aux membres club]19 968 octets
    • list.txtTélécharger ce fichier [Réservé aux membres club]Voir ce fichier2 035 octets
    • MDX.DLLTélécharger ce fichier [Réservé aux membres club]42 496 octets
    • meteo.mrcTélécharger ce fichier [Réservé aux membres club]Voir ce fichier8 265 octets
    • nHTMLn_2.93.dllTélécharger ce fichier [Réservé aux membres club]10 240 octets

Télécharger le zip

  • signaler à un administrateur
    Commentaire de SornDrixer le 08/07/2004 10:01:19 administrateur CS

    Bon boulot, mais niveau originalité, c'est moins bien ;p
    http://www.ircfr.com/recherche.aspx?rech=meteo&tr=source&lng=11

    Evidemment nous allons pas chipoter parce qu'il y a seulement 7 autres sources de météo, alors que pour les away system, il y a .. pleins de pages !

    inc %meteoget.end 1
    &gt; sans spécifier la valeur à inc, mIRC incrémente de 1, donc pas besoin de spécifier ce 1

    if ($exists(%rp) == $true)
    &gt; peut donner : if ($exists(%rp))

    tokenize 32 %meteo
    &gt; faut faire gaffe avec ca dans un sockread, si notre buffer recois trop de chr et qu'on le tokenize, on risque d'avoir un msg d'erreur.

    Voila, bonne continuation, et j'espère que tu vas nous concocter de jolies projets :)

  • signaler à un administrateur
    Commentaire de Seregon le 08/07/2004 12:08:57

    merci pr le $exists je pensais pa que ca marchai avec $true et $false :)
    Pr le moment je bosse sur un clien smtp/pop3 capable de gérer plusieurs comptes et je v essayer de gérer le IMAP
    Sinon je fais également un systeme pour afficher d smileys sous forme d'icones dans une convesation sur un channel

  • signaler à un administrateur
    Commentaire de talking le 08/07/2004 12:31:17

    Rien à dire . trés bon travail Seregon ça change des tipiques away system répondeur autojoin etc
    9/10

  • signaler à un administrateur
    Commentaire de tofu le 08/07/2004 17:26:50

    " var %n 1
        while (%n &lt;= $lines($scriptdirlist.txt)) { did -a $dname 3 $read($scriptdirlist.txt,%n) | inc %n }"

    var %n 1, %x $lines($scriptdirlist.txt)
    while %n &lt;= %x { did -a $dname 3 $read($scriptdirlist.txt,%n) | inc %n }

    ça va plus vite jcrois qd tu mets une var pr le nb de ligne d'un fichier.

  • signaler à un administrateur
    Commentaire de Kerrigan le 09/07/2004 20:49:26

    punaise une belle source ! ça fait tout bizare, le niveau du site est vraiment tombé. C'est dommage , je sais pas si on peut faire quelque chose contre ça mais ça devient triste de voir que le site ne releve pas la barre.

  • signaler à un administrateur
    Commentaire de tofu le 09/07/2004 22:05:33

    bah c'est la politique du site, de laisser faire, donc on y peut pas grand choses..
    si les gens se remettent pas eux même en question avant de poster leur trucs en se disant "mais attends, c'est de la merde ce que jss en trin de poster, même dans le mirc.hlp ils font mieux !§" bah ça ira pas ;)

  • signaler à un administrateur
    Commentaire de InFerNaLeX le 10/12/2004 17:31:31

    j'arrive pas a avoir les images ca me met un carér blanc avec un petite croix rouge ^^

Ajouter un commentaire

Appels d'offres

Pub



CalendriCode

Mai 2008
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

Boutique

Boutique de goodies CodeS-SourceS