NEW
  PREFIX
AUTO 4,1
#!/BIN/SH
#
#  This script makes a proper DEBUG (140K) disk using the files
#  found in a particular BUILD stored in /MAKE/BUILDS
#
. MAKEFUNCS
CALL CS
CALL TBOX "DEBUG (140K Floppy) Media Creator"
CALL PRINTXY 8 0 "You must have the correct 140K image mounted on S6D2"
ECHO "\n"
READ -P "Do you want to proceed (Y/N)?  " P
SWITCH $P
  CASE Y
  CASE y
    ECHO
    BREAK
  DEFAULT
    ECHO "\n\nExiting.\n"
    EXIT
END
ECHO
READ -P "WHICH BUILD NO:  " B
IF [ -Z $B ]
  ECHO "You did not enter any response."
  ECHO
  ECHO "Exiting"
  EXIT
FI
SET SRC = "/MAKE/BUILDS/BUILD${B}"
IF [ -D ${SRC} ]
  ECHO "\n\nFound Valid BUILD\n"
ELSE
  ECHO "\n\nValid BUILD not found."
  ECHO
  ECHO "Exiting"
  EXIT
FI
SET IM = "DEBUG Build No. ${B}"
ECHO "\n\nFormatting Destination..."
FORMAT -1 s6d2 DEBUG
ECHO "Making Directory Structure..."
MD /DEBUG/BIN
MD /DEBUG/DRV
MD /DEBUG/ETC
MD /DEBUG/LIB
MD /DEBUG/ROOT
MD /DEBUG/SBIN
MD /DEBUG/SYS
ECHO "Copying Files..."
FOR FILE IN (DEBUGFILES)
  CP -Q ${SRC}/${FILE} /DEBUG/${FILE}
NEXT
CP -Q -Y /MAKE/ASSETS/PDOS203TC/PRODOS /DEBUG
CP -Q -Y DEBUGINIT /DEBUG/ETC/INIT
ECHO "Welcome to A2osX!" > /DEBUG/ETC/ISSUE
ECHO >> /DEBUG/ETC/ISSUE
ECHO $IM >> /DEBUG/ETC/ISSUE
ECHO >> /DEBUG/ETC/ISSUE
ECHO >> /DEBUG/ETC/ISSUE
ECHO "This is the Special DEBUG BOOT DISK" >> /DEBUG/ETC/ISSUE
ECHO >> /DEBUG/ETC/ISSUE
CP -Q TCPIP.CONF /DEBUG/ETC/TCPIP.CONF
CP -Q DEBUGPROFILE /DEBUG/ROOT/PROFILE
ECHO "DEBUG Disk Created!"
MAN
TEXT /MAKE/USR/SHARE/MAKE/MAKEDEBUG