blob: a6f7a97df6a95ab52c8db4742c9ebe833d7ee11e (
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
|
extern "C" {
#include "online.dcl"
}
void main(int argc, char **argv)
{
CHAR found, passage[64], *p;
int i, j;
INT word;
short verse_list[MAX_LIST];
short versedata[MAX_VERSE];
char data[MAX_DATA];
extern struct zonline online;
int versenum = 0;
if (argc > 1)
call DOINIT(argv[1]); /* initialise system */
else call DOINIT("g:\\bible\\av"); /* initialise system */
for (versenum = 23146; versenum <= 23147 /*31102*/; versenum++) {
call GETEXT(versenum, versedata, 1, 1, 1, 1);
call BLDVERSE(versedata, data);
printf("%s\n", VRSTOREF(versenum, 1));
// printf("%s\n", data);
}
DOEND();
}
|
