Soyez le premier à donner votre avis sur cette source.
Snippet vu 5 500 fois - Téléchargée 28 fois
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 }
3 avril 2005 à 04:31
/hop
3 juil. 2004 à 14:18
2 juil. 2004 à 00:01
menu menubar,channel {
Scan d' IRCop:/ircop.scan
}
autrement je me demandais si le who est ogligatoire...
26 mars 2004 à 15:15
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.