PTT數位生活區 / Fortran

Re: [問題] 指定讀取文字資料

看板Fortran作者 (aa)時間12年前 (2012/02/04 20:20), 編輯推噓1(1推 0噓 1→)
留言2則, 2人參與, 最新討論串2/4 (看更多)
※ 引述《btoker (阿瑞)》之銘言： : line,framesections, point coordinates三個都算是標題 : 我想只抓framesections裡的八個frame : 輸出答案為" 8 " : 請問是否有指令可以去做判別"我要從哪裡開始讀" : 或是" 讀到空白處結束" 並計算個數 : 謝謝各位 CHARACTER(LEN=80) LLEN INTEGER :: IERR,COUNT OPEN(UNIT=11,FILE="xx.txt") COUNT = 0 DO WHILE(.TRUE.) READ(11,"(A80)",IOSTAT=IERR) LLEN IF(IERR==-1) EXIT IF(LLEN(1:13)=="framesections") THEN DO WHILE(.TRUE.) IF(IERR==-1) EXIT READ(11,"(A80)",IOSTAT=IERR) LLEN IF(LLEN(1:5)=="frame") THEN COUNT = COUNT + 1 END IF END DO END IF END DO 試試看吧 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 114.33.208.120
推
02/05 10:37, , 1F
感謝指教^^
02/05 10:37, 1F
→
02/07 00:08, , 2F
原來可以用if判斷前幾個字元! 真的上了一課
02/07 00:08, 2F
‣ 更多 kkarthur 的文章
文章代碼(AID): #1FBIAVTu (Fortran)
討論串 (同標題文章)
本文引述了以下文章的的內容：
以下文章回應了本文：
完整討論串 (本文為第 2 之 4 篇)：
排序： 最舊先 | 最新先 | 留言數
在新視窗開啟完整討論串 (共4篇)
Fortran 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 kkarthur 的文章
文章代碼(AID): #1FBIAVTu (Fortran)