$D LOCAL *.* ; set defaults $0 to LOCAL, $1 to *.* xy=0 ; clear screen LOOKUP $0.DIR/ ; does $0.dir exist? GOTO BRANCH ; if not, branch :<$0.DIR already exists. Try again with a different .DIR filename. > ; it does, so print message and stop EXIT ;BRANCH ; program label :R ; activate terminal output :< MAKVER Utility This is the MAKVER utility. $0.DIR will be created that contains all the information necessary to VERIFY the integrity of the requested files at a later time. Now, I need to know what files to process. Enter below the full filespec(s) to include. Feel free to use wildcards and/or ersatz names. Use a comma (,) to separate multiple filespecs. For example, if you wanted to include all of the programs and subroutines found in the BAS: account, you would enter: DSK0:*.SBR[7,6],DSK0:*.BAS[7,6] ... or ... BAS:*.SBR,BAS:*.RUN If you want to process all files in this account, just press [ENTER]. Press Control-C to exit without creating any files. Enter the filespecs for building $0.DIR - > :P ; PAUSE , take input from user, append to next line DIR/D/V/H $0.DIR = :K ; do it when user hits [ENTER] .