Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_18.ADF » L/Boust1

L/Boust1

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_18.ADF
Filename: L/Boust1
Read OK: ✔
File size: 1AE8 bytes
Load address: 42204556
Exec address: 7473756F
File contents
Dear Gus,
                     Defective disc EUG15

         Thank you for the replacement disc EUG15 and for the 
replacementfor EUG16 which clearly went "walkabout" under the 
auspices of the RoyalMail. As I have previously explained to 
you I had difficulty in loadingEUG15 and believed the cause 
to be the imprecise positioning of the masksuch that it 
totally obscured the notch to its right in the top edge ofthe 
plastic container. It would seem that in the case of this disc 
andothers I have received from you the travel to the masked 
position isintended to be limited by the edge of the raised 
surface of the plastic. Ihave examined a number of "branded" 
discs e.g. TDK,3M and Sony  amongstothers and find the travel 
is limited by the "blind" end of the slot inwhich the lug of 
the mask slides. In the "unbranded" discs I find thisslot is 
open  ended. If the edge of the raised surface of the plastic 
iswell defined and the mask is well formed then the problem 
is unlikely toarise. However I do feel it is a wise 
precaution to check the travel ofthe mask on a disc not 
previously used by the recipient. I am notconversant with the 
internals of the PLUS3 and I am therefore unable tojudge the 
consequences of a determined attempt to insert a disk in which
the mask is too far to the right. I have no intention of 
opening up myPLUS3 to pursue the investigation any further!!

           MULTI-COPIES  - Michael Harris's problem.

I have been in touch with Michael and I understand he is now 
satisfied theprogram published in EUG6   does work!! I 
believe the problem arose fromthe assumption in the 
instructions that users would be familiar with howto switch 
between VIEW and BASIC and vice-versa by the commands *BASIC 
and*WORD. I have revised the procedure as follows and trust 
that all userswill find the program as simple to use and as 
useful as I do; I often havea requirement for around 125 
copies of each of a number of full pages oftext and I find 
that I can escape to do other things whilst the printer
dutifully churns out the requisite number. There is one small 
pointconcerning the number to be inserted in LINE220 - if you 
feel very "green"and do not wish to waste a single sheet of 
paper then please note that thefirst page is 0(nought) so 
that if you need 30 copies the figure to go inLINE220 
is29(twenty-nine)

     Proceedure for using MULTI-COPIES program "numcopies":-

With VIEW ROM inserted switch on computer. Switch on Printer.  
Insert disccontaining "numcopies".Key CTRL-A-BREAK 
simultaneously to mount and bootdisc. Key *BASIC. Key LOAD 
"numcopies". Key LIST220. Amend Line 220 toshow the number of 
copies required. Key RETURN. Key RUN. The programshould now 
run and generate the *COPIES program.Key *DISMOUNT and remove
disc. Insert disc containing text to be printed. Key 
*MOUNT.Key *WORD. KeyLOAD"(name of text file)".Key *FX6,0 (to 
ensure a line feed is obtained if not already ordained by dip 
switch). Key ESCAPE and check that the textthat you wish to 
print is correct and ready. Key ESCAPE to return toCommand 
mode. Key  *COPIES. Key RETURN.The printer should now run to
produce the number of copies required.If you are using a 
PRINTER DRIVER (see EUG6) and have put highlights inyour text 
then load the DRIVER before keying *COPIES.

For convenience I always transfer a copy of "numcopies" to 
each disc I usefor VIEW text and RUN it to generate *COPIES - 
this saves time and reducesthe chance of error in disc 
exchange; and should you wish to print thesame number of 
copies as immediately preceding batch of some otherunrelated 
text on the same disc it is merely necessary to key *COPIES. 
Ifyou have more than one page of related text and use the PE 
Command the*COPIES program will assume the related pages to 
be one copy.

If you are producing small slips for distribution around the 
Parish ,forexample to announce the next jumble sale, then 
indicate the Page Length tosuit (usually a factor of 66) and 
the *COPIES program will count thenumber of Page Lengths - 
you then have to find a helper to cut up the sheets of 
paper!! However for this type of printing I would think that a
BASIC program as opposed to use of VIEW would be more suitable 
and ofcourse is the only method available to those not having 
a word-processingROM. It involves the use of the BASIC 
keywords FOR and NEXT. May I riskthe scorn of the more 
sophisticated ELECTRONEERS by offering the followingprogram 
as a useful   example of a small slip (with apologies to Gus!)

10 VDU2
20 *FX6,0
30 FOR N = 1 TO 5
40 VDU1,27,1,79
50 VDU1,27,1,112,1,49
60 VDU1,27,1,59
70 PRINT"Electron User Group"'"25, Bertie 
   Road,"'"SOUTHSEA"'"Hampshire"     
75 PRINT"PO4  8JX"'" "'" "'" "'" "
80 NEXT N                                
90 VDU3
100 END
Line 10  tells the printer to sit up and take notice.                 
Line 20 ensures a linefeed.                                               
Line 30 identifies the number of times the program should run.
Lines  40, 50 and 60 specify the style of the characters to be 
printed. These lines may need to be changed to suit your 
printer or  omitted.
Lines 70 and 75 spell out the text to be printed and its 
layout. If you put this program to use line 75 could be an 
extension of line 70 but as  I am presenting this BASIC 
program  within a VIEW text file the extended line70 would 
appear as a nonsense. Beware of the apostrophes - they are 
important in obtaining the "footer margin" to match text to a 
nine line spacing as used for fanfold labels. If drafting a 
straight text then a series of "'" following end of text are 
necessary to provide cutting space  between copies. REMEMBER  
that when using BASIC a LINE must not be longer than 240 
characters but there isn't a restriction on the number of 
LINEs  so you can, by carefully composing your text, produce a 
lengthy  document and even vary the style of  printed  lines 
by the use of LINEs such as 40,50 and 60 above. In order to 
present a good printed text it is important to break up the 
text in the program into 80 character segments i.e. 
a printed line.So if you do not have a word-processing system 
try the foregoing - its a minor challenge - and someone in the 
community might appreciate your help in their public 
relations. See "useless" example later.

Line 80 calls for the re-run of the program to print the next 
copy up to 5
Line 90 tells the printer it is finished with for the present 
- if you omit this line the printer will print everything 
that appears on the screen thereafter!!

This small program exercise could help you to get your next 
fivesubmissions off to Gus in good time.




