Marre de copier/coller les proxys ?

Soyez le premier à donner votre avis sur cette source.

Vue 8 295 fois - Téléchargée 742 fois

Description

Voila, si, comme moi vous allez chercher regulierement des proxys sur internet avant de verifier si ils sont compatibles avec l'IRC, je vous propose de vous simplifier la vie grace a ce simple code qui fait gagner beaucoup de temps !

Note: La majorité des proxys sont chagé depuis www.StayINVISIBLE.com

Alias de lancement : /Proxy_DL

Source / Exemple :


;
;
;      Auto Proxy Downloader
;
;

alias proxy_dl {
  if (!$dialog(proxyD)) dialog -md proxyD proxyD
  else dialog -v proxyD
}
dialog proxyD {
  title "Auto-Proxy Downloader"
  size -1 -1 95 213
  option dbu
  edit "", 1, 3 9 87 145, multi return autohs autovs hsbar vsbar
  box "Liste de proxys", 2, 2 1 92 157
  button "DOWNLOADER !", 3, 2 160 91 12, flat
  button "Enregistrer", 4, 2 173 91 12, flat
  button "EFFACER", 5, 2 187 91 12, flat
  button "Fermer", 6, 25 202 42 10, flat ok
}
on *:dialog:proxyD:edit:1: did -ra proxyD 2 Liste de proxys ( $+ $did(proxyD,1).lines $+ )
on *:dialog:proxyD:sclick:* {
  if ( $did == 3 ) STI_DL_START
  if ( $did == 5 ) {
    did -ra proxyD 2 Liste de proxys (0)
    did -r proxyD 1
  }
  if ( $did == 4 ) {
    set %proxyD.ext.file $$?=="Nom du fichier de sortie ?"
    var %i 0
    while ( %i <  $did(proxyD,1).lines ) {
      if ( $did(proxyD,1,%i) ) .write %proxyD.ext.file $did(proxyD,1,%i)
      inc %i
    }
  }
}
alias STI_DL_START {
  did -b proxyD 3
  set %actupage -1
  set %current_web STI
  STI_DL |   STI_DL |  STI_DL |  STI_DL |  STI_DL |  STI_DL |  STI_DL |  STI_DL
}
alias STI_DL {
  if ( %current_web == STI ) {
    sockopen STI_DL $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9)   www.Stayinvisible.com 80
  }
  if ( %current_web == area ) {
    sockopen STI_AREA $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9)   www.steganos.com 80
  }
  if ( %current_web == p4f ) {
    sockopen STI_PROXY4FREE $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9)   www.proxy4free.com 80
  }
}

on *:sockopen:STI_DL*: {
  inc %actupage
  sockwrite -n $sockname  GET http://www.stayinvisible.com/index.pl/proxy_list?offset= $+ $calc( %actupage * 100 ) HTTP/1.0
  sockwrite -n $sockname  $CRLF $+ $CRLF
}
on *:sockopen:STI_AREA*: {
  inc %actupage
  sockwrite -n $sockname  GET http://www.steganos.com/?area=updateproxylist HTTP/1.0
  sockwrite -n $sockname  $CRLF $+ $CRLF
}
on *:sockopen:STI_PROXY4FREE*: {
  inc %actupage
  sockwrite -n $sockname  GET http://www.proxy4free.com/page $+ $calc( %actupage - 19 ) $+ .html HTTP/1.0
  sockwrite -n $sockname  $CRLF $+ $CRLF
}

