AWAY EN DIALOG ÉFFICACE

dialog away {
  title "Mode Away"
  size -1 -1 350 150
  button "ok"1, 241 16 34 20,
  text "Pseudo" 2, 50 16 34 20,
  text "Away" 3, 90 16 34 20,
  button "ok" 7, 241 40 34 20,
  text "Pseudo" 8, 50 40 34 20,
  text "Retour" 9, 90 40 34 20, 
  button "ok" 18, 241 64 34 20,
  text "Raison" 19, 50 64 34 20,
  edit "", 15, 135 18 100 20
  edit "", 16, 135 40 100 20
  edit "", 17, 135 64 100 20
  button "S'identifier" 34, 100 120 70 30,
  button "Anuller" 6, 180 120 50 30,cancel
  button "Partir" 4, 241 120 50 30,
  button "Revenir" 5, 300 120  50 30,
  button "ok" 30, 241 89 34 20,
  edit "", 31, 135 89 100 20
  text "Pass-pseudo" 32, 50 89 74 34 20,


}
on *:dialog:away:sclick:*: {
  if ($did == 1) { /set %away.pseudo $did(15) }
  if ($did == 4) { /nick %away.pseudo | /amsg 12Je suis away cause:4 %away.raison }
  if ($did == 7) { /set %away.retour $did(16) }
  if ($did == 5) { /nick %away.retour | /amsg 12Je suis de retour ! cause de mon absence:4 %away.raison  }
  if ($did == 5) { /nick %away.retour | /echo -a tu est de retour  }
  if ($did == 18) { /set %away.raison $did(17) }
  if ($did == 4) { /nick %away.pseudo | /echo -a tu est away ! }
  if ($did == 30) { /set %away.pass $did(31) }
  if ($did == 34) { /ns IDENTIFY %away.pass | /echo -a pseudo identifier }

}