INFORMATIONS SUR LES EXTENSIONS

ON *:TEXT:!file*:#:{
  set %Chanfile $chan
  set %file $2
  If (. isin %file) {
    %file = $remove(%file,.)
  }
  set %detector off
  ;On le ferme pour éviter les messages d'erreur
  sockclose file
  ;Établie la connexion sur le site  sur le port 80
  sockopen file www.filext.com 80
}

;Lorsque la connexion est établie, on demande la page
;Encore une fois, ce n'est que l'utilisation d'un protocole (HTTP cette fois-ci)
on *:sockopen:file:{ sockwrite -n file GET /detaillist.php?extdetail= $+ %file }
;Lorsqu'on recois l'information
on *:sockread:file:{

  ;On stock l'information dans la variable %sockfile
  sockread %sockfile
  If (Ooops isin %sockfile) {
    msg %chanfile L'extension demandé est introuvable :( 
  }
  If (<strong>Company isin %sockfile) {
    %detector = On
  }
  If (( <td colspan="2"> isin %sockfile) && ( %detector == On)) {
    %detector = Off
    %sockfile = $remove(%sockfile,<td colspan="2">)
    If (<a href=" isin %sockfile) {
      set %url $remove($mid(%sockfile,1,$pos(%sockfile,",2)),<a href=",") 
      set %detecturl On
      %sockfile = $remove($mid(%sockfile,$pos(%sockfile,",2),$len(%sockfile)),</td>,</a>,target="_blank">,")
    }
    Else {
      %sockfile = $remove(%sockfile,</td>)
    }
    ;On affichage cette même information dans la fenêtre active 
    If (%detecturl == On) {
      msg %chanfile %sockfile (12  $+ %url $+  )
      unset %detecturl
    }
    Else {
      msg %Chanfile %sockfile
    }
  }
}