Home » Archimedes archive » Acorn User » AU 1997-09 B.adf » Sherston » !Upgrade/Upgrades/!Dinosaurs/!!Script

!Upgrade/Upgrades/!Dinosaurs/!!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 » Archimedes archive » Acorn User » AU 1997-09 B.adf » Sherston
Filename: !Upgrade/Upgrades/!Dinosaurs/!!Script
Read OK:
File size: 020A bytes
Load address: 0000
Exec address: 0000
File contents
| Upgrade script for !Dinosaurs

ifdoesnotexist !Run Error Only !Dinosaurs on 'Dinosaurs�Disc�1' needs to be upgraded.
ifversionolder !Run Error Your copy of !Dinosaurs is newer than this upgrade.
ifversionnotnewer !Run Error Your copy of !Dinosaurs is already up to date.

| Make space on the floppy for the larger packsound file
IFDOESEXIST ^.Floppy REMOVE !Boot
REMOVE ^.Floppy
REMOVE ^.Release

COPY ^.^.Common.PackSound PackSound

| Update the Run file only after the new Packsound has successfully copied
COPY !Run

00000000  7c 20 55 70 67 72 61 64  65 20 73 63 72 69 70 74  || Upgrade script|
00000010  20 66 6f 72 20 21 44 69  6e 6f 73 61 75 72 73 0a  | for !Dinosaurs.|
00000020  0a 69 66 64 6f 65 73 6e  6f 74 65 78 69 73 74 20  |.ifdoesnotexist |
00000030  21 52 75 6e 20 45 72 72  6f 72 20 4f 6e 6c 79 20  |!Run Error Only |
00000040  21 44 69 6e 6f 73 61 75  72 73 20 6f 6e 20 27 44  |!Dinosaurs on 'D|
00000050  69 6e 6f 73 61 75 72 73  a0 44 69 73 63 a0 31 27  |inosaurs.Disc.1'|
00000060  20 6e 65 65 64 73 20 74  6f 20 62 65 20 75 70 67  | needs to be upg|
00000070  72 61 64 65 64 2e 0a 69  66 76 65 72 73 69 6f 6e  |raded..ifversion|
00000080  6f 6c 64 65 72 20 21 52  75 6e 20 45 72 72 6f 72  |older !Run Error|
00000090  20 59 6f 75 72 20 63 6f  70 79 20 6f 66 20 21 44  | Your copy of !D|
000000a0  69 6e 6f 73 61 75 72 73  20 69 73 20 6e 65 77 65  |inosaurs is newe|
000000b0  72 20 74 68 61 6e 20 74  68 69 73 20 75 70 67 72  |r than this upgr|
000000c0  61 64 65 2e 0a 69 66 76  65 72 73 69 6f 6e 6e 6f  |ade..ifversionno|
000000d0  74 6e 65 77 65 72 20 21  52 75 6e 20 45 72 72 6f  |tnewer !Run Erro|
000000e0  72 20 59 6f 75 72 20 63  6f 70 79 20 6f 66 20 21  |r Your copy of !|
000000f0  44 69 6e 6f 73 61 75 72  73 20 69 73 20 61 6c 72  |Dinosaurs is alr|
00000100  65 61 64 79 20 75 70 20  74 6f 20 64 61 74 65 2e  |eady up to date.|
00000110  0a 0a 7c 20 4d 61 6b 65  20 73 70 61 63 65 20 6f  |..| Make space o|
00000120  6e 20 74 68 65 20 66 6c  6f 70 70 79 20 66 6f 72  |n the floppy for|
00000130  20 74 68 65 20 6c 61 72  67 65 72 20 70 61 63 6b  | the larger pack|
00000140  73 6f 75 6e 64 20 66 69  6c 65 0a 49 46 44 4f 45  |sound file.IFDOE|
00000150  53 45 58 49 53 54 20 5e  2e 46 6c 6f 70 70 79 20  |SEXIST ^.Floppy |
00000160  52 45 4d 4f 56 45 20 21  42 6f 6f 74 0a 52 45 4d  |REMOVE !Boot.REM|
00000170  4f 56 45 20 5e 2e 46 6c  6f 70 70 79 0a 52 45 4d  |OVE ^.Floppy.REM|
00000180  4f 56 45 20 5e 2e 52 65  6c 65 61 73 65 0a 0a 43  |OVE ^.Release..C|
00000190  4f 50 59 20 5e 2e 5e 2e  43 6f 6d 6d 6f 6e 2e 50  |OPY ^.^.Common.P|
000001a0  61 63 6b 53 6f 75 6e 64  20 50 61 63 6b 53 6f 75  |ackSound PackSou|
000001b0  6e 64 0a 0a 7c 20 55 70  64 61 74 65 20 74 68 65  |nd..| Update the|
000001c0  20 52 75 6e 20 66 69 6c  65 20 6f 6e 6c 79 20 61  | Run file only a|
000001d0  66 74 65 72 20 74 68 65  20 6e 65 77 20 50 61 63  |fter the new Pac|
000001e0  6b 73 6f 75 6e 64 20 68  61 73 20 73 75 63 63 65  |ksound has succe|
000001f0  73 73 66 75 6c 6c 79 20  63 6f 70 69 65 64 0a 43  |ssfully copied.C|
00000200  4f 50 59 20 21 52 75 6e  0a 0a                    |OPY !Run..|
0000020a