BIN QDIR.EXE
  TEXT QDIR.PAS