Home » Personal collection » Acorn tapes » Electron_User » Electron_User_tape15b_acorn_eu_1990_october.wav » R.Patch
R.Patch
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 tapes » Electron_User » Electron_User_tape15b_acorn_eu_1990_october.wav |
| Filename: | R.Patch |
| Read OK: | ✔ |
| File size: | 01A2 bytes |
| Load address: | FFFF1900 |
| Exec address: | FFFF8023 |
Duplicates
There are 3 duplicate copies of this file in the archive:
- AEW website » mu » mu_5_25_discs_Micro_User_08_08_D-MU08_08.ssd » R.Patch
- AEW website » mu » mu_Micro_User_08_08_MU8-8_B.uef » R.Patch
- Personal collection » Acorn tapes » Electron_User » Electron_User_tape15a_acorn_eu_1990_october.wav » R.Patch
- Personal collection » Acorn tapes » Electron_User » Electron_User_tape15b_acorn_eu_1990_october.wav » R.Patch
File contents
10 REM Select American Character Set 20 REM * Epson compatibles only * 30 REM by Chris Lawlor 40 REM (c) The Micro User 50 REM October 1990 60 MODE7:oswrch=&FFEE 70 P%=&C00:[OPT 3 80 LDA #2:JSR oswrch 90 LDA #1:JSR oswrch 100 LDA #27:JSR oswrch 110 LDA #1:JSR oswrch 120 LDA #82:JSR oswrch 130 LDA #1:JSR oswrch 140 LDA #0:JSR oswrch 150 LDA #3:JSR oswrch:RTS:] 160 $&700="SAVE Amercn C00 "+STR$~P% 170 X%=0:Y%=7:CALL &FFF7:END
$ � Select American Character Set ! � * Epson compatibles only * � by Chris Lawlor ( � (c) The Micro User 2 � October 1990 < �7:oswrch=&FFEE F P%=&C00:[OPT 3 P LDA #2:JSR oswrch Z LDA #1:JSR oswrch d LDA #27:JSR oswrch n LDA #1:JSR oswrch x LDA #82:JSR oswrch � LDA #1:JSR oswrch � LDA #0:JSR oswrch � LDA #3:JSR oswrch:RTS:] �" $&700="SAVE Amercn C00 "+�~P% � X%=0:Y%=7:� &FFF7:� �
00000000 0d 00 0a 24 20 f4 20 53 65 6c 65 63 74 20 41 6d |...$ . Select Am| 00000010 65 72 69 63 61 6e 20 43 68 61 72 61 63 74 65 72 |erican Character| 00000020 20 53 65 74 0d 00 14 21 20 f4 20 2a 20 45 70 73 | Set...! . * Eps| 00000030 6f 6e 20 63 6f 6d 70 61 74 69 62 6c 65 73 20 6f |on compatibles o| 00000040 6e 6c 79 20 2a 0d 00 1e 16 20 f4 20 62 79 20 43 |nly *.... . by C| 00000050 68 72 69 73 20 4c 61 77 6c 6f 72 0d 00 28 19 20 |hris Lawlor..(. | 00000060 f4 20 28 63 29 20 54 68 65 20 4d 69 63 72 6f 20 |. (c) The Micro | 00000070 55 73 65 72 0d 00 32 13 20 f4 20 4f 63 74 6f 62 |User..2. . Octob| 00000080 65 72 20 31 39 39 30 0d 00 3c 14 20 eb 37 3a 6f |er 1990..<. .7:o| 00000090 73 77 72 63 68 3d 26 46 46 45 45 0d 00 46 13 20 |swrch=&FFEE..F. | 000000a0 50 25 3d 26 43 30 30 3a 5b 4f 50 54 20 33 0d 00 |P%=&C00:[OPT 3..| 000000b0 50 16 20 4c 44 41 20 23 32 3a 4a 53 52 20 6f 73 |P. LDA #2:JSR os| 000000c0 77 72 63 68 0d 00 5a 16 20 4c 44 41 20 23 31 3a |wrch..Z. LDA #1:| 000000d0 4a 53 52 20 6f 73 77 72 63 68 0d 00 64 17 20 4c |JSR oswrch..d. L| 000000e0 44 41 20 23 32 37 3a 4a 53 52 20 6f 73 77 72 63 |DA #27:JSR oswrc| 000000f0 68 0d 00 6e 16 20 4c 44 41 20 23 31 3a 4a 53 52 |h..n. LDA #1:JSR| 00000100 20 6f 73 77 72 63 68 0d 00 78 17 20 4c 44 41 20 | oswrch..x. LDA | 00000110 23 38 32 3a 4a 53 52 20 6f 73 77 72 63 68 0d 00 |#82:JSR oswrch..| 00000120 82 16 20 4c 44 41 20 23 31 3a 4a 53 52 20 6f 73 |.. LDA #1:JSR os| 00000130 77 72 63 68 0d 00 8c 16 20 4c 44 41 20 23 30 3a |wrch.... LDA #0:| 00000140 4a 53 52 20 6f 73 77 72 63 68 0d 00 96 1c 20 4c |JSR oswrch.... L| 00000150 44 41 20 23 33 3a 4a 53 52 20 6f 73 77 72 63 68 |DA #3:JSR oswrch| 00000160 3a 52 54 53 3a 5d 0d 00 a0 22 20 24 26 37 30 30 |:RTS:]..." $&700| 00000170 3d 22 53 41 56 45 20 41 6d 65 72 63 6e 20 43 30 |="SAVE Amercn C0| 00000180 30 20 22 2b c3 7e 50 25 0d 00 aa 18 20 58 25 3d |0 "+.~P%.... X%=| 00000190 30 3a 59 25 3d 37 3a d6 20 26 46 46 46 37 3a e0 |0:Y%=7:. &FFF7:.| 000001a0 0d ff |..| 000001a2
.