'╓ы╔┴AдJдAТwБЩЩАSAVE"D:QDIRMAK.BAS"Ы Г;@,- +-(Quick Directory, by Mat*Rat""((c) 1989, Antic Publishing($($(Get disk in Drive 1 ready2$(and press RETURN Г!($(<#F; @А1@@D:QDIR; @РP8(Couldn't create D:QDIR.5(ERROR F:AХ,8Z? #1;"10 ";Ыd77(@CLR:DIM A$(153):A$(1,100)=>:@4,nА-@Ax"Б(@>:Б,В АМ%%(@>:@4,>:AU,Ц? #1;"20 ";Ыа))(@A$(101,153)=>:@4,кА-AAS┤"Б(@>:Б,╛ А╚TT(@>:@4,:? >:@4, Dir Spec >:@4,;:A=USR(ADR(A$))╥@▄((Done.ц""(Try E.>:@4,D:QDIRЁ (to get a quick directory·(listing now!(((E(B(E.>:@4,D:QDIR>:@(,>:@(,>:@(,E##104,240,6,170,104,104,202,208Ы251,162,0,169,11,141,66,3Ы"142,72,3,142,73,3,169,63Ы,32,86,228,169,5,141,66,3Ы6169,4,141,69,3,142,68,3Ы@169,40,141,72,3,32,86,228ЫJ162,80,169,12,157,66,3,32ЫT86,228,169,3,157,66,3,169Ы^4,157,69,3,169,0,157,68Ыh3,169,6,157,74,3,169,128Ыr157,75,3,32,86,228,48,55Ы|162,80,169,0,157,68,3,157ЫЖ73,3,169,4,157,69,3,169ЫР40,157,72,3,169,5,157,66ЫЪ3,32,86,228,48,25,162,0Ыд169,4,141,69,3,142,68,3Ыо169,40,141,72,3,169,9,141Ы╕66,3,32,86,228,16,201,162Ы┬80,169,12,157,66,3,76,86Ы╠228,-1ЫА D:QDIRMAK.BAS