home *** CD-ROM | disk | FTP | other *** search
Wrap
; $VER: DOOM-Move your body Musikdemo vom 16.07.95 ; Script zum Installieren von -Move your body- auf Festplatte ; © Devil of DOOM (complete 0) (set cpu-type (database "cpu")) (set fdversion 0) (if (<> cpu-type "68000") ( (if (= cpu-type "68020") ( (set fdversion 1) ) ) ) ) (message "Install MOVE YOUR BODY V1.0\n\nWith this program you can\n install the musicproduction from DOOM \n on a harddisk.\n It will be create a new drawer called Move_your_body during the installation. \n This production need 2 MB Chip-Mem and 3 MB on your harddisk to run.") (welcome) (set default-dest (askdir (prompt "Please select a partition for Move your body.") (help @askdir-help) (default "WORK:") ) ) (set xdest ("%sMove_your_body" default-dest)) (makedir xdest (infos)) (set xdest2 ("%sMove_your_body/Data" default-dest)) (makedir xdest2 (infos)) (copyfiles (prompt "Copy \"LHX\" to RAM DISK...") (source "Move_your_body_Disk1:C/LHX") (dest "RAM:") ) (copyfiles (prompt "Copy \"IconX\" to WB Directory...") (source "Move_your_body_Disk1:C/IconX") (dest "DH0:C/") ) (complete 20) ( (working "Decrunching the musicproduction MOVE YOUR BODY ") (run ("RAM:LHX -E -N x %s \"%s/\"" "Move_your_body_Disk1:data3.lha" xdest2) ) ) (complete 30) ( (working "Decrunching the musicproduction MOVE YOUR BODY ") (run ("RAM:LHX -E -N x %s \"%s/\"" "Move_your_body_Disk1:data5.lha" xdest) ) ) (complete 45) ( (askdisk sourcedrive (prompt "\nPlease insert the disk labeled \"Move_your_body_Disk2\" in any drive.") (help @askdisk-help) (dest "Move_your_body_Disk2") (assigns) ) (working "Decrunching the musicproduction MOVE YOUR BODY ") (run ("RAM:LHX -E -N x %s \"%s/\"" "Move_your_body_Disk2:data2.lha" xdest2) ) ) (complete 60) ( (askdisk sourcedrive (prompt "\nPlease insert the disk labeled \"Move_your_body_Disk3\" in any drive.") (help @askdisk-help) (dest "Move_your_body_Disk3") (assigns) ) (working "Decrunching the musicproduction MOVE YOUR BODY ") (run ("RAM:LHX -E -N x %s \"%s/\"" "Move_your_body_Disk3:data4.lha" xdest) ) ) (complete 80) ( (working "Decrunching the musicproduction MOVE YOUR BODY ") (run ("RAM:LHX -E -N x %s \"%s/\"" "Move_your_body_Disk3:data1.lha" xdest2) ) ) (complete 95) (run "C:DELETE RAM:LHA") (complete 100) (message "The installation of Move your body was successfull.\n\nN-Joy the music and move your body.\n") (exit (quiet))