10 REM XDOS:DELETE 20 OPEN15,8,15 30 FORI=1TO10 40 IFAR$(I)=""GOTO70 50 PRINT#15,"S0:"+AR$(I) 60 NEXT 70 CLOSE15:END