3 SCANNEURS DIFFÉRENTS

AgoRa_ScripT Messages postés 136 Date d'inscription jeudi 22 juillet 2004 Statut Membre Dernière intervention 20 octobre 2007 - 3 juil. 2005 à 04:39
AgoRa_ScripT Messages postés 136 Date d'inscription jeudi 22 juillet 2004 Statut Membre Dernière intervention 20 octobre 2007 - 15 mai 2006 à 15:31
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/32492-3-scanneurs-differents

AgoRa_ScripT Messages postés 136 Date d'inscription jeudi 22 juillet 2004 Statut Membre Dernière intervention 20 octobre 2007
15 mai 2006 à 15:31
ok.
merci :)
cs_Riri59 Messages postés 6 Date d'inscription vendredi 1 octobre 2004 Statut Membre Dernière intervention 14 mai 2006
14 mai 2006 à 22:06
Oui jai lu ça,et je lai fait mais le probleme c'est que javais tout mis dans "dlls" donc le views.mdx marchait pas.Mais maintenant e l'ai placé à la racine du script et ça marche merci il est génial 8/10
AgoRa_ScripT Messages postés 136 Date d'inscription jeudi 22 juillet 2004 Statut Membre Dernière intervention 20 octobre 2007
14 mai 2006 à 14:22
c'est surement un probleme du au mauvais placement de ta dll mdx.
ma source va chercher la dll dans Dlls\mdx.dll, il faut que tu créés un sous dossier "Dlls" dans le dossier où se trouve ton script où tu fous mdx.dll dedans.
cs_Riri59 Messages postés 6 Date d'inscription vendredi 1 octobre 2004 Statut Membre Dernière intervention 14 mai 2006
12 mai 2006 à 14:03
Bonjour,

Ils sont bien tes scanners mais j'ai un petit probleme, l'affichage du scan fullname et Ircop marche mal il est écrit:
headertext pseudo Status
headerdims 90 185

Pourrez tu m'aider?
merci
hisoka2501 Messages postés 264 Date d'inscription lundi 19 mai 2003 Statut Membre Dernière intervention 7 juillet 2009
4 juil. 2005 à 21:47
oops une erreur de ma part:


hadd -m %table $address(%nick,2)

>


hadd -m %table $address(%nick,2) %nick

sinon ca iras pas, ce qui nous donne:

