4133 OPEN XDDA$+ARC$(1)+EXT$ FOR INPUT AS #1