#include <stdio.h>

main(argc, argv)
int argc;
char **argv;
{
    FILE *script;
    static char record[20], annot[20] = "-", pstart[40];
    static char script_line[128], command_line[128];
    
    if (argc < 2) {
        fprintf(stderr, "usage: wvscript script-file\n");
        exit(1);
    }
    if ((script = fopen(argv[1], "rb")) == NULL) {
        fprintf(stderr, "wvscript: can't open %s\n", argv[1]);
        exit(2);
    }
    while (fgets(script_line, sizeof(script_line), script)) {
        char *p, *q;

        if (strncmp(script_line, "-r", 2) == 0) {
            for (p = script_line+3, q = record; *p != '+' && *p != '\n'; )
                *q++ = *p++;
            *q = '\0';
        }
        else if (strncmp(script_line, "-a", 2) == 0) {
            for (p = script_line+3, q = annot; *p != '\n'; )
                *q++ = *p++;
            *q = '\0';
        }
        else if (strncmp(script_line, "-f", 2) == 0) {
            for (p = script_line+3, q = pstart; *p != '\n'; )
                *q++ = *p++;
            *q = '\0';
        }
    }
    sprintf(command_line, "wview %s %s %s\n", record, annot, pstart);
    system(command_line);
    return (0);
}