Compu-Calendar

This three-part program returns correct day name, changes Gregorian dates to corresponding Julian day numbers, and computes total days between any two dates from Jan. 1 AD to Feb. 2300.

To use, type the month number (NL) , day number (NL) , and fourdigit year (NL) . ZX80 returns the correct day name, followed by a prompt. Type J (NL) and it prints the equivalent Julian day number. (Julian days begin at GMT noon on each day and count days from noon, January 1, 4713 BC.)

You can also calculate the number of days between two dates. Enter the earlier one first, using J (NL) to compute JD, then enter the second date but just hit (NL) instead of J (NL) to request total days between the 2 dates.

Note that the ZX80 correctly reads out JD numbers in millions, thousand and units, but blanks leading zeros in each group. When reporting total days, sometimes the program displays thousands of days as 1000 too high, followed by negative hundreds; just add them. For example: A read out of 2,-825 means total days = 1,175.

To exit the program, enter numeral zero (NL) as the month.