PROG : 16509
D-FILE: 17325
VARS : 18118
E-LINE: 18119
STKBOT: 18119
STKEND: 18119
9999 means line number
PRINT means treat as KEYWORD P
10 REM **A STORY**SLR/1983****
20 PRINT "WHAT IS YOUR NAME?"
30 INPUT N$
40 PRINT N$
50 PRINT ,,"WHAT YEAR WERE YOU
BORN?"
60 INPUT YEAR
70 PRINT YEAR
80 PRINT ,,"WHAT IS YOUR FAVOR
ITE COLOR?"
90 INPUT C$
100 PRINT C$
110 PRINT ,,"WHAT IS YOUR FAVOR
ITE FOOD?"
120 INPUT F$
130 PRINT F$
140 PRINT AT 21,0;"PRESS ENTER
TO BEGIN..."
150 PAUSE 4E4
160 CLS
170 PRINT TAB 11;"YOUR STORY"
180 PRINT ,,"YOU,";N$;",WERE EA
TING"
190 PRINT F$;" WHEN YOU HEARD A
"
200 PRINT "THUMP AT YOUR DOOR.
YOU OPEN THEDOOR AND A ";C$;" GH
OST COMES"
210 PRINT "IN. A YELLOW THING I
S FOLLOWING IT. IT EATS YOUR ";F
$
220 PRINT "AND LEAVES FOLLOWED
BY A GHOST. THIS WAS IN THE YEAR
";YEAR+15;" AD."
230 PRINT ,,"THE END OF YOUR ST
ORY"
240 PRINT AT 21,0;"PRESS ENTER
TO BEGIN..."
250 PAUSE 4E4
260 CLS
270 PRINT "NEW GAME(YES/NO)?"
280 INPUT D$
290 IF D$="YES" THEN RUN
300 PRINT "ALL DONE..."
310 PAUSE 4E4
320 GOTO 310
400 SAVE "ASTORY"
410 RUN