EDITEUR DE INPUT PAR MODULE

dialog editeur {
  title "editeur"
  size -1 -1 303 156
  option dbu
  tab "on 1:text:", 1, 0 0 299 154
  text "Inscrit des la Case le(s) mot ( pas + de 3 ou 4 mots ) ou tu souhaite etre averti ", 7, 13 35 194 8, tab 1
  text "Mot a détceter :", 8, 12 49 54 8, tab 1
  edit %text, 9, 66 48 84 10, tab 1 autohs
  list 10, 12 61 152 73, tab 1 size
  button "Faire la remote", 11, 165 61 46 73, tab 1
  box "on 1:text:", 3, 4 22 239 121, tab 1
  tab "on 1:join:", 2
  text "Inscrit des la Case les décos quand tu entre genre @ tu entre sur #newbies @ voila ...", 4, 11 29 230 8, tab 2
  text "Décos avant :", 5, 14 41 54 8, tab 2
  edit %decosav, 6, 68 40 48 10, tab 2 autohs
  list 12, 14 77 275 73, tab 2 size
  button "Faire la remote", 13, 100 55 153 20, tab 2
  box "on 1:join:", 15, 9 19 285 133, tab 2
  text "Décos aprés :", 17, 119 41 47 9, tab 2
  edit %decosap, 18, 166 41 50 10, tab 2 autohs
  button "Jouer un sons ???????", 19, 13 55 86 20, tab 2
}



on *:dialog:editeur:sclick:19:set %MP3Dir $sfile( *editeur , Choisissez un fichier audio )
on 1:dialog:editeur:edit:6:set %decosav $did(6)
on 1:dialog:editeur:edit:18:set %decosap $did(18)
on 1:dialog:editeur:edit:9:set %text $did(9)
on 1:dialog:editeur:sclick:11:{ 
  did -a editeur 10  ----------------- Construction de la remote -----------------
  did -a editeur 10 
  did -a editeur 10  On 1:text:* %text *:#:{ echo -a $nick a di %text sur $chan }
    did -a editeur 10  }
    did -a editeur 10 
    did -a editeur 10    ----------------- Fin de la remote  -----------------
  }
}

on 1:dialog:editeur:sclick:13:{
  did -a editeur 12 ---------- Construction de la remote ----------
  did -a editeur 12 
  did -a editeur 12 on ^1:JOIN:*:{
    did -a editeur 12 if ($nick == $me) { //echo $chan  $timestamp  %decosav  Join  %decosap Tu entres sur $chan | splay %MP3dir $sfile( *editeur , Choisissez un fichier audio ) }
    did -a editeur 12 else { //echo $chan  $timestamp %decosav Join %decosap  $nick ( < $+ $address $+ > ) sur $chan }
    did -a editeur 12 haltdef
    did -a editeur 12 }
    did -a editeur 12  ---------- fin de la remote ----------  
  }
}