0 ' SS-DIR.BA by Phil Wheeler Based on DFILES.TDD by Don Zeikel. Requires Powr-Dos by Acroatix 1 'CLUB 100 LIBRARY - 415/939-1246 BBS, 937-5039 NEWSLETTER, 932-8856 VOICE 2 CLS:LFILESV:PRINT@127,"Press ANY Key When Done":CLEAR256,HIMEM-1292:DEFSTRA-E:DEFINTJ,L:H=HIMEM:E=CHR$(27):ONERRORGOTO8:DSKO$0,0,H:CLS:FORL=0TO39:I=H+31*L:IFPEEK(I)=0ORPEEK(I)=170THEN5 3 IFL>35THENPOKE63038,1 4 FORJ=0TO5:PRINTCHR$(PEEK(I+J));:NEXT:J=J+1:PRINTCHR$(PEEK(I+J)+32);:J=J+1:PRINTE"p"CHR$(PEEK(I+J)+32)E"q";:NEXT 5 A=INKEY$:IFA=""THEN5 6 S=79-PEEK(H+1260):CLS:IFS=1THENB=""ELSEB="s" 7 PRINT@133,S"Sector"B" Free":FORI=1TO1000:NEXT 8 POKE63038,0:CLEAR256,H+1292:MENU