= I M-UNERA2.BAS by John Rawnsley. Unerase files on drive M:. (c) 1987+   a-c ()()6 F3,3E,89,D3,F0,4E,23,46,3E,E5,02,3E,84,D3,F0,FB6( C9,F3,3E,89,D3,F0,1A,4F,06,00,7E,23,66,6F,11,0062 F5,ED,B0,3E,84,D3,F0,FB,C9,F3,3E,89,D3,F0,4E,236< 46,3E,00,02,3E,84,D3,F0,FB,C9,09,00,0C,00,00,006F 00,00,0E,32,11,E9,F4,CD,05,00,0E,0D,CD,05,00,C94P  O  ,&("&H")>Zcl"E""H" "f"cl;ae/d a()"Y"( )( )Enaddabytecop cop(add,byte)x () ) () aa  n6()aaa  n=  ()"No erased files on drive M:""e";    @ "e"a(); ""D%(u) ""   w("0123456789ABCDEF",) () 6. () e "ERASE ""K"; ()  e "K""f"a()"M""M"a()"I""I"; @ "e"a();  ()  e "K""f"a()"M""M"a(); @ "e""L""L"a(); % ( ) ()   7 "K"; () D&("&H")   " Try again" ,\add()pp e p(add)  p(add)/ e " Unerased"  " Erased"b"   k a((k)); @k ,e a(); 36log log  "y"cl;@   KJadd()byte cop cop(add,byte)2Tht(,)" "as""   1^()hht(,)" "Fh   asas()  asas"."rE| x(h,4)x(as,) " "|(h,0)|(as,)a a()"Enter (hex) number against file to unerase or DEL-> and number to erase again."W "Use up and down arrows to see other erased files if there are more than eight."[ "If the file is larger than 32k it will have several entries. All must be unerased."+ "STOP or ^C to confirm the changes."T a()();;"= &H"t(,)" erased directory entries on drive M:";3 "X"( )( )(5)(y) "H";a()();;"= &H"t(,)" erased directory entries o