Home » Recent acquisitions » Acorn ADFS disks » adfs_AcornUser_199801_2.adf » Regulars2 » StarInfo/Fletcher/!Setup/Files/Script
StarInfo/Fletcher/!Setup/Files/Script
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 » Recent acquisitions » Acorn ADFS disks » adfs_AcornUser_199801_2.adf » Regulars2 |
| Filename: | StarInfo/Fletcher/!Setup/Files/Script |
| Read OK: | ✔ |
| File size: | 0559 bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
NAME NetGame v1.02 | The first line must set the title of the window... SWAPDISC Disc1 Please insert disc 1 or drag the original !Setup directory here. |FAST | We want confirmation NEWER | We start off with a quick message MESSAGE This application will install Justin Fletcher's NetGame library. IF PreRPC CHOICE 2 Yes No 1 Are you using a RiscPC boot sequence ? IF RPC SET 1 1 IF 1 = 1 GOSUB RiscPC IF 1 = 2 GOSUB Older NAME Installing NetGame v1.02 INSTALL !NetGame CHDIR <System$Dir>.Modules.Network COPY <Setup$Dir>.Files.Program.NetGame.!NetGame.IServices <System$Dir>.Modules.Network.IServices NAME Network games OPTIONS 2 NetOXO NetC4 2 Which games do you want to install ? IF 1 = 1 GOSUB GetRiscPCDir IF 1 = 2 SET LEAF Games IF 2 AND 1<<1 NAME Installing Network games (NetOXO) IF 2 AND 1<<1 INSTALL !NetOXO IF 2 AND 1<<2 NAME Installing Network games (NetC4) IF 2 AND 1<<2 INSTALL !NetC4 NAME Installation complete MESSAGE Installation is now complete END :RiscPC | RiscPC boot sequence installation SET DEST Boot:Resources SET LEAF NetGame RETURN :Older | Older machines install it in a single directory GETDIR NetGame Where do you want NetGame installing ? RETURN :GetRiscPCDir | RiscPC's have installed it in their Resources, so we've got to ask where | they want the applications GETDIR Games Where do you want the games installing ? RETURN
00000000 4e 41 4d 45 20 4e 65 74 47 61 6d 65 20 76 31 2e |NAME NetGame v1.| 00000010 30 32 0a 7c 20 54 68 65 20 66 69 72 73 74 20 6c |02.| The first l| 00000020 69 6e 65 20 6d 75 73 74 20 73 65 74 20 74 68 65 |ine must set the| 00000030 20 74 69 74 6c 65 20 6f 66 20 74 68 65 20 77 69 | title of the wi| 00000040 6e 64 6f 77 2e 2e 2e 0a 0a 53 57 41 50 44 49 53 |ndow.....SWAPDIS| 00000050 43 20 44 69 73 63 31 20 50 6c 65 61 73 65 20 69 |C Disc1 Please i| 00000060 6e 73 65 72 74 20 64 69 73 63 20 31 20 6f 72 20 |nsert disc 1 or | 00000070 64 72 61 67 20 74 68 65 20 6f 72 69 67 69 6e 61 |drag the origina| 00000080 6c 20 21 53 65 74 75 70 20 64 69 72 65 63 74 6f |l !Setup directo| 00000090 72 79 20 68 65 72 65 2e 0a 0a 7c 46 41 53 54 0a |ry here...|FAST.| 000000a0 0a 7c 20 57 65 20 77 61 6e 74 20 63 6f 6e 66 69 |.| We want confi| 000000b0 72 6d 61 74 69 6f 6e 0a 4e 45 57 45 52 0a 0a 7c |rmation.NEWER..|| 000000c0 20 57 65 20 73 74 61 72 74 20 6f 66 66 20 77 69 | We start off wi| 000000d0 74 68 20 61 20 71 75 69 63 6b 20 6d 65 73 73 61 |th a quick messa| 000000e0 67 65 0a 4d 45 53 53 41 47 45 20 54 68 69 73 20 |ge.MESSAGE This | 000000f0 61 70 70 6c 69 63 61 74 69 6f 6e 20 77 69 6c 6c |application will| 00000100 20 69 6e 73 74 61 6c 6c 20 4a 75 73 74 69 6e 20 | install Justin | 00000110 46 6c 65 74 63 68 65 72 27 73 20 4e 65 74 47 61 |Fletcher's NetGa| 00000120 6d 65 20 6c 69 62 72 61 72 79 2e 0a 0a 49 46 20 |me library...IF | 00000130 50 72 65 52 50 43 20 43 48 4f 49 43 45 20 32 20 |PreRPC CHOICE 2 | 00000140 59 65 73 20 4e 6f 20 31 20 41 72 65 20 79 6f 75 |Yes No 1 Are you| 00000150 20 75 73 69 6e 67 20 61 20 52 69 73 63 50 43 20 | using a RiscPC | 00000160 62 6f 6f 74 20 73 65 71 75 65 6e 63 65 20 3f 0a |boot sequence ?.| 00000170 49 46 20 52 50 43 20 53 45 54 20 31 20 31 0a 0a |IF RPC SET 1 1..| 00000180 49 46 20 31 20 3d 20 31 20 47 4f 53 55 42 20 52 |IF 1 = 1 GOSUB R| 00000190 69 73 63 50 43 0a 49 46 20 31 20 3d 20 32 20 47 |iscPC.IF 1 = 2 G| 000001a0 4f 53 55 42 20 4f 6c 64 65 72 0a 0a 4e 41 4d 45 |OSUB Older..NAME| 000001b0 20 49 6e 73 74 61 6c 6c 69 6e 67 20 4e 65 74 47 | Installing NetG| 000001c0 61 6d 65 20 76 31 2e 30 32 0a 49 4e 53 54 41 4c |ame v1.02.INSTAL| 000001d0 4c 20 21 4e 65 74 47 61 6d 65 0a 43 48 44 49 52 |L !NetGame.CHDIR| 000001e0 20 3c 53 79 73 74 65 6d 24 44 69 72 3e 2e 4d 6f | <System$Dir>.Mo| 000001f0 64 75 6c 65 73 2e 4e 65 74 77 6f 72 6b 0a 43 4f |dules.Network.CO| 00000200 50 59 20 3c 53 65 74 75 70 24 44 69 72 3e 2e 46 |PY <Setup$Dir>.F| 00000210 69 6c 65 73 2e 50 72 6f 67 72 61 6d 2e 4e 65 74 |iles.Program.Net| 00000220 47 61 6d 65 2e 21 4e 65 74 47 61 6d 65 2e 49 53 |Game.!NetGame.IS| 00000230 65 72 76 69 63 65 73 20 3c 53 79 73 74 65 6d 24 |ervices <System$| 00000240 44 69 72 3e 2e 4d 6f 64 75 6c 65 73 2e 4e 65 74 |Dir>.Modules.Net| 00000250 77 6f 72 6b 2e 49 53 65 72 76 69 63 65 73 0a 0a |work.IServices..| 00000260 4e 41 4d 45 20 4e 65 74 77 6f 72 6b 20 67 61 6d |NAME Network gam| 00000270 65 73 0a 4f 50 54 49 4f 4e 53 20 32 20 4e 65 74 |es.OPTIONS 2 Net| 00000280 4f 58 4f 20 4e 65 74 43 34 20 32 20 57 68 69 63 |OXO NetC4 2 Whic| 00000290 68 20 67 61 6d 65 73 20 64 6f 20 79 6f 75 20 77 |h games do you w| 000002a0 61 6e 74 20 74 6f 20 69 6e 73 74 61 6c 6c 20 3f |ant to install ?| 000002b0 0a 0a 49 46 20 31 20 3d 20 31 20 47 4f 53 55 42 |..IF 1 = 1 GOSUB| 000002c0 20 47 65 74 52 69 73 63 50 43 44 69 72 0a 49 46 | GetRiscPCDir.IF| 000002d0 20 31 20 3d 20 32 20 53 45 54 20 4c 45 41 46 20 | 1 = 2 SET LEAF | 000002e0 47 61 6d 65 73 0a 0a 49 46 20 32 20 41 4e 44 20 |Games..IF 2 AND | 000002f0 31 3c 3c 31 20 4e 41 4d 45 20 49 6e 73 74 61 6c |1<<1 NAME Instal| 00000300 6c 69 6e 67 20 4e 65 74 77 6f 72 6b 20 67 61 6d |ling Network gam| 00000310 65 73 20 28 4e 65 74 4f 58 4f 29 0a 49 46 20 32 |es (NetOXO).IF 2| 00000320 20 41 4e 44 20 31 3c 3c 31 20 49 4e 53 54 41 4c | AND 1<<1 INSTAL| 00000330 4c 20 21 4e 65 74 4f 58 4f 0a 49 46 20 32 20 41 |L !NetOXO.IF 2 A| 00000340 4e 44 20 31 3c 3c 32 20 4e 41 4d 45 20 49 6e 73 |ND 1<<2 NAME Ins| 00000350 74 61 6c 6c 69 6e 67 20 4e 65 74 77 6f 72 6b 20 |talling Network | 00000360 67 61 6d 65 73 20 28 4e 65 74 43 34 29 0a 49 46 |games (NetC4).IF| 00000370 20 32 20 41 4e 44 20 31 3c 3c 32 20 49 4e 53 54 | 2 AND 1<<2 INST| 00000380 41 4c 4c 20 21 4e 65 74 43 34 0a 0a 4e 41 4d 45 |ALL !NetC4..NAME| 00000390 20 49 6e 73 74 61 6c 6c 61 74 69 6f 6e 20 63 6f | Installation co| 000003a0 6d 70 6c 65 74 65 0a 4d 45 53 53 41 47 45 20 49 |mplete.MESSAGE I| 000003b0 6e 73 74 61 6c 6c 61 74 69 6f 6e 20 69 73 20 6e |nstallation is n| 000003c0 6f 77 20 63 6f 6d 70 6c 65 74 65 20 0a 45 4e 44 |ow complete .END| 000003d0 0a 0a 3a 52 69 73 63 50 43 0a 7c 20 52 69 73 63 |..:RiscPC.| Risc| 000003e0 50 43 20 62 6f 6f 74 20 73 65 71 75 65 6e 63 65 |PC boot sequence| 000003f0 20 69 6e 73 74 61 6c 6c 61 74 69 6f 6e 0a 53 45 | installation.SE| 00000400 54 20 44 45 53 54 20 42 6f 6f 74 3a 52 65 73 6f |T DEST Boot:Reso| 00000410 75 72 63 65 73 0a 53 45 54 20 4c 45 41 46 20 4e |urces.SET LEAF N| 00000420 65 74 47 61 6d 65 0a 52 45 54 55 52 4e 0a 0a 3a |etGame.RETURN..:| 00000430 4f 6c 64 65 72 0a 7c 20 4f 6c 64 65 72 20 6d 61 |Older.| Older ma| 00000440 63 68 69 6e 65 73 20 69 6e 73 74 61 6c 6c 20 69 |chines install i| 00000450 74 20 69 6e 20 61 20 73 69 6e 67 6c 65 20 64 69 |t in a single di| 00000460 72 65 63 74 6f 72 79 0a 47 45 54 44 49 52 20 4e |rectory.GETDIR N| 00000470 65 74 47 61 6d 65 20 57 68 65 72 65 20 64 6f 20 |etGame Where do | 00000480 79 6f 75 20 77 61 6e 74 20 4e 65 74 47 61 6d 65 |you want NetGame| 00000490 20 69 6e 73 74 61 6c 6c 69 6e 67 20 3f 0a 52 45 | installing ?.RE| 000004a0 54 55 52 4e 0a 0a 3a 47 65 74 52 69 73 63 50 43 |TURN..:GetRiscPC| 000004b0 44 69 72 0a 7c 20 52 69 73 63 50 43 27 73 20 68 |Dir.| RiscPC's h| 000004c0 61 76 65 20 69 6e 73 74 61 6c 6c 65 64 20 69 74 |ave installed it| 000004d0 20 69 6e 20 74 68 65 69 72 20 52 65 73 6f 75 72 | in their Resour| 000004e0 63 65 73 2c 20 73 6f 20 77 65 27 76 65 20 67 6f |ces, so we've go| 000004f0 74 20 74 6f 20 61 73 6b 20 77 68 65 72 65 0a 7c |t to ask where.|| 00000500 20 74 68 65 79 20 77 61 6e 74 20 74 68 65 20 61 | they want the a| 00000510 70 70 6c 69 63 61 74 69 6f 6e 73 0a 47 45 54 44 |pplications.GETD| 00000520 49 52 20 47 61 6d 65 73 20 57 68 65 72 65 20 64 |IR Games Where d| 00000530 6f 20 79 6f 75 20 77 61 6e 74 20 74 68 65 20 67 |o you want the g| 00000540 61 6d 65 73 20 69 6e 73 74 61 6c 6c 69 6e 67 20 |ames installing | 00000550 3f 0a 52 45 54 55 52 4e 0a |?.RETURN.| 00000559
.