break out special local mail processing (e.g., mapping to the
[unix-history] / usr / src / usr.bin / window / ttf100.c
... / ...
CommitLineData
1/*
2 * Copyright (c) 1983, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * Edward Wang at The University of California, Berkeley.
7 *
8 * %sccs.include.redist.c%
9 */
10
11#ifndef lint
12static char sccsid[] = "@(#)ttf100.c 8.1 (Berkeley) %G%";
13#endif /* not lint */
14
15#include "ww.h"
16#include "tt.h"
17
18/*
19 * Freedom 100
20 */
21
22#define G (WWM_GRP << WWC_MSHIFT)
23short f100_frame[16] = {
24 ' ', 'J'|G, 'K'|G, 'A'|G,
25 'J'|G, 'J'|G, 'B'|G, 'M'|G,
26 'K'|G, 'D'|G, 'K'|G, 'O'|G,
27 'C'|G, 'L'|G, 'N'|G, 'I'|G
28};
29extern struct tt_str *gen_AE, *gen_AS;
30
31tt_f100()
32{
33 static struct tt_str ae = { "\033%", 2 };
34 static struct tt_str as = { "\033$", 2 };
35
36 if (tt_generic() < 0)
37 return -1;
38 tt.tt_frame = f100_frame;
39 tt.tt_availmodes |= WWM_GRP;
40 gen_AS = &as;
41 gen_AE = &ae;
42 return 0;
43}