The ircop scan

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

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)