main.cpp

#include <stdio.h>
#include "basic_io.h"
#include <string.h>
#include <stdlib.h>
#include "basic_io.h"
#include "grammar.h"
#define _CRT_SECURE_NO_WARNINGS

VARIANT memory[MEMORY_SIZE];
CODE code[PROGRAM_SIZE];

typedef enum
{
    key_input = 0,  // INPUT
    key_print,      // PRINT
    key_for,        // FOR .. TO .. STEP
    key_next,       // NEXT
    key_while,      // WHILE
    key_wend,       // WEND
    key_if,         // IF
    key_else,       // ELSE
    key_endif,      // END IF
    key_goto,       // GOTO
    key_let         // LET
} keywords;

keywords yacc(const STRING line)
{
    if (!strnicmp(line, "INPUT ", 6))
    {
        return key_input;
    }
    else if (!strnicmp(line, "PRINT ", 6))
    {
        return key_print;
    }
    else if (!strnicmp(line, "FOR ", 4))
    {
        return key_for;
    }
    else if (!stricmp(line, "NEXT"))
    {
        return key_next;
    }
    else if (!strnicmp(line, "WHILE ", 6))
    {
        return key_while;
    }
    else if (!stricmp(line, "WEND"))
    {
        return key_wend;
    }
    else if (!strnicmp(line, "IF ", 3))
    {
        return key_if;
    }
    else if (!stricmp(line, "ELSE"))
    {
        return key_else;
    }
    else if (!stricmp(line, "END IF"))
    {
        return key_endif;
    }
    else if (!strnicmp(line, "GOTO ", 5))
    {
        return key_goto;
    }
    else if (!strnicmp(line, "LET ", 4))
    {
        return key_let;
    }
    else if (strchr(line, '='))
    {
        return key_let;
    }

    return key_let;//要再加一个类型
}

void (*key_func[])(const STRING) = {
    exec_input,
    exec_print,
    exec_for,
    exec_next,
    exec_while,
    exec_wend,
    exec_if,
    exec_else,
    exec_endif,
    exec_goto,
    exec_assignment
};

int main(int argc, char* argv[])
{
    /*if (argc != 2)
    {
        fprintf(stderr, "usage: %s basic_script_file\n", argv[0]);
        exit(EXIT_FAILURE);
    }*/
	STRING name = "test.txt";
    load_program(name);

    while (cp < code_size)
    {
        (*key_func[yacc(code[cp].line)]) (code[cp].line);
        cp++;
    }

    return EXIT_SUCCESS;
}