CLOSE #1:CLR :DIM Z$(18):? "}Which File to UNLOCK?"›? " Ex. D2:DATA.EXE":INPUT #16,Z$:? "Unlocking ";Z$:XIO 36,#1,0,0,Z$›