if exists USBSystem: RequestChoice >env:rcnum "Backup" "Backup Mac mini to MORPHOS stick" "Make" "Test" "Cancel" if 0 eq $rcnum quit endif if 1 eq $rcnum utils:DiskTools/BackUp/BackUp SOURCE System: TARGET USBSystem: BACKUP CLEAN FORCEDELETE DONTCLRSTAT AUTOQUIT utils:DiskTools/BackUp/BackUp SOURCE Work: TARGET USBWork:WORK/ BACKUP CLEAN FORCEDELETE DONTCLRSTAT SKIPFILE code:BackUp.skip_work AUTOQUIT utils:DiskTools/BackUp/BackUp SOURCE Fun: TARGET USBWork:FUN/ BACKUP CLEAN FORCEDELETE DONTCLRSTAT SKIPFILE code:BackUp.skip_fun AUTOQUIT RequestChoice Backup "Backup completed." OK endif if 2 eq $rcnum utils:DiskTools/BackUp/BackUp SOURCE System: TARGET USBSystem: BACKUP CLEAN FORCEDELETE DONTCLRSTAT TESTMODE utils:DiskTools/BackUp/BackUp SOURCE Work: TARGET USBWork:WORK/ BACKUP CLEAN FORCEDELETE DONTCLRSTAT SKIPFILE code:BackUp.skip_work TESTMODE utils:DiskTools/BackUp/BackUp SOURCE Fun: TARGET USBWork:FUN/ BACKUP CLEAN FORCEDELETE DONTCLRSTAT SKIPFILE code:BackUp.skip_fun TESTMODE RequestChoice Backup "Backup completed." OK endif else RequestChoice Backup "Correct USB media not found." OK endif