alias restore {
   var %a = 0
   while (%a < $nick($chan,0)) {
     inc %a
     if ($nick($chan,%a) isop $chan && $nick($chan,%a) ishop $chan) {
       mode $chan -h $nick($chan,%a)
     }
     if ($nick($chan,%a) isop $chan && $nick($chan,%a) isvoice $chan) {
      mode $chan -v $nick($chan,%a)>     }
     if ($nick($chan,%a) ishop $chan && $nick($chan,%a) isvoice $chan) {
       mode $chan -v $nick($chan,%a)
     }
   }
 }