About
The programs from Einstein Magazine & All Micro News No. 75, May to July 1995, typed in and on one bootable Xtal BASIC disc.
CALENDAR, David Williams's British Calendar, draws any month of any year, Julian before September 1752 and Gregorian after, with the eleven missing days of September 1752.
SPRITES, Roy Prime's Sprite Movement Program, defines a little key with SHAPE and sends five copies of it round the screen with SPRITE. It is the worked example that ends his beginners' guide to SHAPE and SPRITE, written for the Bedfordshire user group's magazine and reprinted in No. 75.
QUAD.PAS, Sid Dunn's PROGRAM quad from the first part of his series on JRT Pascal, finds the real roots of a quadratic. It is here as source.
The listings were printed on pages 6, 7, 11 and 12 of the magazine. Our scan of No. 75 is to follow on this site. This disc saves you typing them in.
Running Them
Boot the disc, type XBAS, then LOAD "CALENDAR" and RUN, or LOAD "SPRITES". In CALENDAR, ENTER asks for another month and ESC quits; SHIFT+BREAK stops SPRITES.
What Is in the Download
A zip holding the disc image as a DSK, the same disc as an MFI for MAME to write to, the listings as BASIC text and as tokenised Xtal BASIC, the Pascal source, a README with the full account of each program, and the screen captures and MAME scripts used to test them.
Verified
Transcribed from the page images and run on the Einstein in MAME 0.289 with Xtal BASIC 4.2. Both BASIC programs were loaded into BASIC and saved back, giving the same bytes as our files. SPRITES runs and moves its keys until SHIFT+BREAK. CALENDAR was checked on eight months from 1066 to 2026, including September 1752 and three Februaries, and every one starts on the right weekday. JRT Pascal itself (UKEUG library volumes 287 to 293) is not on the disc and we do not have it, so QUAD.PAS has not been compiled or run. Not run on real hardware.
Kept as Printed
Nothing on the disc is ours; all three files are as printed. Two notes from the README: one of SPRITES's five keys is dark blue on the dark blue screen and never shows, and QUAD's formula divides by 2 and then multiplies by a, so it gives the right roots only when a is 1, as in the magazine's own test run in No. 76. No addresses are in the listings.
The programs are their authors', published in Einstein Magazine in 1995.
Gallery