alias scanclones {
var %n $nick($chan,0) , %table wbs.clones.scan.tmp
if ($hget(%table)) { hfree %table }
while (%n > 0) {
var %nick $nick($chan,%n), %tmp $hget(%table,$address(%nick,2)
if (%tmp) && (%nick !isop $chan) {
if ($me isop $chan) {
mode $chan +bbb %nick $address(%nick,2) %tmp
kick $chan %nick Clones
kick $chan %tmp Clones
}
else { echo -a Clones: %tmp %nick $chr(40) $+ $address(%nick,2) $+ $chr(41) }
}
hadd -m %table $address(%nick,2) %nick
dec %n
}
hfree %table
}


voila et dsl pour le double post :$
hisoka2501 Messages postés 264 Date d'inscription lundi 19 mai 2003 Statut Membre Dernière intervention 7 juillet 2009
4 juil. 2005 à 21:46
goto pour une boucle beurk

pour ce qui est des clones:

alias scanclones {
var %n $nick($chan,0) , %table wbs.clones.scan.tmp
if ($hget(%table)) { hfree %table }
while (%n > 0) {
var %nick $nick($chan,%n), %tmp $hget(%table,$address(%nick,2)
if (%tmp) && (%nick !isop $chan) {
if ($me isop $chan) {
mode $chan +bbb %nick $address(%nick,2) %tmp
kick $chan %nick Clones
kick $chan %tmp Clones
}
else { echo -a Clones: %tmp %nick $chr(40) $+ $address(%nick,2) $+ $chr(41) }
}
hadd -m %table $address(%nick,2)
dec %n
}
hfree %table
}

voila je pensse ne pas avoir fait d'erreur :)
les while sonts bcp plus rapides que les goto, de plus pensse a chainer tes variables et ne pas trop abuser des /set
AgoRa_ScripT Messages postés 136 Date d'inscription jeudi 22 juillet 2004 Statut Membre Dernière intervention 20 octobre 2007
4 juil. 2005 à 18:27
Je sais, c'est ma façon de scripter ^^'
MaX_62 Messages postés 879 Date d'inscription vendredi 22 octobre 2004 Statut Membre Dernière intervention 29 juin 2007
4 juil. 2005 à 17:59
C'est vrai que c'est beaucoup mieux. Cependant, évites d'associer les boucles /goto aux variables globales... utilises une boucle /while avec des variables locales (/var) !
Les points devant /did sont inutiles...
AgoRa_ScripT Messages postés 136 Date d'inscription jeudi 22 juillet 2004 Statut Membre Dernière intervention 20 octobre 2007
4 juil. 2005 à 15:29
Oula, j'ai vraiment un gros problème d'update.. en plus que ma souris clique 2 fois.
Et euh merci pour le 10 Oo
AgoRa_ScripT Messages postés 136 Date d'inscription jeudi 22 juillet 2004 Statut Membre Dernière intervention 20 octobre 2007
4 juil. 2005 à 11:34
Ah ben si mdr, ça marche ...
AgoRa_ScripT Messages postés 136 Date d'inscription jeudi 22 juillet 2004 Statut Membre Dernière intervention 20 octobre 2007
4 juil. 2005 à 11:34
Le problème persiste, je peux pas changer mon code. Mais merci LEBILOUTE :)
cs_lebiloute Messages postés 26 Date d'inscription mardi 12 avril 2005 Statut Membre Dernière intervention 1 septembre 2005
4 juil. 2005 à 09:48
Bien bien bien c'est bien simple et efficace juste un truc que tu n'as pas fait :
# on *:dialog:scaninfo:sclick:*:{
# if ($did(1) == Scan?Clone) { .dialog -s scaninfo -1 -1 300 350 | .did -h $dname 9,10,11,12,13 | .did -v $dname 2,3,4,5,6,7,8 }
# if ($did(1) == Scan?Fullname) { .dialog -s scaninfo -1 -1 300 250 | did -h $dname 2,3,4,5,6,7,8,9,12,13 | .did -v $dname 9,10 }
# if ($did(1) == Scan'IRCop) { .dialog -s scaninfo -1 -1 300 270 | did -h $dname 2,3,4,5,6,7,8,9,10 | .did -v $dname 11,12,13 }
# if ($did == 5) { .kick $active $did(3).seltext $did(4) }
# if ($did == 6) { .ban $active $did(3).seltext 2 | .kick $active $did(3).seltext $did(4) }
# if ($did == 8) { .bcs }
# if ($did == 10) { .bfull }
# if ($did == 13) { .bcop }
# }

remplace les "if" par des "elseif" voila c'est tout : 6/10 :)
AgoRa_ScripT Messages postés 136 Date d'inscription jeudi 22 juillet 2004 Statut Membre Dernière intervention 20 octobre 2007
3 juil. 2005 à 13:23
;o)) Merci Lestat_2070.
Lestat_2070 Messages postés 71 Date d'inscription mardi 8 juin 2004 Statut Membre Dernière intervention 5 mars 2007
3 juil. 2005 à 10:02
Ah, j'ai rien dit... tout est comme il faut: tout est fournit xD
Désolé, j'avais à peine regardé le code ^^
Lestat_2070 Messages postés 71 Date d'inscription mardi 8 juin 2004 Statut Membre Dernière intervention 5 mars 2007
3 juil. 2005 à 09:54
Je trouve ça beaucoup mieux AgoRa_ScripT :), même si je n'ai pas vraiment un 'haut niveau' pour en parler. Oui, on peux dire que les dll mdx sont en trop, et qu'il faut utiliser les picwins; mais lol, c'est déjà très bien comme ca je trouve ;). A part ça, pourquoi ne pas mettre le 'reste' du code comme sur le screen?
6/10
AgoRa_ScripT Messages postés 136 Date d'inscription jeudi 22 juillet 2004 Statut Membre Dernière intervention 20 octobre 2007
3 juil. 2005 à 05:05
merci :]
cs_Alain Proviste Messages postés 908 Date d'inscription jeudi 26 juillet 2001 Statut Modérateur Dernière intervention 1 février 2015 2
3 juil. 2005 à 04:54
bonne continuation.
AgoRa_ScripT Messages postés 136 Date d'inscription jeudi 22 juillet 2004 Statut Membre Dernière intervention 20 octobre 2007
3 juil. 2005 à 04:39
Je remet en brouillon les commentaires de mon ancien code ....

> Commentaire de : tofu le 01/07/2005 19:44:11:

tu le fermes jms le group #scaninfo ? donc qd tu fais un who ça change la raw tt le temps? ... pas super.. puis penses à bloquer le raw 'end who' ds le même group ..
personnellement ce que j'avais fais c'était qu'une connexion en sockets me rapporte les fullname (donc comme c'est le socket qui fait le who aucun lag sur les gros chans), et aussi les badchans badnick badident etc...

-----------------------------------------------

> Commentaire de : MaX_62 le 02/07/2005 08:07:03:

Franchement ton alias $tab sert pas a grand chose... tu n'as qu'a mettre :
$+(Pseudos,$chr(9),Infos) au lieu de $tab(Pseudos,Infos) ...
tu nous oblige a mettre mdx dans le répertoire Dlls, et tu supposes également que views.mdx est dans la racine du script ><

Sinon c'est très basique, et ça sert pas a grand chose je trouve... essaie d'intégrer quelques options, comme c'est dit plus haut ^

-----------------------------------------------

> Commentaire de : loadation le 02/07/2005 12:02:46 :

j'aime bien ;)

-----------------------------------------------

Considéré cet add-on comme essayant de répondre à vos remarques :s , le précédent ayant buggé -.-
Rejoignez-nous