dir = ‘C:\Users\킴정훈\Desktop\알찬방학\ADCP\’

fn = file_search(dir + ‘ADCP.dat’)

fl = file_lines(fn)

yy = intarr(fl-16)
mm = intarr(fl-16)
dd = intarr(fl-16)
hh = intarr(fl-16)
mn = intarr(fl-16)
dep = fltarr(fl-16)
U = intarr(fl-16,39) ; EAS
V = intarr(fl-16,39) ; Nor
sp = intarr(fl-16,39) ; Mag
dir = intarr(fl-16,39) ; dir

aa = intarr(4723,1329)

tmp = ‘ ‘

openr, 1, fn

for k = 0,15 do begin

readf, 1, tmp

endfor

i = 0

while (not eof(1)) do begin

readf, 1, x1, x2, x3, x4, x5, x6, u1, u2, u3, u4, u5, u6, u7, u8, u9, u10, u11, u12, u13, u14, u15, u16, u17, u18, u19, u20,u21, u22, u23, u24, u25, u26, u27, u28, u29, u30, u31, u32, u33, u34, u35, u36, u37, u38, u39,v1, v2, v3, v4, v5, v6, v7, & v8, v9, v10, v11, v12, v13, v14, v15, v16, v17, v18, v19, v20, v21, v22, v23, v24, v25, v26, v27, v28, v29, v30, v31, v32,v33, v34, v35, v36, v37, v38, v29 format = ‘(12x, i4,4i8, 26x, f6.3, 39i8, 39i8)’

yy(i) = x1 & mm(i) = x2 & dd(i) = x3 & hh(i) = x4 & mn(i) = x5 & dep(i) = x6 & U(i,0) = u1
U(i,1) = u2 & U(i,2) = u3 & U(i,3) = u4 & U(i,4) = u5 & U(i,5) = u6 & U(i,6) = u7 & U(i,7) = u8
U(i,8) = u9 & U(i,9) = u10 & U(i,10) = u11 & U(i,11) = u12 & U(i,12) = u13 & U(i,13) = u14
U(i,14) = u15 & U(i,15) = u16 & U(i,16) = u17 & U(i,17) = u18 & U(i,18) = u19 & U(i,19) = u20
U(i,20) = u21 & U(i,21) = u22 & U(i,22) = u23 & U(i,23) = u24 & U(i,24) = u25 & U(i,25) = u26
U(i,26) = u27 & U(i,27) = u28 & U(i,28) = u29 & U(i,29) = u30 & U(i,30) = u31 & U(i,31) = u32
U(i,32) = u33 & U(i,33) = u34 & U(i,34) = u35 & U(i,35) = u36 & U(i,36) = u37 & U(i,37) = u38 & U(i,38) = u39

V(i,0) = v1 & V(i,1) = v2 & V(i,2) = v3 & V(i,3) = v4 & V(i,4) = v5 & V(i,5) = v6 & V(i,6) = v7 & V(i,7) = v8
V(i,8) = v9 & V(i,9) = v10 & V(i,10) = v11 & V(i,11) = v12 & V(i,12) = v13 & V(i,13) = v14
V(i,14) = v15 & V(i,15) = v16 & V(i,16) = v17 & V(i,17) = v18 & V(i,18) = v19 & V(i,19) = v20
V(i,20) = v21 & V(i,21) = v22 & V(i,22) = v23 & V(i,23) = v24 & V(i,24) = v25 & V(i,25) = v26
V(i,26) = v27 & V(i,27) = v28 & V(i,28) = v29 & V(i,29) = v30 & V(i,30) = v31 & V(i,31) = v32
V(i,32) = v33 & V(i,33) = v34 & V(i,34) = v35 & V(i,35) = v36 & V(i,36) = v37 & V(i,37) = v38 & V(i,38) = v39

i = i+1

endwhile
==================================================================
배열이 많아 이렇게 사용하고 있습니다. 위에 U는 읽혔지만 V에서 readf 중에 v31에서 옥색의 글씨로
변하더니 dir부터 파일이 읽히지 않고 있습니다. 어떤부분이 잘못 됬나요?