/* Alarm v4.5 written by CreeD of Sacred Grounds and Dragon of Beastlands.
 * -----------------------------------------------------------------------
 *  The following is a list of things to add to properly install the
 *  alarm function. You may make any modifications you like as long
 *  as you leave in credits to the original authors, CreeD and Dragon.
 *
 *  UPDATE:
 *  If you already downloaded Alarm_v4.0.readme and want the specific
 *  changes, they are listed at the end of this file.
 */


IN PARSE.C
----------

 ---- BEFORE the following statement ------

      if (scan->jail_timeout == 0 && scan->location == prison)
      {
        command_type |= HIGHLIGHT;
        tell_player(scan, " After serving your sentence you are flung out"
                    " to society again.\n");
        command_type &= ~HIGHLIGHT;
        move_to(scan, sys_room_id(ENTRANCE_ROOM), 0);
      }
    }
  }

 ----- ADD the following statement -------


  if (scan->timer_count > 0)
  {
     scan->timer_count--;
       if (scan->timer_count == 0)
       {
         tell_player (scan, "\007\n\n"
         "^B                     _______________________________^N\n"
         "^B                    |,-----------------------------,|^N\n"
         "^B                    ||   ^R!!!  A  L  A  R  M  !!!^B   ||^N\n"
         "^B                    ||-----------------------------||^N\n"
         "^B                    ||      ^GYour time is up!^B       ||^N\n"
         "^B                    || ^Y0 hours 0 minutes 0 seconds^B ||^N\n"
         "^B                    |`-----------------------------'|^N\n"
         "^B                    `-------------------------------'^N\n");
       }
  }

 ---- Add the following function ------

void set_alarm(player * p, char *str)
{
  char     *number;
  int      integer;

  if (!*str)
  {
    if (p->timer_count > -1)
    {
      TELLPLAYER(p, "\n  ^GAlarm clock set to go off in ...^N\n"
                    "^B   _________________________________^N\n"
                    "^B  |,-------------------------------,|^N\n"
                    "^Y     %s                              ^N\n"
                    "^B  |`-------------------------------'|^N\n"
                    "^B  `---------------------------------'^N\n\n"
                    "         ^RTo cancel the alarm^N\n"
                    "          ^Rtype^N `^Calarm stop^N'\n\n", 
                    word_time(p->timer_count));
      return;
    }
    else
    {
      tell_player(p, " Format: alarm <secs/mins/hrs> <time>\n");
      return;
    }
  }

  if (!strcasecmp(str, "stop")) 
  {
    if (p->timer_count < 0)
    {
      tell_player(p, " Alarm is not set.\n");
      return;
    }
    if (p->timer_count)
    {
      tell_player(p, " Alarm cancelled.\n");
    }
    p->timer_count = -1;
    return;
  }

  number = next_space(str);

  if (*number)
     *number++ = 0;

  if ((!*number) || (!isdigit(*number)))
  {
    tell_player(p, " Last argument must be a number.\n");
    return;
  }

  integer = atoi(number);

  switch (*str
  {
  case 's':
    break;
  case 'm':
    integer *= 60;
    break;
  case 'h':
    integer *= 3600;
    break;
  default:
    tell_player(p, "\n ^GYou must choose ...^N\n\n"
                   " ^Csec^N - for seconds.\n"
                   " ^Cmin^N - for minutes.\n"
                   " ^Chr^N  - for hours.\n\n"
                   " ^GBefore entering setting the alarm time ...^N\n");
    return;
  }

  command_type |= HIGHLIGHT;
  TELLPLAYER (p, " -=*> Alarm set to %s.\n", word_time(integer));
  command_type &= ~HIGHLIGHT;

  p->timer_count = integer;
}
void alarm_version()
{
  sprintf(stack, " -=*> Alarm v4.5 (by CreeD and Dragon) enabled.\n");
  stack = strchr(stack, 0);
}


IN CLIST.H
-----------

 ---- Add the following -----

extern command_func  set_alarm;

{"alarm", set_alarm, 0, 0, 1, 0, MISCc},


IN PROTO.H
----------

 ---- Add the following lines -----

extern void set_alarm(player *p, char *str);

extern void alarm_version(void);


IN VERSION.C
------------

 ---- Add the following line -----

  alarm_version();


ADD THE HELP FILE
-----------------

 ---- You must leave in the credits in the help file -----

:alarm,timer

Format      - alarm <sec/min/hr> <time>

Description - This command allows you to set a time for your alarm
              to alert you. If you want it to alert you in 5 minutes,
              you can set it to alert you in 5 minutes. If you want
              it it to alert you in 5 hours, you can set it to that
              too. Read the list of functions below to find out how
              it works.

Functions   - The following are functions that work with the alarm.
              They would be entered after 'alarm'. For example,
              typing  ^Yalarm stop^N  would stop the alarm's countdown.

              ^Cstop^N  - Stops the countdown of the alarm.
              ^Csec^N  - Sets the alarm in seconds.
              ^Cmin^N  - Sets the alarm in minutes.
              ^Chr^N   - Sets the alarm in hours.
              ^Calarm^N - This typed alone will tell you how much time

 Credits
 -------
 Alarm v4.5 written by CreeD of Sacred Grounds and Dragon of Beastlands.


 -------------------------- Modifications --------------------------------

   ---- CHANGE THE FOLLOWING ----

  else
  {
    tell_player(p, " You must specify a time for the alarm to go off.\n");
    return;
  }

   ---- TO THE FOLLOWING ----

  if ((!*number) || (!isdigit(*number)))
  {
    tell_player(p, " Last argument must be a number.\n");
    return;
  }


------------------------- End of Modifications ---------------------------