QUOTE SYSTEME V1.0 AVANCER !

>> In The Zip <<
je vous met le code quand même mais très important de dll le zip !!!!

alias quote { dialog -dm quotesysteme quotesysteme }
Menu * {
  Quote System:/quote
}
dialog quotesysteme {
  title "Quote systeme V1.0 By [VeSpArO]"
  size -1 -1 250 100
  option dbu
  icon postit.ico, 0
  box "Quote systeme", 1, 2 2 245 94
  edit "", 2, 47 22 50 10, autohs
  box "Ajouter/Enlever/Supprimer", 3, 6 10 95 80
  button "Ajouter", 4, 8 20 37 12, flat
  button "Supprimer", 5, 8 35 37 12, flat
  button "Amsg", 6, 53 36 37 12, flat
  button "Voir Pour Soit", 7, 8 51 37 12, flat
  button "Dire", 8, 53 51 37 12, flat
  button "OK/Fermer", 9, 8 66 37 12, flat
  box "Les quotes", 10, 105 10 140 80
  list 11, 110 20 130 68, size hsbar vsbar
  button "Aide", 12, 53 67 37 12, flat
  button "Effacer Aide", 13, 33 79 37 10, flat
}
On *:DIALOG:quotesysteme:*:*:{  
  if $devent == init { loadbuf -o quotesysteme 11 quote.txt }
  if $devent == sclick  {
    if $did == 4 { 
      if !$did(2) { var %temp = $input(Precise une quote !,200,Warning) | dialog -x $dname $dname | dialog -dm $dname $dname | halt }
      did -a $dname 11 $did(2)
      write quote.txt $did(2)
    }
  }
  if $did == 5 {  write -dl quote.txt $did(11).seltext | did -d $dname 11 $did(11).sel }
  if $did == 6 { amsg 4 Quote : $did(11).seltext }
  if $did == 7 { echo -a 4 Quote : $did(11).seltext }
  if $did == 8 { msg $active 4 Quote : $did(11).seltext }
  if $did == 12 { loadbuf -o quotesysteme 11 aide.txt }
  if $did == 13 { did -r quotesysteme 11 }
}
On *:INPUT:*:{
  if ($1 == !quote) { msg # 4 Quote : $read(quote.txt) }
  if ($1 == !nquote) { msg # 4 Quote : $read(quote.txt,$2) }
  if ($1 == !aquote) { amsg 4(amsg) Quote : $read(quote.txt) }
}