Tiny Basic Interpreter...

 
class TBinterpreter {
  int doing = 0;
  char nexToken = '\0';
  boolean stopped = false;

  TBio InOut = new TBio();
  TBprogStore Code = new TBprogStore();
  TBstack Stak = new TBstack();
  TBvarStore Vars = new TBvarStore();

  void error(String msg) {
    if (stopped) return; // already did
    doing = 0;
    nexToken = '\0';
    stopped = true;
    InOut.printLine();
    InOut.putString("** ERROR: ");
    InOut.putString(msg);
    InOut.printLine();} // error