procedure message_rescue
{
  gui_eventicon = icon_DOGSTONE
  gui_eventtime = 4
  event_message0 "Rescue!!!!"
  event_message1 ""
  event_message2 ""
  event_message3 ""
  event_message4 ""
  command "call perci_1"
}


procedure message_lift
{
  gui_eventicon = icon_DOGSTONE
  gui_eventtime = 4
  event_message0 "Turn off ALARM"
  event_message1 ""
  event_message2 ""
  event_message3 ""
  event_message4 ""
}


procedure message_alarm_off
{
  gui_eventicon = icon_INFO
  gui_eventtime = 4
  event_message0 "ALARM is off."
  event_message1 ""
  event_message2 ""
  event_message3 ""
  event_message4 ""
}


procedure message_late
{
  gui_eventicon = icon_DOGSTONE
  gui_eventtime = 4
  event_message0 "You are late. Find another way."
  event_message1 ""
  event_message2 ""
  event_message3 ""
  event_message4 ""
}
