请选择 进入手机版 | 继续访问电脑版
爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 955|回复: 4

[脚本编辑] 转台站数据map文件无法生成问题1

[复制链接]

新浪微博达人勋

发表于 2018-4-7 09:27:05 | 显示全部楼层 |阅读模式

登录后查看更多精彩内容~

您需要 登录 才可以下载或查看,没有帐号?立即注册 新浪微博登陆

x
本帖最后由 主啊 于 2018-4-8 14:36 编辑

我改了很多次,无奈,各位前辈可以帮我看看是什么问题么????
原始程序:---------------------------------------------------------------------------

program binary
implicit none

integer,parameter::nnt=31,stii=2425

integer:: ii=1,jj=1,i,j
integer nlev,flag
real tim
character*7 sta1(stii)
real lon1(stii),lat1(stii),rain1(nnt,stii)

!===========================================
character*7 name       !name字符型
real lat,lon,year,mon,day,water
!===========================================

Open(1,file='real16061108.txt',status='old')               !status = old防止覆盖,有格式顺序
open(2,file='sta.grd',status='replace',form='binary')  ! 二进制型
!=============================================================
do while(.not.eof(1))
        if(ii.NE.32)then
                READ(1,*) name,lon,lat,year,mon,day,water
                rain1(ii,jj)=water
                ii=ii+1
        end if

        if(ii.EQ.32)then
                sta1(jj)=name
                lon1(jj)=lon
                lat1(jj)=lat
                jj=jj+1
                ii=1
        end if
end do
!=================================================================

do i=1,nnt
        do j=1,stii
                tim=0.0
                nlev=1
                flag=1 !无高空数据tim=0 , nlev = 0,有地面数据所以flag = 1

                Write(2) sta1(j),lon1(j),lat1(j),tim,nlev,flag,rain1(i,j)
                print *,sta1(j),lon1(j),lat1(j),tim,nlev,flag,rain1(i,j)
                pause
        end do
        nlev=0
        Write(2) sta1(j-1),lon1(j-1),lat1(j-1),tim,nlev,flag
end do

close(1)
close(2)
end
CTL文件:------------------------------------------------------------------------------------

DSET F:/3-mon/sta.grd
DTYPE station
STNMAP F:/3-mon/sta.map
UNDEF -32766
TITLE Rain Data Sample
*这里的时间可以根据上面示例文件中的第一行的时间填写
TDEF 31 linear 01JUL2016 1dy
VARS 1
rain1 0 99 Rain Data
ENDVARS


改了变量类型还是不行








出错

出错

原始数据

原始数据
4848848.JPG
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2018-4-7 15:40:54 | 显示全部楼层
http://bbs.06climate.com/forum.php?mod=viewthread&tid=4903
建议楼主仔细看看这个帖子及其附件,目测你的站点号变量定义类型有问题
密码修改失败请联系微信:mofangbao

新浪微博达人勋

 楼主| 发表于 2018-4-8 14:06:27 | 显示全部楼层
四叶草 发表于 2018-4-7 15:40
http://bbs.06climate.com/forum.php?mod=viewthread&tid=4903
建议楼主仔细看看这个帖子及其附件,目测你 ...

我改了,还是不行
密码修改失败请联系微信:mofangbao

新浪微博达人勋

 楼主| 发表于 2018-4-8 23:50:15 | 显示全部楼层
{:5_275:}{:5_275:}{:5_275:}{:5_275:}{:5_275:}{:5_275:}{:5_275:}{:5_275:}{:5_275:}{:5_275:}大佬不要潜水la,啊啊aaaa,走过路过,帮我看一下啦~~{:eb303:}{:eb303:}刚才看了一下自己写出来的数据是对的,为什么就是出不了map文件呢?
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2019-4-25 11:03:00 | 显示全部楼层
我也遇到了这样的问题,楼主最后是怎么解决的?
密码修改失败请联系微信:mofangbao
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

Copyright ©2011-2014 bbs.06climate.com All Rights Reserved.  Powered by Discuz! (京ICP-10201084)

本站信息均由会员发表,不代表气象家园立场,禁止在本站发表与国家法律相抵触言论

快速回复 返回顶部 返回列表