blob: 71540d9ad81d2fe8b24c0a2c43e6870bef664b82 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
|
/* $OpenBSD: help.c,v 1.3 2000/06/29 07:55:41 pjanzen Exp $ */
/* $NetBSD: help.c,v 1.4 1997/10/18 20:03:24 christos Exp $ */
/* help.c Larn is copyrighted 1986 by Noah Morgan. */
#ifndef lint
static char rcsid[] = "$OpenBSD: help.c,v 1.3 2000/06/29 07:55:41 pjanzen Exp $";
#endif /* not lint */
#include <unistd.h>
#include "header.h"
#include "extern.h"
/*
* help function to display the help info
*
* format of the .larn.help file
*
* 1st character of file: # of pages of help available (ascii digit)
* page (23 lines) for the introductory message (not counted in above)
* pages of help text (23 lines per page)
*/
void
help()
{
int i, j;
char tmbuf[128]; /* intermediate translation buffer
* when not a VT100 */
if ((j = openhelp()) < 0)
return; /* open the help file and get # pages */
for (i = 0; i < 23; i++)
lgetl(); /* skip over intro message */
for (; j > 0; j--) {
clear();
for (i = 0; i < 23; i++)
{
tmcapcnv(tmbuf, lgetl());
lprcat(tmbuf);
} /* intercept \33's */
if (j > 1) {
lprcat(" ---- Press ");
lstandout("return");
lprcat(" to exit, ");
lstandout("space");
lprcat(" for more help ---- ");
i = 0;
while ((i != ' ') && (i != '\n') && (i != '\33'))
i = lgetchar();
if ((i == '\n') || (i == '\33')) {
lrclose();
setscroll();
drawscreen();
return;
}
}
}
lrclose();
retcont();
drawscreen();
}
/*
* function to display the welcome message and background
*/
void
welcome()
{
int i;
char tmbuf[128]; /* intermediate translation buffer
* when not a VT100 */
if (openhelp() < 0)
return; /* open the help file */
clear();
for (i = 0; i < 23; i++)
{
tmcapcnv(tmbuf, lgetl());
lprcat(tmbuf);
} /* intercept \33's */
lrclose();
retcont(); /* press return to continue */
}
/*
* function to say press return to continue and reset scroll when done
*/
void
retcont()
{
cursor(1, 24);
lprcat("Press ");
lstandout("return");
lprcat(" to continue: ");
while (lgetchar() != '\n');
setscroll();
}
/*
* routine to open the help file and return the first character - '0'
*/
int
openhelp()
{
if (lopen(helpfile) < 0) {
lprintf("Can't open help file \"%s\" ", helpfile);
lflush();
sleep(4);
drawscreen();
setscroll();
return (-1);
}
resetscroll();
return (lgetc() - '0');
}
|
