Home » CEEFAX disks » telesoftware10.adl » 08-10-88/TONE1
08-10-88/TONE1
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/TONE1 |
Read OK: | ✔ |
File size: | 01CC bytes |
Load address: | 0800 |
Exec address: | 8023 |
File contents
10REM: TONE1 20osbyte=&FFF4 30DIM mcode &100 40FORpass=0TO2STEP2 50P%=mcode 60[OPT pass 70LDA #&9F \ write to speech processor 80LDY #&44 \ address &74 (TONE1) pointer 90JSR osbyte 100LDY #&47 110JSR osbyte 120LDY #&40 130JSR osbyte 140LDY #&4C 150JSR osbyte 160LDY #&43 170JSR osbyte 180LDA #&9F \ write to speech processor 190LDY #&30 \ read and branch 200JSR osbyte 210LDY #&50 \ speak command 220JMP osbyte \ speak the word and return 230] 240NEXT 250CALL mcode
�: TONE1 osbyte=&FFF4 � mcode &100 (�pass=0�2�2 2P%=mcode < [OPT pass F(LDA #&9F \ write to speech processor P)LDY #&44 \ address &74 (�NE1) pointer ZJSR osbyte dLDY #&47 nJSR osbyte xLDY #&40 �JSR osbyte �LDY #&4C �JSR osbyte �LDY #&43 �JSR osbyte �(LDA #&9F \ write to speech processor �LDY #&30 \ read and branch �JSR osbyte �LDY #&50 \ speak command �*JMP osbyte \ speak the word and return �] �� �� mcode �
00000000 0d 00 0a 0c f4 3a 20 54 4f 4e 45 31 0d 00 14 10 |.....: TONE1....| 00000010 6f 73 62 79 74 65 3d 26 46 46 46 34 0d 00 1e 10 |osbyte=&FFF4....| 00000020 de 20 6d 63 6f 64 65 20 26 31 30 30 0d 00 28 0f |. mcode &100..(.| 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 29 |ch processor..P)| 00000080 4c 44 59 20 23 26 34 34 20 5c 20 61 64 64 72 65 |LDY #&44 \ addre| 00000090 73 73 20 26 37 34 20 28 b8 4e 45 31 29 20 70 6f |ss &74 (.NE1) po| 000000a0 69 6e 74 65 72 0d 00 5a 0e 4a 53 52 20 6f 73 62 |inter..Z.JSR osb| 000000b0 79 74 65 0d 00 64 0c 4c 44 59 20 23 26 34 37 0d |yte..d.LDY #&47.| 000000c0 00 6e 0e 4a 53 52 20 6f 73 62 79 74 65 0d 00 78 |.n.JSR osbyte..x| 000000d0 0c 4c 44 59 20 23 26 34 30 0d 00 82 0e 4a 53 52 |.LDY #&40....JSR| 000000e0 20 6f 73 62 79 74 65 0d 00 8c 0c 4c 44 59 20 23 | osbyte....LDY #| 000000f0 26 34 43 0d 00 96 0e 4a 53 52 20 6f 73 62 79 74 |&4C....JSR osbyt| 00000100 65 0d 00 a0 0c 4c 44 59 20 23 26 34 33 0d 00 aa |e....LDY #&43...| 00000110 0e 4a 53 52 20 6f 73 62 79 74 65 0d 00 b4 28 4c |.JSR osbyte...(L| 00000120 44 41 20 23 26 39 46 20 5c 20 77 72 69 74 65 20 |DA #&9F \ write | 00000130 74 6f 20 73 70 65 65 63 68 20 70 72 6f 63 65 73 |to speech proces| 00000140 73 6f 72 0d 00 be 1e 4c 44 59 20 23 26 33 30 20 |sor....LDY #&30 | 00000150 5c 20 72 65 61 64 20 61 6e 64 20 62 72 61 6e 63 |\ read and branc| 00000160 68 0d 00 c8 0e 4a 53 52 20 6f 73 62 79 74 65 0d |h....JSR osbyte.| 00000170 00 d2 1c 4c 44 59 20 23 26 35 30 20 5c 20 73 70 |...LDY #&50 \ sp| 00000180 65 61 6b 20 63 6f 6d 6d 61 6e 64 0d 00 dc 2a 4a |eak command...*J| 00000190 4d 50 20 6f 73 62 79 74 65 20 5c 20 73 70 65 61 |MP osbyte \ spea| 000001a0 6b 20 74 68 65 20 77 6f 72 64 20 61 6e 64 20 72 |k the word and r| 000001b0 65 74 75 72 6e 0d 00 e6 05 5d 0d 00 f0 05 ed 0d |eturn....]......| 000001c0 00 fa 0b d6 20 6d 63 6f 64 65 0d ff |.... mcode..| 000001cc