- 积分
- 202
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2011-7-17
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
画极地投影出现这个问题,不知道怎么解决,求各位高手指点
'reinit'
'open D:\continue-rain\500hgt\jyw.ctl'
'open D:\continue-rain\500hgt\juw.ctl'
'enable print D:\continue-rain\500hgt\n-pianshao.gmf'
'set frame circle'
'set grads off'
'set mproj nps';'set mpdset mres';'set poli off'
'set map 1 2 0.6'
'set grid on'
'set gxout shaded'
'set black -2.571 2.571';'set clevs -2.571 2.571'
'set ccols 5 0 2'
'd t'
'set gxout contour'
'set cthick 5'
'd hgt.2'
'q w2xy 90 -3'
x10=subwrd(result,3);y10=subwrd(result,6)
'set string 1 c 5 0'
'draw string 'x10' 'y10' 90E'
'q w2xy 180 -3'
x11=subwrd(result,3);y11=subwrd(result,6)
'set string 1 l 5 0'
'draw string 'x11' 'y11' 180E'
'q w2xy 270 -3'
x12=subwrd(result,3);y12=subwrd(result,6)
'set string 1 c 5 0'
'draw string 'x12' 'y12' 90W'
'q w2xy 360 -3'
x13=subwrd(result,3);y13=subwrd(result,6)
'set string 1 r 5 0'
'draw string 'x13' 'y13' 180W'
'print'
'disable print'
*'printim D:\continue-rain\500hgt\pianduo.gif x800 y600 white'
;
|
|