Home » CEEFAX disks » telesoftware7.adl » 10-06-88/MENU
10-06-88/MENU
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 » telesoftware7.adl |
| Filename: | 10-06-88/MENU |
| Read OK: | ✔ |
| File size: | 019B bytes |
| Load address: | FFFF0E00 |
| Exec address: | FFFF802B |
File contents
10MODE7 15T$="THE MULTI-SPIRO" 20FORX%=0TO1:PRINTCHR$135;CHR$157;CHR$129;CHR$141;TAB(21-(LEN(T$)/2),X%);T$:NEXT 25PRINTTAB(3,4);"�1 _ Introduction" 30PRINTTAB(3,6);"�2 _ The Multi-Spiro" 35PRINTTAB(3,8);"�3 _ Two wheel demo. (Basic) " 40PRINTTAB(3,10);"�4 _ Two wheel demo. (Machine code) " 55PRINTTAB(0,23);CHR$129;CHR$157;CHR$135;CHR$136;"Enter number of program required"; 60REPEAT:A=GET-48:UNTILA>0 AND A<5 65GOTOA*100 70END 100CHAIN"MULTIS" 200CHAIN"MULTS2" 300CHAIN"MULTS3" 400CHAIN"MULTS4"
�7 T$="THE MULTI-SPIRO" 7�X%=0�1:�135;�157;�129;�141;�21-(�(T$)/2),X%);T$:� �3,4);"�1 _ Introduction" %�3,6);"�2 _ The Multi-Spiro" #-�3,8);"�3 _ Two wheel demo. (Basic) " (4�3,10);"�4 _ Two wheel demo. (Machine code) " 7C�0,23);�129;�157;�135;�136;"Enter number of program required"; <�:A=�-48:�A>0 � A<5 A �A*100 F� d �"MULTIS" � �"MULTS2" , �"MULTS3" � �"MULTS4" �
00000000 0d 00 0a 06 eb 37 0d 00 0f 1a 54 24 3d 22 54 48 |.....7....T$="TH| 00000010 45 20 4d 55 4c 54 49 2d 53 50 49 52 4f 22 20 20 |E MULTI-SPIRO" | 00000020 0d 00 14 37 e3 58 25 3d 30 b8 31 3a f1 bd 31 33 |...7.X%=0.1:..13| 00000030 35 3b bd 31 35 37 3b bd 31 32 39 3b bd 31 34 31 |5;.157;.129;.141| 00000040 3b 8a 32 31 2d 28 a9 28 54 24 29 2f 32 29 2c 58 |;.21-(.(T$)/2),X| 00000050 25 29 3b 54 24 3a ed 0d 00 19 1f f1 8a 33 2c 34 |%);T$:.......3,4| 00000060 29 3b 22 83 31 20 5f 20 49 6e 74 72 6f 64 75 63 |);".1 _ Introduc| 00000070 74 69 6f 6e 22 20 0d 00 1e 25 f1 8a 33 2c 36 29 |tion" ...%..3,6)| 00000080 3b 22 82 32 20 5f 20 54 68 65 20 4d 75 6c 74 69 |;".2 _ The Multi| 00000090 2d 53 70 69 72 6f 22 20 20 20 20 0d 00 23 2d f1 |-Spiro" ..#-.| 000000a0 8a 33 2c 38 29 3b 22 86 33 20 5f 20 54 77 6f 20 |.3,8);".3 _ Two | 000000b0 77 68 65 65 6c 20 64 65 6d 6f 2e 20 28 42 61 73 |wheel demo. (Bas| 000000c0 69 63 29 20 22 20 20 20 0d 00 28 34 f1 8a 33 2c |ic) " ..(4..3,| 000000d0 31 30 29 3b 22 85 34 20 5f 20 54 77 6f 20 77 68 |10);".4 _ Two wh| 000000e0 65 65 6c 20 64 65 6d 6f 2e 20 28 4d 61 63 68 69 |eel demo. (Machi| 000000f0 6e 65 20 63 6f 64 65 29 20 22 20 20 0d 00 37 43 |ne code) " ..7C| 00000100 f1 8a 30 2c 32 33 29 3b bd 31 32 39 3b bd 31 35 |..0,23);.129;.15| 00000110 37 3b bd 31 33 35 3b bd 31 33 36 3b 22 45 6e 74 |7;.135;.136;"Ent| 00000120 65 72 20 6e 75 6d 62 65 72 20 6f 66 20 70 72 6f |er number of pro| 00000130 67 72 61 6d 20 72 65 71 75 69 72 65 64 22 3b 0d |gram required";.| 00000140 00 3c 17 f5 3a 41 3d a5 2d 34 38 3a fd 41 3e 30 |.<..:A=.-48:.A>0| 00000150 20 80 20 41 3c 35 0d 00 41 0a e5 41 2a 31 30 30 | . A<5..A..A*100| 00000160 0d 00 46 05 e0 0d 00 64 0d d7 22 4d 55 4c 54 49 |..F....d.."MULTI| 00000170 53 22 0d 00 c8 0d d7 22 4d 55 4c 54 53 32 22 0d |S"....."MULTS2".| 00000180 01 2c 0d d7 22 4d 55 4c 54 53 33 22 0d 01 90 0d |.,.."MULTS3"....| 00000190 d7 22 4d 55 4c 54 53 34 22 0d ff |."MULTS4"..| 0000019b
.