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 :)
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.