- 积分
- 166
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2015-10-28
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
本帖最后由 格子_印象 于 2017-4-20 23:37 编辑
这是我编写的gs文件,为了画出台风路径图,数据文件里只有经纬度
'reinit'
'printim h:\data\scps.png'
'open h:\data\scps.ctl'
'set lat 0 40'
'set lon 100 180'
'set lev 1000'
'set xlopts 1 4 0.15'
'set ylopts 1 4 0.15'
'set grid on'
'set cmax 0'
'd lon'
i=1
aa='h:/data/scps.txt'
while(i<=61)
a1=read(aa)
b1=sublin(a1,2)
say b1
lo=sublin(b1,1)
la=sublin(b1,2)
'q w2xy 'lo''la''
x1=subwrd(result,3)
y1=subwrd(result,6)
say x1
say y1
'draw wxsym 40 'x1' 'y1' 0.3 2 6'
i=i+1
endwhile
ff=close(aa)
'print'
'disable print'
;
|
|