Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_33.ADF » L/+HALL1
L/+HALL1
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_33.ADF |
| Filename: | L/+HALL1 |
| Read OK: | ✔ |
| File size: | 080F bytes |
| Load address: | 2B204556 |
| Exec address: | 4C4C4148 |
File contents
Dear Gus Enclosed is a further cheque for #6.00, hope this is OK. Re the Lottery Program Suite, I have used Wordwise+ for years so your request for a letter on disc in View doesn't turn me on, particularly. Anyway, here goes! Some time ago my Granddaughters heard me say that a program could be written to download the Lottery results from Teletext. The demand then was 'DO IT!'. Having done this has simply meant that I was continually being called upon to do more and more, like printing out a range of results, showing consecutive appearances of numbers, occurrence of number sequences, numbers appearing max or min times, adding a week's numbers manually and even picking six numbers randomly. The suite nearly 30000 bytes is on DFS DS discs, and it runs entirely in mode 7 because both girls have BBCs and memory is critical, so it will run on the Beeb or Master but not Electron. Of course each program caused its own problems, and the whole suite has been linked by user friendly menus and error checking has given much additional code. Some of the algorythms are my own entirely to solve situations which arose, while much is standard BASIC stuff. The suite was near enough complete when Wednesday Lottery inserted further problems. I am quite certain that further demands on the suite will be made as long as I am prepared to have a go. However, it is now at the stage where others could perhaps find a use for it? Quite obviouslu I have spent considerable time on this suite, and I would therefore not wish to simply give it away. I would therefore wish to arrange a small cash or WHY in excess of the cost of disc, copying and p&p. If anyone is interested simply drop me a line or ring me. The current Lottery file will be up to date. A. Hall 7, Hardman Close, Knuzden Blackburn Lancs BB1 2DT SORRY ABOUT SAYING VIEW, I USED IT GENERACALLY LIKE SAYING HOVER THE CARPET OR ELECTRON A LETTER, BEEB A LETTER??, WHAT DOES THAT MEAN? WORDWISE AND ANY OTHER WORDPROCESSOR IS FINE. INFACT ANYTHING IS FINE SO LONG AS MEMBERS SEND SOMETHING.
00000000 44 65 61 72 20 47 75 73 0d 0d 45 6e 63 6c 6f 73 |Dear Gus..Enclos| 00000010 65 64 20 69 73 20 61 20 66 75 72 74 68 65 72 20 |ed is a further | 00000020 63 68 65 71 75 65 20 66 6f 72 20 23 36 2e 30 30 |cheque for #6.00| 00000030 2c 20 68 6f 70 65 20 74 68 69 73 20 69 73 20 4f |, hope this is O| 00000040 4b 2e 0d 0d 52 65 20 74 68 65 20 4c 6f 74 74 65 |K...Re the Lotte| 00000050 72 79 20 50 72 6f 67 72 61 6d 20 53 75 69 74 65 |ry Program Suite| 00000060 2c 20 49 20 68 61 76 65 20 75 73 65 64 20 57 6f |, I have used Wo| 00000070 72 64 77 69 73 65 2b 20 66 6f 72 20 79 65 61 72 |rdwise+ for year| 00000080 73 20 73 6f 20 79 6f 75 72 0d 72 65 71 75 65 73 |s so your.reques| 00000090 74 20 66 6f 72 20 61 20 6c 65 74 74 65 72 20 6f |t for a letter o| 000000a0 6e 20 64 69 73 63 20 69 6e 20 56 69 65 77 20 64 |n disc in View d| 000000b0 6f 65 73 6e 27 74 20 74 75 72 6e 20 6d 65 20 6f |oesn't turn me o| 000000c0 6e 2c 20 70 61 72 74 69 63 75 6c 61 72 6c 79 2e |n, particularly.| 000000d0 0d 0d 41 6e 79 77 61 79 2c 20 68 65 72 65 20 67 |..Anyway, here g| 000000e0 6f 65 73 21 0d 0d 53 6f 6d 65 20 74 69 6d 65 20 |oes!..Some time | 000000f0 61 67 6f 20 6d 79 20 47 72 61 6e 64 64 61 75 67 |ago my Granddaug| 00000100 68 74 65 72 73 20 68 65 61 72 64 20 6d 65 20 73 |hters heard me s| 00000110 61 79 20 74 68 61 74 20 61 20 70 72 6f 67 72 61 |ay that a progra| 00000120 6d 20 63 6f 75 6c 64 20 62 65 0d 77 72 69 74 74 |m could be.writt| 00000130 65 6e 20 74 6f 20 64 6f 77 6e 6c 6f 61 64 20 74 |en to download t| 00000140 68 65 20 4c 6f 74 74 65 72 79 20 72 65 73 75 6c |he Lottery resul| 00000150 74 73 20 66 72 6f 6d 20 54 65 6c 65 74 65 78 74 |ts from Teletext| 00000160 2e 20 54 68 65 20 64 65 6d 61 6e 64 20 74 68 65 |. The demand the| 00000170 6e 20 77 61 73 0d 27 44 4f 20 49 54 21 27 2e 0d |n was.'DO IT!'..| 00000180 0d 48 61 76 69 6e 67 20 64 6f 6e 65 20 74 68 69 |.Having done thi| 00000190 73 20 20 68 61 73 20 73 69 6d 70 6c 79 20 6d 65 |s has simply me| 000001a0 61 6e 74 20 74 68 61 74 20 49 20 77 61 73 20 63 |ant that I was c| 000001b0 6f 6e 74 69 6e 75 61 6c 6c 79 20 62 65 69 6e 67 |ontinually being| 000001c0 20 63 61 6c 6c 65 64 0d 75 70 6f 6e 20 74 6f 20 | called.upon to | 000001d0 64 6f 20 6d 6f 72 65 20 61 6e 64 20 6d 6f 72 65 |do more and more| 000001e0 2c 20 6c 69 6b 65 20 70 72 69 6e 74 69 6e 67 20 |, like printing | 000001f0 6f 75 74 20 61 20 72 61 6e 67 65 20 6f 66 20 72 |out a range of r| 00000200 65 73 75 6c 74 73 2c 20 73 68 6f 77 69 6e 67 0d |esults, showing.| 00000210 63 6f 6e 73 65 63 75 74 69 76 65 20 61 70 70 65 |consecutive appe| 00000220 61 72 61 6e 63 65 73 20 6f 66 20 6e 75 6d 62 65 |arances of numbe| 00000230 72 73 2c 20 6f 63 63 75 72 72 65 6e 63 65 20 6f |rs, occurrence o| 00000240 66 20 20 6e 75 6d 62 65 72 20 73 65 71 75 65 6e |f number sequen| 00000250 63 65 73 2c 0d 6e 75 6d 62 65 72 73 20 61 70 70 |ces,.numbers app| 00000260 65 61 72 69 6e 67 20 6d 61 78 20 6f 72 20 6d 69 |earing max or mi| 00000270 6e 20 74 69 6d 65 73 2c 20 61 64 64 69 6e 67 20 |n times, adding | 00000280 61 20 77 65 65 6b 27 73 20 6e 75 6d 62 65 72 73 |a week's numbers| 00000290 20 6d 61 6e 75 61 6c 6c 79 20 61 6e 64 0d 65 76 | manually and.ev| 000002a0 65 6e 20 70 69 63 6b 69 6e 67 20 73 69 78 20 6e |en picking six n| 000002b0 75 6d 62 65 72 73 20 72 61 6e 64 6f 6d 6c 79 2e |umbers randomly.| 000002c0 0d 20 0d 54 68 65 20 73 75 69 74 65 20 6e 65 61 |. .The suite nea| 000002d0 72 6c 79 20 33 30 30 30 30 20 62 79 74 65 73 20 |rly 30000 bytes | 000002e0 69 73 20 6f 6e 20 44 46 53 20 44 53 20 64 69 73 |is on DFS DS dis| 000002f0 63 73 2c 20 61 6e 64 20 69 74 20 72 75 6e 73 20 |cs, and it runs | 00000300 65 6e 74 69 72 65 6c 79 20 69 6e 0d 6d 6f 64 65 |entirely in.mode| 00000310 20 37 20 62 65 63 61 75 73 65 20 62 6f 74 68 20 | 7 because both | 00000320 67 69 72 6c 73 20 68 61 76 65 20 20 42 42 43 73 |girls have BBCs| 00000330 20 61 6e 64 20 6d 65 6d 6f 72 79 20 69 73 20 63 | and memory is c| 00000340 72 69 74 69 63 61 6c 2c 20 73 6f 20 69 74 20 20 |ritical, so it | 00000350 77 69 6c 6c 0d 72 75 6e 20 6f 6e 20 74 68 65 20 |will.run on the | 00000360 42 65 65 62 20 6f 72 20 4d 61 73 74 65 72 20 62 |Beeb or Master b| 00000370 75 74 20 6e 6f 74 20 45 6c 65 63 74 72 6f 6e 2e |ut not Electron.| 00000380 20 0d 0d 4f 66 20 63 6f 75 72 73 65 20 65 61 63 | ..Of course eac| 00000390 68 20 70 72 6f 67 72 61 6d 20 63 61 75 73 65 64 |h program caused| 000003a0 20 69 74 73 20 6f 77 6e 20 70 72 6f 62 6c 65 6d | its own problem| 000003b0 73 2c 20 61 6e 64 20 74 68 65 20 77 68 6f 6c 65 |s, and the whole| 000003c0 20 73 75 69 74 65 20 68 61 73 0d 62 65 65 6e 20 | suite has.been | 000003d0 6c 69 6e 6b 65 64 20 62 79 20 75 73 65 72 20 66 |linked by user f| 000003e0 72 69 65 6e 64 6c 79 20 6d 65 6e 75 73 20 61 6e |riendly menus an| 000003f0 64 20 65 72 72 6f 72 20 63 68 65 63 6b 69 6e 67 |d error checking| 00000400 20 68 61 73 20 67 69 76 65 6e 20 6d 75 63 68 0d | has given much.| 00000410 61 64 64 69 74 69 6f 6e 61 6c 20 63 6f 64 65 2e |additional code.| 00000420 20 53 6f 6d 65 20 6f 66 20 74 68 65 20 61 6c 67 | Some of the alg| 00000430 6f 72 79 74 68 6d 73 20 61 72 65 20 6d 79 20 6f |orythms are my o| 00000440 77 6e 20 65 6e 74 69 72 65 6c 79 20 74 6f 20 73 |wn entirely to s| 00000450 6f 6c 76 65 0d 73 69 74 75 61 74 69 6f 6e 73 20 |olve.situations | 00000460 77 68 69 63 68 20 61 72 6f 73 65 2c 20 77 68 69 |which arose, whi| 00000470 6c 65 20 6d 75 63 68 20 69 73 20 73 74 61 6e 64 |le much is stand| 00000480 61 72 64 20 42 41 53 49 43 20 73 74 75 66 66 2e |ard BASIC stuff.| 00000490 0d 0d 54 68 65 20 73 75 69 74 65 20 77 61 73 20 |..The suite was | 000004a0 6e 65 61 72 20 65 6e 6f 75 67 68 20 63 6f 6d 70 |near enough comp| 000004b0 6c 65 74 65 20 77 68 65 6e 20 57 65 64 6e 65 73 |lete when Wednes| 000004c0 64 61 79 20 4c 6f 74 74 65 72 79 20 69 6e 73 65 |day Lottery inse| 000004d0 72 74 65 64 20 66 75 72 74 68 65 72 0d 70 72 6f |rted further.pro| 000004e0 62 6c 65 6d 73 2e 20 49 20 61 6d 20 71 75 69 74 |blems. I am quit| 000004f0 65 20 63 65 72 74 61 69 6e 20 74 68 61 74 20 66 |e certain that f| 00000500 75 72 74 68 65 72 20 64 65 6d 61 6e 64 73 20 6f |urther demands o| 00000510 6e 20 74 68 65 20 73 75 69 74 65 20 77 69 6c 6c |n the suite will| 00000520 20 62 65 0d 6d 61 64 65 20 61 73 20 6c 6f 6e 67 | be.made as long| 00000530 20 61 73 20 49 20 61 6d 20 70 72 65 70 61 72 65 | as I am prepare| 00000540 64 20 74 6f 20 68 61 76 65 20 61 20 67 6f 2e 20 |d to have a go. | 00000550 48 6f 77 65 76 65 72 2c 20 69 74 20 69 73 20 6e |However, it is n| 00000560 6f 77 20 61 74 20 74 68 65 0d 73 74 61 67 65 20 |ow at the.stage | 00000570 77 68 65 72 65 20 6f 74 68 65 72 73 20 63 6f 75 |where others cou| 00000580 6c 64 20 70 65 72 68 61 70 73 20 66 69 6e 64 20 |ld perhaps find | 00000590 61 20 75 73 65 20 66 6f 72 20 69 74 3f 0d 0d 51 |a use for it?..Q| 000005a0 75 69 74 65 20 6f 62 76 69 6f 75 73 6c 75 20 49 |uite obviouslu I| 000005b0 20 68 61 76 65 20 73 70 65 6e 74 20 63 6f 6e 73 | have spent cons| 000005c0 69 64 65 72 61 62 6c 65 20 74 69 6d 65 20 6f 6e |iderable time on| 000005d0 20 74 68 69 73 20 73 75 69 74 65 2c 20 61 6e 64 | this suite, and| 000005e0 20 49 20 77 6f 75 6c 64 0d 74 68 65 72 65 66 6f | I would.therefo| 000005f0 72 65 20 6e 6f 74 20 77 69 73 68 20 74 6f 20 73 |re not wish to s| 00000600 69 6d 70 6c 79 20 67 69 76 65 20 69 74 20 61 77 |imply give it aw| 00000610 61 79 2e 20 49 20 77 6f 75 6c 64 20 74 68 65 72 |ay. I would ther| 00000620 65 66 6f 72 65 20 77 69 73 68 20 74 6f 0d 61 72 |efore wish to.ar| 00000630 72 61 6e 67 65 20 61 20 73 6d 61 6c 6c 20 63 61 |range a small ca| 00000640 73 68 20 6f 72 20 57 48 59 20 69 6e 20 65 78 63 |sh or WHY in exc| 00000650 65 73 73 20 6f 66 20 74 68 65 20 63 6f 73 74 20 |ess of the cost | 00000660 6f 66 20 64 69 73 63 2c 20 63 6f 70 79 69 6e 67 |of disc, copying| 00000670 20 61 6e 64 0d 70 26 70 2e 20 49 66 20 61 6e 79 | and.p&p. If any| 00000680 6f 6e 65 20 69 73 20 69 6e 74 65 72 65 73 74 65 |one is intereste| 00000690 64 20 73 69 6d 70 6c 79 20 64 72 6f 70 20 6d 65 |d simply drop me| 000006a0 20 61 20 6c 69 6e 65 20 6f 72 20 72 69 6e 67 20 | a line or ring | 000006b0 6d 65 2e 20 54 68 65 20 63 75 72 72 65 6e 74 0d |me. The current.| 000006c0 4c 6f 74 74 65 72 79 20 66 69 6c 65 20 77 69 6c |Lottery file wil| 000006d0 6c 20 62 65 20 75 70 20 74 6f 20 64 61 74 65 2e |l be up to date.| 000006e0 0d 0d 41 2e 20 48 61 6c 6c 0d 37 2c 20 48 61 72 |..A. Hall.7, Har| 000006f0 64 6d 61 6e 20 43 6c 6f 73 65 2c 0d 4b 6e 75 7a |dman Close,.Knuz| 00000700 64 65 6e 0d 42 6c 61 63 6b 62 75 72 6e 0d 4c 61 |den.Blackburn.La| 00000710 6e 63 73 0d 42 42 31 20 32 44 54 0d 0d 53 4f 52 |ncs.BB1 2DT..SOR| 00000720 52 59 20 41 42 4f 55 54 20 53 41 59 49 4e 47 20 |RY ABOUT SAYING | 00000730 56 49 45 57 2c 20 49 20 55 53 45 44 20 49 54 20 |VIEW, I USED IT | 00000740 47 45 4e 45 52 41 43 41 4c 4c 59 20 4c 49 4b 45 |GENERACALLY LIKE| 00000750 20 53 41 59 49 4e 47 20 48 4f 56 45 52 20 54 48 | SAYING HOVER TH| 00000760 45 0d 43 41 52 50 45 54 20 4f 52 20 45 4c 45 43 |E.CARPET OR ELEC| 00000770 54 52 4f 4e 20 41 20 4c 45 54 54 45 52 2c 20 42 |TRON A LETTER, B| 00000780 45 45 42 20 41 20 4c 45 54 54 45 52 3f 3f 2c 20 |EEB A LETTER??, | 00000790 57 48 41 54 20 44 4f 45 53 20 54 48 41 54 20 4d |WHAT DOES THAT M| 000007a0 45 41 4e 3f 0d 0d 57 4f 52 44 57 49 53 45 20 41 |EAN?..WORDWISE A| 000007b0 4e 44 20 41 4e 59 20 4f 54 48 45 52 20 57 4f 52 |ND ANY OTHER WOR| 000007c0 44 50 52 4f 43 45 53 53 4f 52 20 49 53 20 46 49 |DPROCESSOR IS FI| 000007d0 4e 45 2e 20 49 4e 46 41 43 54 20 41 4e 59 54 48 |NE. INFACT ANYTH| 000007e0 49 4e 47 20 49 53 20 46 49 4e 45 20 53 4f 0d 4c |ING IS FINE SO.L| 000007f0 4f 4e 47 20 41 53 20 4d 45 4d 42 45 52 53 20 53 |ONG AS MEMBERS S| 00000800 45 4e 44 20 53 4f 4d 45 54 48 49 4e 47 2e 0d |END SOMETHING..| 0000080f
L/+HALL1.m0
L/+HALL1.m1
L/+HALL1.m2
L/+HALL1.m4
L/+HALL1.m5
.