FOR 4040/2031/1540/15418(™"“DISKETTE PURGE",Y2™:™"WHICH DRIVE (0/1) ?’";y<¡DR$:‹DR$³±"0"¯DR$³±"1"§ 60‹F™DR$:D²Å(DR$)¨PDR$²"I"ªDR$:Ÿ15,8,15,DR$±Z450ÅdŸ1,8,3,"#":460æn™:™"PRESS'Y’'TO DEL FILE":™òxZ$²Ç(0)ÿ‚T²18:S²1Œ˜15,"U1:"3;D;T;S+–˜15,"B-P:"3;2ª32¬RC ¡#1,A$:‹A$²""§A$²Z$Vª‹Æ(A$)³129§270l´K²5ª32¬R¤20ª32¬R~¾˜15,"B-P:"3;KœÈ¡#1,A$:‹A$²""§™"’";:‰220¥Ò™A$;«Ü‚Áæ™,,"PURGE ? ’";Þð¡A$:‹A$³±"Y"¯A$³±"N"§240æú™A$÷‹A$²"Y"§360 R²Rª1:‹R³8§140˜15,"B-P:"3;04"¡#1,A$:‹A$²""§A$²Z$a,T²Æ(A$):‹T²0§™:™"END OF DIRECTORY.":‰400s6˜15,"B-P:"3;1‹@¡#1,A$:‹A$²""§A$²Z$¼JS²Æ(A$):™:™"***NEXT TRACK: ";:NU²T:520:™N$;ïT™ £20);"NEXT SECTOR: ";:NU²S:520:™N$;" ***":™ü^R²0:‰140h˜15,"B-P:"3;5ª32¬R«3"r˜1,Ç(0);7|˜15,"U2:"3;D;T;SB†460:ŽI 1e•™"VALIDATE DISK Y OR N"y–¡V$:‹V$²"Y"§410ˆ—‹V$²""§406’˜ 15:€š™:™"VALIDATING DISK’"¿¤˜15,("V"ªDR$)Ì®460: 15Ò¸€êÂ CHECK DISK STATUSÿÌ„15,ER,ER$,TR,SEÖ‹ER²0§Žà 15: 1.ê™:™"DISK ERROR! ";@ô™ER;ER$;TR;SEFþi FORMAT RETURN WITHOUT GOSUBS{N$²Ê(Ä(NU),2)”‹ Ã(N$)³2§ N$²"0"ªN$š&Ž