Quick Label II

David Young

6355 Robinhood Lane

Merriam, KS 66203

Here is a program for a Model III and Line Printer IV. It is similar to the program by Mr. MacLean, except that it uses LINE INPUT statements rather than INPUT statements.

LINE INPUT statements allow the use of commas, quotation marks, semicolons, or other delimiters which might be needed in making labels addressed to companies or labels with commas in the address line after the city.

10 CLEAR 100 20 CLS

30 INPUT "HOW MANY COPIES OF THIS LABEL"; C 40 PRINT

50 LINE INPUT "ENTER NAME ? N$

70 LINE INPUT "ENTER CITY, STATE AND ZIP ? "; S$ 80 PRINT 90 PRINT

100 PRINT "PRESS ANY KEY IF THE INPUT DATA IS

CORRECT, ELSE BREAK" 110 IF INKEY$ยป"" THEN 110 ELSE 120 120 FOR Z-l TO C 130 LPRINT

140 LPRINT TAB(5) N$ 150 LPRINT TAB(5) A$ 160 LPRINT TAB(5) S$ 170 i^PRINT 180 LPRINT 190 NEXT Z 200 GOTO 20

Was this article helpful?

0 0

Post a comment