Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_26.ADF » P/fkmtxt1
P/fkmtxt1
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_26.ADF |
| Filename: | P/fkmtxt1 |
| Read OK: | ✔ |
| File size: | 0DFD bytes |
| Load address: | D204556 |
| Exec address: | 10D4741 |
File contents
FUNCTION KEY STRIP MAKER
~~~~~~~~~~~~~~~~~~~~~~~~
By Richard Dimond
As I had not got the Function Key Strip for View with my Master, I
borrowed a friend's strip so that I could make a copy. There was a
program published in Micro User for doing this but this was too long to
work on the Electron as it worked in MODE1. It also used the characters
on the computer and I thought it would be better to use the graphics
characters of the printer to give an improved strip.
Another reason I decided to write this program was that my printer will
only print a width of 8 inhes and the strip needed to be shortened by
about a quarter of an inch. This has meant that the leftmost section can
only be for 4 Elite characters so Control and Shift are abbreviated to
CTL> and SHT>. The remaining sections are able to contain up to 14
characters in Condensed Elite on each of two lines and these are arranged
for the text to centred.
The menus in the program are based on those used on the discs and the main
menu gives the following options -
1. Enter key details
2. Print key strip
3. Load file
4. Save file
5. Quit program
6. Clear memory
*. Enter * command
I will comment on these in turn -
1. On selecting this option, a second menu is shown. This gives options
for entering each of the six lines for the key selected by pressing
keys 1 to 6. Pressing N cycles the keys 0 to 9 and M returns to the
main menu.
On selecting a line number, you are given a cue for entering the
details for the key number and line number. This should not be more
than 14 characters or you will get the meesage 'Too long'. When an
entry is entered, you are returned to the menu and the entry is shown
in the box.
When entering is completed, you can then return to the main menu to
save the file or print it.
PROCct enters the string input to the correct position in the array
S$. K% being the key number and L% the line number minus 1. Line 600
of the program ensures that the string is not too long and lines 610 &
620 add the necessary spaces to centralise the text and make up the
string to 14 characters. This is needed to for the printing to line
up.
2. This option (and the remaining ones) first asks if you want to
continue or not so that you can return to the menu.
The print routine is rather involved but each line to be printed is of
a similar form though some program lines became too long and had to
be split.
Line 1050 expands the character set for the graphics characters.
Elite printing is selected at line 1060 and1/8 inch line spaicing at
line 1070.
Each line is similar in that they are made up as follows -
PROCcoff - turns off the condensed printing for the first section
to be printed - 4 elite characters between the division
characters.
PROCcon - turns on the condensed printing for the remainder of the
line - 14 condensed elite characters plus a division character for
each section.
3 & 4 Load and save the array in the usual way using nested FOR/NEXT
loops.
5. Ends the program or returns to the menu.
6. Enters strings of 14 zero characters into each section of the array
to clear memory.
*. This lets you use * commands for changing discs or *. for cataloguing
the disc. I have narrowed the window for this so that it will appear
as single column.
**************************************************************************
00000000 0d 46 55 4e 43 54 49 4f 4e 20 4b 45 59 20 53 54 |.FUNCTION KEY ST| 00000010 52 49 50 20 4d 41 4b 45 52 0d 7e 7e 7e 7e 7e 7e |RIP MAKER.~~~~~~| 00000020 7e 7e 7e 7e 7e 7e 7e 7e 7e 7e 7e 7e 7e 7e 7e 7e |~~~~~~~~~~~~~~~~| 00000030 7e 7e 0d 42 79 20 52 69 63 68 61 72 64 20 44 69 |~~.By Richard Di| 00000040 6d 6f 6e 64 0d 0d 41 73 20 49 20 68 61 64 20 6e |mond..As I had n| 00000050 6f 74 20 67 6f 74 20 74 68 65 20 46 75 6e 63 74 |ot got the Funct| 00000060 69 6f 6e 20 4b 65 79 20 53 74 72 69 70 20 66 6f |ion Key Strip fo| 00000070 72 20 56 69 65 77 20 77 69 74 68 20 6d 79 20 4d |r View with my M| 00000080 61 73 74 65 72 2c 20 49 0d 62 6f 72 72 6f 77 65 |aster, I.borrowe| 00000090 64 20 61 20 66 72 69 65 6e 64 27 73 20 73 74 72 |d a friend's str| 000000a0 69 70 20 73 6f 20 74 68 61 74 20 49 20 63 6f 75 |ip so that I cou| 000000b0 6c 64 20 6d 61 6b 65 20 61 20 63 6f 70 79 2e 20 |ld make a copy. | 000000c0 20 54 68 65 72 65 20 77 61 73 20 61 0d 70 72 6f | There was a.pro| 000000d0 67 72 61 6d 20 70 75 62 6c 69 73 68 65 64 20 69 |gram published i| 000000e0 6e 20 4d 69 63 72 6f 20 55 73 65 72 20 66 6f 72 |n Micro User for| 000000f0 20 64 6f 69 6e 67 20 74 68 69 73 20 62 75 74 20 | doing this but | 00000100 74 68 69 73 20 77 61 73 20 74 6f 6f 20 6c 6f 6e |this was too lon| 00000110 67 20 74 6f 0d 77 6f 72 6b 20 6f 6e 20 74 68 65 |g to.work on the| 00000120 20 45 6c 65 63 74 72 6f 6e 20 61 73 20 69 74 20 | Electron as it | 00000130 77 6f 72 6b 65 64 20 69 6e 20 4d 4f 44 45 31 2e |worked in MODE1.| 00000140 20 20 49 74 20 61 6c 73 6f 20 75 73 65 64 20 74 | It also used t| 00000150 68 65 20 63 68 61 72 61 63 74 65 72 73 0d 6f 6e |he characters.on| 00000160 20 74 68 65 20 63 6f 6d 70 75 74 65 72 20 61 6e | the computer an| 00000170 64 20 49 20 74 68 6f 75 67 68 74 20 69 74 20 77 |d I thought it w| 00000180 6f 75 6c 64 20 62 65 20 62 65 74 74 65 72 20 74 |ould be better t| 00000190 6f 20 75 73 65 20 74 68 65 20 67 72 61 70 68 69 |o use the graphi| 000001a0 63 73 0d 63 68 61 72 61 63 74 65 72 73 20 6f 66 |cs.characters of| 000001b0 20 74 68 65 20 70 72 69 6e 74 65 72 20 74 6f 20 | the printer to | 000001c0 67 69 76 65 20 61 6e 20 69 6d 70 72 6f 76 65 64 |give an improved| 000001d0 20 73 74 72 69 70 2e 0d 0d 41 6e 6f 74 68 65 72 | strip...Another| 000001e0 20 72 65 61 73 6f 6e 20 49 20 64 65 63 69 64 65 | reason I decide| 000001f0 64 20 74 6f 20 77 72 69 74 65 20 74 68 69 73 20 |d to write this | 00000200 70 72 6f 67 72 61 6d 20 77 61 73 20 74 68 61 74 |program was that| 00000210 20 6d 79 20 70 72 69 6e 74 65 72 20 77 69 6c 6c | my printer will| 00000220 0d 6f 6e 6c 79 20 70 72 69 6e 74 20 61 20 77 69 |.only print a wi| 00000230 64 74 68 20 6f 66 20 38 20 69 6e 68 65 73 20 61 |dth of 8 inhes a| 00000240 6e 64 20 74 68 65 20 73 74 72 69 70 20 6e 65 65 |nd the strip nee| 00000250 64 65 64 20 74 6f 20 62 65 20 73 68 6f 72 74 65 |ded to be shorte| 00000260 6e 65 64 20 62 79 0d 61 62 6f 75 74 20 61 20 71 |ned by.about a q| 00000270 75 61 72 74 65 72 20 6f 66 20 61 6e 20 69 6e 63 |uarter of an inc| 00000280 68 2e 20 20 54 68 69 73 20 68 61 73 20 6d 65 61 |h. This has mea| 00000290 6e 74 20 74 68 61 74 20 74 68 65 20 6c 65 66 74 |nt that the left| 000002a0 6d 6f 73 74 20 73 65 63 74 69 6f 6e 20 63 61 6e |most section can| 000002b0 0d 6f 6e 6c 79 20 62 65 20 66 6f 72 20 34 20 45 |.only be for 4 E| 000002c0 6c 69 74 65 20 63 68 61 72 61 63 74 65 72 73 20 |lite characters | 000002d0 73 6f 20 43 6f 6e 74 72 6f 6c 20 61 6e 64 20 53 |so Control and S| 000002e0 68 69 66 74 20 61 72 65 20 61 62 62 72 65 76 69 |hift are abbrevi| 000002f0 61 74 65 64 20 74 6f 0d 43 54 4c 3e 20 61 6e 64 |ated to.CTL> and| 00000300 20 53 48 54 3e 2e 20 20 54 68 65 20 72 65 6d 61 | SHT>. The rema| 00000310 69 6e 69 6e 67 20 73 65 63 74 69 6f 6e 73 20 61 |ining sections a| 00000320 72 65 20 61 62 6c 65 20 74 6f 20 63 6f 6e 74 61 |re able to conta| 00000330 69 6e 20 75 70 20 74 6f 20 31 34 0d 63 68 61 72 |in up to 14.char| 00000340 61 63 74 65 72 73 20 69 6e 20 43 6f 6e 64 65 6e |acters in Conden| 00000350 73 65 64 20 45 6c 69 74 65 20 6f 6e 20 65 61 63 |sed Elite on eac| 00000360 68 20 6f 66 20 74 77 6f 20 6c 69 6e 65 73 20 61 |h of two lines a| 00000370 6e 64 20 74 68 65 73 65 20 61 72 65 20 61 72 72 |nd these are arr| 00000380 61 6e 67 65 64 0d 66 6f 72 20 74 68 65 20 74 65 |anged.for the te| 00000390 78 74 20 74 6f 20 63 65 6e 74 72 65 64 2e 0d 0d |xt to centred...| 000003a0 54 68 65 20 6d 65 6e 75 73 20 69 6e 20 74 68 65 |The menus in the| 000003b0 20 70 72 6f 67 72 61 6d 20 61 72 65 20 62 61 73 | program are bas| 000003c0 65 64 20 6f 6e 20 74 68 6f 73 65 20 75 73 65 64 |ed on those used| 000003d0 20 6f 6e 20 74 68 65 20 64 69 73 63 73 20 61 6e | on the discs an| 000003e0 64 20 74 68 65 20 6d 61 69 6e 0d 6d 65 6e 75 20 |d the main.menu | 000003f0 67 69 76 65 73 20 74 68 65 20 66 6f 6c 6c 6f 77 |gives the follow| 00000400 69 6e 67 20 6f 70 74 69 6f 6e 73 20 2d 0d 0d 20 |ing options -.. | 00000410 20 20 20 20 31 2e 20 20 45 6e 74 65 72 20 6b 65 | 1. Enter ke| 00000420 79 20 64 65 74 61 69 6c 73 0d 20 20 20 20 20 32 |y details. 2| 00000430 2e 20 20 50 72 69 6e 74 20 6b 65 79 20 73 74 72 |. Print key str| 00000440 69 70 0d 20 20 20 20 20 33 2e 20 20 4c 6f 61 64 |ip. 3. Load| 00000450 20 66 69 6c 65 0d 20 20 20 20 20 34 2e 20 20 53 | file. 4. S| 00000460 61 76 65 20 66 69 6c 65 0d 20 20 20 20 20 35 2e |ave file. 5.| 00000470 20 20 51 75 69 74 20 70 72 6f 67 72 61 6d 0d 20 | Quit program. | 00000480 20 20 20 20 36 2e 20 20 43 6c 65 61 72 20 6d 65 | 6. Clear me| 00000490 6d 6f 72 79 0d 20 20 20 20 20 2a 2e 20 20 45 6e |mory. *. En| 000004a0 74 65 72 20 2a 20 63 6f 6d 6d 61 6e 64 0d 0d 49 |ter * command..I| 000004b0 20 77 69 6c 6c 20 63 6f 6d 6d 65 6e 74 20 6f 6e | will comment on| 000004c0 20 74 68 65 73 65 20 69 6e 20 74 75 72 6e 20 2d | these in turn -| 000004d0 0d 0d 31 2e 20 20 4f 6e 20 73 65 6c 65 63 74 69 |..1. On selecti| 000004e0 6e 67 20 74 68 69 73 20 6f 70 74 69 6f 6e 2c 20 |ng this option, | 000004f0 61 20 73 65 63 6f 6e 64 20 6d 65 6e 75 20 69 73 |a second menu is| 00000500 20 73 68 6f 77 6e 2e 20 20 54 68 69 73 20 67 69 | shown. This gi| 00000510 76 65 73 20 6f 70 74 69 6f 6e 73 0d 20 20 20 20 |ves options. | 00000520 66 6f 72 20 65 6e 74 65 72 69 6e 67 20 65 61 63 |for entering eac| 00000530 68 20 6f 66 20 74 68 65 20 73 69 78 20 6c 69 6e |h of the six lin| 00000540 65 73 20 66 6f 72 20 74 68 65 20 6b 65 79 20 73 |es for the key s| 00000550 65 6c 65 63 74 65 64 20 62 79 20 70 72 65 73 73 |elected by press| 00000560 69 6e 67 0d 20 20 20 20 6b 65 79 73 20 31 20 74 |ing. keys 1 t| 00000570 6f 20 36 2e 20 20 50 72 65 73 73 69 6e 67 20 4e |o 6. Pressing N| 00000580 20 63 79 63 6c 65 73 20 74 68 65 20 6b 65 79 73 | cycles the keys| 00000590 20 30 20 74 6f 20 39 20 61 6e 64 20 4d 20 72 65 | 0 to 9 and M re| 000005a0 74 75 72 6e 73 20 74 6f 20 74 68 65 0d 20 20 20 |turns to the. | 000005b0 20 6d 61 69 6e 20 6d 65 6e 75 2e 0d 0d 20 20 20 | main menu... | 000005c0 20 4f 6e 20 73 65 6c 65 63 74 69 6e 67 20 61 20 | On selecting a | 000005d0 6c 69 6e 65 20 6e 75 6d 62 65 72 2c 20 79 6f 75 |line number, you| 000005e0 20 61 72 65 20 67 69 76 65 6e 20 61 20 63 75 65 | are given a cue| 000005f0 20 66 6f 72 20 65 6e 74 65 72 69 6e 67 20 74 68 | for entering th| 00000600 65 0d 20 20 20 20 64 65 74 61 69 6c 73 20 66 6f |e. details fo| 00000610 72 20 74 68 65 20 6b 65 79 20 6e 75 6d 62 65 72 |r the key number| 00000620 20 61 6e 64 20 6c 69 6e 65 20 6e 75 6d 62 65 72 | and line number| 00000630 2e 20 20 54 68 69 73 20 73 68 6f 75 6c 64 20 6e |. This should n| 00000640 6f 74 20 62 65 20 6d 6f 72 65 20 0d 20 20 20 20 |ot be more . | 00000650 74 68 61 6e 20 31 34 20 63 68 61 72 61 63 74 65 |than 14 characte| 00000660 72 73 20 6f 72 20 79 6f 75 20 77 69 6c 6c 20 67 |rs or you will g| 00000670 65 74 20 74 68 65 20 6d 65 65 73 61 67 65 20 27 |et the meesage '| 00000680 54 6f 6f 20 6c 6f 6e 67 27 2e 20 20 57 68 65 6e |Too long'. When| 00000690 20 61 6e 20 0d 20 20 20 20 65 6e 74 72 79 20 69 | an . entry i| 000006a0 73 20 65 6e 74 65 72 65 64 2c 20 79 6f 75 20 61 |s entered, you a| 000006b0 72 65 20 72 65 74 75 72 6e 65 64 20 74 6f 20 74 |re returned to t| 000006c0 68 65 20 6d 65 6e 75 20 61 6e 64 20 74 68 65 20 |he menu and the | 000006d0 65 6e 74 72 79 20 69 73 20 73 68 6f 77 6e 0d 20 |entry is shown. | 000006e0 20 20 20 69 6e 20 74 68 65 20 62 6f 78 2e 20 20 | in the box. | 000006f0 0d 0d 20 20 20 20 57 68 65 6e 20 65 6e 74 65 72 |.. When enter| 00000700 69 6e 67 20 69 73 20 63 6f 6d 70 6c 65 74 65 64 |ing is completed| 00000710 2c 20 79 6f 75 20 63 61 6e 20 74 68 65 6e 20 72 |, you can then r| 00000720 65 74 75 72 6e 20 74 6f 20 74 68 65 20 6d 61 69 |eturn to the mai| 00000730 6e 20 6d 65 6e 75 20 74 6f 0d 20 20 20 20 73 61 |n menu to. sa| 00000740 76 65 20 74 68 65 20 66 69 6c 65 20 6f 72 20 70 |ve the file or p| 00000750 72 69 6e 74 20 69 74 2e 0d 0d 20 20 20 20 50 52 |rint it... PR| 00000760 4f 43 63 74 20 65 6e 74 65 72 73 20 74 68 65 20 |OCct enters the | 00000770 73 74 72 69 6e 67 20 69 6e 70 75 74 20 74 6f 20 |string input to | 00000780 74 68 65 20 63 6f 72 72 65 63 74 20 70 6f 73 69 |the correct posi| 00000790 74 69 6f 6e 20 69 6e 20 74 68 65 20 61 72 72 61 |tion in the arra| 000007a0 79 0d 20 20 20 20 53 24 2e 20 20 4b 25 20 62 65 |y. S$. K% be| 000007b0 69 6e 67 20 74 68 65 20 6b 65 79 20 6e 75 6d 62 |ing the key numb| 000007c0 65 72 20 61 6e 64 20 4c 25 20 74 68 65 20 6c 69 |er and L% the li| 000007d0 6e 65 20 6e 75 6d 62 65 72 20 6d 69 6e 75 73 20 |ne number minus | 000007e0 31 2e 20 20 4c 69 6e 65 20 36 30 30 0d 20 20 20 |1. Line 600. | 000007f0 20 6f 66 20 74 68 65 20 70 72 6f 67 72 61 6d 20 | of the program | 00000800 65 6e 73 75 72 65 73 20 74 68 61 74 20 74 68 65 |ensures that the| 00000810 20 73 74 72 69 6e 67 20 69 73 20 6e 6f 74 20 74 | string is not t| 00000820 6f 6f 20 6c 6f 6e 67 20 61 6e 64 20 6c 69 6e 65 |oo long and line| 00000830 73 20 36 31 30 20 26 0d 20 20 20 20 36 32 30 20 |s 610 &. 620 | 00000840 61 64 64 20 74 68 65 20 6e 65 63 65 73 73 61 72 |add the necessar| 00000850 79 20 73 70 61 63 65 73 20 74 6f 20 63 65 6e 74 |y spaces to cent| 00000860 72 61 6c 69 73 65 20 74 68 65 20 74 65 78 74 20 |ralise the text | 00000870 61 6e 64 20 6d 61 6b 65 20 75 70 20 74 68 65 0d |and make up the.| 00000880 20 20 20 20 73 74 72 69 6e 67 20 74 6f 20 31 34 | string to 14| 00000890 20 63 68 61 72 61 63 74 65 72 73 2e 20 20 54 68 | characters. Th| 000008a0 69 73 20 69 73 20 6e 65 65 64 65 64 20 74 6f 20 |is is needed to | 000008b0 66 6f 72 20 74 68 65 20 70 72 69 6e 74 69 6e 67 |for the printing| 000008c0 20 74 6f 20 6c 69 6e 65 0d 20 20 20 20 75 70 2e | to line. up.| 000008d0 0d 0d 32 2e 20 20 54 68 69 73 20 6f 70 74 69 6f |..2. This optio| 000008e0 6e 20 28 61 6e 64 20 74 68 65 20 72 65 6d 61 69 |n (and the remai| 000008f0 6e 69 6e 67 20 6f 6e 65 73 29 20 66 69 72 73 74 |ning ones) first| 00000900 20 61 73 6b 73 20 69 66 20 79 6f 75 20 77 61 6e | asks if you wan| 00000910 74 20 74 6f 0d 20 20 20 20 63 6f 6e 74 69 6e 75 |t to. continu| 00000920 65 20 6f 72 20 6e 6f 74 20 73 6f 20 74 68 61 74 |e or not so that| 00000930 20 79 6f 75 20 63 61 6e 20 72 65 74 75 72 6e 20 | you can return | 00000940 74 6f 20 74 68 65 20 6d 65 6e 75 2e 0d 0d 20 20 |to the menu... | 00000950 20 20 54 68 65 20 70 72 69 6e 74 20 72 6f 75 74 | The print rout| 00000960 69 6e 65 20 69 73 20 72 61 74 68 65 72 20 69 6e |ine is rather in| 00000970 76 6f 6c 76 65 64 20 62 75 74 20 65 61 63 68 20 |volved but each | 00000980 6c 69 6e 65 20 74 6f 20 62 65 20 70 72 69 6e 74 |line to be print| 00000990 65 64 20 69 73 20 6f 66 0d 20 20 20 20 61 20 73 |ed is of. a s| 000009a0 69 6d 69 6c 61 72 20 66 6f 72 6d 20 74 68 6f 75 |imilar form thou| 000009b0 67 68 20 73 6f 6d 65 20 70 72 6f 67 72 61 6d 20 |gh some program | 000009c0 6c 69 6e 65 73 20 62 65 63 61 6d 65 20 74 6f 6f |lines became too| 000009d0 20 6c 6f 6e 67 20 61 6e 64 20 68 61 64 20 74 6f | long and had to| 000009e0 0d 20 20 20 20 62 65 20 73 70 6c 69 74 2e 0d 0d |. be split...| 000009f0 20 20 20 20 4c 69 6e 65 20 31 30 35 30 20 65 78 | Line 1050 ex| 00000a00 70 61 6e 64 73 20 74 68 65 20 63 68 61 72 61 63 |pands the charac| 00000a10 74 65 72 20 73 65 74 20 66 6f 72 20 74 68 65 20 |ter set for the | 00000a20 67 72 61 70 68 69 63 73 20 63 68 61 72 61 63 74 |graphics charact| 00000a30 65 72 73 2e 0d 20 20 20 20 45 6c 69 74 65 20 70 |ers.. Elite p| 00000a40 72 69 6e 74 69 6e 67 20 69 73 20 73 65 6c 65 63 |rinting is selec| 00000a50 74 65 64 20 61 74 20 6c 69 6e 65 20 31 30 36 30 |ted at line 1060| 00000a60 20 61 6e 64 1a 31 2f 38 20 69 6e 63 68 20 6c 69 | and.1/8 inch li| 00000a70 6e 65 20 73 70 61 69 63 69 6e 67 20 61 74 20 0d |ne spaicing at .| 00000a80 20 20 20 20 6c 69 6e 65 20 31 30 37 30 2e 0d 0d | line 1070...| 00000a90 20 20 20 20 45 61 63 68 20 6c 69 6e 65 20 69 73 | Each line is| 00000aa0 20 73 69 6d 69 6c 61 72 20 69 6e 20 74 68 61 74 | similar in that| 00000ab0 20 74 68 65 79 20 61 72 65 20 6d 61 64 65 20 75 | they are made u| 00000ac0 70 20 61 73 20 66 6f 6c 6c 6f 77 73 20 2d 20 0d |p as follows - .| 00000ad0 0d 20 20 20 20 20 20 20 20 50 52 4f 43 63 6f 66 |. PROCcof| 00000ae0 66 20 2d 20 74 75 72 6e 73 20 6f 66 66 20 74 68 |f - turns off th| 00000af0 65 20 63 6f 6e 64 65 6e 73 65 64 20 70 72 69 6e |e condensed prin| 00000b00 74 69 6e 67 20 66 6f 72 20 74 68 65 20 66 69 72 |ting for the fir| 00000b10 73 74 20 73 65 63 74 69 6f 6e 0d 20 20 20 20 20 |st section. | 00000b20 20 20 20 74 6f 20 62 65 20 70 72 69 6e 74 65 64 | to be printed| 00000b30 20 2d 20 34 20 65 6c 69 74 65 20 63 68 61 72 61 | - 4 elite chara| 00000b40 63 74 65 72 73 20 62 65 74 77 65 65 6e 20 74 68 |cters between th| 00000b50 65 20 64 69 76 69 73 69 6f 6e 0d 20 20 20 20 20 |e division. | 00000b60 20 20 20 63 68 61 72 61 63 74 65 72 73 2e 0d 0d | characters...| 00000b70 20 20 20 20 20 20 20 20 50 52 4f 43 63 6f 6e 20 | PROCcon | 00000b80 2d 20 74 75 72 6e 73 20 6f 6e 20 74 68 65 20 63 |- turns on the c| 00000b90 6f 6e 64 65 6e 73 65 64 20 70 72 69 6e 74 69 6e |ondensed printin| 00000ba0 67 20 66 6f 72 20 74 68 65 20 72 65 6d 61 69 6e |g for the remain| 00000bb0 64 65 72 20 6f 66 20 74 68 65 0d 20 20 20 20 20 |der of the. | 00000bc0 20 20 20 6c 69 6e 65 20 2d 20 31 34 20 63 6f 6e | line - 14 con| 00000bd0 64 65 6e 73 65 64 20 65 6c 69 74 65 20 63 68 61 |densed elite cha| 00000be0 72 61 63 74 65 72 73 20 70 6c 75 73 20 61 20 64 |racters plus a d| 00000bf0 69 76 69 73 69 6f 6e 20 63 68 61 72 61 63 74 65 |ivision characte| 00000c00 72 20 66 6f 72 0d 20 20 20 20 20 20 20 20 65 61 |r for. ea| 00000c10 63 68 20 73 65 63 74 69 6f 6e 2e 0d 0d 33 20 26 |ch section...3 &| 00000c20 20 34 20 20 20 4c 6f 61 64 20 61 6e 64 20 73 61 | 4 Load and sa| 00000c30 76 65 20 74 68 65 20 61 72 72 61 79 20 69 6e 20 |ve the array in | 00000c40 74 68 65 20 75 73 75 61 6c 20 77 61 79 20 75 73 |the usual way us| 00000c50 69 6e 67 20 6e 65 73 74 65 64 20 46 4f 52 2f 4e |ing nested FOR/N| 00000c60 45 58 54 0d 20 20 20 20 20 20 20 20 6c 6f 6f 70 |EXT. loop| 00000c70 73 2e 0d 0d 35 2e 20 20 20 45 6e 64 73 20 74 68 |s...5. Ends th| 00000c80 65 20 70 72 6f 67 72 61 6d 20 6f 72 20 72 65 74 |e program or ret| 00000c90 75 72 6e 73 20 74 6f 20 74 68 65 20 6d 65 6e 75 |urns to the menu| 00000ca0 2e 0d 0d 36 2e 20 20 20 45 6e 74 65 72 73 20 73 |...6. Enters s| 00000cb0 74 72 69 6e 67 73 20 6f 66 20 31 34 20 7a 65 72 |trings of 14 zer| 00000cc0 6f 20 63 68 61 72 61 63 74 65 72 73 20 69 6e 74 |o characters int| 00000cd0 6f 20 65 61 63 68 20 73 65 63 74 69 6f 6e 20 6f |o each section o| 00000ce0 66 20 74 68 65 20 61 72 72 61 79 0d 20 20 20 20 |f the array. | 00000cf0 20 74 6f 20 63 6c 65 61 72 20 6d 65 6d 6f 72 79 | to clear memory| 00000d00 2e 0d 0d 2a 2e 1a 20 20 54 68 69 73 20 6c 65 74 |...*.. This let| 00000d10 73 20 79 6f 75 20 75 73 65 20 2a 20 63 6f 6d 6d |s you use * comm| 00000d20 61 6e 64 73 20 66 6f 72 20 63 68 61 6e 67 69 6e |ands for changin| 00000d30 67 20 64 69 73 63 73 20 6f 72 20 2a 2e 20 66 6f |g discs or *. fo| 00000d40 72 20 63 61 74 61 6c 6f 67 75 69 6e 67 0d 20 20 |r cataloguing. | 00000d50 20 20 20 74 68 65 20 64 69 73 63 2e 20 20 49 20 | the disc. I | 00000d60 68 61 76 65 20 6e 61 72 72 6f 77 65 64 20 74 68 |have narrowed th| 00000d70 65 20 77 69 6e 64 6f 77 20 66 6f 72 20 74 68 69 |e window for thi| 00000d80 73 20 73 6f 20 74 68 61 74 20 69 74 20 77 69 6c |s so that it wil| 00000d90 6c 20 61 70 70 65 61 72 0d 20 20 20 20 20 61 73 |l appear. as| 00000da0 20 73 69 6e 67 6c 65 20 63 6f 6c 75 6d 6e 2e 0d | single column..| 00000db0 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a |.***************| 00000dc0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a |****************| * 00000df0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 0d |***********..| 00000dfd
P/fkmtxt1.m0
P/fkmtxt1.m1
P/fkmtxt1.m2
P/fkmtxt1.m4
P/fkmtxt1.m5
.