Epson FX-80 User Manual page 152

35~
IF B
< 1~
THEN
41~
36~ PRINT:INPUT "SPOUSE'S NAME ";A$: INPUT "AGE ";B$
37~
LPRINT CHR$(9)A$CHR$(9)B$
38~
INPUT "OCCUPATION ";A$: INPUT "EMPLOYER ";B$
39~ LPRINT CHR$(9)A$CHR$(9)B$CHR$(11);
4~~
B
=
B -
1~
41~ IF B = ~ THEN 46~
42~
PRINT
43~ INPUT "HOW MANY CHILDREN ";NC:FOR I=lTONC
44~
PRINT:PRINT "CHILD #";I:INPUT "NAME ";A$:INPUT "AGE
";B$
45~ LPRINT CHR$(9)A$CHR$(9)B$:NEXT I:LPRINT CHR$(ll);
46~
LPRINT CHR$(27)"D"CHR$(14)CHR$(27)CHR$(38)CHR$(53)
CHR$(66)CHR$(1);
47~ PRINT "PROBLEM AREA: 1 - KITCHEN 2 - BATH 3-
DINING"
48~
PRINT" 4 - BEDROOM 5 - ALL";:INPUT N
49~
FOR K = 1 TO N:LPRINT CHR$(9);:NEXT K
5~~
LPRINT " x":LPRINT
51~
PRINT "SERVICE NEEDED: 1 - PLUMBING 2 - CARPET 3
- ELECTRICAL"
52~ PRINT" 4 - PAINT 5 - NEW TENANTS";:INPUT N
53~
FOR K = 1 TO N:LPRINT CHR$(9);:NEXT K
54~
LPRINT CHR$(15);" x";CHR$(18);
55~ LPRINT CHR$( 11) CHR$(27)
"@";
56~ END
121