Home » Personal collection » Acorn hard disk » apps » web » !ArcWeb/!Boot
!ArcWeb/!Boot
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 » Personal collection » Acorn hard disk » apps » web |
| Filename: | !ArcWeb/!Boot |
| Read OK: | ✔ |
| File size: | 02CE bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- Personal collection » Acorn ADFS disks » Greaseweazled » adfs_1.6M_ArcWeb.adf » !ArcWeb/!Boot
- Personal collection » Acorn hard disk » apps » web » !ArcWeb/!Boot
File contents
| !Boot for ArcWeb | | Copyright (C) Stewart Brodie, 1994, 1995, 1996, 1997 | Set ArcWeb$Dir <Obey$Dir> IconSprites <ArcWeb$Dir>.!Sprites | | Comment out this line if you don't want the Internet-related icons IconSprites <ArcWeb$Dir>.!Types | Set File$Type_FAF HTML If "<Alias$@RunType_FAF>" = "" Then Set Alias$@RunType_FAF Run <ArcWeb$Dir>.!Run -file %%*0 If "<Alias$URLOpen_HTTP>" = "" Then Set Alias$URLOpen_HTTP Run <ArcWeb$Dir>.!RunURL %%*0 If "<Alias$URLOpen_FTP>" = "" Then Set Alias$URLOpen_FTP Run <ArcWeb$Dir>.!RunURL %%*0 If "<Alias$URLOpen_gopher>" = "" Then Set Alias$URLOpen_gopher Run <ArcWeb$Dir>.!RunURL %%*0 If "<Alias$URLOpen_local>" = "" Then Set Alias$URLOpen_local Run <ArcWeb$Dir>.!RunURL %%*0
00000000 7c 20 21 42 6f 6f 74 20 66 6f 72 20 41 72 63 57 || !Boot for ArcW| 00000010 65 62 0a 7c 0a 7c 20 43 6f 70 79 72 69 67 68 74 |eb.|.| Copyright| 00000020 20 28 43 29 20 53 74 65 77 61 72 74 20 42 72 6f | (C) Stewart Bro| 00000030 64 69 65 2c 20 31 39 39 34 2c 20 31 39 39 35 2c |die, 1994, 1995,| 00000040 20 31 39 39 36 2c 20 31 39 39 37 0a 7c 0a 53 65 | 1996, 1997.|.Se| 00000050 74 20 41 72 63 57 65 62 24 44 69 72 20 3c 4f 62 |t ArcWeb$Dir <Ob| 00000060 65 79 24 44 69 72 3e 0a 49 63 6f 6e 53 70 72 69 |ey$Dir>.IconSpri| 00000070 74 65 73 20 3c 41 72 63 57 65 62 24 44 69 72 3e |tes <ArcWeb$Dir>| 00000080 2e 21 53 70 72 69 74 65 73 0a 7c 0a 7c 20 43 6f |.!Sprites.|.| Co| 00000090 6d 6d 65 6e 74 20 6f 75 74 20 74 68 69 73 20 6c |mment out this l| 000000a0 69 6e 65 20 69 66 20 79 6f 75 20 64 6f 6e 27 74 |ine if you don't| 000000b0 20 77 61 6e 74 20 74 68 65 20 49 6e 74 65 72 6e | want the Intern| 000000c0 65 74 2d 72 65 6c 61 74 65 64 20 69 63 6f 6e 73 |et-related icons| 000000d0 0a 49 63 6f 6e 53 70 72 69 74 65 73 20 3c 41 72 |.IconSprites <Ar| 000000e0 63 57 65 62 24 44 69 72 3e 2e 21 54 79 70 65 73 |cWeb$Dir>.!Types| 000000f0 0a 7c 0a 53 65 74 20 46 69 6c 65 24 54 79 70 65 |.|.Set File$Type| 00000100 5f 46 41 46 20 48 54 4d 4c 0a 49 66 20 22 3c 41 |_FAF HTML.If "<A| 00000110 6c 69 61 73 24 40 52 75 6e 54 79 70 65 5f 46 41 |lias$@RunType_FA| 00000120 46 3e 22 20 3d 20 22 22 20 54 68 65 6e 20 53 65 |F>" = "" Then Se| 00000130 74 20 41 6c 69 61 73 24 40 52 75 6e 54 79 70 65 |t Alias$@RunType| 00000140 5f 46 41 46 20 52 75 6e 20 3c 41 72 63 57 65 62 |_FAF Run <ArcWeb| 00000150 24 44 69 72 3e 2e 21 52 75 6e 20 2d 66 69 6c 65 |$Dir>.!Run -file| 00000160 20 25 25 2a 30 0a 49 66 20 22 3c 41 6c 69 61 73 | %%*0.If "<Alias| 00000170 24 55 52 4c 4f 70 65 6e 5f 48 54 54 50 3e 22 20 |$URLOpen_HTTP>" | 00000180 3d 20 22 22 20 54 68 65 6e 20 53 65 74 20 41 6c |= "" Then Set Al| 00000190 69 61 73 24 55 52 4c 4f 70 65 6e 5f 48 54 54 50 |ias$URLOpen_HTTP| 000001a0 20 52 75 6e 20 3c 41 72 63 57 65 62 24 44 69 72 | Run <ArcWeb$Dir| 000001b0 3e 2e 21 52 75 6e 55 52 4c 20 25 25 2a 30 0a 49 |>.!RunURL %%*0.I| 000001c0 66 20 22 3c 41 6c 69 61 73 24 55 52 4c 4f 70 65 |f "<Alias$URLOpe| 000001d0 6e 5f 46 54 50 3e 22 20 3d 20 22 22 20 54 68 65 |n_FTP>" = "" The| 000001e0 6e 20 53 65 74 20 41 6c 69 61 73 24 55 52 4c 4f |n Set Alias$URLO| 000001f0 70 65 6e 5f 46 54 50 20 52 75 6e 20 3c 41 72 63 |pen_FTP Run <Arc| 00000200 57 65 62 24 44 69 72 3e 2e 21 52 75 6e 55 52 4c |Web$Dir>.!RunURL| 00000210 20 25 25 2a 30 0a 49 66 20 22 3c 41 6c 69 61 73 | %%*0.If "<Alias| 00000220 24 55 52 4c 4f 70 65 6e 5f 67 6f 70 68 65 72 3e |$URLOpen_gopher>| 00000230 22 20 3d 20 22 22 20 54 68 65 6e 20 53 65 74 20 |" = "" Then Set | 00000240 41 6c 69 61 73 24 55 52 4c 4f 70 65 6e 5f 67 6f |Alias$URLOpen_go| 00000250 70 68 65 72 20 52 75 6e 20 3c 41 72 63 57 65 62 |pher Run <ArcWeb| 00000260 24 44 69 72 3e 2e 21 52 75 6e 55 52 4c 20 25 25 |$Dir>.!RunURL %%| 00000270 2a 30 0a 49 66 20 22 3c 41 6c 69 61 73 24 55 52 |*0.If "<Alias$UR| 00000280 4c 4f 70 65 6e 5f 6c 6f 63 61 6c 3e 22 20 3d 20 |LOpen_local>" = | 00000290 22 22 20 54 68 65 6e 20 53 65 74 20 41 6c 69 61 |"" Then Set Alia| 000002a0 73 24 55 52 4c 4f 70 65 6e 5f 6c 6f 63 61 6c 20 |s$URLOpen_local | 000002b0 52 75 6e 20 3c 41 72 63 57 65 62 24 44 69 72 3e |Run <ArcWeb$Dir>| 000002c0 2e 21 52 75 6e 55 52 4c 20 25 25 2a 30 0a |.!RunURL %%*0.| 000002ce
.