Home » Archimedes archive » Archimedes World » archimedes_world_volume_15_issue_2_scp.adf » !ARMEdit_ARMEdit » !ARMEdit/PCQuit

!ARMEdit/PCQuit

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 » Archimedes World » archimedes_world_volume_15_issue_2_scp.adf » !ARMEdit_ARMEdit
Filename: !ARMEdit/PCQuit
Read OK:
File size: 02D7 bytes
Load address: 0000
Exec address: 0000
File contents
|   File        : PCQuit
|   Date        : 07-Dec-97
|   Author      : � A.Thoukydides, 1997
|   Description : This file is executed when the PC front-end is quit.
|                 It kills any PC related modules that are no longer required.

| An alias to allow modules to be killed safely
Set Alias$ARMEditKill Set ARMEdit$Active 1|MRMEnsure %%0 0.00 Set ARMEdit$Active 0|MIf ARMEdit$Active=1 Then RMKill %%0

| Kill PC card modules
ARMEditKill PCDevHelp
ARMEditKill PCSupport
ARMEditKill PCMem
ARMEditKill PCIOSupport
ARMEditKill PCSound
ARMEditKill PCNE2
ARMEditKill 386PCSupport

| Kill third party modules
ARMEditKill ARMASPI

| Clear any system variables that have been set
UnSet Alias$ARMEditKill
UnSet ARMEdit$Active
00000000  7c 20 20 20 46 69 6c 65  20 20 20 20 20 20 20 20  ||   File        |
00000010  3a 20 50 43 51 75 69 74  0a 7c 20 20 20 44 61 74  |: PCQuit.|   Dat|
00000020  65 20 20 20 20 20 20 20  20 3a 20 30 37 2d 44 65  |e        : 07-De|
00000030  63 2d 39 37 0a 7c 20 20  20 41 75 74 68 6f 72 20  |c-97.|   Author |
00000040  20 20 20 20 20 3a 20 a9  20 41 2e 54 68 6f 75 6b  |     : . A.Thouk|
00000050  79 64 69 64 65 73 2c 20  31 39 39 37 0a 7c 20 20  |ydides, 1997.|  |
00000060  20 44 65 73 63 72 69 70  74 69 6f 6e 20 3a 20 54  | Description : T|
00000070  68 69 73 20 66 69 6c 65  20 69 73 20 65 78 65 63  |his file is exec|
00000080  75 74 65 64 20 77 68 65  6e 20 74 68 65 20 50 43  |uted when the PC|
00000090  20 66 72 6f 6e 74 2d 65  6e 64 20 69 73 20 71 75  | front-end is qu|
000000a0  69 74 2e 0a 7c 20 20 20  20 20 20 20 20 20 20 20  |it..|           |
000000b0  20 20 20 20 20 20 49 74  20 6b 69 6c 6c 73 20 61  |      It kills a|
000000c0  6e 79 20 50 43 20 72 65  6c 61 74 65 64 20 6d 6f  |ny PC related mo|
000000d0  64 75 6c 65 73 20 74 68  61 74 20 61 72 65 20 6e  |dules that are n|
000000e0  6f 20 6c 6f 6e 67 65 72  20 72 65 71 75 69 72 65  |o longer require|
000000f0  64 2e 0a 0a 7c 20 41 6e  20 61 6c 69 61 73 20 74  |d...| An alias t|
00000100  6f 20 61 6c 6c 6f 77 20  6d 6f 64 75 6c 65 73 20  |o allow modules |
00000110  74 6f 20 62 65 20 6b 69  6c 6c 65 64 20 73 61 66  |to be killed saf|
00000120  65 6c 79 0a 53 65 74 20  41 6c 69 61 73 24 41 52  |ely.Set Alias$AR|
00000130  4d 45 64 69 74 4b 69 6c  6c 20 53 65 74 20 41 52  |MEditKill Set AR|
00000140  4d 45 64 69 74 24 41 63  74 69 76 65 20 31 7c 4d  |MEdit$Active 1|M|
00000150  52 4d 45 6e 73 75 72 65  20 25 25 30 20 30 2e 30  |RMEnsure %%0 0.0|
00000160  30 20 53 65 74 20 41 52  4d 45 64 69 74 24 41 63  |0 Set ARMEdit$Ac|
00000170  74 69 76 65 20 30 7c 4d  49 66 20 41 52 4d 45 64  |tive 0|MIf ARMEd|
00000180  69 74 24 41 63 74 69 76  65 3d 31 20 54 68 65 6e  |it$Active=1 Then|
00000190  20 52 4d 4b 69 6c 6c 20  25 25 30 0a 0a 7c 20 4b  | RMKill %%0..| K|
000001a0  69 6c 6c 20 50 43 20 63  61 72 64 20 6d 6f 64 75  |ill PC card modu|
000001b0  6c 65 73 0a 41 52 4d 45  64 69 74 4b 69 6c 6c 20  |les.ARMEditKill |
000001c0  50 43 44 65 76 48 65 6c  70 0a 41 52 4d 45 64 69  |PCDevHelp.ARMEdi|
000001d0  74 4b 69 6c 6c 20 50 43  53 75 70 70 6f 72 74 0a  |tKill PCSupport.|
000001e0  41 52 4d 45 64 69 74 4b  69 6c 6c 20 50 43 4d 65  |ARMEditKill PCMe|
000001f0  6d 0a 41 52 4d 45 64 69  74 4b 69 6c 6c 20 50 43  |m.ARMEditKill PC|
00000200  49 4f 53 75 70 70 6f 72  74 0a 41 52 4d 45 64 69  |IOSupport.ARMEdi|
00000210  74 4b 69 6c 6c 20 50 43  53 6f 75 6e 64 0a 41 52  |tKill PCSound.AR|
00000220  4d 45 64 69 74 4b 69 6c  6c 20 50 43 4e 45 32 0a  |MEditKill PCNE2.|
00000230  41 52 4d 45 64 69 74 4b  69 6c 6c 20 33 38 36 50  |ARMEditKill 386P|
00000240  43 53 75 70 70 6f 72 74  0a 0a 7c 20 4b 69 6c 6c  |CSupport..| Kill|
00000250  20 74 68 69 72 64 20 70  61 72 74 79 20 6d 6f 64  | third party mod|
00000260  75 6c 65 73 0a 41 52 4d  45 64 69 74 4b 69 6c 6c  |ules.ARMEditKill|
00000270  20 41 52 4d 41 53 50 49  0a 0a 7c 20 43 6c 65 61  | ARMASPI..| Clea|
00000280  72 20 61 6e 79 20 73 79  73 74 65 6d 20 76 61 72  |r any system var|
00000290  69 61 62 6c 65 73 20 74  68 61 74 20 68 61 76 65  |iables that have|
000002a0  20 62 65 65 6e 20 73 65  74 0a 55 6e 53 65 74 20  | been set.UnSet |
000002b0  41 6c 69 61 73 24 41 52  4d 45 64 69 74 4b 69 6c  |Alias$ARMEditKil|
000002c0  6c 0a 55 6e 53 65 74 20  41 52 4d 45 64 69 74 24  |l.UnSet ARMEdit$|
000002d0  41 63 74 69 76 65 0a                              |Active.|
000002d7