Home » Archimedes archive » Zipped Apps » PipeDream » Preload

Preload

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 » Zipped Apps » PipeDream
Filename: Preload
Read OK:
File size: 04C8 bytes
Load address: 0000
Exec address: 0000
File contents
|
| Preload obey file for PipeDream 4
|
Set PipeDream_Preload$Dir <Obey$Dir>
|
| Ensure we have a System
|
If "<System$Path>" = "" then Run <PipeDream_Preload$Dir>.!System.!Boot
|
| Ensure we have the shared C library and determine its vintage
|
Set PipeDream$CLibLoaded 1
RMEnsure SharedCLibrary 0.00 Set PipeDream$CLibLoaded 0
If PipeDream$CLibLoaded=0 then RMLoad System:Modules.CLib
RMEnsure SharedCLibrary 3.50 Error You need SharedCLibrary 3.50 or later
Set PipeDream$NewCLib 0
RMEnsure SharedCLibrary 3.75 Set PipeDream$NewCLib 1
Unset PipeDream$CLibLoaded
|
| Ensure we have ColourTrans
|
RMEnsure ColourTrans 0.52 RMLoad System:Modules.Colours
RMEnsure ColourTrans 0.52 Error You need ColourTrans 0.52 or later
|
| Ensure we have FPEmulator
|
RMEnsure FPEmulator 2.70 RMLoad System:Modules.FPEmulator
RMEnsure FPEmulator 2.70 Error You need FPEmulator 2.70 or later
|
| Check Font Manager version (you may comment out the following
| two commands with | if you do not want to use Fonts with PipeDream)
|
RMEnsure FontManager 2.42 Run <PipeDream_Preload$Dir>.Fonts.!Fonts.!Boot
RMEnsure FontManager 2.42 Echo Warning: you need Outline FontManager 2.42 or later to use PipeDream 4 Charts
|
| end of Preload obey file
00000000  7c 0a 7c 20 50 72 65 6c  6f 61 64 20 6f 62 65 79  ||.| Preload obey|
00000010  20 66 69 6c 65 20 66 6f  72 20 50 69 70 65 44 72  | file for PipeDr|
00000020  65 61 6d 20 34 0a 7c 0a  53 65 74 20 50 69 70 65  |eam 4.|.Set Pipe|
00000030  44 72 65 61 6d 5f 50 72  65 6c 6f 61 64 24 44 69  |Dream_Preload$Di|
00000040  72 20 3c 4f 62 65 79 24  44 69 72 3e 0a 7c 0a 7c  |r <Obey$Dir>.|.||
00000050  20 45 6e 73 75 72 65 20  77 65 20 68 61 76 65 20  | Ensure we have |
00000060  61 20 53 79 73 74 65 6d  0a 7c 0a 49 66 20 22 3c  |a System.|.If "<|
00000070  53 79 73 74 65 6d 24 50  61 74 68 3e 22 20 3d 20  |System$Path>" = |
00000080  22 22 20 74 68 65 6e 20  52 75 6e 20 3c 50 69 70  |"" then Run <Pip|
00000090  65 44 72 65 61 6d 5f 50  72 65 6c 6f 61 64 24 44  |eDream_Preload$D|
000000a0  69 72 3e 2e 21 53 79 73  74 65 6d 2e 21 42 6f 6f  |ir>.!System.!Boo|
000000b0  74 0a 7c 0a 7c 20 45 6e  73 75 72 65 20 77 65 20  |t.|.| Ensure we |
000000c0  68 61 76 65 20 74 68 65  20 73 68 61 72 65 64 20  |have the shared |
000000d0  43 20 6c 69 62 72 61 72  79 20 61 6e 64 20 64 65  |C library and de|
000000e0  74 65 72 6d 69 6e 65 20  69 74 73 20 76 69 6e 74  |termine its vint|
000000f0  61 67 65 0a 7c 0a 53 65  74 20 50 69 70 65 44 72  |age.|.Set PipeDr|
00000100  65 61 6d 24 43 4c 69 62  4c 6f 61 64 65 64 20 31  |eam$CLibLoaded 1|
00000110  0a 52 4d 45 6e 73 75 72  65 20 53 68 61 72 65 64  |.RMEnsure Shared|
00000120  43 4c 69 62 72 61 72 79  20 30 2e 30 30 20 53 65  |CLibrary 0.00 Se|
00000130  74 20 50 69 70 65 44 72  65 61 6d 24 43 4c 69 62  |t PipeDream$CLib|
00000140  4c 6f 61 64 65 64 20 30  0a 49 66 20 50 69 70 65  |Loaded 0.If Pipe|
00000150  44 72 65 61 6d 24 43 4c  69 62 4c 6f 61 64 65 64  |Dream$CLibLoaded|
00000160  3d 30 20 74 68 65 6e 20  52 4d 4c 6f 61 64 20 53  |=0 then RMLoad S|
00000170  79 73 74 65 6d 3a 4d 6f  64 75 6c 65 73 2e 43 4c  |ystem:Modules.CL|
00000180  69 62 0a 52 4d 45 6e 73  75 72 65 20 53 68 61 72  |ib.RMEnsure Shar|
00000190  65 64 43 4c 69 62 72 61  72 79 20 33 2e 35 30 20  |edCLibrary 3.50 |
000001a0  45 72 72 6f 72 20 59 6f  75 20 6e 65 65 64 20 53  |Error You need S|
000001b0  68 61 72 65 64 43 4c 69  62 72 61 72 79 20 33 2e  |haredCLibrary 3.|
000001c0  35 30 20 6f 72 20 6c 61  74 65 72 0a 53 65 74 20  |50 or later.Set |
000001d0  50 69 70 65 44 72 65 61  6d 24 4e 65 77 43 4c 69  |PipeDream$NewCLi|
000001e0  62 20 30 0a 52 4d 45 6e  73 75 72 65 20 53 68 61  |b 0.RMEnsure Sha|
000001f0  72 65 64 43 4c 69 62 72  61 72 79 20 33 2e 37 35  |redCLibrary 3.75|
00000200  20 53 65 74 20 50 69 70  65 44 72 65 61 6d 24 4e  | Set PipeDream$N|
00000210  65 77 43 4c 69 62 20 31  0a 55 6e 73 65 74 20 50  |ewCLib 1.Unset P|
00000220  69 70 65 44 72 65 61 6d  24 43 4c 69 62 4c 6f 61  |ipeDream$CLibLoa|
00000230  64 65 64 0a 7c 0a 7c 20  45 6e 73 75 72 65 20 77  |ded.|.| Ensure w|
00000240  65 20 68 61 76 65 20 43  6f 6c 6f 75 72 54 72 61  |e have ColourTra|
00000250  6e 73 0a 7c 0a 52 4d 45  6e 73 75 72 65 20 43 6f  |ns.|.RMEnsure Co|
00000260  6c 6f 75 72 54 72 61 6e  73 20 30 2e 35 32 20 52  |lourTrans 0.52 R|
00000270  4d 4c 6f 61 64 20 53 79  73 74 65 6d 3a 4d 6f 64  |MLoad System:Mod|
00000280  75 6c 65 73 2e 43 6f 6c  6f 75 72 73 0a 52 4d 45  |ules.Colours.RME|
00000290  6e 73 75 72 65 20 43 6f  6c 6f 75 72 54 72 61 6e  |nsure ColourTran|
000002a0  73 20 30 2e 35 32 20 45  72 72 6f 72 20 59 6f 75  |s 0.52 Error You|
000002b0  20 6e 65 65 64 20 43 6f  6c 6f 75 72 54 72 61 6e  | need ColourTran|
000002c0  73 20 30 2e 35 32 20 6f  72 20 6c 61 74 65 72 0a  |s 0.52 or later.|
000002d0  7c 0a 7c 20 45 6e 73 75  72 65 20 77 65 20 68 61  ||.| Ensure we ha|
000002e0  76 65 20 46 50 45 6d 75  6c 61 74 6f 72 0a 7c 0a  |ve FPEmulator.|.|
000002f0  52 4d 45 6e 73 75 72 65  20 46 50 45 6d 75 6c 61  |RMEnsure FPEmula|
00000300  74 6f 72 20 32 2e 37 30  20 52 4d 4c 6f 61 64 20  |tor 2.70 RMLoad |
00000310  53 79 73 74 65 6d 3a 4d  6f 64 75 6c 65 73 2e 46  |System:Modules.F|
00000320  50 45 6d 75 6c 61 74 6f  72 0a 52 4d 45 6e 73 75  |PEmulator.RMEnsu|
00000330  72 65 20 46 50 45 6d 75  6c 61 74 6f 72 20 32 2e  |re FPEmulator 2.|
00000340  37 30 20 45 72 72 6f 72  20 59 6f 75 20 6e 65 65  |70 Error You nee|
00000350  64 20 46 50 45 6d 75 6c  61 74 6f 72 20 32 2e 37  |d FPEmulator 2.7|
00000360  30 20 6f 72 20 6c 61 74  65 72 0a 7c 0a 7c 20 43  |0 or later.|.| C|
00000370  68 65 63 6b 20 46 6f 6e  74 20 4d 61 6e 61 67 65  |heck Font Manage|
00000380  72 20 76 65 72 73 69 6f  6e 20 28 79 6f 75 20 6d  |r version (you m|
00000390  61 79 20 63 6f 6d 6d 65  6e 74 20 6f 75 74 20 74  |ay comment out t|
000003a0  68 65 20 66 6f 6c 6c 6f  77 69 6e 67 0a 7c 20 74  |he following.| t|
000003b0  77 6f 20 63 6f 6d 6d 61  6e 64 73 20 77 69 74 68  |wo commands with|
000003c0  20 7c 20 69 66 20 79 6f  75 20 64 6f 20 6e 6f 74  | | if you do not|
000003d0  20 77 61 6e 74 20 74 6f  20 75 73 65 20 46 6f 6e  | want to use Fon|
000003e0  74 73 20 77 69 74 68 20  50 69 70 65 44 72 65 61  |ts with PipeDrea|
000003f0  6d 29 0a 7c 0a 52 4d 45  6e 73 75 72 65 20 46 6f  |m).|.RMEnsure Fo|
00000400  6e 74 4d 61 6e 61 67 65  72 20 32 2e 34 32 20 52  |ntManager 2.42 R|
00000410  75 6e 20 3c 50 69 70 65  44 72 65 61 6d 5f 50 72  |un <PipeDream_Pr|
00000420  65 6c 6f 61 64 24 44 69  72 3e 2e 46 6f 6e 74 73  |eload$Dir>.Fonts|
00000430  2e 21 46 6f 6e 74 73 2e  21 42 6f 6f 74 0a 52 4d  |.!Fonts.!Boot.RM|
00000440  45 6e 73 75 72 65 20 46  6f 6e 74 4d 61 6e 61 67  |Ensure FontManag|
00000450  65 72 20 32 2e 34 32 20  45 63 68 6f 20 57 61 72  |er 2.42 Echo War|
00000460  6e 69 6e 67 3a 20 79 6f  75 20 6e 65 65 64 20 4f  |ning: you need O|
00000470  75 74 6c 69 6e 65 20 46  6f 6e 74 4d 61 6e 61 67  |utline FontManag|
00000480  65 72 20 32 2e 34 32 20  6f 72 20 6c 61 74 65 72  |er 2.42 or later|
00000490  20 74 6f 20 75 73 65 20  50 69 70 65 44 72 65 61  | to use PipeDrea|
000004a0  6d 20 34 20 43 68 61 72  74 73 0a 7c 0a 7c 20 65  |m 4 Charts.|.| e|
000004b0  6e 64 20 6f 66 20 50 72  65 6c 6f 61 64 20 6f 62  |nd of Preload ob|
000004c0  65 79 20 66 69 6c 65 0a                           |ey file.|
000004c8