#include <perms.h>
int Getynx(void) {
  if (_imp_on_event(9)) return ('X');
  int C;
  for (;;) {
    C = Nextsymbol();
    Skipsymbol();
    if ('a' <= C && C <= 'z') C = C - 'a' + 'A';
    if ('Y' == C || C == 'N') return (C);
  }
}
int _imp_mainep(int _imp_argc, char **_imp_argv) {
  int Answer;
  if (_imp_on_event(7))
    Printstring(_imp_join(_imp_str_literal("What indeed?"), Snl));
  Prompt(_imp_str_literal("Y or N: "));
  for (;;) {
    Answer = Getynx();
    if (Answer == 'Y')
      Printstring(_imp_join(_imp_str_literal("Yes!"), Snl));
    else if (Answer == 'N')
      Printstring(_imp_join(_imp_str_literal("No?"), Snl));
    else if (Answer == 'X') {
      Printstring(_imp_join(_imp_str_literal("Exiting."), Snl));
      exit(0);
    } else {
      _imp_monitor();
      exit(0);
    }
  }
  exit(0);
  return (1);
}
