Next and Previous NEdit window

define next_win {
   n=focus_window("next")
   if(n!="") open(n)
   else open(focus_window("last"))
}

define prev_win {
# needs functions first_win_name and prev_win_name (below)
   n=prev_win_name()
   if(n!="") open(n)
   else open(first_win_name())
}

define first_win_name {
   wa=$file_path $file_name
   wn=focus_window("next")
   while(wn!="") {
      wa=wn
      wn=focus_window("next")
   }
   return wa
}

define prev_win_name {
   a=$file_path $file_name
   f=focus_window("last")
   if(a==f) return ""
   l=f
   while(f!="") {
      f=focus_window("next")
      if(f==a) break
      else if (f!="")l=f
   }
   return l
}

Released on  Wed, 21 Nov 2001  by C. Denat