求多年12个月逐月的高度变化曲线，请大家帮我看看

wsweiyp

我的资料是用1948年至今NCEP的对流层顶月平均气压值，先是求出单独每月多年的平均，然后再将全球的气压场求平均，最后用压高公式转换得到12个月的高度值，不知道自己有没有问题，请大家帮我看看，谢谢大家了
gs文件如下：
'reinit'
'sdfopen D:\shixi\pres.mon.mean.nc'
'set fwrite d:\lunwen\nanbianhua1.grd'
'set gxout fwrite'
'set x 1 144'
'set y 1 73'
'set lev 0'
'set t 1'
i=1
t1=372+i
while(i<=12)
'define h1=ave(pres,t='t1',t=732,12)'
'define h2=aave(h1,x=1,x=144,y=1,y=73)'
'define h3=-7500*log(h2/1013.25)'
'd h3'
i=i+1
endwhile
'disable fwrite'
;