Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_35.ADF » L/+dimon1
L/+dimon1
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_35.ADF |
| Filename: | L/+dimon1 |
| Read OK: | ✔ |
| File size: | 0A62 bytes |
| Load address: | 2B206576 |
| Exec address: | 6F6D6964 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_35.ADF » L/+dimon1
- Personal collection » Acorn hard disk » zipped_disks » elk03 » eug35/L/+dimon1
File contents
*******************************************************
Richard Dimond, 5 Briary Court, SIDCUP, Kent, DA14 6HZ.
Tel. (0181) 302 2395
*******************************************************
Dear Gus,
I am sorry that the page skip did not work. I did have the effect that
you desribe at one time. This puzzled me then as I thought I had the code
assembled correctly and the printing to screen seemed all right. I did
think that I had corrected this. I have spent some time again to correct
this but must say that I cannot see the answer to the problem and must
unfortunately have to leave this for the time being.
I have made some small amemdments to the Menu and Print programs - the
menu is altered, as Robert Sprowson suggested, for the toggle for 40 - 80
column printing. The case amendment only works for letters so has not
been included. I have also added all variables to the 'PRINT' program so
that it can be used without the menu. So, if you need to alter these,
this must be done to both programs.
In trying this out, I have found that, if a file is not correctly printed
and the program does not return to BASIC, then an error report given and
the program ends and then you cannot print the rest of the files. This I
found happened on an earlier disc and could not find out why the file did
not return correctly.
Another point in typing files, do not print strings of more the 38 chars,
except strings of the 3 chars mentioned in my info, or the 40 column print
routine will get locked up. This happens easily with assembler code and
this must be split up using spaces at suitable points. If you do have
problems with any files on an earlier disc, load the file into VIEW and
add spaces as necessary and re-save the file. I have amended my Info
section to stress these points suggest this is re-read.
After seeing Dominic Ford's screen, I thought that I might re-hash mine
which was on EUG17 for the Christmas issue. I thought I might change the
carols but then remembered the 'Bells' program I experimented with some
time ago. The sound is hardly bell-like but the tones of the six bells
are rung in the correct sequence for part of the Double Oxford Bob Minor
method. The 'bells' are rather high pitched, as I found a lower pitch did
not sound so clear. I then thought to put a rather simple drawing of a
Church in the picture.
Regards,
Richard
Richard is a campanologist and probably better than he would care to
admit.
As regards the PRINT program for the moment please don't select the
page skip option
00000000 0d 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a |. *******| 00000010 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a |****************| * 00000040 0d 20 20 20 20 20 20 20 20 52 69 63 68 61 72 64 |. Richard| 00000050 20 44 69 6d 6f 6e 64 2c 20 35 20 42 72 69 61 72 | Dimond, 5 Briar| 00000060 79 20 43 6f 75 72 74 2c 20 53 49 44 43 55 50 2c |y Court, SIDCUP,| 00000070 20 4b 65 6e 74 2c 20 44 41 31 34 20 36 48 5a 2e | Kent, DA14 6HZ.| 00000080 20 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | . | 00000090 20 20 20 20 20 20 20 20 54 65 6c 2e 20 28 30 31 | Tel. (01| 000000a0 38 31 29 20 33 30 32 20 32 33 39 35 0d 20 20 20 |81) 302 2395. | 000000b0 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a | ***********| 000000c0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a |****************| * 000000e0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 0d 44 65 |************..De| 000000f0 61 72 20 47 75 73 2c 0d 0d 49 1a 20 61 6d 1a 20 |ar Gus,..I. am. | 00000100 73 6f 72 72 79 1a 20 74 68 61 74 20 74 68 65 20 |sorry. that the | 00000110 70 61 67 65 20 73 6b 69 70 20 64 69 64 20 6e 6f |page skip did no| 00000120 74 20 77 6f 72 6b 2e 20 20 49 20 64 69 64 20 68 |t work. I did h| 00000130 61 76 65 20 74 68 65 20 65 66 66 65 63 74 20 74 |ave the effect t| 00000140 68 61 74 0d 79 6f 75 20 64 65 73 72 69 62 65 20 |hat.you desribe | 00000150 61 74 20 6f 6e 65 20 74 69 6d 65 2e 20 20 54 68 |at one time. Th| 00000160 69 73 20 70 75 7a 7a 6c 65 64 20 6d 65 20 74 68 |is puzzled me th| 00000170 65 6e 20 61 73 20 49 20 74 68 6f 75 67 68 74 20 |en as I thought | 00000180 49 20 68 61 64 20 74 68 65 20 63 6f 64 65 0d 61 |I had the code.a| 00000190 73 73 65 6d 62 6c 65 64 1a 20 63 6f 72 72 65 63 |ssembled. correc| 000001a0 74 6c 79 1a 20 61 6e 64 1a 20 74 68 65 20 70 72 |tly. and. the pr| 000001b0 69 6e 74 69 6e 67 20 74 6f 20 73 63 72 65 65 6e |inting to screen| 000001c0 20 73 65 65 6d 65 64 20 61 6c 6c 20 72 69 67 68 | seemed all righ| 000001d0 74 2e 20 20 49 20 64 69 64 0d 74 68 69 6e 6b 1a |t. I did.think.| 000001e0 20 74 68 61 74 20 49 20 68 61 64 20 63 6f 72 72 | that I had corr| 000001f0 65 63 74 65 64 20 74 68 69 73 2e 20 20 49 20 68 |ected this. I h| 00000200 61 76 65 20 73 70 65 6e 74 20 73 6f 6d 65 20 74 |ave spent some t| 00000210 69 6d 65 20 61 67 61 69 6e 20 74 6f 20 63 6f 72 |ime again to cor| 00000220 72 65 63 74 0d 74 68 69 73 20 62 75 74 1a 20 6d |rect.this but. m| 00000230 75 73 74 1a 20 73 61 79 1a 20 74 68 61 74 20 49 |ust. say. that I| 00000240 20 63 61 6e 6e 6f 74 20 73 65 65 20 74 68 65 20 | cannot see the | 00000250 61 6e 73 77 65 72 20 74 6f 20 74 68 65 20 20 70 |answer to the p| 00000260 72 6f 62 6c 65 6d 20 61 6e 64 20 6d 75 73 74 0d |roblem and must.| 00000270 75 6e 66 6f 72 74 75 6e 61 74 65 6c 79 20 68 61 |unfortunately ha| 00000280 76 65 20 74 6f 20 6c 65 61 76 65 20 74 68 69 73 |ve to leave this| 00000290 20 66 6f 72 20 74 68 65 20 74 69 6d 65 20 62 65 | for the time be| 000002a0 69 6e 67 2e 0d 0d 49 20 68 61 76 65 20 6d 61 64 |ing...I have mad| 000002b0 65 20 73 6f 6d 65 20 73 6d 61 6c 6c 1a 20 61 6d |e some small. am| 000002c0 65 6d 64 6d 65 6e 74 73 1a 20 74 6f 1a 20 74 68 |emdments. to. th| 000002d0 65 1a 20 4d 65 6e 75 20 61 6e 64 20 50 72 69 6e |e. Menu and Prin| 000002e0 74 20 70 72 6f 67 72 61 6d 73 20 2d 20 74 68 65 |t programs - the| 000002f0 0d 6d 65 6e 75 20 69 73 20 61 6c 74 65 72 65 64 |.menu is altered| 00000300 2c 20 61 73 20 52 6f 62 65 72 74 1a 20 53 70 72 |, as Robert. Spr| 00000310 6f 77 73 6f 6e 20 73 75 67 67 65 73 74 65 64 2c |owson suggested,| 00000320 20 66 6f 72 20 74 68 65 20 74 6f 67 67 6c 65 20 | for the toggle | 00000330 66 6f 72 20 34 30 20 2d 20 38 30 0d 63 6f 6c 75 |for 40 - 80.colu| 00000340 6d 6e 20 70 72 69 6e 74 69 6e 67 2e 20 20 54 68 |mn printing. Th| 00000350 65 20 63 61 73 65 20 61 6d 65 6e 64 6d 65 6e 74 |e case amendment| 00000360 20 6f 6e 6c 79 1a 20 77 6f 72 6b 73 1a 20 66 6f | only. works. fo| 00000370 72 1a 20 6c 65 74 74 65 72 73 1a 20 73 6f 20 68 |r. letters. so h| 00000380 61 73 20 6e 6f 74 0d 62 65 65 6e 20 69 6e 63 6c |as not.been incl| 00000390 75 64 65 64 2e 20 49 20 68 61 76 65 20 61 6c 73 |uded. I have als| 000003a0 6f 1a 20 61 64 64 65 64 1a 20 61 6c 6c 20 76 61 |o. added. all va| 000003b0 72 69 61 62 6c 65 73 20 74 6f 20 74 68 65 20 27 |riables to the '| 000003c0 50 52 49 4e 54 27 20 70 72 6f 67 72 61 6d 20 73 |PRINT' program s| 000003d0 6f 0d 74 68 61 74 20 69 74 20 63 61 6e 20 62 65 |o.that it can be| 000003e0 20 75 73 65 64 20 77 69 74 68 6f 75 74 20 74 68 | used without th| 000003f0 65 1a 20 6d 65 6e 75 2e 1a 20 20 53 6f 2c 1a 20 |e. menu.. So,. | 00000400 69 66 1a 20 79 6f 75 20 6e 65 65 64 20 74 6f 20 |if. you need to | 00000410 61 6c 74 65 72 20 74 68 65 73 65 2c 0d 74 68 69 |alter these,.thi| 00000420 73 20 6d 75 73 74 20 62 65 20 64 6f 6e 65 20 74 |s must be done t| 00000430 6f 20 62 6f 74 68 20 70 72 6f 67 72 61 6d 73 2e |o both programs.| 00000440 0d 0d 49 6e 20 74 72 79 69 6e 67 20 74 68 69 73 |..In trying this| 00000450 20 6f 75 74 2c 1a 20 49 20 68 61 76 65 20 66 6f | out,. I have fo| 00000460 75 6e 64 20 74 68 61 74 2c 20 69 66 20 61 20 66 |und that, if a f| 00000470 69 6c 65 20 69 73 20 6e 6f 74 20 63 6f 72 72 65 |ile is not corre| 00000480 63 74 6c 79 20 70 72 69 6e 74 65 64 0d 61 6e 64 |ctly printed.and| 00000490 20 74 68 65 20 70 72 6f 67 72 61 6d 20 64 6f 65 | the program doe| 000004a0 73 20 6e 6f 74 1a 20 72 65 74 75 72 6e 1a 20 74 |s not. return. t| 000004b0 6f 20 42 41 53 49 43 2c 20 74 68 65 6e 20 61 6e |o BASIC, then an| 000004c0 20 65 72 72 6f 72 20 72 65 70 6f 72 74 20 67 69 | error report gi| 000004d0 76 65 6e 20 61 6e 64 0d 74 68 65 20 70 72 6f 67 |ven and.the prog| 000004e0 72 61 6d 20 65 6e 64 73 20 61 6e 64 20 74 68 65 |ram ends and the| 000004f0 6e 20 79 6f 75 20 63 61 6e 6e 6f 74 1a 20 70 72 |n you cannot. pr| 00000500 69 6e 74 20 74 68 65 20 72 65 73 74 20 6f 66 20 |int the rest of | 00000510 74 68 65 20 66 69 6c 65 73 2e 20 20 54 68 69 73 |the files. This| 00000520 20 49 0d 66 6f 75 6e 64 20 68 61 70 70 65 6e 65 | I.found happene| 00000530 64 20 6f 6e 20 61 6e 20 65 61 72 6c 69 65 72 1a |d on an earlier.| 00000540 20 64 69 73 63 20 61 6e 64 20 63 6f 75 6c 64 20 | disc and could | 00000550 6e 6f 74 20 66 69 6e 64 20 6f 75 74 20 77 68 79 |not find out why| 00000560 20 74 68 65 20 66 69 6c 65 20 64 69 64 0d 6e 6f | the file did.no| 00000570 74 20 72 65 74 75 72 6e 20 63 6f 72 72 65 63 74 |t return correct| 00000580 6c 79 2e 0d 0d 41 6e 6f 74 68 65 72 20 70 6f 69 |ly...Another poi| 00000590 6e 74 20 69 6e 20 74 79 70 69 6e 67 20 66 69 6c |nt in typing fil| 000005a0 65 73 2c 1a 20 1c 64 6f 20 6e 6f 74 20 70 72 69 |es,. .do not pri| 000005b0 6e 74 20 73 74 72 69 6e 67 73 20 6f 66 20 6d 6f |nt strings of mo| 000005c0 72 65 20 74 68 65 20 33 38 20 63 68 61 72 73 2c |re the 38 chars,| 000005d0 0d 65 78 63 65 70 74 20 73 74 72 69 6e 67 73 20 |.except strings | 000005e0 6f 66 20 74 68 65 20 33 20 63 68 61 72 73 20 6d |of the 3 chars m| 000005f0 65 6e 74 69 6f 6e 65 64 20 69 6e 20 6d 79 20 69 |entioned in my i| 00000600 6e 66 6f 2c 1c 20 6f 72 20 74 68 65 20 34 30 20 |nfo,. or the 40 | 00000610 63 6f 6c 75 6d 6e 20 70 72 69 6e 74 0d 72 6f 75 |column print.rou| 00000620 74 69 6e 65 20 77 69 6c 6c 20 67 65 74 20 6c 6f |tine will get lo| 00000630 63 6b 65 64 20 75 70 2e 1a 20 20 54 68 69 73 1a |cked up.. This.| 00000640 20 68 61 70 70 65 6e 73 20 65 61 73 69 6c 79 20 | happens easily | 00000650 77 69 74 68 20 61 73 73 65 6d 62 6c 65 72 20 63 |with assembler c| 00000660 6f 64 65 20 61 6e 64 0d 74 68 69 73 1c 20 6d 75 |ode and.this. mu| 00000670 73 74 20 62 65 20 73 70 6c 69 74 20 75 70 20 75 |st be split up u| 00000680 73 69 6e 67 20 73 70 61 63 65 73 1a 20 61 74 1a |sing spaces. at.| 00000690 20 73 75 69 74 61 62 6c 65 1a 20 70 6f 69 6e 74 | suitable. point| 000006a0 73 2e 1c 20 20 20 49 66 20 79 6f 75 20 64 6f 20 |s.. If you do | 000006b0 68 61 76 65 0d 70 72 6f 62 6c 65 6d 73 20 77 69 |have.problems wi| 000006c0 74 68 20 61 6e 79 20 66 69 6c 65 73 20 6f 6e 20 |th any files on | 000006d0 61 6e 20 65 61 72 6c 69 65 72 20 64 69 73 63 2c |an earlier disc,| 000006e0 20 6c 6f 61 64 20 74 68 65 1a 20 66 69 6c 65 1a | load the. file.| 000006f0 20 69 6e 74 6f 1a 20 56 49 45 57 20 61 6e 64 0d | into. VIEW and.| 00000700 61 64 64 1a 20 73 70 61 63 65 73 1a 20 61 73 1a |add. spaces. as.| 00000710 20 6e 65 63 65 73 73 61 72 79 1a 20 61 6e 64 1a | necessary. and.| 00000720 20 72 65 2d 73 61 76 65 20 74 68 65 20 66 69 6c | re-save the fil| 00000730 65 2e 20 20 49 20 68 61 76 65 20 61 6d 65 6e 64 |e. I have amend| 00000740 65 64 20 6d 79 20 49 6e 66 6f 0d 73 65 63 74 69 |ed my Info.secti| 00000750 6f 6e 20 74 6f 20 73 74 72 65 73 73 20 74 68 65 |on to stress the| 00000760 73 65 20 70 6f 69 6e 74 73 20 73 75 67 67 65 73 |se points sugges| 00000770 74 20 74 68 69 73 20 69 73 20 72 65 2d 72 65 61 |t this is re-rea| 00000780 64 2e 0d 0d 41 66 74 65 72 1a 20 73 65 65 69 6e |d...After. seein| 00000790 67 1a 20 44 6f 6d 69 6e 69 63 20 46 6f 72 64 27 |g. Dominic Ford'| 000007a0 73 20 73 63 72 65 65 6e 2c 20 20 49 20 74 68 6f |s screen, I tho| 000007b0 75 67 68 74 20 74 68 61 74 20 49 20 6d 69 67 68 |ught that I migh| 000007c0 74 20 72 65 2d 68 61 73 68 20 6d 69 6e 65 0d 77 |t re-hash mine.w| 000007d0 68 69 63 68 20 77 61 73 20 6f 6e 1a 20 45 55 47 |hich was on. EUG| 000007e0 31 37 20 66 6f 72 20 74 68 65 20 43 68 72 69 73 |17 for the Chris| 000007f0 74 6d 61 73 20 69 73 73 75 65 2e 20 20 49 20 74 |tmas issue. I t| 00000800 68 6f 75 67 68 74 20 49 20 6d 69 67 68 74 20 63 |hought I might c| 00000810 68 61 6e 67 65 20 74 68 65 0d 63 61 72 6f 6c 73 |hange the.carols| 00000820 20 62 75 74 20 74 68 65 6e 20 72 65 6d 65 6d 62 | but then rememb| 00000830 65 72 65 64 1a 20 74 68 65 1a 20 27 42 65 6c 6c |ered. the. 'Bell| 00000840 73 27 1a 20 70 72 6f 67 72 61 6d 20 49 20 65 78 |s'. program I ex| 00000850 70 65 72 69 6d 65 6e 74 65 64 20 77 69 74 68 20 |perimented with | 00000860 73 6f 6d 65 0d 74 69 6d 65 20 61 67 6f 2e 20 20 |some.time ago. | 00000870 54 68 65 20 73 6f 75 6e 64 20 69 73 20 68 61 72 |The sound is har| 00000880 64 6c 79 20 62 65 6c 6c 2d 6c 69 6b 65 1a 20 62 |dly bell-like. b| 00000890 75 74 1a 20 74 68 65 1a 20 74 6f 6e 65 73 20 6f |ut. the. tones o| 000008a0 66 20 74 68 65 20 73 69 78 20 62 65 6c 6c 73 0d |f the six bells.| 000008b0 61 72 65 20 72 75 6e 67 20 69 6e 20 74 68 65 20 |are rung in the | 000008c0 63 6f 72 72 65 63 74 1a 20 73 65 71 75 65 6e 63 |correct. sequenc| 000008d0 65 1a 20 66 6f 72 20 70 61 72 74 20 6f 66 20 74 |e. for part of t| 000008e0 68 65 20 44 6f 75 62 6c 65 20 4f 78 66 6f 72 64 |he Double Oxford| 000008f0 20 42 6f 62 20 4d 69 6e 6f 72 0d 6d 65 74 68 6f | Bob Minor.metho| 00000900 64 2e 20 20 54 68 65 20 27 62 65 6c 6c 73 27 20 |d. The 'bells' | 00000910 61 72 65 20 72 61 74 68 65 72 20 68 69 67 68 20 |are rather high | 00000920 70 69 74 63 68 65 64 2c 20 61 73 20 49 20 66 6f |pitched, as I fo| 00000930 75 6e 64 20 61 20 6c 6f 77 65 72 20 70 69 74 63 |und a lower pitc| 00000940 68 20 64 69 64 0d 6e 6f 74 20 73 6f 75 6e 64 20 |h did.not sound | 00000950 73 6f 20 63 6c 65 61 72 2e 20 20 49 1a 20 74 68 |so clear. I. th| 00000960 65 6e 1a 20 74 68 6f 75 67 68 74 1a 20 74 6f 20 |en. thought. to | 00000970 70 75 74 20 61 20 72 61 74 68 65 72 20 73 69 6d |put a rather sim| 00000980 70 6c 65 20 64 72 61 77 69 6e 67 20 6f 66 20 61 |ple drawing of a| 00000990 0d 43 68 75 72 63 68 20 69 6e 20 74 68 65 20 70 |.Church in the p| 000009a0 69 63 74 75 72 65 2e 0d 0d 52 65 67 61 72 64 73 |icture...Regards| 000009b0 2c 0d 0d 52 69 63 68 61 72 64 0d 0d 1d 52 69 63 |,..Richard...Ric| 000009c0 68 61 72 64 20 69 73 20 61 20 63 61 6d 70 61 6e |hard is a campan| 000009d0 6f 6c 6f 67 69 73 74 20 61 6e 64 20 70 72 6f 62 |ologist and prob| 000009e0 61 62 6c 79 20 62 65 74 74 65 72 20 74 68 61 6e |ably better than| 000009f0 20 68 65 20 77 6f 75 6c 64 20 63 61 72 65 20 74 | he would care t| 00000a00 6f 0d 61 64 6d 69 74 2e 20 0d 0d 41 73 20 72 65 |o.admit. ..As re| 00000a10 67 61 72 64 73 20 74 68 65 20 50 52 49 4e 54 20 |gards the PRINT | 00000a20 70 72 6f 67 72 61 6d 20 66 6f 72 20 74 68 65 20 |program for the | 00000a30 6d 6f 6d 65 6e 74 20 70 6c 65 61 73 65 20 64 6f |moment please do| 00000a40 6e 27 74 20 73 65 6c 65 63 74 20 74 68 65 0d 70 |n't select the.p| 00000a50 61 67 65 20 73 6b 69 70 20 6f 70 74 69 6f 6e 1d |age skip option.| 00000a60 0d 0d |..| 00000a62
L/+dimon1.m0
L/+dimon1.m1
L/+dimon1.m2
L/+dimon1.m4
L/+dimon1.m5
.