(CNDIR (QUOTE {FLOPPY})) (LOAD (QUOTE TEDIT.LCOM)) (PRINTOUT T "TEdit is now loaded." T T T) STOP