| 查看: 1021 | 回复: 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 |
回复此楼» 猜你喜欢
城乡规划学招收调剂 1名
已经有1人回复
-
无法从这份源码判断项目是否“获资助批准”
已经有11人回复
-
地质学论文润色/翻译怎么收费?
已经有159人回复
-
【招聘】科研助理+五险一金
已经有20人回复
-
招聘博士研究生
已经有45人回复
找到一些相关的精华帖子，希望有用哦~
本人有一二进制文件，希望找一程序打开，变为文本文件
已经有10人回复
- 输出文件出现二进制代码
已经有4人回复
- 如何将计算得到的二进制文件可视化？本人模拟计算新手，谢谢大家啦~
已经有4人回复
- 【求助】用pdepe求解偏微分方程
已经有10人回复
- 谁有小波分析处理GPS数据方面的资料？
已经有5人回复
- 【求助】ENVI 头文件怎么解读？
已经有11人回复
点击这里搜索更多相关资源科研从小木虫开始，人人为我，我为人人
10