Home » Archimedes archive » Acorn User » AU 1994-02.adf » !StarInfo_StarInfo » Kidd/[!Boot]/!Starter
Kidd/[!Boot]/!Starter
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 » Archimedes archive » Acorn User » AU 1994-02.adf » !StarInfo_StarInfo |
| Filename: | Kidd/[!Boot]/!Starter |
| Read OK: | ✔ |
| File size: | 0214 bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
1REM >!Starter
2REM by Nathan M. Kidd
3REM for 32-bit machines
4REM (c) Acorn User February 1994
5:
6ERROR 1,"This program will not work as supplied - please edit as require"
7:
8CASE INKEY(50) AND &DF OF
9 WHEN ASC"D" : PROCdraw
10 WHEN ASC"I" : PROCimpression
11 WHEN ASC"P" : PROCpcem
12 OTHERWISE : PROCdefault
13ENDCASE
14END
15
16DEF PROCdraw
17*Run <Boot$Dir>.Sequences.Draw
18ENDPROC
19
20DEF PROCimpression
21*Run <Boot$Dir>.Sequences.Impression
22ENDPROC
23
24DEF PROCpcem
25*Run <Boot$Dir>.Sequences.PCem
26ENDPROC
27
28DEF PROCdefault
29*Run <Boot$Dir>.Sequences.FullBoot
30ENDPROC
� >!Starter � by Nathan M. Kidd � for 32-bit machines "� (c) Acorn User February 1994 : I� 1,"This program will not work as supplied - please edit as require" : Ȏ �(50) � &DF � � �"D" : �draw � �"I" : �impression � �"P" : �pcem : �default � � � �draw "*Run <Boot$Dir>.Sequences.Draw � � �impression (*Run <Boot$Dir>.Sequences.Impression � � �pcem "*Run <Boot$Dir>.Sequences.PCem � � �default &*Run <Boot$Dir>.Sequences.FullBoot � �
00000000 0d 00 01 11 f4 20 20 20 3e 21 53 74 61 72 74 65 |..... >!Starte| 00000010 72 0d 00 02 18 f4 20 62 79 20 20 4e 61 74 68 61 |r..... by Natha| 00000020 6e 20 4d 2e 20 4b 69 64 64 0d 00 03 19 f4 20 66 |n M. Kidd..... f| 00000030 6f 72 20 33 32 2d 62 69 74 20 6d 61 63 68 69 6e |or 32-bit machin| 00000040 65 73 0d 00 04 22 f4 20 28 63 29 20 41 63 6f 72 |es...". (c) Acor| 00000050 6e 20 55 73 65 72 20 46 65 62 72 75 61 72 79 20 |n User February | 00000060 31 39 39 34 0d 00 05 05 3a 0d 00 06 49 85 20 31 |1994....:...I. 1| 00000070 2c 22 54 68 69 73 20 70 72 6f 67 72 61 6d 20 77 |,"This program w| 00000080 69 6c 6c 20 6e 6f 74 20 77 6f 72 6b 20 61 73 20 |ill not work as | 00000090 73 75 70 70 6c 69 65 64 20 2d 20 70 6c 65 61 73 |supplied - pleas| 000000a0 65 20 65 64 69 74 20 61 73 20 72 65 71 75 69 72 |e edit as requir| 000000b0 65 22 0d 00 07 05 3a 0d 00 08 14 c8 8e 20 a6 28 |e"....:...... .(| 000000c0 35 30 29 20 80 20 26 44 46 20 ca 0d 00 09 13 20 |50) . &DF ..... | 000000d0 c9 20 97 22 44 22 20 3a 20 f2 64 72 61 77 0d 00 |. ."D" : .draw..| 000000e0 0a 19 20 c9 20 97 22 49 22 20 3a 20 f2 69 6d 70 |.. . ."I" : .imp| 000000f0 72 65 73 73 69 6f 6e 0d 00 0b 13 20 c9 20 97 22 |ression.... . ."| 00000100 50 22 20 3a 20 f2 70 63 65 6d 0d 00 0c 13 20 7f |P" : .pcem.... .| 00000110 20 20 20 3a 20 f2 64 65 66 61 75 6c 74 0d 00 0d | : .default...| 00000120 05 cb 0d 00 0e 05 e0 0d 00 0f 04 0d 00 10 0b dd |................| 00000130 20 f2 64 72 61 77 0d 00 11 22 2a 52 75 6e 20 3c | .draw..."*Run <| 00000140 42 6f 6f 74 24 44 69 72 3e 2e 53 65 71 75 65 6e |Boot$Dir>.Sequen| 00000150 63 65 73 2e 44 72 61 77 0d 00 12 05 e1 0d 00 13 |ces.Draw........| 00000160 04 0d 00 14 11 dd 20 f2 69 6d 70 72 65 73 73 69 |...... .impressi| 00000170 6f 6e 0d 00 15 28 2a 52 75 6e 20 3c 42 6f 6f 74 |on...(*Run <Boot| 00000180 24 44 69 72 3e 2e 53 65 71 75 65 6e 63 65 73 2e |$Dir>.Sequences.| 00000190 49 6d 70 72 65 73 73 69 6f 6e 0d 00 16 05 e1 0d |Impression......| 000001a0 00 17 04 0d 00 18 0b dd 20 f2 70 63 65 6d 0d 00 |........ .pcem..| 000001b0 19 22 2a 52 75 6e 20 3c 42 6f 6f 74 24 44 69 72 |."*Run <Boot$Dir| 000001c0 3e 2e 53 65 71 75 65 6e 63 65 73 2e 50 43 65 6d |>.Sequences.PCem| 000001d0 0d 00 1a 05 e1 0d 00 1b 04 0d 00 1c 0e dd 20 f2 |.............. .| 000001e0 64 65 66 61 75 6c 74 0d 00 1d 26 2a 52 75 6e 20 |default...&*Run | 000001f0 3c 42 6f 6f 74 24 44 69 72 3e 2e 53 65 71 75 65 |<Boot$Dir>.Seque| 00000200 6e 63 65 73 2e 46 75 6c 6c 42 6f 6f 74 0d 00 1e |nces.FullBoot...| 00000210 05 e1 0d ff |....| 00000214
.