- 积分
- 195
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2021-10-10
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
求助Grads打点,我想把大于一倍标准差和小于负一倍标准差的区域打点,按照精华帖写的,但是整个图都有点,不知道哪出错了,求大佬指点一下~
'reinit'
***********中间没放其他代码***********
*打点
'open D:/FG/height/hgt/200dev.ctl'
'set lon 60 180'
'set lat 0 45'
'set lev 200'
'set t 1'
y2 = 0
while(y2<=45)
x2 = 60
while(x2<=180)
'q w2xy 'x2' 'y2''
abx = subwrd(result,3)
aby = subwrd(result,6)
'set lon 'x2''
'set lat 'y2''
'd dev.2'
aaa = subwrd(result,4)
if(aaa<0)
aaa = -aaa
endif
if(aaa>=1)
'set string 0 c 6'
'set strsiz 0.02'
'draw string 'abx' 'aby' `3D'
endif
x2 = x2+2.5
endwhile
y2 = y2+2.5
endwhile
'cbarn 1.25 0'
'printim D:\FG\height\hgt\result2\21hgt200.png white'
;
|
|