if (v17 > 0) {
  call(98);
}
if (v0 == 0) {
  call(91);
  set(f32);
  if (isset(f6)) {
    disable.item(c20);
    set(f14);
    reset(f33);
    new.room(1);
  }
  else {
    set.menu("Ed Ward");
    set.menu.item("About      ",c21);
    set.menu.item("Help   <F1>",c2);


    set.menu("File");
    set.menu.item("Save     <F5>",c3);
    set.menu.item("Restore  <F7>",c5);
    set.menu.item("-------------",c20);
    set.menu.item("Restart  <F9>",c7);
    set.menu.item("Quit  <Alt-Z>",c1);
    set.menu("Action");
    set.menu.item("See Object  <F4>",c22);
    set.menu.item("Inventory  <Tab>",c10);
    set.menu("Special");
    set.menu.item("Sound On/Off      <F2>",c16);
    if (v20 == 0 &&
        v26 < 2) {
      set.menu.item("Color/BW      <Ctrl R>",c6);
    }
    set.menu.item("Clock On/Off      <F6>",c12);
    set.menu.item("Joystick      <Ctrl J>",c15);
    set.menu.item("Pause            <Esc>",c18);
    set.menu("Speed");
    set.menu.item("Normal ",c24);
    set.menu.item("Slow   ",c25);
    set.menu.item("Fast   ",c23);
    set.menu.item("Fastest",c28);

    }
    submit.menu();
    disable.item(c20);
    set(f33);
    new.room(1);

}
else {
  call(97);
}
if (isset(f5)) {
  load.logics(90);
  clear.lines(24,24,0);
  animate.obj(o0);
  load.view.v(v16);
  set.view.v(o0,v16);
  observe.objs(o0);
  v37 = 255;
}
if (v35 > 0) {
  if (v35 != 255) {
    disable.item(c33);
    disable.item(c3);
    disable.item(c18);
    disable.item(c22);
    disable.item(c12);
    disable.item(c15);
    disable.item(c24);
    disable.item(c28);
    disable.item(c23);
    disable.item(c25);
    disable.item(c29);
    disable.item(c13);
    disable.item(c11);
    disable.item(c36);
    disable.item(c31);
    disable.item(c32);
    load.logics(94);
  }
  call(94);
}
else {
  if (!isset(f33)) {
    if (controller(c19)) {
      menu.input();
    }
  }
  if (controller(c21)) {
    print("This game is registred trademark of the Extime Games\n\The website of this game is www.zone.ee/edward."
    "If you've got any questions then mail to olluke@hot.ee or extime@hot.ee");
  }
  if ((controller(c28) ||
      said("fastest") ||
      said("fastest","speed"))) {
    v10 = 0;
  }
  if ((controller(c23) ||
      said("fast") ||
      said("fast","speed"))) {
    v10 = 1;
  }
  if ((controller(c24) ||
      said("normal") ||
      said("normal","speed"))) {
    v10 = 2;
  }
  if ((controller(c25) ||
      said("slow") ||
      said("slow","speed"))) {
    v10 = 4;
  }
  if (controller(c26)) {
    v23--;
  }
  if (controller(c27) &&
      v23 < 15) {
    v23++;
  }
  if (controller(c16)) {
    toggle(f9);
  }
  if (!isset(f33)) {
    if (controller(c6)) {
      toggle.monitor();
    }
    if (controller(c33)) {
      call(93);
    }
    if (!isset(f32)) {
      if (controller(c14)) {
        set(f32);
        print(" Tom \n  version 1.0");
        version();
        load.logics(99);
      }
    }
    if ((controller(c3) ||
        said("save","game") ||
        said("save"))) {
      stop.sound();
      save.game();
    }
    if ((controller(c5) ||
        said("restore","game") ||
        said("restore"))) {
      stop.sound();
      restore.game();
    }
    if ((controller(c7) ||
        said("restart","game") ||
        said("restart"))) {
      restart.game();
    }
    if ((controller(c2) ||
        said("help"))) {
      call(92);
    }
    if (controller(c9)) {
      echo.line();
    }
    if (controller(c17)) {
      cancel.line();
    }
    if (controller(c15)) {
      init.joy();
    }
    if ((controller(c18) ||
        said("pause","game") ||
        said("pause"))) {
      pause();
    }
    if ((controller(c10) ||
        said("inv"))) {
      status();
    }
    if ((controller(c22) ||
        controller(c4) ||
        said("examine","inv"))) {
      set(f13);
      status();
      if (v25 > 0 &&
          v25 != 255) {
        if (v25 == 1) {
          show.obj(220);
        }
      }
      reset(f13);
    }
    if ((controller(c1) ||
        said("quit","game") ||
        said("quit"))) {
      stop.sound();
      quit(0);
    }
  }
  get.posn(o0,v30,v31);
  if (v6 == v34 &&
      v30 == v32 &&
      v31 == v33) {
    stop.cycling(o0);
  }
  else {
    if (!isset(f30)) {
      start.cycling(o0);
    }
  }
  v32 = v30;
  v33 = v31;
  v34 = v6;
  if (isset(f31)) {
    start.cycling(o0);
  }
  else {
    if ((v6 == 0 ||
        isset(f30))) {
      stop.cycling(o0);
    }
  }
  if ((said("clock") ||
      controller(c12))) {
    toggle(f34);
    if (!isset(f34)) {
      status.line.on();
    }
    else {
      v37 = 255;
    }
  }
  if (isset(f34) &&
      !isset(f33)) {
    if (v37 != v11) {
      set.text.attribute(0,15);
      display(0,18," %v13:%v12|2:%v11|2 ");
      set.text.attribute(15,0);
      v37 = v11;
    }
  }
  if (isset(f12)) {
    clear.lines(23,24,0);
    reset(f32);
    disable.item(c20);
  }
  call.v(v0);
  if (isset(f32)) {
    call(99);
  }
  call(90);
  if (isset(f2) &&
      v9 > 0) {
    reset(f2);
    if (v9 == 1) {
      print("I don't know a word like \"%w1\"");
    }
    if (v9 == 2) {
      print ("What the fuck is \"%w2\"");
    }
    if (v9 == 3) {
      print("What is \"%w3\"");
    }
    if (v9 == 4) {
      print("I don't understand \"%w4\"");
    }
    if (v9 == 5) {
      print("\"%w5\" is not in my vocabulary.");
    }
    if (v9 == 6) {
      print("What is \"%w6\"");
    }
  }
  if (isset(f2) &&
      !isset(f4)) {
    print("What are you trying to say.");
    reset(f2);
  }
}
return();

