ttwrite added
[unix-history] / usr / src / usr.bin / window / ttf100.c
CommitLineData
6a46c355 1#ifndef lint
60de5df9 2static char sccsid[] = "@(#)ttf100.c 3.7 %G%";
6a46c355
EW
3#endif
4
60de5df9
EW
5/*
6 * Copyright (c) 1983 Regents of the University of California,
7 * All rights reserved. Redistribution permitted subject to
8 * the terms of the Berkeley Software License Agreement.
9 */
10
6a46c355
EW
11#include "ww.h"
12#include "tt.h"
13
14/*
15 * Freedom 100
16 */
17
a830e8bb
EW
18#define G (WWM_GRP << WWC_MSHIFT)
19short f100_frame[16] = {
20 ' ', 'J'|G, 'K'|G, 'A'|G,
21 'J'|G, 'J'|G, 'B'|G, 'M'|G,
22 'K'|G, 'D'|G, 'K'|G, 'O'|G,
23 'C'|G, 'L'|G, 'N'|G, 'I'|G
6a46c355 24};
f51849a9 25extern char *gen_AE, *gen_AS;
6a46c355
EW
26
27tt_f100()
28{
f51849a9
EW
29 if (tt_generic() < 0)
30 return -1;
6a46c355 31 tt.tt_frame = f100_frame;
a830e8bb 32 tt.tt_availmodes |= WWM_GRP;
f51849a9
EW
33 gen_AS = "\033$";
34 gen_AE = "\033%";
35 return 0;
6a46c355 36}