Besoin d'aide pour faire un dialogRésolu

Question

Bonjour tout le monde,
je débute dans la programmation, donc dans le scripting d'irc
j'ai tenté de créer un dialog gerant une blacklist.
Toutes les personnes que je blackliste sont ajoutées dans un fichier "blacklist.txt". Mon idée etait de créer un dialog avec une liste des personne, chaque ligne de la liste correspondant a une ligne de blacklist.txt, vous suivez ?
J'ai ajouté un bouton "cancel" et "delete all" qui marchent, par contre, meme apres avoir dépouillée l'aide de  mIRC, je n'ai pas trouvé comment résoudre mon pblème: je n'arrive aps a faire s'afficher la liste des blacklistés dans la "list" et je ne trouve pas la commande pour faire fonctionner je bouton "delete"
Voici mon code:

;########Blacklist########
dialog Blacklist {
  title "Blacklist"
  size -1 -1 138 206
  option dbu
  box "Blackliste", 1, 8 4 111 37
  text "Voici la liste des personnes de ta blacklist! Il s'agit des personne que tu kick a leur connection a un chan car tu ne les aimes surement pas :) !", 2, 14 12 100 26
  list 3, 7 50 113 112, size vsbar
  button "Delete", 4, 7 182 37 12
  button "Cancel", 5, 97 182 37 12, cancel
  text "Blacklist Box by Mopi&#8482; ©", 6, 44 197 90 8
  button "Delete all", 7, 52 182 37 12
}
ON *:DIALOG:Blacklist:close:*:{
  if ( $dialog(Blacklist)) { dialog -x Blacklist }
}
alias Blacklist {
  /dialog -m Blacklist Blacklist
}
on *:dialog:Blacklist:sclick:*:{
  if ( $did = 3 ) { /loadbuf $did(3) $mircdir\blacklist.txt }
  if ( $did = 4 ) { did -dl 3 $did(Blacklist,3).sel blacklist.txt }
  if ( $did = 7 ) { write -dl blacklist.txt }
}

Merci de m'aider, Ne soyez pas méchant, je débute et je ne demande qu'a progrésser.
PS: GL aux autres scripteur =)

Kerrigan · Accepted Answer

ON *:DIALOG:Blacklist:init:0:{
var %i = 1
while ($read(blacklist.txt,%i)) {
did -a 3 $ifmatch
inc %i
}
}

Kerrigan · Answer

pour loader la liste :
ON *:DIALOG:Blacklist:init:0:{
var %i = 1
while ($read(blacklist.txt,%i)) { 
did -a 3 $ifmatch
inc %i
}
 }

pour delete ...heu je sais plus exactement mais il me semble que c'est en utilisant :

write -dl $+ $did(3).sel blacklist.txt

je ne suis vraiment pas sur de moi, ce dont je suis sur par contre que dans
write -dl $+ bidul blacklist.txt

"bidul" c le numéro de la ligne a supprimer.

wala j'espere t'avoir aidé.

TooLoW · Answer

Merci beaucoup pour le bouton "delete" c nikel, apr contre, j'ai pas réussi a charger la liste :'( 
Je sais pas si c'est mpoi qui suis nul ou si ton code comporte un bug, car je recois le mess "* /if: close bracket not found"
Mon code modifié donne donc 
;########Blacklist########
dialog Blacklist {
  title "Blacklist"
  size -1 -1 138 206
  option dbu
  box "Blackliste", 1, 8 4 111 37
  text "Voici la liste des personnes de ta blacklist! Il s'agit des personne que tu kick a leur connection a un chan car tu ne les aimes surement pas :) !", 2, 14 12 100 26
  list 3, 7 50 113 112, size vsbar
  button "Delete", 4, 7 182 37 12
  button "Cancel", 5, 97 182 37 12, cancel
  text "Blacklist Box by Mopi&#8482; ©", 6, 44 197 90 8
  button "Delete all", 7, 52 182 37 12
}
ON *:DIALOG:Blacklist:close:*:{
  if ( $dialog(Blacklist)) { dialog -x Blacklist }
}
alias Blacklist {
  /dialog -m Blacklist Blacklist
}
on *:dialog:Blacklist:sclick:*:{
  if ( $did = 4 ) { write -dl $+ $did(3).sel blacklist.txt }
  if ( $did = 7 ) { write -dl blacklist.txt }
}
ON *:DIALOG:Blacklist:init:3:{
  var %i = 1
  while ($read(blacklist.txt,%i)) {
    did -a 3 $ifmatch
    inc %i
  }
}
Mais la liste ne se charge pas.
Merci quand meme c'est sympa =)

Kerrigan · Answer

poussin c pas init:3: c init:0:
lol

essaie come ça on vera

TooLoW · Answer

Coucou,
je suis dsl, je vais te decevoir, meme en essayant avec 0 ca marche pas (j'avais deja essayé avec ton code exact puis en changeant 0 en 3, rien ne marchait, mais g re-vérifié , tjs rien)
Tiens, si ca peux t'aider, voici une image de la blacklist que je voudrai créer http://djidane54.free.fr/images/blacklist.JPG
Seulement, la liste ne se charge pas.
J'ai demandé de l'aide sur un channel, on m'a vaguement parlé d'une commande "loadbuf", sans approfondir. Bien sur je me jette sur l'aide de mIRC, mais mon code ne marche pas.
A oui j'allais oublier, dans la fenetre status, je peux lire :
"-
* /did: invalid parameters (line 54, dialogs.txt)
-"
Voila apres je suis perdu.
Et je tiens a te remercier des efforts que tu fait =)
@+

Kerrigan · Answer

ON *:DIALOG:Blacklist:init:0:{var %i 1,%f $lines(blacklist.txt)
while (%i <= %f) {
if ($read(blacklist.txt,%i)) { did -a blacklist 3 $ifmatch }
inc %i
}
} 

j'ai laissé tomber toutes les optimisations, pour l'instant faut que ça marche et puis c tout.
si ça me marche pas je ne peux plus rien pour toi, j'ai pas mon mirc, donc je scripte en aveugle, je ne sais pas si ma syntaxe est parfaite. prend l'aide et regarde si je respecte la syntaxe ( a priori oui ... je sais scripter quand meme lol )

fait moi signe des que tu auras testé

TooLoW · Answer

Kerrigan t'est un boss !
c'est exactement ce que je voulais !
Je te remercie grandement et je lis t sources pour m'instruire.
Aller t'a meme droit a un bisou "poussin" :) 
MEEEEEEEEEEEEEEERRRRRRRCCCCCCCCIIIIII
;)
TooLoW ^^

Kerrigan · Answer

oula oula !!! toolow on se calme on se calme.... c'est qu'un code lol et puis bon ya vraiment rien de méchant ... je suis content quand meme mais il aurait suffit de dire

"merci"

lol sur ce a la prochaine... si t'as d'autre question hesite pas.

Besoin d'aide pour faire un dialog

8 réponses

Votre réponse

Discussions similaires