// Messages
#message 1 "AGI"
#message 2 "About      "
#message 3 "Help   <F1>"
#message 4 "Debug Help "
#message 5 "File"
#message 6 "Save     <F5>"
#message 7 "Restore  <F7>"
#message 8 "-------------"
#message 9 "Restart  <F9>"
#message 10 "Quit  <Alt-Z>"
#message 11 "Action"
#message 12 "See Object  <F4>"
#message 13 "Inventory  <Tab>"
#message 14 "Special"
#message 15 "Sound On/Off      <F2>"
#message 16 "Color/BW      <Ctrl R>"
#message 17 "Clock On/Off      <F6>"
#message 18 "Joystick      <Ctrl J>"
#message 19 "Pause            <Esc>"
#message 20 "Speed"
#message 21 "Normal "
#message 22 "Slow   "
#message 23 "Fast   "
#message 24 "Fastest"
#message 25 "Debug"
#message 26 "Ego Info   <Alt-E>"
#message 27 "Pri Screen <Alt-P>"
#message 28 "Memory     <Alt-M>"
#message 29 "Obj Info   <Alt-I>"
#message 30 "Coords     <Alt-X>"
#message 31 "Get All           "
#message 32 "(About message)"
#message 33 " Template Game \n  version 0.1"
#message 34 " %v13:%v12|2:%v11|2 "
#message 35 "I don't understand \"%w1\""
#message 36 "\"%w2\" is not in my vocabulary."
#message 37 "What is \"%w3\""
#message 38 "I don't understand \"%w4\""
#message 39 "\"%w5\" is not in my vocabulary."
#message 40 "What is \"%w6\""
#message 41 "I don't understand your request."