home *** CD-ROM | disk | FTP | other *** search
- failat 21
-
- echo "Check Disk v1.1"
- echo "¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯"
- echo "This utility will check the Digita disks that"
- echo "came with your 'Amiga Magic Pack'."
- echo "*nYou will need to run this program twice,"
- echo "once on your backup disks, and again on your"
- echo "master disks."
- echo "*nIf errors occur on your backup disks, make"
- echo "new backups using fresh disks. If errors occur"
- echo "on the master disks, send them back to Digita"
- echo "technical support with a covering letter and"
- echo "they will be exchanged."
-
- ask "*n*nDo you wish to continue (y/n) ? "
- IF WARN
- copy >NIL: checkdisk RAM:
- copy >NIL: wait RAM:
-
- ask "*n*nDo you wish to check your installed working disks (y/n) ? "
- IF WARN
- ask "*n*nPlease insert the disk labelled 'Wordworth4SE' into*nthe internal drive and press Return"
- RAM:wait 6
- RAM:checkdisk df0:
-
- ask "*n*nPlease insert the disk labelled 'Ww4SESystem' into*nthe internal drive and press Return"
- RAM:wait 6
- RAM:checkdisk df0:
-
- ask "*n*nPlease insert the disk labelled 'Ww4SEOutlines' into*nthe internal drive and press Return"
- RAM:wait 6
- RAM:checkdisk df0:
-
- ask "*n*nPlease insert the disk labelled 'Ww4SESpell' into*nthe internal drive and press Return"
- RAM:wait 6
- RAM:checkdisk df0:
- ENDIF
-
- echo "*n*nDo you wish to check your 3 hard disk install disks?"
- echo "(You will only have these disks if you bought a hard disk"
- ask " version of the Amiga). "
- IF WARN
- ask "*n*nPlease insert the disk labelled 'Ww4SEInstall-1' into*nthe internal drive and press Return"
- RAM:wait 6
- RAM:checkdisk df0:
-
- ask "*n*nPlease insert the disk labelled 'Ww4SEInstall-2' into*nthe internal drive and press Return"
- RAM:wait 6
- RAM:checkdisk df0:
-
- ask "*n*nPlease insert the disk labelled 'Ww4SEInstall-3' into*nthe internal drive and press Return"
- RAM:wait 6
- RAM:checkdisk df0:
- ENDIF
-
- ask "*n*nDo you wish to check your Wordworth Print Manager (y/n) ? "
- IF WARN
- ask "*n*nPlease insert the disk labelled 'PrintManager' into*nthe internal drive and press Return"
- RAM:wait 6
- RAM:checkdisk df0:
- ENDIF
-
- ask "*n*nDo you want to check your Organiser install disk (y/n) ? "
- IF WARN
- ask "*n*nPlease insert the disk labelled 'OrgInstall' into*nthe internal drive and press Return"
- RAM:wait 6
- RAM:checkdisk df0:
- ENDIF
-
- ask "*n*n*nDo you want to check your Datastore install disk (y/n) ? "
- IF WARN
- ask "*n*nPlease insert the disk labelled 'DSInstall' into*nthe internal drive and press Return"
- RAM:wait 6
- RAM:checkdisk df0:
- ENDIF
-
- delete >NIL: RAM:checkdisk
- delete >NIL: RAM:wait
- echo "*n*nAll Finished..*n"
- ELSE
- echo "*nUser Aborted...*n"
- ENDIF
-
- ask "Press Return to exit"
-