00000000  44 65 61 72 20 47 75 73  2c 0d 20 20 20 20 20 20  |Dear Gus,.      |
00000010  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 44  |               D|
00000020  65 66 65 63 74 69 76 65  20 64 69 73 63 20 45 55  |efective disc EU|
00000030  47 31 35 0d 0d 20 20 20  20 20 20 20 20 20 54 68  |G15..         Th|
00000040  61 6e 6b 20 79 6f 75 20  66 6f 72 20 74 68 65 20  |ank you for the |
00000050  72 65 70 6c 61 63 65 6d  65 6e 74 1a 20 64 69 73  |replacement. dis|
00000060  63 20 45 55 47 31 35 20  61 6e 64 20 66 6f 72 20  |c EUG15 and for |
00000070  74 68 65 20 0d 72 65 70  6c 61 63 65 6d 65 6e 74  |the .replacement|
00000080  10 66 6f 72 20 45 55 47  31 36 20 77 68 69 63 68  |.for EUG16 which|
00000090  20 63 6c 65 61 72 6c 79  20 77 65 6e 74 20 22 77  | clearly went "w|
000000a0  61 6c 6b 61 62 6f 75 74  22 1a 20 75 6e 64 65 72  |alkabout". under|
000000b0  1a 20 74 68 65 20 0d 61  75 73 70 69 63 65 73 20  |. the .auspices |
000000c0  6f 66 20 74 68 65 20 52  6f 79 61 6c 10 4d 61 69  |of the Royal.Mai|
000000d0  6c 2e 20 41 73 20 49 20  68 61 76 65 20 70 72 65  |l. As I have pre|
000000e0  76 69 6f 75 73 6c 79 20  65 78 70 6c 61 69 6e 65  |viously explaine|
000000f0  64 20 74 6f 20 0d 79 6f  75 1a 20 49 1a 20 68 61  |d to .you. I. ha|
00000100  64 1a 20 64 69 66 66 69  63 75 6c 74 79 20 69 6e  |d. difficulty in|
00000110  20 6c 6f 61 64 69 6e 67  10 45 55 47 31 35 20 61  | loading.EUG15 a|
00000120  6e 64 20 62 65 6c 69 65  76 65 64 20 74 68 65 20  |nd believed the |
00000130  63 61 75 73 65 20 0d 74  6f 20 62 65 20 74 68 65  |cause .to be the|
00000140  20 69 6d 70 72 65 63 69  73 65 20 70 6f 73 69 74  | imprecise posit|
00000150  69 6f 6e 69 6e 67 20 6f  66 1a 20 74 68 65 1a 20  |ioning of. the. |
00000160  6d 61 73 6b 10 73 75 63  68 1a 20 74 68 61 74 1a  |mask.such. that.|
00000170  20 69 74 1a 20 0d 74 6f  74 61 6c 6c 79 20 6f 62  | it. .totally ob|
00000180  73 63 75 72 65 64 20 74  68 65 20 6e 6f 74 63 68  |scured the notch|
00000190  20 74 6f 20 69 74 73 20  72 69 67 68 74 20 69 6e  | to its right in|
000001a0  20 74 68 65 20 74 6f 70  20 65 64 67 65 20 6f 66  | the top edge of|
000001b0  10 74 68 65 20 0d 70 6c  61 73 74 69 63 20 63 6f  |.the .plastic co|
000001c0  6e 74 61 69 6e 65 72 2e  20 49 74 1a 20 77 6f 75  |ntainer. It. wou|
000001d0  6c 64 1a 20 73 65 65 6d  1a 20 74 68 61 74 1a 20  |ld. seem. that. |
000001e0  69 6e 20 74 68 65 20 63  61 73 65 20 6f 66 20 74  |in the case of t|
000001f0  68 69 73 20 64 69 73 63  20 0d 61 6e 64 10 6f 74  |his disc .and.ot|
00000200  68 65 72 73 1a 20 49 20  68 61 76 65 20 72 65 63  |hers. I have rec|
00000210  65 69 76 65 64 20 66 72  6f 6d 20 79 6f 75 20 74  |eived from you t|
00000220  68 65 20 74 72 61 76 65  6c 1a 20 74 6f 1a 20 74  |he travel. to. t|
00000230  68 65 1a 20 6d 61 73 6b  65 64 1a 20 0d 70 6f 73  |he. masked. .pos|
00000240  69 74 69 6f 6e 1a 20 69  73 10 69 6e 74 65 6e 64  |ition. is.intend|
00000250  65 64 20 74 6f 20 62 65  20 6c 69 6d 69 74 65 64  |ed to be limited|
00000260  20 62 79 20 74 68 65 20  65 64 67 65 20 6f 66 20  | by the edge of |
00000270  74 68 65 20 72 61 69 73  65 64 20 0d 73 75 72 66  |the raised .surf|
00000280  61 63 65 20 6f 66 20 74  68 65 20 70 6c 61 73 74  |ace of the plast|
00000290  69 63 2e 20 49 10 68 61  76 65 20 65 78 61 6d 69  |ic. I.have exami|
000002a0  6e 65 64 1a 20 61 1a 20  6e 75 6d 62 65 72 1a 20  |ned. a. number. |
000002b0  6f 66 20 22 62 72 61 6e  64 65 64 22 20 0d 64 69  |of "branded" .di|
000002c0  73 63 73 20 65 2e 67 2e  20 54 44 4b 2c 33 4d 20  |scs e.g. TDK,3M |
000002d0  61 6e 64 20 53 6f 6e 79  20 20 61 6d 6f 6e 67 73  |and Sony  amongs|
000002e0  74 10 6f 74 68 65 72 73  20 61 6e 64 20 66 69 6e  |t.others and fin|
000002f0  64 20 74 68 65 20 74 72  61 76 65 6c 1a 20 0d 69  |d the travel. .i|
00000300  73 1a 20 6c 69 6d 69 74  65 64 1a 20 62 79 20 74  |s. limited. by t|
00000310  68 65 20 22 62 6c 69 6e  64 22 20 65 6e 64 20 6f  |he "blind" end o|
00000320  66 20 74 68 65 20 73 6c  6f 74 20 69 6e 10 77 68  |f the slot in.wh|
00000330  69 63 68 20 74 68 65 20  6c 75 67 20 6f 66 20 0d  |ich the lug of .|
00000340  74 68 65 20 6d 61 73 6b  20 73 6c 69 64 65 73 2e  |the mask slides.|
00000350  20 49 6e 1a 20 74 68 65  1a 20 22 75 6e 62 72 61  | In. the. "unbra|
00000360  6e 64 65 64 22 1a 20 64  69 73 63 73 1a 20 49 20  |nded". discs. I |
00000370  66 69 6e 64 20 74 68 69  73 10 73 6c 6f 74 20 69  |find this.slot i|
00000380  73 20 0d 6f 70 65 6e 20  20 65 6e 64 65 64 2e 20  |s .open  ended. |
00000390  49 66 20 74 68 65 20 65  64 67 65 20 6f 66 20 74  |If the edge of t|
000003a0  68 65 20 72 61 69 73 65  64 20 73 75 72 66 61 63  |he raised surfac|
000003b0  65 20 6f 66 1a 20 74 68  65 1a 20 70 6c 61 73 74  |e of. the. plast|
000003c0  69 63 20 0d 69 73 10 77  65 6c 6c 1a 20 64 65 66  |ic .is.well. def|
000003d0  69 6e 65 64 1a 20 61 6e  64 20 74 68 65 20 6d 61  |ined. and the ma|
000003e0  73 6b 20 69 73 20 77 65  6c 6c 20 66 6f 72 6d 65  |sk is well forme|
000003f0  64 20 74 68 65 6e 20 74  68 65 20 70 72 6f 62 6c  |d then the probl|
00000400  65 6d 20 0d 69 73 20 75  6e 6c 69 6b 65 6c 79 20  |em .is unlikely |
00000410  74 6f 10 61 72 69 73 65  2e 20 48 6f 77 65 76 65  |to.arise. Howeve|
00000420  72 20 49 1a 20 64 6f 1a  20 66 65 65 6c 1a 20 69  |r I. do. feel. i|
00000430  74 20 69 73 20 61 20 77  69 73 65 20 0d 70 72 65  |t is a wise .pre|
00000440  63 61 75 74 69 6f 6e 20  74 6f 20 63 68 65 63 6b  |caution to check|
00000450  20 74 68 65 20 74 72 61  76 65 6c 20 6f 66 10 74  | the travel of.t|
00000460  68 65 1a 20 6d 61 73 6b  20 6f 6e 20 61 20 64 69  |he. mask on a di|
00000470  73 63 20 6e 6f 74 1a 20  0d 70 72 65 76 69 6f 75  |sc not. .previou|
00000480  73 6c 79 1a 20 75 73 65  64 1a 20 62 79 1a 20 74  |sly. used. by. t|
00000490  68 65 1a 20 72 65 63 69  70 69 65 6e 74 2e 1a 20  |he. recipient.. |
000004a0  49 1a 20 61 6d 1a 20 6e  6f 74 10 63 6f 6e 76 65  |I. am. not.conve|
000004b0  72 73 61 6e 74 20 77 69  74 68 1a 20 74 68 65 1a  |rsant with. the.|
000004c0  20 0d 69 6e 74 65 72 6e  61 6c 73 1a 20 6f 66 20  | .internals. of |
000004d0  74 68 65 20 50 4c 55 53  33 20 61 6e 64 20 49 20  |the PLUS3 and I |
000004e0  61 6d 20 74 68 65 72 65  66 6f 72 65 20 75 6e 61  |am therefore una|
000004f0  62 6c 65 20 74 6f 10 6a  75 64 67 65 20 74 68 65  |ble to.judge the|
00000500  20 0d 63 6f 6e 73 65 71  75 65 6e 63 65 73 20 6f  | .consequences o|
00000510  66 20 61 1a 20 64 65 74  65 72 6d 69 6e 65 64 1a  |f a. determined.|
00000520  20 61 74 74 65 6d 70 74  20 74 6f 20 69 6e 73 65  | attempt to inse|
00000530  72 74 20 61 20 64 69 73  6b 20 69 6e 20 77 68 69  |rt a disk in whi|
00000540  63 68 10 0d 74 68 65 20  6d 61 73 6b 20 69 73 20  |ch..the mask is |
00000550  74 6f 6f 20 66 61 72 1a  20 74 6f 1a 20 74 68 65  |too far. to. the|
00000560  1a 20 72 69 67 68 74 2e  1a 20 49 20 68 61 76 65  |. right.. I have|
00000570  20 6e 6f 20 69 6e 74 65  6e 74 69 6f 6e 20 6f 66  | no intention of|
00000580  20 0d 6f 70 65 6e 69 6e  67 20 75 70 20 6d 79 10  | .opening up my.|
00000590  50 4c 55 53 33 20 74 6f  20 70 75 72 73 75 65 20  |PLUS3 to pursue |
000005a0  74 68 65 20 69 6e 76 65  73 74 69 67 61 74 69 6f  |the investigatio|
000005b0  6e 20 61 6e 79 20 66 75  72 74 68 65 72 21 21 0d  |n any further!!.|
000005c0  0d 20 20 20 20 20 20 20  20 20 20 20 4d 55 4c 54  |.           MULT|
000005d0  49 2d 43 4f 50 49 45 53  20 20 2d 20 4d 69 63 68  |I-COPIES  - Mich|
000005e0  61 65 6c 20 48 61 72 72  69 73 27 73 20 70 72 6f  |ael Harris's pro|
000005f0  62 6c 65 6d 2e 0d 0d 49  20 68 61 76 65 20 62 65  |blem...I have be|
00000600  65 6e 20 69 6e 20 74 6f  75 63 68 20 77 69 74 68  |en in touch with|
00000610  20 4d 69 63 68 61 65 6c  20 61 6e 64 20 49 20 75  | Michael and I u|
00000620  6e 64 65 72 73 74 61 6e  64 20 68 65 20 69 73 20  |nderstand he is |
00000630  6e 6f 77 20 0d 73 61 74  69 73 66 69 65 64 20 74  |now .satisfied t|
00000640  68 65 10 70 72 6f 67 72  61 6d 20 70 75 62 6c 69  |he.program publi|
00000650  73 68 65 64 20 69 6e 20  45 55 47 36 20 20 20 64  |shed in EUG6   d|
00000660  6f 65 73 20 77 6f 72 6b  21 21 20 49 20 0d 62 65  |oes work!! I .be|
00000670  6c 69 65 76 65 20 74 68  65 1a 20 70 72 6f 62 6c  |lieve the. probl|
00000680  65 6d 1a 20 61 72 6f 73  65 20 66 72 6f 6d 10 74  |em. arose from.t|
00000690  68 65 1a 20 61 73 73 75  6d 70 74 69 6f 6e 1a 20  |he. assumption. |
000006a0  69 6e 20 74 68 65 20 0d  69 6e 73 74 72 75 63 74  |in the .instruct|
000006b0  69 6f 6e 73 20 74 68 61  74 20 75 73 65 72 73 20  |ions that users |
000006c0  77 6f 75 6c 64 20 62 65  20 66 61 6d 69 6c 69 61  |would be familia|
000006d0  72 20 77 69 74 68 20 68  6f 77 10 74 6f 20 73 77  |r with how.to sw|
000006e0  69 74 63 68 20 0d 62 65  74 77 65 65 6e 20 56 49  |itch .between VI|
000006f0  45 57 20 61 6e 64 20 42  41 53 49 43 20 61 6e 64  |EW and BASIC and|
00000700  20 76 69 63 65 2d 76 65  72 73 61 20 62 79 20 74  | vice-versa by t|
00000710  68 65 20 63 6f 6d 6d 61  6e 64 73 20 2a 42 41 53  |he commands *BAS|
00000720  49 43 20 0d 61 6e 64 10  2a 57 4f 52 44 2e 20 49  |IC .and.*WORD. I|
00000730  20 68 61 76 65 1a 20 72  65 76 69 73 65 64 1a 20  | have. revised. |
00000740  74 68 65 1a 20 70 72 6f  63 65 64 75 72 65 20 61  |the. procedure a|
00000750  73 20 66 6f 6c 6c 6f 77  73 20 61 6e 64 20 74 72  |s follows and tr|
00000760  75 73 74 20 0d 74 68 61  74 20 61 6c 6c 20 75 73  |ust .that all us|
00000770  65 72 73 10 77 69 6c 6c  20 66 69 6e 64 20 74 68  |ers.will find th|
00000780  65 20 70 72 6f 67 72 61  6d 20 61 73 20 73 69 6d  |e program as sim|
00000790  70 6c 65 20 74 6f 20 75  73 65 20 61 6e 64 20 61  |ple to use and a|
000007a0  73 20 0d 75 73 65 66 75  6c 20 61 73 20 49 20 64  |s .useful as I d|
000007b0  6f 3b 20 49 20 6f 66 74  65 6e 20 68 61 76 65 10  |o; I often have.|
000007c0  61 20 72 65 71 75 69 72  65 6d 65 6e 74 20 66 6f  |a requirement fo|
000007d0  72 20 61 72 6f 75 6e 64  20 31 32 35 20 0d 63 6f  |r around 125 .co|
000007e0  70 69 65 73 1a 20 6f 66  1a 20 65 61 63 68 20 6f  |pies. of. each o|
000007f0  66 20 61 20 6e 75 6d 62  65 72 20 6f 66 20 66 75  |f a number of fu|
00000800  6c 6c 20 70 61 67 65 73  20 6f 66 10 74 65 78 74  |ll pages of.text|
00000810  20 61 6e 64 20 49 20 66  69 6e 64 20 0d 74 68 61  | and I find .tha|
00000820  74 20 49 20 63 61 6e 20  65 73 63 61 70 65 1a 20  |t I can escape. |
00000830  74 6f 1a 20 64 6f 1a 20  6f 74 68 65 72 20 74 68  |to. do. other th|
00000840  69 6e 67 73 20 77 68 69  6c 73 74 20 74 68 65 20  |ings whilst the |
00000850  70 72 69 6e 74 65 72 10  0d 64 75 74 69 66 75 6c  |printer..dutiful|
00000860  6c 79 1a 20 63 68 75 72  6e 73 1a 20 6f 75 74 1a  |ly. churns. out.|
00000870  20 74 68 65 1a 20 72 65  71 75 69 73 69 74 65 1a  | the. requisite.|
00000880  20 6e 75 6d 62 65 72 2e  1a 20 54 68 65 72 65 1a  | number.. There.|
00000890  20 69 73 20 6f 6e 65 20  73 6d 61 6c 6c 20 0d 70  | is one small .p|
000008a0  6f 69 6e 74 10 63 6f 6e  63 65 72 6e 69 6e 67 20  |oint.concerning |
000008b0  74 68 65 20 6e 75 6d 62  65 72 20 74 6f 20 62 65  |the number to be|
000008c0  20 69 6e 73 65 72 74 65  64 20 69 6e 20 4c 49 4e  | inserted in LIN|
000008d0  45 32 32 30 20 2d 20 69  66 20 79 6f 75 20 0d 66  |E220 - if you .f|
000008e0  65 65 6c 20 76 65 72 79  20 22 67 72 65 65 6e 22  |eel very "green"|
000008f0  10 61 6e 64 20 64 6f 20  6e 6f 74 20 77 69 73 68  |.and do not wish|
00000900  20 74 6f 20 77 61 73 74  65 20 61 20 73 69 6e 67  | to waste a sing|
00000910  6c 65 20 73 68 65 65 74  20 6f 66 20 0d 70 61 70  |le sheet of .pap|
00000920  65 72 20 74 68 65 6e 20  70 6c 65 61 73 65 20 6e  |er then please n|
00000930  6f 74 65 20 74 68 61 74  20 74 68 65 10 66 69 72  |ote that the.fir|
00000940  73 74 20 70 61 67 65 20  69 73 20 30 28 6e 6f 75  |st page is 0(nou|
00000950  67 68 74 29 20 73 6f 20  0d 74 68 61 74 20 69 66  |ght) so .that if|
00000960  20 79 6f 75 1a 20 6e 65  65 64 20 33 30 20 63 6f  | you. need 30 co|
00000970  70 69 65 73 20 74 68 65  20 66 69 67 75 72 65 20  |pies the figure |
00000980  74 6f 20 67 6f 20 69 6e  10 4c 49 4e 45 32 32 30  |to go in.LINE220|
00000990  1a 1a 20 0d 69 73 1a 1a  32 39 28 74 77 65 6e 74  |.. .is..29(twent|
000009a0  79 2d 6e 69 6e 65 29 0d  0d 20 20 20 20 20 50 72  |y-nine)..     Pr|
000009b0  6f 63 65 65 64 75 72 65  20 66 6f 72 20 75 73 69  |oceedure for usi|
000009c0  6e 67 20 4d 55 4c 54 49  2d 43 4f 50 49 45 53 20  |ng MULTI-COPIES |
000009d0  70 72 6f 67 72 61 6d 20  22 6e 75 6d 63 6f 70 69  |program "numcopi|
000009e0  65 73 22 3a 2d 0d 0d 57  69 74 68 20 56 49 45 57  |es":-..With VIEW|
000009f0  20 52 4f 4d 20 69 6e 73  65 72 74 65 64 20 73 77  | ROM inserted sw|
00000a00  69 74 63 68 20 6f 6e 20  63 6f 6d 70 75 74 65 72  |itch on computer|
00000a10  2e 20 53 77 69 74 63 68  20 6f 6e 20 50 72 69 6e  |. Switch on Prin|
00000a20  74 65 72 2e 20 20 0d 49  6e 73 65 72 74 20 64 69  |ter.  .Insert di|
00000a30  73 63 10 63 6f 6e 74 61  69 6e 69 6e 67 20 22 6e  |sc.containing "n|
00000a40  75 6d 63 6f 70 69 65 73  22 2e 4b 65 79 20 43 54  |umcopies".Key CT|
00000a50  52 4c 2d 41 2d 42 52 45  41 4b 20 0d 73 69 6d 75  |RL-A-BREAK .simu|
00000a60  6c 74 61 6e 65 6f 75 73  6c 79 20 74 6f 20 6d 6f  |ltaneously to mo|
00000a70  75 6e 74 20 61 6e 64 20  62 6f 6f 74 10 64 69 73  |unt and boot.dis|
00000a80  63 2e 20 4b 65 79 20 2a  42 41 53 49 43 2e 20 4b  |c. Key *BASIC. K|
00000a90  65 79 20 4c 4f 41 44 20  0d 22 6e 75 6d 63 6f 70  |ey LOAD ."numcop|
00000aa0  69 65 73 22 2e 20 4b 65  79 20 4c 49 53 54 32 32  |ies". Key LIST22|
00000ab0  30 2e 20 41 6d 65 6e 64  20 4c 69 6e 65 20 32 32  |0. Amend Line 22|
00000ac0  30 20 74 6f 10 73 68 6f  77 20 74 68 65 20 6e 75  |0 to.show the nu|
00000ad0  6d 62 65 72 20 6f 66 20  0d 63 6f 70 69 65 73 20  |mber of .copies |
00000ae0  72 65 71 75 69 72 65 64  2e 20 4b 65 79 20 52 45  |required. Key RE|
00000af0  54 55 52 4e 2e 20 4b 65  79 20 52 55 4e 2e 20 54  |TURN. Key RUN. T|
00000b00  68 65 20 70 72 6f 67 72  61 6d 10 73 68 6f 75 6c  |he program.shoul|
00000b10  64 20 6e 6f 77 20 0d 72  75 6e 20 61 6e 64 20 67  |d now .run and g|
00000b20  65 6e 65 72 61 74 65 20  74 68 65 20 2a 43 4f 50  |enerate the *COP|
00000b30  49 45 53 20 70 72 6f 67  72 61 6d 2e 4b 65 79 20  |IES program.Key |
00000b40  2a 44 49 53 4d 4f 55 4e  54 20 61 6e 64 20 72 65  |*DISMOUNT and re|
00000b50  6d 6f 76 65 10 0d 64 69  73 63 2e 20 49 6e 73 65  |move..disc. Inse|
00000b60  72 74 20 64 69 73 63 20  63 6f 6e 74 61 69 6e 69  |rt disc containi|
00000b70  6e 67 20 74 65 78 74 20  74 6f 20 62 65 20 70 72  |ng text to be pr|
00000b80  69 6e 74 65 64 2e 20 4b  65 79 20 0d 2a 4d 4f 55  |inted. Key .*MOU|
00000b90  4e 54 2e 4b 65 79 20 2a  57 4f 52 44 2e 20 4b 65  |NT.Key *WORD. Ke|
00000ba0  79 10 4c 4f 41 44 22 28  6e 61 6d 65 20 6f 66 20  |y.LOAD"(name of |
00000bb0  74 65 78 74 20 66 69 6c  65 29 22 2e 4b 65 79 20  |text file)".Key |
00000bc0  2a 46 58 36 2c 30 20 28  74 6f 20 0d 65 6e 73 75  |*FX6,0 (to .ensu|
00000bd0  72 65 20 61 20 6c 69 6e  65 20 66 65 65 64 20 69  |re a line feed i|
00000be0  73 20 6f 62 74 61 69 6e  65 64 20 10 69 66 20 6e  |s obtained .if n|
00000bf0  6f 74 20 61 6c 72 65 61  64 79 20 6f 72 64 61 69  |ot already ordai|
00000c00  6e 65 64 20 62 79 20 64  69 70 20 0d 73 77 69 74  |ned by dip .swit|
00000c10  63 68 29 2e 20 4b 65 79  20 45 53 43 41 50 45 20  |ch). Key ESCAPE |
00000c20  61 6e 64 20 63 68 65 63  6b 20 74 68 61 74 20 74  |and check that t|
00000c30  68 65 20 74 65 78 74 10  74 68 61 74 20 79 6f 75  |he text.that you|
00000c40  20 77 69 73 68 20 74 6f  20 0d 70 72 69 6e 74 20  | wish to .print |
00000c50  69 73 20 63 6f 72 72 65  63 74 20 61 6e 64 20 72  |is correct and r|
00000c60  65 61 64 79 2e 20 4b 65  79 20 45 53 43 41 50 45  |eady. Key ESCAPE|
00000c70  20 74 6f 20 72 65 74 75  72 6e 20 74 6f 10 43 6f  | to return to.Co|
00000c80  6d 6d 61 6e 64 20 0d 6d  6f 64 65 2e 20 4b 65 79  |mmand .mode. Key|
00000c90  20 20 2a 43 4f 50 49 45  53 2e 20 4b 65 79 20 52  |  *COPIES. Key R|
00000ca0  45 54 55 52 4e 2e 54 68  65 20 70 72 69 6e 74 65  |ETURN.The printe|
00000cb0  72 20 73 68 6f 75 6c 64  20 6e 6f 77 20 72 75 6e  |r should now run|
00000cc0  20 74 6f 10 0d 70 72 6f  64 75 63 65 20 74 68 65  | to..produce the|
00000cd0  20 6e 75 6d 62 65 72 20  6f 66 20 63 6f 70 69 65  | number of copie|
00000ce0  73 20 72 65 71 75 69 72  65 64 2e 10 49 66 20 79  |s required..If y|
00000cf0  6f 75 20 61 72 65 20 75  73 69 6e 67 20 61 1a 20  |ou are using a. |
00000d00  0d 50 52 49 4e 54 45 52  1a 20 44 52 49 56 45 52  |.PRINTER. DRIVER|
00000d10  1a 20 28 73 65 65 20 45  55 47 36 29 20 61 6e 64  |. (see EUG6) and|
00000d20  20 68 61 76 65 20 70 75  74 20 68 69 67 68 6c 69  | have put highli|
00000d30  67 68 74 73 20 69 6e 10  79 6f 75 72 20 74 65 78  |ghts in.your tex|
00000d40  74 20 0d 74 68 65 6e 20  6c 6f 61 64 20 74 68 65  |t .then load the|
00000d50  20 44 52 49 56 45 52 20  62 65 66 6f 72 65 20 6b  | DRIVER before k|
00000d60  65 79 69 6e 67 20 2a 43  4f 50 49 45 53 2e 0d 0d  |eying *COPIES...|
00000d70  46 6f 72 20 63 6f 6e 76  65 6e 69 65 6e 63 65 20  |For convenience |
00000d80  49 20 61 6c 77 61 79 73  20 74 72 61 6e 73 66 65  |I always transfe|
00000d90  72 20 61 20 63 6f 70 79  20 6f 66 20 22 6e 75 6d  |r a copy of "num|
00000da0  63 6f 70 69 65 73 22 20  74 6f 20 0d 65 61 63 68  |copies" to .each|
00000db0  20 64 69 73 63 20 49 20  75 73 65 10 66 6f 72 20  | disc I use.for |
00000dc0  56 49 45 57 20 74 65 78  74 20 61 6e 64 20 52 55  |VIEW text and RU|
00000dd0  4e 20 69 74 20 74 6f 20  67 65 6e 65 72 61 74 65  |N it to generate|
00000de0  20 2a 43 4f 50 49 45 53  20 2d 20 0d 74 68 69 73  | *COPIES - .this|
00000df0  20 73 61 76 65 73 20 74  69 6d 65 20 61 6e 64 20  | saves time and |
00000e00  72 65 64 75 63 65 73 10  74 68 65 20 63 68 61 6e  |reduces.the chan|
00000e10  63 65 20 6f 66 20 65 72  72 6f 72 20 69 6e 20 64  |ce of error in d|
00000e20  69 73 63 20 0d 65 78 63  68 61 6e 67 65 3b 20 61  |isc .exchange; a|
00000e30  6e 64 20 73 68 6f 75 6c  64 20 79 6f 75 20 77 69  |nd should you wi|
00000e40  73 68 20 74 6f 20 70 72  69 6e 74 20 74 68 65 10  |sh to print the.|
00000e50  73 61 6d 65 20 6e 75 6d  62 65 72 20 6f 66 20 0d  |same number of .|
00000e60  63 6f 70 69 65 73 20 61  73 20 69 6d 6d 65 64 69  |copies as immedi|
00000e70  61 74 65 6c 79 20 70 72  65 63 65 64 69 6e 67 20  |ately preceding |
00000e80  62 61 74 63 68 20 6f 66  20 73 6f 6d 65 20 6f 74  |batch of some ot|
00000e90  68 65 72 10 75 6e 72 65  6c 61 74 65 64 20 0d 74  |her.unrelated .t|
00000ea0  65 78 74 20 6f 6e 20 74  68 65 20 73 61 6d 65 20  |ext on the same |
00000eb0  64 69 73 63 20 69 74 20  69 73 20 6d 65 72 65 6c  |disc it is merel|
00000ec0  79 20 6e 65 63 65 73 73  61 72 79 20 74 6f 20 6b  |y necessary to k|
00000ed0  65 79 20 2a 43 4f 50 49  45 53 2e 20 0d 49 66 10  |ey *COPIES. .If.|
00000ee0  79 6f 75 20 68 61 76 65  20 6d 6f 72 65 20 74 68  |you have more th|
00000ef0  61 6e 20 6f 6e 65 20 70  61 67 65 20 6f 66 20 72  |an one page of r|
00000f00  65 6c 61 74 65 64 20 74  65 78 74 20 61 6e 64 20  |elated text and |
00000f10  75 73 65 20 74 68 65 20  50 45 20 0d 43 6f 6d 6d  |use the PE .Comm|
00000f20  61 6e 64 20 74 68 65 10  2a 43 4f 50 49 45 53 20  |and the.*COPIES |
00000f30  70 72 6f 67 72 61 6d 20  77 69 6c 6c 20 61 73 73  |program will ass|
00000f40  75 6d 65 20 74 68 65 20  72 65 6c 61 74 65 64 20  |ume the related |
00000f50  70 61 67 65 73 20 74 6f  20 0d 62 65 20 6f 6e 65  |pages to .be one|
00000f60  20 63 6f 70 79 2e 0d 0d  49 66 20 79 6f 75 20 61  | copy...If you a|
00000f70  72 65 20 70 72 6f 64 75  63 69 6e 67 20 73 6d 61  |re producing sma|
00000f80  6c 6c 20 73 6c 69 70 73  20 66 6f 72 20 64 69 73  |ll slips for dis|
00000f90  74 72 69 62 75 74 69 6f  6e 20 61 72 6f 75 6e 64  |tribution around|
00000fa0  20 74 68 65 20 0d 50 61  72 69 73 68 20 2c 66 6f  | the .Parish ,fo|
00000fb0  72 10 65 78 61 6d 70 6c  65 20 74 6f 20 61 6e 6e  |r.example to ann|
00000fc0  6f 75 6e 63 65 20 74 68  65 20 6e 65 78 74 20 6a  |ounce the next j|
00000fd0  75 6d 62 6c 65 20 73 61  6c 65 2c 20 74 68 65 6e  |umble sale, then|
00000fe0  20 0d 69 6e 64 69 63 61  74 65 20 74 68 65 20 50  | .indicate the P|
00000ff0  61 67 65 20 4c 65 6e 67  74 68 20 74 6f 10 73 75  |age Length to.su|
00001000  69 74 20 28 75 73 75 61  6c 6c 79 20 61 20 66 61  |it (usually a fa|
00001010  63 74 6f 72 20 6f 66 20  36 36 29 20 61 6e 64 20  |ctor of 66) and |
00001020  0d 74 68 65 20 2a 43 4f  50 49 45 53 20 70 72 6f  |.the *COPIES pro|
00001030  67 72 61 6d 20 77 69 6c  6c 20 63 6f 75 6e 74 20  |gram will count |
00001040  74 68 65 10 6e 75 6d 62  65 72 20 6f 66 20 50 61  |the.number of Pa|
00001050  67 65 20 4c 65 6e 67 74  68 73 20 2d 20 0d 79 6f  |ge Lengths - .yo|
00001060  75 20 74 68 65 6e 20 68  61 76 65 20 74 6f 20 66  |u then have to f|
00001070  69 6e 64 20 61 20 68 65  6c 70 65 72 20 74 6f 20  |ind a helper to |
00001080  63 75 74 20 75 70 20 74  68 65 20 10 73 68 65 65  |cut up the .shee|
00001090  74 73 20 6f 66 20 0d 70  61 70 65 72 21 21 20 48  |ts of .paper!! H|
000010a0  6f 77 65 76 65 72 20 66  6f 72 20 74 68 69 73 20  |owever for this |
000010b0  74 79 70 65 20 6f 66 20  70 72 69 6e 74 69 6e 67  |type of printing|
000010c0  20 49 20 77 6f 75 6c 64  20 74 68 69 6e 6b 20 74  | I would think t|
000010d0  68 61 74 20 61 10 0d 42  41 53 49 43 20 70 72 6f  |hat a..BASIC pro|
000010e0  67 72 61 6d 20 61 73 20  6f 70 70 6f 73 65 64 20  |gram as opposed |
000010f0  74 6f 20 75 73 65 20 6f  66 20 56 49 45 57 20 77  |to use of VIEW w|
00001100  6f 75 6c 64 20 62 65 20  6d 6f 72 65 20 73 75 69  |ould be more sui|
00001110  74 61 62 6c 65 20 0d 61  6e 64 20 6f 66 10 63 6f  |table .and of.co|
00001120  75 72 73 65 20 69 73 20  74 68 65 20 6f 6e 6c 79  |urse is the only|
00001130  20 6d 65 74 68 6f 64 20  61 76 61 69 6c 61 62 6c  | method availabl|
00001140  65 20 74 6f 20 74 68 6f  73 65 20 6e 6f 74 20 68  |e to those not h|
00001150  61 76 69 6e 67 20 0d 61  20 77 6f 72 64 2d 70 72  |aving .a word-pr|
00001160  6f 63 65 73 73 69 6e 67  10 52 4f 4d 2e 20 49 74  |ocessing.ROM. It|
00001170  20 69 6e 76 6f 6c 76 65  73 20 74 68 65 20 75 73  | involves the us|
00001180  65 20 6f 66 20 74 68 65  20 42 41 53 49 43 20 0d  |e of the BASIC .|
00001190  6b 65 79 77 6f 72 64 73  20 46 4f 52 20 61 6e 64  |keywords FOR and|
000011a0  20 4e 45 58 54 2e 20 4d  61 79 20 49 20 72 69 73  | NEXT. May I ris|
000011b0  6b 10 74 68 65 20 73 63  6f 72 6e 20 6f 66 20 74  |k.the scorn of t|
000011c0  68 65 20 6d 6f 72 65 20  0d 73 6f 70 68 69 73 74  |he more .sophist|
000011d0  69 63 61 74 65 64 20 45  4c 45 43 54 52 4f 4e 45  |icated ELECTRONE|
000011e0  45 52 53 20 62 79 20 6f  66 66 65 72 69 6e 67 20  |ERS by offering |
000011f0  74 68 65 20 66 6f 6c 6c  6f 77 69 6e 67 10 70 72  |the following.pr|
00001200  6f 67 72 61 6d 20 0d 61  73 20 61 20 75 73 65 66  |ogram .as a usef|
00001210  75 6c 20 20 20 65 78 61  6d 70 6c 65 20 6f 66 20  |ul   example of |
00001220  61 20 73 6d 61 6c 6c 20  73 6c 69 70 20 28 77 69  |a small slip (wi|
00001230  74 68 20 61 70 6f 6c 6f  67 69 65 73 20 74 6f 20  |th apologies to |
00001240  47 75 73 21 29 0d 0d 31  30 20 56 44 55 32 0d 32  |Gus!)..10 VDU2.2|
00001250  30 20 2a 46 58 36 2c 30  0d 33 30 20 46 4f 52 20  |0 *FX6,0.30 FOR |
00001260  4e 20 3d 20 31 20 54 4f  20 35 0d 34 30 20 56 44  |N = 1 TO 5.40 VD|
00001270  55 31 2c 32 37 2c 31 2c  37 39 0d 35 30 20 56 44  |U1,27,1,79.50 VD|
00001280  55 31 2c 32 37 2c 31 2c  31 31 32 2c 31 2c 34 39  |U1,27,1,112,1,49|
00001290  0d 36 30 20 56 44 55 31  2c 32 37 2c 31 2c 35 39  |.60 VDU1,27,1,59|
000012a0  0d 37 30 20 50 52 49 4e  54 22 45 6c 65 63 74 72  |.70 PRINT"Electr|
000012b0  6f 6e 20 55 73 65 72 20  47 72 6f 75 70 22 27 22  |on User Group"'"|
000012c0  32 35 2c 20 42 65 72 74  69 65 20 0d 20 20 20 52  |25, Bertie .   R|
000012d0  6f 61 64 2c 22 27 22 53  4f 55 54 48 53 45 41 22  |oad,"'"SOUTHSEA"|
000012e0  27 22 48 61 6d 70 73 68  69 72 65 22 20 20 20 20  |'"Hampshire"    |
000012f0  20 0d 37 35 20 50 52 49  4e 54 22 50 4f 34 20 20  | .75 PRINT"PO4  |
00001300  38 4a 58 22 27 22 20 22  27 22 20 22 27 22 20 22  |8JX"'" "'" "'" "|
00001310  27 22 20 22 0d 38 30 20  4e 45 58 54 20 4e 20 20  |'" ".80 NEXT N  |
00001320  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001330  20 20 20 20 20 20 20 20  20 20 20 20 20 20 0d 39  |              .9|
00001340  30 20 56 44 55 33 0d 31  30 30 20 45 4e 44 0d 4c  |0 VDU3.100 END.L|
00001350  69 6e 65 20 31 30 20 20  74 65 6c 6c 73 20 74 68  |ine 10  tells th|
00001360  65 20 70 72 69 6e 74 65  72 1a 20 74 6f 1a 20 73  |e printer. to. s|
00001370  69 74 1a 20 75 70 1a 20  61 6e 64 20 74 61 6b 65  |it. up. and take|
00001380  20 6e 6f 74 69 63 65 2e  20 20 20 20 20 20 20 20  | notice.        |
00001390  20 20 20 20 20 20 20 20  20 0d 4c 69 6e 65 20 32  |         .Line 2|
000013a0  30 20 65 6e 73 75 72 65  73 20 61 20 6c 69 6e 65  |0 ensures a line|
000013b0  66 65 65 64 2e 20 20 20  20 20 20 20 20 20 20 20  |feed.           |
000013c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
000013e0  20 20 20 20 0d 4c 69 6e  65 20 33 30 20 69 64 65  |    .Line 30 ide|
000013f0  6e 74 69 66 69 65 73 20  74 68 65 20 6e 75 6d 62  |ntifies the numb|
00001400  65 72 20 6f 66 20 74 69  6d 65 73 20 74 68 65 20  |er of times the |
00001410  70 72 6f 67 72 61 6d 20  73 68 6f 75 6c 64 20 72  |program should r|
00001420  75 6e 2e 0d 4c 69 6e 65  73 20 20 34 30 2c 20 35  |un..Lines  40, 5|
00001430  30 20 61 6e 64 20 36 30  20 73 70 65 63 69 66 79  |0 and 60 specify|
00001440  20 74 68 65 20 73 74 79  6c 65 20 6f 66 20 74 68  | the style of th|
00001450  65 20 63 68 61 72 61 63  74 65 72 73 20 74 6f 20  |e characters to |
00001460  62 65 20 0d 70 72 69 6e  74 65 64 2e 20 54 68 65  |be .printed. The|
00001470  73 65 20 6c 69 6e 65 73  20 6d 61 79 20 6e 65 65  |se lines may nee|
00001480  64 20 74 6f 20 62 65 20  63 68 61 6e 67 65 64 20  |d to be changed |
00001490  74 6f 20 73 75 69 74 20  79 6f 75 72 20 0d 70 72  |to suit your .pr|
000014a0  69 6e 74 65 72 20 6f 72  20 20 6f 6d 69 74 74 65  |inter or  omitte|
000014b0  64 2e 0d 4c 69 6e 65 73  20 37 30 20 61 6e 64 20  |d..Lines 70 and |
000014c0  37 35 20 73 70 65 6c 6c  1a 20 6f 75 74 1a 20 74  |75 spell. out. t|
000014d0  68 65 1a 20 74 65 78 74  20 74 6f 20 62 65 20 70  |he. text to be p|
000014e0  72 69 6e 74 65 64 20 61  6e 64 20 69 74 73 20 0d  |rinted and its .|
000014f0  6c 61 79 6f 75 74 2e 20  49 66 20 79 6f 75 10 20  |layout. If you. |
00001500  70 75 74 20 74 68 69 73  20 70 72 6f 67 72 61 6d  |put this program|
00001510  20 74 6f 20 75 73 65 20  6c 69 6e 65 20 37 35 20  | to use line 75 |
00001520  63 6f 75 6c 64 20 62 65  20 61 6e 20 0d 65 78 74  |could be an .ext|
00001530  65 6e 73 69 6f 6e 20 6f  66 20 6c 69 6e 65 20 37  |ension of line 7|
00001540  30 20 62 75 74 20 61 73  20 10 20 49 20 61 6d 20  |0 but as . I am |
00001550  70 72 65 73 65 6e 74 69  6e 67 20 74 68 69 73 20  |presenting this |
00001560  42 41 53 49 43 20 0d 70  72 6f 67 72 61 6d 20 20  |BASIC .program  |
00001570  77 69 74 68 69 6e 20 61  20 56 49 45 57 20 74 65  |within a VIEW te|
00001580  78 74 20 66 69 6c 65 20  74 68 65 20 65 78 74 65  |xt file the exte|
00001590  6e 64 65 64 10 20 6c 69  6e 65 1a 37 30 20 77 6f  |nded. line.70 wo|
000015a0  75 6c 64 20 0d 61 70 70  65 61 72 20 61 73 20 61  |uld .appear as a|
000015b0  20 6e 6f 6e 73 65 6e 73  65 2e 20 42 65 77 61 72  | nonsense. Bewar|
000015c0  65 20 6f 66 1a 20 74 68  65 20 61 70 6f 73 74 72  |e of. the apostr|
000015d0  6f 70 68 65 73 20 2d 20  74 68 65 79 20 61 72 65  |ophes - they are|
000015e0  10 20 0d 69 6d 70 6f 72  74 61 6e 74 20 69 6e 20  |. .important in |
000015f0  6f 62 74 61 69 6e 69 6e  67 20 74 68 65 20 22 66  |obtaining the "f|
00001600  6f 6f 74 65 72 20 6d 61  72 67 69 6e 22 20 74 6f  |ooter margin" to|
00001610  20 6d 61 74 63 68 20 74  65 78 74 1a 20 74 6f 1a  | match text. to.|
00001620  20 61 20 0d 6e 69 6e 65  20 6c 69 6e 65 10 20 73  | a .nine line. s|
00001630  70 61 63 69 6e 67 20 61  73 1a 20 75 73 65 64 20  |pacing as. used |
00001640  66 6f 72 20 66 61 6e 66  6f 6c 64 20 6c 61 62 65  |for fanfold labe|
00001650  6c 73 2e 20 49 66 20 64  72 61 66 74 69 6e 67 20  |ls. If drafting |
00001660  61 20 0d 73 74 72 61 69  67 68 74 20 74 65 78 74  |a .straight text|
00001670  20 74 68 65 6e 1a 20 61  10 20 73 65 72 69 65 73  | then. a. series|
00001680  20 6f 66 1a 20 22 27 22  1a 20 66 6f 6c 6c 6f 77  | of. "'". follow|
00001690  69 6e 67 1a 20 65 6e 64  1a 20 6f 66 1a 20 74 65  |ing. end. of. te|
000016a0  78 74 20 61 72 65 20 0d  6e 65 63 65 73 73 61 72  |xt are .necessar|
000016b0  79 20 74 6f 20 70 72 6f  76 69 64 65 20 63 75 74  |y to provide cut|
000016c0  74 69 6e 67 10 20 73 70  61 63 65 20 20 62 65 74  |ting. space  bet|
000016d0  77 65 65 6e 20 63 6f 70  69 65 73 2e 20 52 45 4d  |ween copies. REM|
000016e0  45 4d 42 45 52 20 20 0d  74 68 61 74 20 77 68 65  |EMBER  .that whe|
000016f0  6e 20 75 73 69 6e 67 20  42 41 53 49 43 20 61 20  |n using BASIC a |
00001700  4c 49 4e 45 20 6d 75 73  74 20 6e 6f 74 20 62 65  |LINE must not be|
00001710  10 20 6c 6f 6e 67 65 72  20 74 68 61 6e 20 32 34  |. longer than 24|
00001720  30 20 0d 63 68 61 72 61  63 74 65 72 73 20 62 75  |0 .characters bu|
00001730  74 20 74 68 65 72 65 20  69 73 6e 27 74 20 61 20  |t there isn't a |
00001740  72 65 73 74 72 69 63 74  69 6f 6e 20 6f 6e 20 74  |restriction on t|
00001750  68 65 20 6e 75 6d 62 65  72 20 6f 66 10 20 0d 4c  |he number of. .L|
00001760  49 4e 45 73 20 20 73 6f  1a 20 79 6f 75 1a 20 63  |INEs  so. you. c|
00001770  61 6e 2c 1a 20 62 79 20  63 61 72 65 66 75 6c 6c  |an,. by carefull|
00001780  79 20 63 6f 6d 70 6f 73  69 6e 67 20 79 6f 75 72  |y composing your|
00001790  20 74 65 78 74 2c 20 70  72 6f 64 75 63 65 20 61  | text, produce a|
000017a0  20 0d 6c 65 6e 67 74 68  79 20 10 20 64 6f 63 75  | .lengthy . docu|
000017b0  6d 65 6e 74 20 61 6e 64  20 65 76 65 6e 20 76 61  |ment and even va|
000017c0  72 79 1a 20 74 68 65 1a  20 73 74 79 6c 65 20 6f  |ry. the. style o|
000017d0  66 20 20 70 72 69 6e 74  65 64 20 20 6c 69 6e 65  |f  printed  line|
000017e0  73 20 0d 62 79 20 74 68  65 20 75 73 65 20 6f 66  |s .by the use of|
000017f0  20 4c 49 4e 45 73 10 20  73 75 63 68 20 61 73 20  | LINEs. such as |
00001800  34 30 2c 35 30 20 61 6e  64 20 36 30 20 61 62 6f  |40,50 and 60 abo|
00001810  76 65 2e 20 49 6e 20 6f  72 64 65 72 20 74 6f 20  |ve. In order to |
00001820  0d 70 72 65 73 65 6e 74  20 61 20 67 6f 6f 64 20  |.present a good |
00001830  70 72 69 6e 74 65 64 20  74 65 78 74 20 69 74 20  |printed text it |
00001840  69 73 10 20 69 6d 70 6f  72 74 61 6e 74 20 74 6f  |is. important to|
00001850  20 62 72 65 61 6b 20 75  70 20 74 68 65 20 0d 74  | break up the .t|
00001860  65 78 74 20 69 6e 20 74  68 65 20 70 72 6f 67 72  |ext in the progr|
00001870  61 6d 20 69 6e 74 6f 20  38 30 20 63 68 61 72 61  |am into 80 chara|
00001880  63 74 65 72 20 73 65 67  6d 65 6e 74 73 20 69 2e  |cter segments i.|
00001890  65 2e 20 0d 61 20 70 72  69 6e 74 65 64 20 6c 69  |e. .a printed li|
000018a0  6e 65 2e 53 6f 1a 20 69  66 1a 20 79 6f 75 1a 20  |ne.So. if. you. |
000018b0  64 6f 1a 20 6e 6f 74 1a  20 68 61 76 65 20 61 20  |do. not. have a |
000018c0  77 6f 72 64 2d 70 72 6f  63 65 73 73 69 6e 67 10  |word-processing.|
000018d0  20 73 79 73 74 65 6d 1a  20 0d 74 72 79 1a 20 74  | system. .try. t|
000018e0  68 65 20 66 6f 72 65 67  6f 69 6e 67 20 2d 20 69  |he foregoing - i|
000018f0  74 73 20 61 20 6d 69 6e  6f 72 20 63 68 61 6c 6c  |ts a minor chall|
00001900  65 6e 67 65 20 2d 20 61  6e 64 20 73 6f 6d 65 6f  |enge - and someo|
00001910  6e 65 1a 20 69 6e 1a 20  74 68 65 10 20 0d 63 6f  |ne. in. the. .co|
00001920  6d 6d 75 6e 69 74 79 20  6d 69 67 68 74 20 61 70  |mmunity might ap|
00001930  70 72 65 63 69 61 74 65  20 79 6f 75 72 1a 20 68  |preciate your. h|
00001940  65 6c 70 1a 20 69 6e 1a  20 74 68 65 69 72 1a 20  |elp. in. their. |
00001950  70 75 62 6c 69 63 1a 20  0d 72 65 6c 61 74 69 6f  |public. .relatio|
00001960  6e 73 2e 20 53 65 65 10  20 22 75 73 65 6c 65 73  |ns. See. "useles|
00001970  73 22 20 65 78 61 6d 70  6c 65 20 6c 61 74 65 72  |s" example later|
00001980  2e 0d 0d 4c 69 6e 65 20  38 30 20 63 61 6c 6c 73  |...Line 80 calls|
00001990  20 66 6f 72 20 74 68 65  20 72 65 2d 72 75 6e 20  | for the re-run |
000019a0  6f 66 20 74 68 65 20 70  72 6f 67 72 61 6d 20 74  |of the program t|
000019b0  6f 20 70 72 69 6e 74 20  74 68 65 20 6e 65 78 74  |o print the next|
000019c0  20 0d 63 6f 70 79 20 75  70 20 74 6f 20 35 0d 4c  | .copy up to 5.L|
000019d0  69 6e 65 20 39 30 20 74  65 6c 6c 73 20 74 68 65  |ine 90 tells the|
000019e0  20 70 72 69 6e 74 65 72  20 69 74 20 69 73 20 66  | printer it is f|
000019f0  69 6e 69 73 68 65 64 20  77 69 74 68 20 66 6f 72  |inished with for|
00001a00  20 74 68 65 20 70 72 65  73 65 6e 74 20 0d 2d 20  | the present .- |
00001a10  69 66 20 79 6f 75 10 20  6f 6d 69 74 20 74 68 69  |if you. omit thi|
00001a20  73 20 6c 69 6e 65 20 74  68 65 20 70 72 69 6e 74  |s line the print|
00001a30  65 72 20 77 69 6c 6c 20  70 72 69 6e 74 20 65 76  |er will print ev|
00001a40  65 72 79 74 68 69 6e 67  20 0d 74 68 61 74 20 61  |erything .that a|
00001a50  70 70 65 61 72 73 20 6f  6e 20 74 68 65 10 20 73  |ppears on the. s|
00001a60  63 72 65 65 6e 20 74 68  65 72 65 61 66 74 65 72  |creen thereafter|
00001a70  21 21 0d 0d 54 68 69 73  1a 20 73 6d 61 6c 6c 20  |!!..This. small |
00001a80  70 72 6f 67 72 61 6d 1a  20 65 78 65 72 63 69 73  |program. exercis|
00001a90  65 1a 20 63 6f 75 6c 64  1a 20 68 65 6c 70 1a 20  |e. could. help. |
00001aa0  79 6f 75 1a 20 74 6f 1a  20 67 65 74 1a 20 79 6f  |you. to. get. yo|
00001ab0  75 72 1a 20 6e 65 78 74  1a 20 0d 66 69 76 65 10  |ur. next. .five.|
00001ac0  73 75 62 6d 69 73 73 69  6f 6e 73 20 6f 66 66 20  |submissions off |
00001ad0  74 6f 20 47 75 73 20 69  6e 20 67 6f 6f 64 20 74  |to Gus in good t|
00001ae0  69 6d 65 2e 0d 0d 0d 0d                           |ime.....|
00001ae8
L/Boust1.m0
L/Boust1.m1
L/Boust1.m2
L/Boust1.m4
L/Boust1.m5

© Dominic Ford 2021–2024.

Our privacy policy is here.
Last updated: 13 Jul 2024, 14:29 UTC
Website designed by .