TRACKER - RECHERCHE D'UN TCHATEUR

Dans les Remotes :

dialog tracker {
  title "Tracker"
  size -1 -1 150 91
  option dbu
  edit "", 1, 70 16 70 13
  edit "", 2, 70 33 70 12
  text "Entrez le nick à chercher :", 3, 3 19 66 8, right
  text "Chercher sur le chan :", 4, 13 35 56 8, right
  button "Lancer la recherche", 5, 14 59 55 12
  button "Arrêter la recherche", 6, 81 59 58 12
  button "Fermer", 7, 56 75 37 12
  text "", 8, 25 48 99 8, center
}

on *:dialog:tracker:*:*: {
  if $devent == init {
    if %stat.tracker == on { did -ra Tracker 8 Le Tracker est déjà actif ! }
  }
  if $devent == sclick {
    if $did == 5 {
      if %stat.tracker == on { echo -ra Le Tracker est déjà actif ! }
      else { %stat.tracker = on | $input(Tracker est maintenant activé !,o, Tracker) }
    }
    if $did == 6 { %stat.tracker = off | $input(Tracker est maintenant désactivé !,o, Tracker) }
    if $did == 7 { %nick.tracker = $did(Tracker,1) | %chan.tracker = $did(Tracker,2) | dialog -x tracker tracker }
  }
}
on *:join:%chan.tracker:{
  /timer -m 1 1 inpt %nick.tracker est maintenant connecté sur : %chan.tracker
}
alias inpt $input($1-,o,Tracker connection !!!)
menu * {
  -
  Tracker:dialog -m tracker tracker
  -
}