Listing of file='609FG110' on disk='vmedia/701-2738G.wvd.zip'
# Sector 866, program filename = '609FG110' 0010 REM '609FG110' - SEE IF LIBRARY EXISTS 0030 B2$=" " : J$=HEX(0D) : R5$="0000"&STR(B0$,10,1) : GOSUB '110(R5$," ") : IF B2$<>" "THEN 170 : GOSUB '217(1,1,STR(B0$,1,10),B9$) : IF V1=0THEN GOSUB 2505 0170 LOAD TA5$ 2500 % DO NOT RENUMBER THE FOLLOWING 2505 B2$="Library "&STR(R5$,5,1)&" is empty" : RETURN