xref: /csrg-svn/old/lib2648/kon.c (revision 19793)
111476Sralph /*
2*19793Sdist  * Copyright (c) 1980 Regents of the University of California.
3*19793Sdist  * All rights reserved.  The Berkeley software License Agreement
4*19793Sdist  * specifies the terms and conditions for redistribution.
5*19793Sdist  */
6*19793Sdist 
7*19793Sdist #ifndef lint
8*19793Sdist static char sccsid[] = "@(#)kon.c	5.1 (Berkeley) 04/30/85";
9*19793Sdist #endif not lint
10*19793Sdist 
11*19793Sdist /*
1211476Sralph  * Turn on keypad, so it sends codes instead of doing them in local.
1311476Sralph  */
1411476Sralph 
1511476Sralph #include "2648.h"
1611476Sralph 
kon()1711476Sralph kon()
1811476Sralph {
1911476Sralph 	escseq(NONE);
2011476Sralph 	outstr("\33&s1A");
2111476Sralph }
2211476Sralph 
koff()2311476Sralph koff()
2411476Sralph {
2511476Sralph 	escseq(NONE);
2611476Sralph 	outstr("\33&s0A");
2711476Sralph }
28