Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_27.ADF » L/+UPDAT1

L/+UPDAT1

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_27.ADF
Filename: L/+UPDAT1
Read OK:
File size: 03B4 bytes
Load address: 24204556
Exec address: 2B2E4C2E
File contents
�..>......*.......*.......*.......*.......*.......*.......*.......*.......*.<
                   6 Bollinbrook road, 
                    MACCLESFIELD, 
                     Cheshire. 
                      SK10 3DJ. 
 
Dear All, 
         I don't know how many of you  are actually using the Mode 0
screen  editor I submitted in a previous  issue.You will be glad to hear
that  the new version is currently on the  top of the 'programs to
rewrite' pile. 

   So far I have converted to machine  code the following time critical 
parts,which used to make it quite  obviously painstakingly slow: 
 
1.Locate pixel on screen by sending X  in the range 0 to 639 and Y in the 
range 0 to 255 and converting that to  a screen memory location. 

2.Scan keyboard and move pixel. 
 
   The only remaining parts are: 
1.Drag box 
2.Save innards of box to disk 
 
   So keep your eyes out in future  EUG's for the result. 
                     R.P.Sprowson 
00000000  81 2e 2e 3e 2e 2e 2e 2e  2e 2e 2a 2e 2e 2e 2e 2e  |...>......*.....|
00000010  2e 2e 2a 2e 2e 2e 2e 2e  2e 2e 2a 2e 2e 2e 2e 2e  |..*.......*.....|
*
00000040  2e 2e 2a 2e 2e 2e 2e 2e  2e 2e 2a 2e 3c 0d 20 20  |..*.......*.<.  |
00000050  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000060  20 36 20 42 6f 6c 6c 69  6e 62 72 6f 6f 6b 20 72  | 6 Bollinbrook r|
00000070  6f 61 64 2c 20 0d 20 20  20 20 20 20 20 20 20 20  |oad, .          |
00000080  20 20 20 20 20 20 20 20  20 20 4d 41 43 43 4c 45  |          MACCLE|
00000090  53 46 49 45 4c 44 2c 20  0d 20 20 20 20 20 20 20  |SFIELD, .       |
000000a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 43 68  |              Ch|
000000b0  65 73 68 69 72 65 2e 20  0d 20 20 20 20 20 20 20  |eshire. .       |
000000c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 53  |               S|
000000d0  4b 31 30 20 33 44 4a 2e  20 0d 20 0d 44 65 61 72  |K10 3DJ. . .Dear|
000000e0  20 41 6c 6c 2c 20 0d 20  20 20 20 20 20 20 20 20  | All, .         |
000000f0  49 20 64 6f 6e 27 74 20  6b 6e 6f 77 20 68 6f 77  |I don't know how|
00000100  20 6d 61 6e 79 20 6f 66  20 79 6f 75 20 20 61 72  | many of you  ar|
00000110  65 20 61 63 74 75 61 6c  6c 79 20 75 73 69 6e 67  |e actually using|
00000120  20 74 68 65 20 4d 6f 64  65 20 30 0d 73 63 72 65  | the Mode 0.scre|
00000130  65 6e 20 20 65 64 69 74  6f 72 20 49 20 73 75 62  |en  editor I sub|
00000140  6d 69 74 74 65 64 20 69  6e 20 61 20 70 72 65 76  |mitted in a prev|
00000150  69 6f 75 73 20 20 69 73  73 75 65 2e 59 6f 75 20  |ious  issue.You |
00000160  77 69 6c 6c 20 62 65 20  67 6c 61 64 20 74 6f 20  |will be glad to |
00000170  68 65 61 72 0d 74 68 61  74 20 20 74 68 65 20 6e  |hear.that  the n|
00000180  65 77 20 76 65 72 73 69  6f 6e 20 69 73 20 63 75  |ew version is cu|
00000190  72 72 65 6e 74 6c 79 20  6f 6e 20 74 68 65 20 20  |rrently on the  |
000001a0  74 6f 70 20 6f 66 20 74  68 65 20 27 70 72 6f 67  |top of the 'prog|
000001b0  72 61 6d 73 20 74 6f 0d  72 65 77 72 69 74 65 27  |rams to.rewrite'|
000001c0  20 70 69 6c 65 2e 20 0d  0d 20 20 20 53 6f 20 66  | pile. ..   So f|
000001d0  61 72 20 49 20 68 61 76  65 20 63 6f 6e 76 65 72  |ar I have conver|
000001e0  74 65 64 20 74 6f 20 6d  61 63 68 69 6e 65 20 20  |ted to machine  |
000001f0  63 6f 64 65 20 74 68 65  20 66 6f 6c 6c 6f 77 69  |code the followi|
00000200  6e 67 20 74 69 6d 65 20  63 72 69 74 69 63 61 6c  |ng time critical|
00000210  20 0d 70 61 72 74 73 2c  77 68 69 63 68 20 75 73  | .parts,which us|
00000220  65 64 20 74 6f 20 6d 61  6b 65 20 69 74 20 71 75  |ed to make it qu|
00000230  69 74 65 20 20 6f 62 76  69 6f 75 73 6c 79 20 70  |ite  obviously p|
00000240  61 69 6e 73 74 61 6b 69  6e 67 6c 79 20 73 6c 6f  |ainstakingly slo|
00000250  77 3a 20 0d 20 0d 31 2e  4c 6f 63 61 74 65 20 70  |w: . .1.Locate p|
00000260  69 78 65 6c 20 6f 6e 20  73 63 72 65 65 6e 20 62  |ixel on screen b|
00000270  79 20 73 65 6e 64 69 6e  67 20 58 20 20 69 6e 20  |y sending X  in |
00000280  74 68 65 20 72 61 6e 67  65 20 30 20 74 6f 20 36  |the range 0 to 6|
00000290  33 39 20 61 6e 64 20 59  20 69 6e 20 74 68 65 20  |39 and Y in the |
000002a0  0d 72 61 6e 67 65 20 30  20 74 6f 20 32 35 35 20  |.range 0 to 255 |
000002b0  61 6e 64 20 63 6f 6e 76  65 72 74 69 6e 67 20 74  |and converting t|
000002c0  68 61 74 20 74 6f 20 20  61 20 73 63 72 65 65 6e  |hat to  a screen|
000002d0  20 6d 65 6d 6f 72 79 20  6c 6f 63 61 74 69 6f 6e  | memory location|
000002e0  2e 20 0d 0d 32 2e 53 63  61 6e 20 6b 65 79 62 6f  |. ..2.Scan keybo|
000002f0  61 72 64 20 61 6e 64 20  6d 6f 76 65 20 70 69 78  |ard and move pix|
00000300  65 6c 2e 20 0d 20 0d 20  20 20 54 68 65 20 6f 6e  |el. . .   The on|
00000310  6c 79 20 72 65 6d 61 69  6e 69 6e 67 20 70 61 72  |ly remaining par|
00000320  74 73 20 61 72 65 3a 20  0d 31 2e 44 72 61 67 20  |ts are: .1.Drag |
00000330  62 6f 78 20 0d 32 2e 53  61 76 65 20 69 6e 6e 61  |box .2.Save inna|
00000340  72 64 73 20 6f 66 20 62  6f 78 20 74 6f 20 64 69  |rds of box to di|
00000350  73 6b 20 0d 20 0d 20 20  20 53 6f 20 6b 65 65 70  |sk . .   So keep|
00000360  20 79 6f 75 72 20 65 79  65 73 20 6f 75 74 20 69  | your eyes out i|
00000370  6e 20 66 75 74 75 72 65  20 20 45 55 47 27 73 20  |n future  EUG's |
00000380  66 6f 72 20 74 68 65 20  72 65 73 75 6c 74 2e 20  |for the result. |
00000390  0d 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
000003a0  20 20 20 20 20 20 52 2e  50 2e 53 70 72 6f 77 73  |      R.P.Sprows|
000003b0  6f 6e 20 0d                                       |on .|
000003b4
L/+UPDAT1.m0
L/+UPDAT1.m1
L/+UPDAT1.m2
L/+UPDAT1.m4
L/+UPDAT1.m5