4385 OPEN DDA$+":xyz.bas" FOR OUTPUT AS #1