10 REM Expression
20 REM ----------
30 RANDOMIZE TIMER
40 REM
50 IF (RND * 2) < 1 THEN PRINT "This program is a poem"
ELSE PRINT "This program prints a poem"
60 IF (RND * 2) < 1 THEN PRINT "Which illustrates a thought:"
ELSE PRINT "With complication, fraught."
70 IF (RND * 2) < 1 THEN PRINT "Can actions from expressions"
ELSE PRINT "Could makers of expressions"
80 IF (RND * 2) < 1 THEN PRINT "In endless loops be caught?"
ELSE PRINT "Themselves express, or not?"
90 IF (RND * 2) < 1 THEN GOTO 50
99 END
Copyright © 1996,
Reg Harbeck, all rights reserved.
Return to Reg Harbeck's Home Page