static char *taulu[] = {
"tyhjä",
"Evankeliumi Matteuksen mukaan",
"Evankeliumi Markuksen mukaan",
"Evankeliumi Luukkaan mukaan",
"Evankeliumi Johanneksen mukaan",
"Apostolien teot",
"Kirje roomalaisille",
"Ensimmäinen kirje korinttilaisille",
"Toinen kirje korinttilaisille",
"Kirje galatalaisille",
"Kirje efesolaisille",
"Kirje filippiläisille",
"Kirje kolossalaisille",
"Ensimmäinen kirje tessalonikalaisille",
"Toinen kirje tessalonikalaisille",
"Ensimmäinen kirje Timoteukselle",
"Toinen kirje Timoteukselle",
"Kirje Titukselle",
"Kirje Filemonille",
"Kirje heprealaisille",
"Ensimmäinen Pietarin kirje",
"Toinen Pietarin kirje",
"Ensimmäinen Johanneksen kirje",
"Toinen Johanneksen kirje",
"Kolmas Johanneksen kirje",
"Jaakobin kirje",
"Juudaksen kirje",
"Johanneksen ilmestys" };
#define STRBUFSIZ 2048
char strbuf[STRBUFSIZ];
char edelluku[10]="1";
char nimi[20];
char edel[20]="Matt";
char * estr, *loppu, *kaksoispiste, *jae, *piste, *luku;
FILE *UT1, *UT2, *UT3;
short i = 1;
parsi(){
loppu = estr + 1;
*estr = '\0';
kaksoispiste = strchr(strbuf, ':');
jae = kaksoispiste + 1;
*kaksoispiste = '\0';
piste = strchr(strbuf, '.');
if (piste[1] == 't') piste += 2; /*Ap.t*/
luku = piste + 1;
*piste = '\0';
}
luvunvaihto(char *viite) { /* uusi luku uuteen tiedostoon */
sprintf(nimi, "%s.%s.html", strbuf, luku);
fprintf(UT3, "Seuraava luku, \n",34,nimi,34);
fprintf(UT3, "%s\n