In the event of a battery failure on the Pegasos, it is sometimes required to reset the RTC manually before it resumes operation and reports the correct time. This Forth script, run from the Firmware, achieves this.

Operation:

ok boot hd:0 rtc.forth
ok rtc.reset

Further instructions and functions are described at the top of the script.