6 files changed, 204 insertions, 0 deletions

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..275e405
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,3 @@
+stage
+.build_cache
+.*.swp
diff --git a/default.bld b/default.bld
new file mode 100644
index 0000000..296453f
--- /dev/null
+++ b/default.bld
@@ -0,0 +1,24 @@
+
+CC="g++";
+target "stage"
+{
+        rule "exe";
+        input files("src/*.y", "src/*.l", "src/*.cpp");
+
+        FLEXFLAGS="-osrc/parser.yy.c";
+        BISONFLAGS="-d";
+}
+
+/*
+rule "bison"
+{
+        input "*.y";
+        output [INPUT.regex("\\.y$", ".tab.c"), INPUT.regex("\\.y$", ".tab.h")];
+        profile "build"
+        {
+                DIR=INPUT.dirName();
+                FILE=INPUT.fileName();
+                execute("cd ${DIR}; bison -d ${FILE}");
+        }
+}
+*/
diff --git a/demo.stage b/demo.stage
new file mode 100644
index 0000000..b1ff4e8
--- /dev/null
+++ b/demo.stage
@@ -0,0 +1,24 @@
+//game
+//{
+        /*
+        title = "Demo game";
+
+        goto <<start>>;
+        */
+//}
+
+function hello()
+{
+}
+
+situation <<start>>
+{
+//      set situation end;
+//      push situation somethingElse;
+
+}
+
+situation <<end>>
+{
+        goto( <<start>> );
+}
diff --git a/src/parser.l b/src/parser.l
new file mode 100644
index 0000000..d5ff735
--- /dev/null
+++ b/src/parser.l
@@ -0,0 +1,43 @@
+%{
+#include <stdint.h>
+#include "parser.tab.h"
+%}
+
+%option noyywrap
+
+%x sitname
+%x comment
+%x tdqstr tsqstr
+%%
+
+[-{}<>=+/*,();]                                 { return yytext[0]; }
+
+game                                                    { return tokGame; }
+function                                                { return tokFunction; }
+situation                                               { return tokSituation; }
+while                                                   { return tokWhile; }
+for                                                             { return tokFor; }
+each                                                    { return tokEach; }
+in                                                              { return tokIn; }
+if                                                              { return tokIf; }
+then                                                    { return tokThen; }
+else                                                    { return tokElse; }
+command                                                 { return tokCommand; }
+goto                                                    { return tokGoto; }
+
+"<<"                                                    { BEGIN( sitname ); }
+<sitname>[- a-zA-Z0-9]+                 { printf("situation: %s\n", yytext ); return tokSituationName; }
+<sitname>">>"                                   { BEGIN( INITIAL ); }
+<sitname>.                                              REJECT;
+
+"//"[^\n]*                                              {}
+
+"/\*"                                                           { BEGIN( comment ); }
+<comment>"\*/"                                  { BEGIN( INITIAL ); }
+<comment>.                                              {}
+
+[a-zA-Z_][a-zA-Z0-9_]*                  { return tokIdent; }
+
+[ \t\n\r]+                                              {}
+
+%%
diff --git a/src/parser.y b/src/parser.y
new file mode 100644
index 0000000..b3da848
--- /dev/null
+++ b/src/parser.y
@@ -0,0 +1,81 @@
+%{
+#include <stdint.h>
+#include <stdio.h>
+
+int yylex();
+void yyerror( const char *error ) { printf("%s\n", error ); }
+%}
+
+%union {
+        int64_t iValue;
+        double dValue;
+        char *sValue;
+}
+
+%token tokGame
+%token tokFunction
+%token tokSituation
+%token tokWhile
+%token tokFor
+%token tokEach
+%token tokIn
+%token tokIf
+%token tokThen
+%token tokElse
+%token tokCommand
+%token tokSituationName
+%token tokIdent
+%token tokGoto
+%token tokString
+%token tokInt
+%token tokFloat
+%token tokBool
+%token tokNull
+
+%token eos 0 "end of stream"
+
+%left '(' ')' '[' ']'
+%left '*' '/'
+%left '-' '+'
+
+%%
+input:
+         | input situation
+         | input function
+         ;
+
+situation: tokSituation tokSituationName '{' cmpltExprList '}'
+                 ;
+
+function: tokFunction tokIdent '(' ')' '{' '}'
+                ;
+
+cmpltExprList:
+                         | cmpltExprList cmpltExpr
+                         ;
+
+cmpltExpr: expr ';'
+                 ;
+
+expr: tokInt
+        | tokFloat
+        | tokString
+        | tokBool
+        | tokNull
+        | tokSituationName
+        | expr '+' expr
+        | expr '-' expr
+        | expr '/' expr
+        | expr '*' expr
+        | '(' expr ')'
+        | expr '[' expr ']'
+        | tokGoto '(' expr ')'
+        ;
+%%
+
+int main()
+{
+        yyparse();
+        return 0;
+}
+
diff --git a/stage.txt b/stage.txt
new file mode 100644
index 0000000..751b1f0
--- /dev/null
+++ b/stage.txt
@@ -0,0 +1,29 @@
+Simple, Textual, Adventure Game Environemnt
+===========================================
+
+This is a program that loads games from files that use the Stage language to
+describe a complete adventure game.  There are lots and lots of possibilities.
+
+This documentation is primarily aimed at game developers initially.
+
+Structure
+=========
+
+A game is divided into several pieces.  At any point during the play of a game
+a player will be "in" a situation.  Each situation provides context for the
+player.  They can be thought of like rooms in a MUD game or locations in an old
+text adventure title, but are more flexible, as they allow different possible
+transitions between them as well as different contexts for commands.
+
+Each situation is effectively a block of code that is run when the situation is
+made active.  I.e. that code runs when the player enters a room, say.  Every
+time a situation starts it contains an empty context, but may have access to
+global parameters.
+
+Variables may be set and used, and there are some special variables that you
+have access to that control the way the system works and interactions with the
+player.
+
+New functions can be defined that can be used from any code.
+
+