| 查看: 1040 | 回复: 0 | ||
cxf19850210木虫 (正式写手)
|
[求助]
怎么解读二进制文件
|
|
Sample TextSample Text 大家好，我现在手头上有一个二进制文件，怎么将其读取为十进制文件呢？谢谢大家。 下面是输入该二进制的程序，请问根据它可以解译该程序写出来的二进制文件吗？谢谢 C *** WATER QUALITY IF(ISTRAN(8).GT.0)THEN ! 1) CHC - cyanobacteria ! 2) CHG - diatom algae ! 3) CHD - green algae ! 4) ROC - refractory particulate organic carbon ! 5) LOC - labile particulate organic carbon ! 6) DOC - dissolved organic carbon ! 7) ROP - refractory particulate organic phosphorus ! 8) LOP - labile particulate organic phosphorus ! 9) DOP - dissolved organic phosphorus ! 10) P4D - total phosphate ! 11) RON - refractory particulate organic nitrogen 22) macroalgae ! 12) LON - labile particulate organic nitrogen ! 13) DON - dissolved organic nitrogen ! 14) NHX - ammonia nitrogen ! 15) NOX - nitrate nitrogen ! 16) SUU - particulate biogenic silica ! 17) SAA - dissolved available silica ! 18) COD - chemical oxygen demand ! 19) DOX - dissolved oxygen ! 20) TAM - total active metal ! 21) FCB - fecal coliform bacteria OPEN(97,FILE='WQ_EE.OUT',STATUS='UNKNOWN',POSITION='APPEND', & FORM='BINARY') WRITE(97)TIME DO L=2,LA DO K=1,KC DO NW=1,NWQV IF(IWQ(NW).GT.0)THEN WQ=WQV(L,K,NW) IF(NW.EQ.1.AND.ISTRWQ(1).EQ.1)THEN WQ=WQ*WQCHLC ENDIF IF(NW.EQ.2.AND.ISTRWQ(2).EQ.1)THEN WQ=WQ*WQCHLD ENDIF IF(NW.EQ.3.AND.ISTRWQ(3).EQ.1)THEN WQ=WQ*WQCHLG ENDIF WRITE(97)WQ ENDIF ENDDO ENDDO ENDDO CLOSE(97,STATUS='KEEP') !WQV(L,K,NW) !READ(1,*)(ICWQTS(NW,M),NW=14,NTSWQV),ICWQTS(IDNOTRVA,M) ENDIF RETURN END |
回复此楼» 猜你喜欢
青C最后一年，散金祈福吧
已经有48人回复
-
没中，有点难受，科研也许就到这了，回归生活吧
已经有15人回复
-
地球化学论文润色/翻译怎么收费?
已经有85人回复
-
地区已中，感谢虫友们！
已经有109人回复
-
355 B区地质调剂
已经有1人回复
-
解锁青少年负责任决策的关键：基于PISA 2022全球数据的SEL维度研究成果发表
已经有1人回复
-
香港城市大学 数据科学系+能源与环境学院 李堂华 课题组诚招全奖博士/博士后/研究助理
已经有51人回复
找到一些相关的精华帖子，希望有用哦~
本人有一二进制文件，希望找一程序打开，变为文本文件
已经有10人回复
- 输出文件出现二进制代码
已经有4人回复
- 如何将计算得到的二进制文件可视化？本人模拟计算新手，谢谢大家啦~
已经有4人回复
- 【求助】用pdepe求解偏微分方程
已经有10人回复
- 谁有小波分析处理GPS数据方面的资料？
已经有5人回复
- 【求助】ENVI 头文件怎么解读？
已经有11人回复
点击这里搜索更多相关资源科研从小木虫开始，人人为我，我为人人
5