Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!mnetor!uunet!husc6!mit-eddie!ll-xn!ames!ucbcad!ucbvax!ucdavis!iris!windley From: windley@iris.ucdavis.edu (Phil Windley) Newsgroups: comp.emacs Subject: Re: MicroEmacs 3.9e VT100 Key Mapping? Message-ID: <620@ucdavis.ucdavis.edu> Date: Tue, 1-Dec-87 15:23:00 EST Article-I.D.: ucdavis.620 Posted: Tue Dec 1 15:23:00 1987 Date-Received: Fri, 4-Dec-87 22:15:24 EST References: <1280@ncsuvx.ncsu.edu> Sender: uucp@ucdavis.ucdavis.edu Reply-To: windley@iris.UUCP (Phil Windley) Organization: U.C. Davis - College of Engineering Lines: 68 In article <1280@ncsuvx.ncsu.edu> sam@ncsuvx.ncsu.edu (Mr. Sam Moore) writes: > >I have MicroEmacs version 3.9e running on a MicroVax(Ultrix) and on a >VAX(VMS). On both I want to use the function keys and cursor keys. I >compiled in the VT100 define. And I tried to map some keys in the >autoload script file. I was unsuccessful. Does anyone know how to do >this? Does anyone have any script files other than those in the distribution? >If so, I would like to see them. I will add my vt100.cmd file to the end of this. Its not perfect yet, but it does work. > > Unless I have compiled with the wrong options, it seems >that there is a missing brace, {. If this is old news and there are fixes >out there somewhere, please let me know. > Yes there is a missing brace. Just add it and everything will work fine. One more point. The command file that follows has a line which says 'write-message "~e="'. This sends an escape-= to the terminal to turn on the alternate keypad. The ~e is not standard memacs. I had to modify the function token() in the file exec.c so that ~e output an escape character. This allows you to program the vt100 from within a command file. I'm not sure if this will cause other problems. It seems to me that there must be a goos reason for leaving it out, but maybe not. Phil Windley Robotics Research Lab University of California, Davis ----------------------- vt100.cmd ----------------------------------- ;;; for vt100. ;;; alternate keypad mode. write-message "~e=" ;;; bind alternate keypad. ; bind-to-key FNp ; 0 bind-to-key end-of-line FNq ; 1 bind-to-key next-line FNr ; 2 bind-to-key next-page FNs ; 3 bind-to-key backward-character FNt ; 4 ; bind-to-key FNu ; 5 bind-to-key forward-character FNv ; 6 bind-to-key beginning-of-line FNw ; 7 bind-to-key previous-line FNx ; 8 bind-to-key previous-page FNy ; 9 bind-to-key end-of-file FNl ; , bind-to-key beginning-of-file FNm ; - bind-to-key delete-next-character FNn ; . ; bind-to-key FNM ; enter ;;; function keys bind-to-key set-mark FNP ; pf1 (default) bind-to-key copy-region FNQ ; pf2 (default) bind-to-key kill-region FNR ; pf3 (default) bind-to-key yank FNS ; pf4 (default) Phil Windley Robotics Research Lab University of California, Davis