begin process at 2012 02 11 23:14:01
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Astuces

 > AUTO-VOICE DE CERTAINS USERS SEULEMENT

AUTO-VOICE DE CERTAINS USERS SEULEMENT


 Information sur la source

Note :
Aucune note
Catégorie :Astuces Niveau :Débutant Date de création :03/06/2004 Date de mise à jour :03/06/2004 23:01:35 Vu :3 086
Auteur : WOrm49

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

 Description

Voila ma premier source,c tout petit,surement tres simple,mais je n'ais trouvé cela nulpart,et sa peut servir a certains.
En tout cas je la trouve tres pratique pour moi,qui m'occupe d'un salon ou seul les membres d'un site internet sont voicer "www.cholet-cyber.com" -> #cholet
ce script permet donc de gerer un salon en voicant que certains users, enregistré prealablement par vos soins dans un fichier.text.
Pour enregistrer un user,une commande simple !ad pseudo
pour verifier si l'user est enregistré !ver pseudo
voila le tour est joué!!
Vous pouvez modifié cette source,pour les kicks,les op....

[WorM]49 - Alias Cumcum

Source

  • on *:join:# {
  • if $me isop $chan {
  • if ($read(pseudos.txt,w, $gettok( $+ $nick $+ ,1,124))) {
  • mode $chan +v $nick
  • 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]
  • }
  • }
  • }
  • On *:input:*:{
  • if ($1 == !ad ) { /write pseudos.txt $$2-
  • echo -a 3,0 $$2- 12,0 a bien eté enregistré 12,0 [W®rm] }
  • if ($1 == !ver ) {
  • if ($read(pseudos.txt,w, $$2- )) {
  • echo -a 3,0 $$2- 12,0 est bien membre 12,0 [W®rm] }
  • else echo 3,0 $$2- 12,0 n'est pas encore enregistré ou n'est pas membre!! 12,0 [W®rm] } 
on *:join:# {
  if $me isop $chan {
    if ($read(pseudos.txt,w, $gettok( $+ $nick $+ ,1,124))) {
      mode $chan +v $nick 
      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]
}
}
}

On *:input:*:{
    if ($1 == !ad )  {  /write pseudos.txt $$2-   
                               echo  -a  3,0 $$2-  12,0 a bien eté enregistré 12,0 [W®rm] }
  if ($1 == !ver ) {
    if ($read(pseudos.txt,w, $$2- )) {
    echo  -a  3,0 $$2-  12,0 est bien membre 12,0 [W®rm] }
  else  echo   3,0 $$2- 12,0 n'est pas encore enregistré ou n'est pas membre!! 12,0 [W®rm] }



 Sources de la même categorie

Source avec une capture ALIAS POUR TELECHARGER UNE VIDEO SUR YOUTUBE (MISE A JOUR V1... par WorldDMT
ANTI SAJOIN par Maka57
PERMET DE CHERCHER UN HOST par ACoZz
Source avec Zip SIMULATION D'UNE ROULETTE QUI TOURNE par wims
SELPOS - SELECTION ET POSITION ! par wims
Toutes les sources de la catégorie Astuces

Commentaires et avis

Commentaire de PaDa le 04/06/2004 01:33:03

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

Commentaire de tofu le 04/06/2004 11:43:58

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

Commentaire de tofu le 04/06/2004 11:48:41

oups dsl, j'ai mal lu le code, le if marche pas vu le ,w, :s ;o)

Commentaire de WOrm49 le 04/06/2004 12:20:19

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
++

Commentaire de PaDa le 04/06/2004 12:43:03

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 :))

Commentaire de Kerrigan le 04/06/2004 19:38:32

je comprend pas comment autant de version peuvent sortir... c'est fatiguant a force ... lol vais matter un eu pour voir :)

Commentaire de Therion007 le 04/06/2004 21:13:55

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

 Ajouter un commentaire

Nos sponsors


Sondage...

Comparez les prix


Samsung LE26B350 LCD
Entre 359€ et 417€

Visiter le guide achat

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

Photo Waterfall in Kauai Hawaii With RainbowPhoto Renewable Energy is Within Reach
Photo Spooky City View at Sunrise 

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 : 0,702 sec (4)

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)