Problême de scripting mirc

Question

Bonsoir, j'ai un petit probl&#234;me, je n'arrive pas a faire ce que je veux :(
Ce que je veux : Qu'une commande inscrive une personne dans un fichier avec un identifiant, et, en m&#234;me temps, que tout les personne pr&#233;sentes dans le fichier texte soient mise en topic (pour cela il faut les mettres en ligne et retirer l'identifiant).

Voil&#224; ce que j'ai fais avec un ami:

on *:text:!add*:%chan:{ if ($nick isop $chan) {
 if ($2 == $null) { notice $nick 4 !add NomDeLaWar | HALT } 
 if ($read(match2.txt,w, $+(*,$$2,*)) != $null) {
  if ($read(joueurs.txt,w, $+(*,$$2 $nick,*)) != $null) { notice $nick 7 T'es d&#233;j&#224; add pour cette war ! | HALT }
   write joueurs.txt $$2 $nick
   var %line = $read(joueurs.txt, w, $+(*,$$2,*))
     %line = $remove(%line, $$2)
     while $readn != 0 {
     var %line2 = $read(joueurs.txt, w, $+(*,$$2,*), $calc($readn + 1))
     var %line2 = $remove(%line, $$2)
         %line = %line %line2  
   } 
    notice $nick 3 Inscription Accept&#233;. 
    topic %chan $read(match2.txt,w, $+(*,$$2,*)) 12 Joueurs pr&#233;sents : 3 %line | HALT }
     notice $nick 4 Cette war n'existe pas... }
}

Le script s'&#233;x&#233;cute mais le probl&#234;me est qu'il n'y a qu'un seul pseudo r&#233;p&#233;t&#233; plusieurs fois dans le topic.
Pouvez-vous m'aider svp.

LordPoun · Answer

:| Quelqu'un peut m'expliquer aussi pourquoi ma pr&#233;sentation est devenue ceci ? ^^

cs_wims · Answer

Ton code n'est pas clair je l'est repris et je l'est chang&#233;.



on *:text:*:%chan:{

  if ($1 == !add) {

    if ($nick isop $chan) {

      if (!$2) { notice $nick 4 !add NomDeLaWar }

      else {

        if ($istok(%Match,$2,44)) { 

          if
($istok(%joueur $+ $2,$nick,44) { notice $nick 7 T'es d&#233;j&#224; add pour
cette war ! }

          else { 

            set %joueur $+ $2 $addtok(%joueur $+ $2,$nick,44)  

            notice $nick 3 Inscription Accept&#233;. 

            topic %chan War $2 : Joueurs pr&#233;sents : %joueur $+ $2

          }

        }

        else { notice $nick 4 Cette war n'existe pas... }

      }

    }

  }

}



alias addwar { 

  if ($istok(%Match,$1,44)) { echo -a La War Existe deja. }

  else { set %Match $addtok(%Match,$1,44) }

}

alias delwar {

  if (!$istok(%Match,$1,44)) { echo -a Cette War existe pas }

  else { set %Match $remtok(%Match,$1,44) }

}





Oublie pas que %chan dois exister.

Tu peux ajouter une War avec /addwar war

Tu peux supprimer une War avec /delwar war

Le code :

Lorsque quelqu'un tape !add :

si la war qu'il dis existe et s'il est op, sa lajoute a la war

sinon ca ne fait rien.

J'espere que c'est bon :]

LordPoun · Answer

D&#233;sol&#233;e de r&#233;pondre si tard mais impossible de me logguer !
Ton code ne fontionne pas, il me di qu'aucune war n'existe, m&#234;me si elle existe. Ce que je voudrai en faite c'est savoir pourquoi &#231;a :

   var %line = $read(joueurs.txt, w, $+(*,$$2,*))
     %line = $remove(%line, $$2)
     while $readn != 0 {
     var %line2 = $read(joueurs.txt, w, $+(*,$$2,*), $calc($readn + 1))
     var %line2 = $remove(%line, $$2)
         %line = %line %line2  
   } 


ne marche pas. Le reste du code, m&#234;me si il n'est aps clair pour toi, l'ai pour moi (c'est important de comrpednre ce que l'on fait je trouve) et fontionne tr&#233;s bien. La fontionne pour ajouter et retir&#233; des war est d&#233;ja faite a par.

Et pourquoi &#224; chaque fois la pr&#233;sentation de mon message est comme reset et tout est mi a la ligne ? :s

LordPoun · Answer

le probl&#234;me avec ce que tu m'as donn&#233; en faite c'est que cela est bas&#233; sur des variable, alors que tout mon projet est abs&#233; sur des fichiers textes :s
Tout le reste est fait, il ne manque plus que celle l&#224; ....

cs_wims · Answer

tu definis deux fois var %line  je pense que ca viend de la ton erreur

LordPoun · Answer

C'est un pote qui a script&#233; ce passage, je lui ai di aussi mais il ma dis que c'&#233;tait une fa&#231;on un peu bizard de scripter masi que cela march&#233;e :s
J'ai tester sa sinon mais sans succ&#233;s :

     var %line = $read(joueurs.txt, w, $+(*,$$2,*))
     var %line2 = $remove(%line, $$2)
     while $readn != 0 {
     var %line3 = $read(joueurs.txt, w, $+(*,$$2,*), $calc($readn + 1))
     var %line4 = $remove(%lin3, $$2)
     var %line5 = %line2 %line4
   } 
    notice $nick 3 Inscription Accept&#233;. 
    topic %chan $read(match2.txt,w, $+(*,$$2,*)) 12 Joueurs pr&#233;sents : 3 %line5 | HALT }

Problême de scripting mirc

6 réponses

Votre réponse

Discussions similaires