Easter Egg

[pser1]

Hello,
maybe this has been said here before, but I didn't know ...
Besides CLS9 (or any number greater than 8) that shows on the first screen line:
(C) 1982 BY MICROSOFT
I have verified that there is another one that can be seen running this small Basic program
Works in all machines: Dragon 32, Dragon 64, Dragon 200 and Tano Dragon

Code: Select all

100 CLS
110 FORI=&H9876 TO &H986D STEP-1
120 V=PEEK(I) AND &H7F
130 IF V<&H20 THEN V=V OR &H40
140 PRINTCHR$(V);:NEXT

Just try it out and you will see the name of that company too
These are ten unused bytes that sit past the table for sinus calculations in the Basic ROM

cheers
pere

[sixxie]

http://www.pagetable.com/?p=43

It's in PETSCII with some junk bits - the theory on that page is that later MS devs porting to the 6809 didn't actually know what the constants meant and just copied them verbatim...

[pser1]

Hi Ciaran,
nice page!
So it is an easter egg inherited from the very first Microsoft Basic version (for the PET)

cheers
pere