begin process at 2010 03 16 09:09:04
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

AddOns

 > IRCOP SCANNER SIMPLE

IRCOP SCANNER SIMPLE


 Information sur la source

Note :
6 / 10 - par 1 personne
6,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :AddOns Classé sous :sanner, ircop, scanneur, ircops Niveau :Débutant Date de création :11/12/2005 Date de mise à jour :13/12/2005 18:39:31 Vu :3 268
Auteur : Grais

Ecrire un message privé
Site perso
Commentaire sur cette source (11)
Ajouter un commentaire et/ou une note

 Description

Alt+R

Source

  • ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  • ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  • ;;;;;;---------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 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;---------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


 Historique

11 décembre 2005 18:06:00 :
utilisation de $chan(0)
11 décembre 2005 18:07:02 :
$did($did).seltext
13 décembre 2005 18:39:31 :
petite erreur

 Sources du même auteur

COULEURS D'&#201;CRITURE
Toutes les sources de Grais

 Sources de la même categorie

TCL - AJOUT SUPPRESSION DE LOGS par Atok
BLACKLIST PSEUDOS/MASKS par usurpateur
Source avec une capture [XCHAT] ANTI KICK / AWAY C++ par GeroXXXX
JEU DU CODE par alanpersonproject
SERVEUR FTP par hisoka2501
Toutes les sources de la catégorie AddOns

 Sources en rapport avec celle ci

Source avec une capture SCAN IRCOP BY DEVORZ par devorZ
SCAN MAUVAIS SPEUDO par Ga3t4n
COMMANDE IRCOP/ADMIN par ramsaice
Source avec Zip Source avec une capture 3 SCANNEURS DIFFÉRENTS par AgoRa_ScripT

Commentaires et avis

Commentaire de Grais le 11/12/2005 13:50:10

J'attend des commentaires pour améliorer mon code

Commentaire de Mc_AbBeR le 11/12/2005 15:11:53

Quand on ouvre le dialog, sa détect tout les ircop sur les chan ou tu est.. Mais quand après on choisi comme canal #E.N.E.M.Y (exemple), on ne peut pas détecter les ircop.. fait un autre button

Commentaire de Mc_AbBeR le 11/12/2005 15:12:19

euh non non non j'avais pas vu désolé lool

Commentaire de COOLMAN002 le 11/12/2005 15:23:25

    while (%i <= $comchan($me,0)) {
      set -u6 %ircopchan %ircopchan $+ , $+ $comchan($me,%i)
      inc %i
    }
    didtok $dname 5 44 %ircopchan

$comchan($me,0) = $chan(0).
J'vois pas l'utilité de "sauvegarder" les slons et utiliser un didtok après.. pk tu fais pas did -a $dname 5 $chan(%i) ?

  if ($devent == dclick) {
    if ($did == 1) { query $did(1).seltext }
    if ($did == 3) { query $did(3).seltext }
  }

simplifiable... if ($did = 1) || ($did = 3) { query $did($did) }

dialog ircop {
  title "Detecteur d'IrcOps EspionScripT {/ircops}"

Si j'fais /ircops j'ai de grande chance d'avoir un "IRCOPS Unknown command"

Commentaire de AgoRa_ScripT le 11/12/2005 16:07:17

je trouve vraiment que tu te compliques la vie dans ton code et puis perso avec moi il ne marchait pas.
-déja pour afficher les canaux où on se trouve, $comchan($me,0) reviens à faire $chan(0) ... et puis pk faire "didtok $dname 5 44 %ircopchan" apres ? juste par plaisir de l'utiliser? faisons simple..  
if ($devent == init) { var %i = 1
    while %i <= $chan(0) { did -a $dname 5 $chan(%i) | inc %i
}

-au niveau du scan pour un chan spécifié, tu as remis "who 0 o"
alors que "who $did(5)" suffirait largement, faire un set -u6 c'est pas top puis je vois pas l'intêret apres de faire "if (* isin $7) && ($6 ison %scir)" dans le raw 352 pour vérifier si le pseudo appartient au canal, autant faire un who du canal directement.
-/who 0 o ne marche pas partout, donc déjà pour certains, une list ne servira à rien

à optimiser.

@+

Commentaire de HySteriK le 11/12/2005 17:40:26

alias ircopscan { .who 0 o }
raw 352:*:{
if (* isin $7) {
echo -a -Scan- $6 est un IRCOpérateur Pour + d'infos : /whois $6
}
}


menu channel {
-
ircop scan:{ ircopscan }

}



vala :/

Commentaire de Grais le 11/12/2005 18:02:14

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.

Commentaire de Grais le 11/12/2005 18:14:45

HySteriK imagine que l'utilisateur voudrais faire un who 0 o

Commentaire de AgoRa_ScripT le 11/12/2005 19:20:37

c'est justement ce que je te dis, ton "set -u6" ,à la limite,  est inutile si tu fais directement "who $did(5)"

Commentaire de COOLMAN002 le 11/12/2005 21:06:40

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"

Commentaire de Grais le 13/12/2005 18:36:53

:o dsl une erreur j'avais pas vu

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

IRCOP ET notice [ par bastar ] Bonjour certain d'entre vous connaissent les SNOTICE exemple un user vous whois ca vous le dit mais j'aimeras que ca me le dise dans mon -a (active ) recherche addons ircops [ par spootnik2 ] bonjour je suis ircops sur un gros serveurje recherche un addon avec les differentes commandesainsi qu'un truc qui me permet de voir qu'on a fait un w pb de couleur Ircop avec Nicklust.dll [ par _Dams_ ] SltBon et bien voilatoutes les 60s je fè un Who sur tout les salons ou je me trouve et je mets dans une variable %ircop tous les pseudos IRCOP.Ensuite alias pour l'ip d'un user (IrcOp) [ par MaX_62 ] Bonjour,Est ce que qqn aurait une solution pour un alias qui retourne l'ip de qqn (en admettant que l'on est IrcOp) ?par exemple $aliasip(MaX_62) reto Whois Ircop [ par Camanche ] Bonjour,Je voudrais savoir comment on voit, quand on est ircop, qu'un autre autre user fait un whois sur nous.C'est une snotice? un raw? un event?Cama Quel est l'identifieur pour savoir les ircop présent sur 1 channel ,, $ # 0 o ..j [ par RasZa ] Je cherchais ds le help 1 cmd quand je me suis &#233;gar&#233; de mon but premier , quand tout a coup j'ai trouver 1 $ qui retournais le nb d'ircop su Problème affichage Snotice dans une window [ par fabienfsf ] Hep tout le monde,&nbsp; J'ai un script qui me permet d'afficher les snotice dans une fenetre active window, pour certaine snotice il l'affiche bien m commande d'IRCop [ par ralph31 ] salut tout le mondeje voudrais savoir si il existe un logiciel pour pouvoir utiliser les commandes d'IRCop sans &#234;tre IRCop?? Eggdrop > Seen [ par fabienfsf ] Bonjour,J'ai install&#233; mon eggdrop sur mon shell et il a bien join les channels qui faut mais le pobl&#232;me est au "!seen" le !seen fonctionne q


Nos sponsors


Sondage...

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Photothèque

Photo La BallePhoto icare2
  

Visiter la photothèque
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 3,104 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)