The ircop scan

Soyez le premier à donner votre avis sur cette source.

Snippet vu 5 331 fois - Téléchargée 26 fois

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

Messages postés
9
Date d'inscription
mercredi 2 juillet 2003
Statut
Membre
Dernière intervention
9 février 2004

quelle culture ircéene Vestax WOW !
/hop
Messages postés
376
Date d'inscription
mardi 2 décembre 2003
Statut
Membre
Dernière intervention
24 avril 2013

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 :)
Messages postés
8
Date d'inscription
dimanche 18 janvier 2004
Statut
Membre
Dernière intervention
21 octobre 2004

/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...
Messages postés
8
Date d'inscription
mardi 23 mars 2004
Statut
Membre
Dernière intervention
27 juin 2004

sympa surement mais cmt le declenches tu?????
J'ai du louper quelques chose
merci ;)

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.