Scanneur d'ip...

Soyez le premier à donner votre avis sur cette source.

Vue 8 708 fois - Téléchargée 372 fois

Description

Pas grand intêret lol, je l'accorde. Mais ça peut servir, on sait jamais.. :\ C'est un code qui permet de scanner des host, par exemple si vous cherchez le host ayant "lol" dedans, bah ça l'affiche dans le dialog. Mon code utilise un socket, j'ai pas trouver d'autre moyen pour pouvoir être sûr de récupérer les host, car $address($nick(#,1),1) ne marche pas sur certains, dommage, ça prendrais moins de temps.

Source / Exemple :


alias tab {
  if (!$1) return $chr(9) | var %t,%w = 1
  while ($($+($,%w),2)) { %t = $instok(%t,$($+($,%w),2),0,9) | inc %w }
  return %t
}
alias stdl { return Dlls/mdx.dll }
alias f12 /scanip
alias scanip dialog -m scanip scanip
dialog scanip {
  title "?Scanneur D'ip?"
  size -1 -1 500 400
  list 1, 5 5 490 200
  list 2 , 5 205 100 190
  edit "" , 3 , 360 205 110 25
  button "Scanner" , 4 , 410 235 50 20
  box "" , 5 , 150 260 230 100
  text "" , 6 , 230 275 100 75
  text "" , 7 , 110 207 30 20
  button "ok" , 8 , 420 330 40 30 , ok
}

on *:dialog:scanip:init:*:{
  dll $stdl MarkDialog $dname
  dll $stdl SetMircVersion $version
  dll $stdl SetControlMDX $dname 1 ListView showsel rowselect infotip report grid > views.mdx
  did -i $dname 1 1 headerdims 90 400
  did -i $dname 1 1 headertext $tab(Pseudos,Adresse)
  did -a $dname 6 $crlf $+ Scan D'ip Sur %chandep Comportant $nick(%chandep,0) $iif($nick(%chandep,0) > 1,tchatteurs,tchatteur) $+ . $+ $crlf
  %chandep = $active
  did -a $dname 7 $iif($active == Status Window,?,0/ $+ $nick(%chandep,0))
}
on *:dialog:scanip:sclick:4:{
  if ($active == Status Window) { .did -a scanip 1 $chr(9) Mettez-vous sur un canal pour pouvoir scanner. }
  elseif (($did(3))) { .scanipp }
  else { .did -a scanip 1 $chr(9) Vous n'avez pas spécifié de recherche. }
}
alias scanipp {
  did -r scanip 1,2
  did -a scanip 7 0/ $+ $nick(%chandep,0)
  .enable #scanip
  who %chandep
  unset %nbuser
  set %nbuser 0
}
#scanip off
raw 352:*: .did -a scanip 1 $6 $chr(9) $+($iif(~ isin $3,$3, ~ $+ $3),@,$4) | $iif($did(scanip,3) isin $+($3,@,$4),did -a scanip 2 $6,halt) | inc %nbuser | .did -a scanip 7 %nbuser $+ / $+ $nick(%chandep,0)
#scanip end

Conclusion :


Je m'attend à tout genre de critique, mais je la dépose pour cela.
Pour utiliser le code, mettez le dans "Remotes" avec Alt+r , dans un nouveau fichier bien entendu.
Puis tapez f12 ou /scanip .
Walou, bon scripting mIRC.

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
1
Date d'inscription
jeudi 3 août 2006
Statut
Membre
Dernière intervention
3 août 2006

ben ché moi ca marche pas non plus!! :'( sinon je trouve que l'idée est bonne!
Messages postés
136
Date d'inscription
jeudi 22 juillet 2004
Statut
Membre
Dernière intervention
20 octobre 2007

MaX_62 euh non, moi je l'ai... par contre la capture d'écran marche pas, j'avais changé le dialog.. je met le code et le zip com'sa au moins.
Messages postés
879
Date d'inscription
vendredi 22 octobre 2004
Statut
Membre
Dernière intervention
29 juin 2007

T'aurais pas fait une erreur en updatant ? Je vois pas le zip :(
Messages postés
2466
Date d'inscription
vendredi 23 juillet 2004
Statut
Membre
Dernière intervention
1 août 2010
1
Ta laissé un alias qui est pas forcement bon pour tout le monde

* /dll: unable to open 'C:\WINDOWS\BUREAU\BANANEN\Dlls\mdx.dll' (line 27, script1.mrc)
-
alias stdl { return Dlls/mdx.dll }
Deja si on a pas mdx ca marche pas :]
Met un zip comme sa tu choisis un repertoire commun

regroupe les evenement on dialog
on *:dialog:scanip:init:*:{
set %chandep $active
Si je suis sur le status ca va set la var ...

Euh le dialog est pas un peu grand ? ( il est plus grand que mon ecran )

Et je ne comprend pas ca marche pas chez moi
Messages postés
879
Date d'inscription
vendredi 22 octobre 2004
Statut
Membre
Dernière intervention
29 juin 2007

Pour le /who, faut récupérer les hosts avc la raw correspondante (fais un /debug @win pour la trouver)
tu n'as pas tout le temps les $address, c'est normal...
Afficher les 10 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.