1. Accueil
  2. Tous les snippets
  3. Snippets IRC
  4. The ircop scan

The ircop scan

Soyez le premier à donner votre avis sur cette source.

Snippet vu 5 500 fois - Téléchargée 28 fois

Commenter

Contenu du snippet

C'est un IRCop Scan (pour scanner les IRCop) mais je n'est po tout fé (y a des trucs...)

Source / Exemple : 


alias ircop.scan { if $dialog(ircop.s) == $null) { unset %cbd | dialog -m ircop.s ircop.s } }

dialog ircop.s {
  title "IRCop Scan"
  size -1 -1 270 300
  text "", 5, 5 15 190 20
  text "IRCop(s) sur un salon",6, 145 15 190 20
  text "Salon à scanner",7, 158 175 130 100
  combo 10, 158 190 100 100, drop
  box "",140, 5 30 120 230
  list 9, 10 50 110 140,autohs
  box "", 141, 145 30 120 230
  list 8, 150 50 110 140, autohs
  button "Parler en privé",18, 10 180 108 30
  button "Rafraichir",19, 10 220 108 30,default
  button "Scanner",16, 151 220 108 30
  button "Fermer",2, 5 267 260 30, ok
}

on *:dialog:ircop.s:edit:*:{ if ($did == 10) { set %cbd $did(ircop.s,10).text } }
on *:dialog:ircop.s:init:*:{ dialog -t ircop.s IRCop Scan | did -o ircop.s 5 1 IRCop(s) sur $server | chan.l | ircop.s1 | did -c ircop.s 10 1 }
on *:dialog:ircop.s:sclick:*:{ if ($did == 1) unset %cbd | if ($did == 16) ircops.chan | if ($did == 18) if ($did(9,$did(9).sel) != $null) query $did(9,$did(9).sel) | if ($did == 19) { ircop.s1 } }
on *:dialog:ircop.s:dclick:*:{ if ($did == 9) { query $did(9,$did(9).sel) } } 
alias ircop.s1 { did -r ircop.s 9 | .disable #ircopscan.chan | .enable #ircop-scan.net | who 0 o }

#ircopscan.chan off
raw 315:*: .disable #ircopscan.chan | halt 
raw 352:*: if (* isin $7) did -a ircop.s 8 $6 | halt
#ircopscan.chan end

#ircop-scan.net off
raw 315:*: .disable #ircop-scan.net | halt 
raw 352:*: if ($dialog(ircop.s) != $null) { did -a ircop.s 9 $6 | halt }
#ircop-scan.net end

alias ircops.chan { did -r ircop.s 8 | .who $did(ircop.s,10).text | .enable #ircopscan.chan }
alias chan.l { var %channum = 0 | :findchan | inc %channum 1 | var %chan = $chan(%channum) | if (%chan == $null) { goto end } | did -i ircop.s 10 1 %chan | goto findchan | :end }

Conclusion :


bah metter sa dans les remotes et c chini :)

A voir également

Ajouter un commentaire Commentaires
giovani54
Messages postés
9
Date d'inscription
mercredi 2 juillet 2003
Statut
Membre
Dernière intervention
9 février 2004
3 avril 2005 à 04:31
quelle culture ircéene Vestax WOW !
/hop
VestaX
Messages postés
374
Date d'inscription
mardi 2 décembre 2003
Statut
Membre
Dernière intervention
24 avril 2013
3 juil. 2004 à 14:18
ben il ne peux pas savoir, vu que la source n'est pas de lui :) c'est rippé tout le monde prend cette source. C'est un italien qui l'as crée, ensuite des americains l'ont rippés, et ensuite les francais l'ont rippés a leurs tours. Ce qui est le cas de NitriX :)
darkciol
Messages postés
8
Date d'inscription
dimanche 18 janvier 2004
Statut
Membre
Dernière intervention
21 octobre 2004
2 juil. 2004 à 00:01
/ircop.scan pour lancer, tu devrai rajouter un truc du style :
menu menubar,channel {
Scan d' IRCop:/ircop.scan
}

autrement je me demandais si le who est ogligatoire...
lexlo34op
Messages postés
8
Date d'inscription
mardi 23 mars 2004
Statut
Membre
Dernière intervention
27 juin 2004
26 mars 2004 à 15:15
sympa surement mais cmt le declenches tu?????
J'ai du louper quelques chose
merci ;)
S'inscrire maintenant

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.

Du même auteur (NitriX)