- 积分
- 335
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2016-10-20
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2018-4-7 15:38:26
|
显示全部楼层
'reinit'
'open F:\shuju\4\200.ctl'
'set grads off'
'set grid off'
'set map 1 1 10'
'set mproj nps'
'set frame on'
'set lon 0 360'
'set lat 0 90'
'set gxout contour'
'set cthick 6'
'd avet'
'set strsiz 0.15'
'q w2xy 90 -3'
x1=subwrd(result,3);y1=subwrd(result,6)
'set string 1 c 8 0'
'draw string 'x1' 'y1' 90E'
'q w2xy 180 -3'
x2=subwrd(result,3);y2=subwrd(result,6)
'set string 1 l 8 0'
'draw string 'x2' 'y2' 180'
'q w2xy 270 -3'
x3=subwrd(result,3);y3=subwrd(result,6)
'set string 1 c 8 0'
'draw string 'x3' 'y3' 90W'
'q w2xy 360 -3'
x4=subwrd(result,3);y4=subwrd(result,6)
'set string 1 r 8 0'
'draw string 'x4' 'y4' 0'
'printim F:\shuju\4\pic\ave200.png white'
;
这是GS文件,谢谢帮助~
|
|