Ircop scanner simple

0/5 (11 avis)

Snippet vu 5 051 fois - Téléchargée 29 fois

Contenu du snippet

Alt+R

Source / Exemple :


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;---------IrcOp Scanner par Grais (Espion)-----------;;;;;
;;;;;;--------------Utilisation: /ircop-------------------;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
alias ircop { if (!$dialog(ircop)) { dialog -m ircop ircop } }
dialog ircop {
  title "Detecteur d'IrcOps EspionScripT       {/ircop}"
  size -1 -1 170 160
  option dbu
  list 1, 8 16 154 50, size
  box "Sur le serveur", 2, 4 2 162 66
  list 3, 8 83 154 50, size
  box "Sur le salon scanné", 4, 4 73 162 66
  combo 5, 16 144 60 50, size drop
  button "&Fermer", 6, 104 144 37 12, ok
}
on *:dialog:ircop:*:*:{
  if ($devent == init) {
    var %i = 1
    while (%i <= $chan(0)) {
      set -u6 %ircopchan %ircopchan $+ , $+ $chan(%i)
      inc %i
    }
    didtok $dname 5 44 %ircopchan
    .enable #ircop
    .who 0 o
  }
  if ($devent == sclick) {
    if ($did == 5) {
      did -r $dname 3
      set -u6 %scir $did(5,ircop).seltext
      .enable #ircop2
      .who 0 o
    }
  }
  if ($devent == dclick) {
    if ($did = 1) || ($did = 3) { query $did(did).seltext }
  }
}
#ircop off
raw 315:*: .disable #ircop | halt
raw 352:*: if (* isin $7) did -a ircop 1 $6 | halt 
#ircop end
#ircop2 off
raw 315:*: .disable #ircop2 | halt
raw 352:*: if (* isin $7) && ($6 ison %scir) did -a ircop 3 $6 | halt
#ircop2 end

Conclusion :


utilisation: /ircop

A voir également

Ajouter un commentaire Commentaires
cs_Grais
Messages postés
33
Date d'inscription
lundi 8 août 2005
Statut
Membre
Dernière intervention
13 décembre 2005

13 déc. 2005 à 18:36
:o dsl une erreur j'avais pas vu
COOLMAN002
Messages postés
969
Date d'inscription
lundi 16 juin 2003
Statut
Membre
Dernière intervention
1 juillet 2012
1
11 déc. 2005 à 21:06
Grais...

REGARDE LE "TITLE" DE TON DIALOG ET REGARDE LE NOM DE L'ALIAS.
dialog ircop {
title "Detecteur d'IrcOps EspionScripT {/ircops}"

Si j'fais /ircops j'ai de grande chance d'avoir un "IRCOPS Unknown command"
AgoRa_ScripT
Messages postés
136
Date d'inscription
jeudi 22 juillet 2004
Statut
Membre
Dernière intervention
20 octobre 2007

11 déc. 2005 à 19:20
c'est justement ce que je te dis, ton "set -u6" ,à la limite, est inutile si tu fais directement "who $did(5)"
cs_Grais
Messages postés
33
Date d'inscription
lundi 8 août 2005
Statut
Membre
Dernière intervention
13 décembre 2005

11 déc. 2005 à 18:14
HySteriK imagine que l'utilisateur voudrais faire un who 0 o
cs_Grais
Messages postés
33
Date d'inscription
lundi 8 août 2005
Statut
Membre
Dernière intervention
13 décembre 2005

11 déc. 2005 à 18:02
COOLMAN002 à dit: "Si j'fais /ircops j'ai de grande chance d'avoir un "IRCOPS Unknown command"".
regarde le code j'ai mis un alias: "alias ircop { if (!$dialog(ircop)) { dialog -m ircop ircop } }". Merci pour le $chan(0) je ne le connaissais pas.
COOLMAN002 à dit: "simplifiable... if ($did 1) || ($did 3) { query $did($did) }".
Merci pour le $did($did) mais c'est plutot $did($did).seltext.
-------------------------------
AgoRa_ScripT je trouve que faire "who $did(5)" ne change rien. pour le set -u6 moi personnellement je n'aime pas avoir beaucoup de variables. pour le who 0 o il ne marche pas partout? je ne le savais pas.
Afficher les 11 commentaires

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 (cs_Grais)