AUTO-VOICE DE CERTAINS USERS SEULEMENT

cs_PaDa Messages postés 1804 Date d'inscription mardi 15 juillet 2003 Statut Membre Dernière intervention 22 septembre 2009 - 4 juin 2004 à 01:33
Therion007 Messages postés 9 Date d'inscription dimanche 6 avril 2003 Statut Membre Dernière intervention 14 août 2007 - 4 juin 2004 à 21:13
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/23388-auto-voice-de-certains-users-seulement

Therion007 Messages postés 9 Date d'inscription dimanche 6 avril 2003 Statut Membre Dernière intervention 14 août 2007
4 juin 2004 à 21:13
Si je peu me permetre, ton truc déja il ne fonctionne pas , en voici une correction pour l'ajouter dans un bot:

;la premiere partie marche
on *:join:# {
if $me isop $chan {
if ($read(BotSys/Pseudo.txt,w, $gettok( $+ $nick $+ ,1,124))) {
mode $chan +v $nick
}
}
}

; la 2nd non et en voici une petite correction:
on *:text:*:# { <= on *:input:*: { ( si vs voulez que cela soit dans votre mirc
if ( $1 == !ad ) {
set %voice.pseudo $2
write BotSys/Pseudo.txt %voice.pseudo
msg $chan 12attend un peu j'enregistre le pseudo Pour l'autoVoice
notice $nick 12 L'AutoVoice est enregistrée }
if ( $1 == !ver ) {
if ($read(BotSys/Pseudo.txt,w, $2 )) {
notice $nick 12 L'AutoVoice est daja enregistrée dans la base }
else notice $nick 12 L'AutoVoice n'existe pas dans la base
}


cette partie là est trop casse bonbon, ça soul assez vite:
echo 4 -a 12,0Un nouveau membre est arrivé: 3,0 $nick 12,0 [W®rm] )
}
else echo -a 3,0 $nick 12,0Cet user n'est pas encore enregistré ou n'est pas membre!! 12,0 [W®rm]

Voila :)

Good Luck

Therion
Kerrigan Messages postés 708 Date d'inscription lundi 15 juillet 2002 Statut Membre Dernière intervention 17 mars 2005
4 juin 2004 à 19:38
je comprend pas comment autant de version peuvent sortir... c'est fatiguant a force ... lol vais matter un eu pour voir :)
cs_PaDa Messages postés 1804 Date d'inscription mardi 15 juillet 2003 Statut Membre Dernière intervention 22 septembre 2009 5
4 juin 2004 à 12:43
write -dl5 machin.txt efface la ligne 5 tu pourras te débrouiller avec ca :p prends l'aide en francais sur scriptsdb :)
pour ceux que ca intéresse mirc6.15 est sorti :))
WOrm49 Messages postés 9 Date d'inscription jeudi 3 juin 2004 Statut Membre Dernière intervention 17 juin 2004
4 juin 2004 à 12:20
Lol pada! tu as raison pour le $2 et pas $$2- ,Je vais le corriger.
Et pour Tofu, je suis en train de voir pour un dialog,mais c'est aussi plus rapide ac une ptite commande comme celle ci.
Sinon pour Delete je connais pas la commande inverse de /write!!
je vais chercher dans l'aide de mirc
++
cs_tofu Messages postés 1726 Date d'inscription vendredi 12 septembre 2003 Statut Membre Dernière intervention 13 juin 2009 1
4 juin 2004 à 11:48
oups dsl, j'ai mal lu le code, le if marche pas vu le ,w, :s ;o)
cs_tofu Messages postés 1726 Date d'inscription vendredi 12 septembre 2003 Statut Membre Dernière intervention 13 juin 2009 1
4 juin 2004 à 11:43
ton code peut pas marcher:
if ($read(pseudos.txt,w, $gettok( $+ $nick $+ ,1,124))) {

il lit ton fichier texte, mais c'est quoi la condition ?

sinon, utilises le $iif

et pour la vérification de pseudo et l'ajout de pseudo, ça serait peut être plus simpa à gérer en dialog..

plus peut-être ajouter une commande pour enlever un pseudo de ton fichier texte ;)
cs_PaDa Messages postés 1804 Date d'inscription mardi 15 juillet 2003 Statut Membre Dernière intervention 22 septembre 2009 5
4 juin 2004 à 01:33
le "echo -a 3,0 $nick 12,0Cet user n'est pas encore enregistré ou n'est pas membre!! 12,0 [W®rm]" doit etre lourdingue sur un gros chan ...

sinon je trouve ca très bien pour une première source , un fichier texte donc pas de variables dans tous les sens , $read($2,w) très bien (juste pourkoi $$2- et pas $2 ? tu as des users qui ont un espace dans leur pseudo ? :x )

j'suppose que t'es sur wanadoo : $gettok( $+ $nick $+ ,1,124) , quoiqu'il en soit t'es pas obligé les $+ , ca ca va très bien aussi le $nick est évalué : $gettok($nick,1,124)

a part ca sache qu'avec du /avoice on peut faire la même chose , mais bon c'est bien de savoir le faire a part ... je trouve rien a redire même si j'ai pas testé je pense que ca marche nickel :)

bravo bonne continuation