1 /* 2 * Copyright (c) 1980 Regents of the University of California. 3 * All rights reserved. The Berkeley software License Agreement 4 * specifies the terms and conditions for redistribution. 5 */ 6 7 #ifndef lint 8 static char sccsid[] = "@(#)kon.c 5.1 (Berkeley) 04/30/85"; 9 #endif not lint 10 11 /* 12 * Turn on keypad, so it sends codes instead of doing them in local. 13 */ 14 15 #include "2648.h" 16 17 kon() 18 { 19 escseq(NONE); 20 outstr("\33&s1A"); 21 } 22 23 koff() 24 { 25 escseq(NONE); 26 outstr("\33&s0A"); 27 } 28