on *:sockread:STI_DL*:{
  sockread %a
  var %td $eval(<td>,0)
  if ( %td isin %a ) && ( javascript !isin %a )  {
    var %current_line $remove(%a,<td>,</td>)
    var %current_remove $remove(%current_line,.)
    if ( $gettok(%current_line,0,46) == 4 ) set %current_ip %current_line
    if ( $remove(%current_remove,$CRLF,$chr(32),\n,\r) isnum ) {
      if ( $gettok(%current_line,0,46) == 1 ) {
        if ( %current_line )   did  -i  proxyD 1 1 %current_ip %current_line
        did -ra proxyD 2 Liste de proxys ( $+ $did(proxyD,1).lines $+ )
      }
    }
  }
  unset %a
}
on *:sockread:STI_PROXY4FREE*:{
  sockread %a
  var %td $eval(<td>,0)
  if ( %td isin %a ) && ( javascript !isin %a )  {
    var %current_line $remove(%a,<td>,</td>)
    var %current_remove $remove(%current_line,.)
    if ( $gettok(%current_line,0,46) == 4 ) set %current_ip %current_line
    if ( $remove(%current_remove,$CRLF,$chr(32),\n,\r) isnum ) {
      if ( $gettok(%current_line,0,46) == 1 ) {
        if ( %current_line )   did  -i  proxyD 1 1 %current_ip %current_line
        did -ra proxyD 2 Liste de proxys ( $+ $did(proxyD,1).lines $+ )
      }
    }
  }
  unset %a
}
on *:sockread:STI_AREA*: {
  sockread %a
  if ( $remove(%a,\r,\n,$CRLF,.,:) isnum) {
    did  -i  proxyD 1 1 $replace($remove(%a,\r,\n,$CRLF),:,$chr(32))
    did -ra proxyD 2 Liste de proxys ( $+ $did(proxyD,1).lines $+ )
  }
  unset %a
}
on *:sockclose:STI_DL*: {
  if ( %actupage <= 18 ) {
    STI_DL
  }
  if ( %actupage == 19 ) {
    set %current_web area
    STI_DL
  }
  if ( %current_web == p4f ) STI_DL
}
on *:sockclose:STI_AREA*: {
  set %current_web p4f
  STI_DL
}
on *:sockclose:STI_PROXY4FREE*: {
  if ( %actupage >= 29 )  did -e proxyD 3
  if ( %actupage < 29 ) STI_DL
}

Conclusion :


(Si vous trouvez que c'est un petit peu codé a l'arrache j'en suis désolé ;-) )

Codes Sources

A voir également

Ajouter un commentaire Commentaires
griffondorr
Messages postés
427
Date d'inscription
dimanche 6 juillet 2008
Statut
Membre
Dernière intervention
4 mai 2009

11 mai 2009 à 18:55
ben c'est bien ce que je disait, faut mettre a jour le zip en entier pour que sa marche a nouveau ;)

j'espère que sa se feras bientôt ;)
cs_kreeger
Messages postés
29
Date d'inscription
jeudi 27 février 2003
Statut
Membre
Dernière intervention
31 juillet 2006

11 mai 2009 à 16:03
Désolé mais ca ne marche pas sous mirc 6.35... je clique sur Downloader, ca charge mais ca n'affiche rien du tout...

De plus les deux codes (sur le site/zip) sont différents alors je ne sais pas lequel est le plus récent!
griffondorr
Messages postés
427
Date d'inscription
dimanche 6 juillet 2008
Statut
Membre
Dernière intervention
4 mai 2009

28 févr. 2009 à 22:13
je pense que l'addon de l'autre cette source devrais réglé le bug de l'addon, car souvent quand je fais "download" il télécharge pas ou quand il télécharge c très rare, je pense qu'il devrais réglé ce bug, car sa empeche de télécharger la liste de proxys souvent.
griffondorr
Messages postés
427
Date d'inscription
dimanche 6 juillet 2008
Statut
Membre
Dernière intervention
4 mai 2009

19 oct. 2008 à 13:13
de rien identifire ;)
cs_identifire
Messages postés
2
Date d'inscription
lundi 30 janvier 2006
Statut
Membre
Dernière intervention
19 octobre 2008

19 oct. 2008 à 00:09
Merci pour la réponse griffondor ;)
Afficher les 17 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.