50 PRINT "}WHAT DISK DRIVE TO USE)";›51 OPEN #1,4,0,"K:":REM OPEN KEYBOARD FOR GET›52 TRAP 52:GET #1,DRIVE:REM GET KEY PRESSED ATASCII VALUE›53 NAME$=CHR$(DRIVE):REM CONVERT TO STRING - USE NAME$ SINCE IT IS DIMed›54 IF NAME$<"1" OR NAME$>"4" THEN 52:REM TRY AGAIN›55 PRINT NAME$:REM PRINT THE REPLY›56 CLOSE #1:REM CLOSE THE FILE›57 DISKS$="Dl:":REM INITIALIZE STRING›58 DISK$(2,2)=NAME$:REM INSERT DRIVE NUMBER›