Wheel mouse setting

• Xemacs

  Put next code to your .emacs file.

       (global-set-key '(button4) 'scroll-down-command)
       (global-set-key '(button5) 'scroll-up-command)
       

• Emacs

  Put next code to your .emacs file.

       (global-set-key [mouse-4] 'scroll-down)
       (global-set-key [mouse-5] 'scroll-up)
       

• Netscape

  Put next code to your .Xdefaults file, xrdb .Xdefaults, restart your netscape.

       Netscape*globalNonTextTranslations: #override\n\
       Shift<Btn4Down>: LineUp()\n\
       Shift<Btn5Down>: LineDown()\n\
       None<Btn4Down>:LineUp()LineUp()LineUp()LineUp()LineUp()LineUp()\n\
       None<Btn5Down>:LineDown()LineDown()LineDown()LineDown()LineDown()LineDown()\n\
       Alt<Btn4Down>: xfeDoCommand(forward)\n\
       Alt<Btn5Down>: xfeDoCommand(back)\ 
       

  Alt<Btn4Down> means wheel up with Alt key. LineUp() function move one line up. Then, None<Btn4Down> line means if you round one step wheel, up 6 lines.

  ! ! xterm !# Scrolling on wheel mouse: half a page normally, line per line with shift XTerm.vt100.translations: #override\n\ Shift,:scroll-back(1,line)\n\ Shift,:scroll-forw(1,line)\n\ Ctrl,:scroll-back(1,page)\n\ Ctrl,:scroll-forw(1,page)\n\ ,:scroll-back(1,halfpage)\n\ ,:scroll-forw(1,halfpage)\n\ !# In the scrollbar we map buttons 5 & 4 to 1 and 2 otherwise, core dump !# This will move proportionnaly to cursor position but we dont know how to !# program the same exact behavior as in the text widget. XTerm.vt100.Scrollbar.translations: #override\n\ : StartScroll(Forward)\n\ : StartScroll(Backward)\n\ ! ! for KTerm ! KTerm.vt100.translations: #override\n\ Shift,:scroll-back(1,line)\n\ Shift,:scroll-forw(1,line)\n\ Ctrl,:scroll-back(1,page)\n\ Ctrl,:scroll-forw(1,page)\n\ ,:scroll-back(1,halfpage)\n\ ,:scroll-forw(1,halfpage)\n\ KTerm.vt100.Scrollbar.translations: #override\n\ : StartScroll(Forward)\n\ : StartScroll(Backward)\n\