★ APPLICATIONS ★ DIVERS ★ PROGRAM ERASER ON AMSTRAD (POPULAR COMPUTING WEEKLY) ★ |
Program Eraser on Amstrad (Popular Computing Weekly) | Applications Divers |
This short routine simplifies erasing of programs from Discs. Run it then press R to start, C to Cat or D to Delete itself. When run, program requests program title then type. Enter the type as BAS. etc, as usual. This program will assemble the title and type inserts the full stop between then. After each erase action, the program automatically does a Cat. (Due to the inkey$ function being below standard on the Amstrad. it is necessary to put Inkey$ value Into a string before checking or else response time would be very slow . hence reason lor lines 80 and 180) Note that the Chr$(24) in print lines produces inverse characters. Note also that the comma in Input statements suppress the '?' from being printed. For optimum presentation, your screen listing should be identical to this printed listing.
|