Appendix: Published Variants of 10 PRINT

From Maze

Revision as of 17:21, 11 August 2010 by MarkSample (Talk | contribs) (Added a new variation (interesting for its nonfunctionality))
Jump to: navigation, search

Contents

[hide]

Rationale



We've uncovered several published variations of 10 Print, as well as created a few of our own (e.g. for a=1 to 2 step 0:print chr$(205.5+rnd(1));:next a), and it makes sense to do a formal variorum, collating the versions, noting the significant and insignificant changes to the program, and explaining what is going on with each of the changes.

--MarkSample 20:42, 5 August 2010 (EDT)

Published Variations

1982

 10 PRINT "{CLR/HOME}"
 20 PRINT CHR$(205.5 + RND(1));
 40 GOTO 20

From Commodore 64 User's Guide. Wayne PA; Indianapolis, IN: Commodore Business Machines; Distributed by Howard W. Sams & Co., 1982. <http://www.commodore.ca/manuals/c64_users_guide/c64-users_guide.htm>.

See also C64 Users Guide

1984

8 PRINT CHR$(205.5 + RND(8)); : GOTO 8

From Krueger, Dan A., and Louis F. Sander. “Magic $93.” Run Jul 1984. 13-14. <http://www.old-computer-mags.com/magazine/magazine_viewer_eng.php?idx=Run.htm&base=Run&num=007&page=13>.

See also RUN Magic 93

2008a

10 ?"<clear/home>"
20 ? chr$(205.5)+rnd(1))
40 goto20

From Commodore Computer Club UK 23 September 2008

Notes: This version as it is reproduced at the source website fails to execute. A misplaced parenthesis and a missing semicolon are the major failures of this code. It is not clear when the errors arose in the code. Possibly in transcribing it for the Commodore Computer Club's website?

2008b

10 PRINT CHR$(109+RND(1)*2);:GOTO 10

From Montfort, Nick. "Obfuscated Code." Software Studies: A Lexicon. Ed. Matthew Fuller. Cambridge, MA: The MIT Press, 2008. 193-199.

See Also CHR$(109) Variation

2010

for a=1 to 2 step 0:print chr$(205.5+rnd(1));:next a

From Montfort, Nick. "GOTO and line number considered optional." Email Exchange. 27 July 2010.

See also Optional GOTO

Personal tools