home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 1B / DATAFILE_PDCD1B.iso / _pocketbk / pocketbook / 001 / psionu_arc / DELF.OPL < prev    next >
Text File  |  1991-02-15  |  189b  |  15 lines
  1. DELF:
  2. LOCAL A$(16),B$(1)
  3. PRINT"Target File" : PRINT"    A:";
  4. INPUT A$
  5. A$="A:"+A$
  6. PRINT A$
  7. PRINT"CORRECT:";
  8. INPUT B$
  9. IF B$="Y"
  10.  DELETE A$
  11.  PRINT A$;" deleted";
  12.  BEEPER:
  13. ENDIF
  14.  
  15.