Home » CEEFAX disks » telesoftware10.adl » 08-10-88/PENCE
08-10-88/PENCE
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 » CEEFAX disks » telesoftware10.adl |
Filename: | 08-10-88/PENCE |
Read OK: | ✔ |
File size: | 0179 bytes |
Load address: | 0800 |
Exec address: | 8023 |
File contents
10REM: PENCE 20DIM mcode &100 30osbyte=&FFF4 40FORpass=0TO2STEP2 50P%=mcode 60[OPT pass 70LDA #&9F \ write to speech processor 80LDY #&48 \ address &2B58 "pence" 90JSR osbyte 100LDY #&45 110JSR osbyte 120LDY #&4B 130JSR osbyte 140LDY #&4E 150JSR osbyte 160LDY #&43 170JSR osbyte 180LDY #&50 \ speak command 190JMP osbyte \ say "pence" and return to BASIC 200] 210NEXT 220CALL mcode
�: PENCE � mcode &100 osbyte=&FFF4 (�pass=0�2�2 2P%=mcode < [OPT pass F(LDA #&9F \ write to speech processor P$LDY #&48 \ address &2B58 "pence" ZJSR osbyte dLDY #&45 nJSR osbyte xLDY #&4B �JSR osbyte �LDY #&4E �JSR osbyte �LDY #&43 �JSR osbyte �LDY #&50 \ speak command �0JMP osbyte \ say "pence" and return to BASIC �] �� �� mcode �
00000000 0d 00 0a 0c f4 3a 20 50 45 4e 43 45 0d 00 14 10 |.....: PENCE....| 00000010 de 20 6d 63 6f 64 65 20 26 31 30 30 0d 00 1e 10 |. mcode &100....| 00000020 6f 73 62 79 74 65 3d 26 46 46 46 34 0d 00 28 0f |osbyte=&FFF4..(.| 00000030 e3 70 61 73 73 3d 30 b8 32 88 32 0d 00 32 0c 50 |.pass=0.2.2..2.P| 00000040 25 3d 6d 63 6f 64 65 0d 00 3c 0d 5b 4f 50 54 20 |%=mcode..<.[OPT | 00000050 70 61 73 73 0d 00 46 28 4c 44 41 20 23 26 39 46 |pass..F(LDA #&9F| 00000060 20 5c 20 77 72 69 74 65 20 74 6f 20 73 70 65 65 | \ write to spee| 00000070 63 68 20 70 72 6f 63 65 73 73 6f 72 0d 00 50 24 |ch processor..P$| 00000080 4c 44 59 20 23 26 34 38 20 5c 20 61 64 64 72 65 |LDY #&48 \ addre| 00000090 73 73 20 26 32 42 35 38 20 22 70 65 6e 63 65 22 |ss &2B58 "pence"| 000000a0 0d 00 5a 0e 4a 53 52 20 6f 73 62 79 74 65 0d 00 |..Z.JSR osbyte..| 000000b0 64 0c 4c 44 59 20 23 26 34 35 0d 00 6e 0e 4a 53 |d.LDY #&45..n.JS| 000000c0 52 20 6f 73 62 79 74 65 0d 00 78 0c 4c 44 59 20 |R osbyte..x.LDY | 000000d0 23 26 34 42 0d 00 82 0e 4a 53 52 20 6f 73 62 79 |#&4B....JSR osby| 000000e0 74 65 0d 00 8c 0c 4c 44 59 20 23 26 34 45 0d 00 |te....LDY #&4E..| 000000f0 96 0e 4a 53 52 20 6f 73 62 79 74 65 0d 00 a0 0c |..JSR osbyte....| 00000100 4c 44 59 20 23 26 34 33 0d 00 aa 0e 4a 53 52 20 |LDY #&43....JSR | 00000110 6f 73 62 79 74 65 0d 00 b4 1c 4c 44 59 20 23 26 |osbyte....LDY #&| 00000120 35 30 20 5c 20 73 70 65 61 6b 20 63 6f 6d 6d 61 |50 \ speak comma| 00000130 6e 64 0d 00 be 30 4a 4d 50 20 6f 73 62 79 74 65 |nd...0JMP osbyte| 00000140 20 5c 20 73 61 79 20 22 70 65 6e 63 65 22 20 61 | \ say "pence" a| 00000150 6e 64 20 72 65 74 75 72 6e 20 74 6f 20 42 41 53 |nd return to BAS| 00000160 49 43 0d 00 c8 05 5d 0d 00 d2 05 ed 0d 00 dc 0b |IC....].........| 00000170 d6 20 6d 63 6f 64 65 0d ff |. mcode..| 00000179