home *** CD-ROM | disk | FTP | other *** search
- /*
- $VER: InstallAutorun.awebrx 1.0 (24.11.99) (c) Neil Bothwick, Wirenet
- Copies Autorun and its icon to SYS:WBStartup
- */
-
- options results
- address command
- parse arg switch
-
- if switch = 'REMOVE' then do
- if ~exists('SYS:WBStartup/Autorun') then call ExitMsg('Autorun is not installed')
- call delete('SYS:WBStartup/Autorun')
- call delete('SYS:WBStartup/Autorun.info')
- call ExitMsg('Autorun has been uninstalled')
- end
-
- else do
- if exists('SYS:WBStartup/Autorun') then call ExitMsg('Autorun is already installed')
- 'copy AACD:CDtools/Autorun/Autorun#(.info) SYS:WBStartup clone quiet'
- if RC > 0 then call ExitMsg('There was an error copying Autorun*Nto your WBStartup drawer')
- else call ExitMsg('Autorun is now installed')
- end
-
- exit
-
-
- ExitMsg:
- parse arg msg
- 'RequestChoice "Amiga Active CD" "'msg'" "OK"'
- exit
-
-
-
-
-
-