Quelqu'un pourrais m'aider a corriger mon code svp :)

Résolu
cs_PsYZiK Messages postés 58 Date d'inscription jeudi 5 juin 2003 Statut Membre Dernière intervention 6 août 2004 - 3 août 2004 à 11:43
cs_tiot Messages postés 83 Date d'inscription samedi 9 novembre 2002 Statut Membre Dernière intervention 18 août 2004 - 4 août 2004 à 04:38
voila je suis un peu debutant en scripting et je n'arrive pas a trouver mon erreur...

dialog logview {
title "Logview"
size -1 -1 176 115
option dbu
list 1, 9 9 43 80, size hsbar vsbar
}

on 1:dialog:logview:init:*: {
set %nbr.log 1
:nbr.log
set %nom.log $findfile($logdir,*.log,%nbr.log)
if (%nom.log == $null) { goto suite }
/inc %nbr.log
goto nbr.log
:suite
/set %i 1
while (%i =< %nbr.log) {
/set %logg $finfile(^$logdir,*.log,%i)
/set %logg remove(%logg,$mircdir)
/did -az $dname 1 %logg
}
}

3 réponses

cs_SornDrixer Messages postés 2084 Date d'inscription jeudi 12 décembre 2002 Statut Membre Dernière intervention 30 janvier 2011 8
3 août 2004 à 14:55
Bonjour,

Je suppose que tu souhaites afficher la liste des logs de ton mIRC dans la LIST de ton dialog.
Il y a beaucoup d'incohérence et de chose inutile dans ton code, comme l'usage de 2 boucles (goto et while) alors que $findfile est une boucle à lui seul.

Pour faire simple, je te propose ca :

dialog logview {
  title "Logview"
  size -1 -1 176 115
  option dbu
  list 1, 9 9 150 80, size hsbar vsbar
}

on 1:dialog:logview:init:*:{
var %a $findfile($mircdir\logs,*.log,0,did -a $dname 1 $1-)
}

-<gras>[ Sorn_Drixer ]-</gras>
-
Un problème ? une question ? N'hésitez pas, le forum est là pour ça.

:question) Vous pouvez me retrouver sur irc.rs2i.net:6667

:question) Mon site : Sorn-Creation
3
Kerrigan Messages postés 708 Date d'inscription lundi 15 juillet 2002 Statut Membre Dernière intervention 17 mars 2005
3 août 2004 à 14:54
while (%i =< %nbr.log) { } ça c'est pas bon !
c'est ça que tu dois mettre

while (%i <= %nbr.log) { ... }

set %logg $finfile(^$logdir,*.log,%i)
ici ya peut etre une erreur ... essai avec ça aussi :
/set %logg $finfile($logdir,*.log,%i)

ya une erreur ici aussi :
/set %logg remove(%logg,$mircdir)
faut plustot
/set %logg $remove(%logg,$mircdir)

ces deux lignes la sont inutiles :
/set %logg $finfile($logdir,*.log,%i)
/set %logg $remove(%logg,$mircdir)

elles peuvenet devenir ça :
/set %logg $remove($finfile(^$logdir,*.log,%i),$mircdir)

enfin pour terminer les / sont inutiles
0
cs_tiot Messages postés 83 Date d'inscription samedi 9 novembre 2002 Statut Membre Dernière intervention 18 août 2004
4 août 2004 à 04:38
Et les goto sont à bannir ! ! !

Ash nazg durbatulûk, ash nazg gimbatul, ash nazg thrakatulûk agh bruzum-ishi krimpatul
0
Rejoignez-nous