Set NewAlarm$Dir <Obey$Dir>
Obey <NewAlarm$Dir>.!Boot

WimpSlot -min 32k -max 32k

RMEnsure SlidingHeap 2.0 RMLoad <NewAlarm$Dir>.SlidingHp

RMEnsure BorderUtils 0.02 RMEnsure WindowManager 3.17 RMLoad System:Modules.BorderUtil
|bugfix for RISC OS 31

If "<NewAlarm$Options>"="" THEN Set NewAlarm$Options "-interval 4 -value 1 -autosave"

| Ensure default options
| (sets repeat to 1 week, updates Alarms file every time alarm goes off)


Run <NewAlarm$Dir>.!RunImage