PROG : 16509
D-FILE: 17432
VARS : 18225
E-LINE: 18226
STKBOT: 18226
STKEND: 18226
9999 means line number
PRINT means treat as KEYWORD P
10 REM MONSTER MAKER*SLR/1983
20 PRINT "MONSTER MAKER****"
30 DIM A(5)
40 FOR B=1 TO 5
50 INPUT A(B)
60 PRINT A(B);",";
70 NEXT B
80 PRINT AT 5,0;"NAME OF MONST
ER?"
90 INPUT N$
100 PRINT N$
110 PRINT "PRESS ENTER FOR MONS
TER..."
120 PAUSE 4E4
130 CLS
140 PRINT N$;":"
150 PRINT ,,"AC-1","HD-";A(3),"
IN LAIR-50","FREQUENCE-RARE","NO
ATT-";A(1),"DAM ATT-1-";A(2);"/
2-";A(4)
160 PRINT ,,"THIS CREATURE IS S
PHERICAL WITH 2 EYES. IT HAS ";
ABS (A(1)-A(3));" TENTICALS."
170 PRINT "WHICH CAUSE 1-";A(2)
;" HPS OF"
180 PRINT "DAMAGE. ITS MOUTH DO
ES 2-";A(4)
190 PRINT "HPS OF DAMAGE. IT HA
S RESESTANCETO ALL MAGIC. ITS EY
S CAUSE GREAT FEAR, AND ALL
WHO LOOK UPON THEM WILL FLEE
IN TERROR. ASAVING THROW AGAINST
MAGIC IS ACCEPTABLE. IT CAN A
LO REGENER- ATE ";A(5);" HPS PER
ROUND."
200 PRINT "ALSO, IT IS GREEN IN
COLOR AND ITS EYES CAN BE BLUE
-GREEN,BLUE-RED,OR BLUE-YELLOW."
210 PRINT "MM"
220 PAUSE 4E4
230 RUN
240 SAVE "MM"
250 RUN