- 积分
- 24
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2014-9-22
- 最后登录
- 1970-1-1
|
发表于 2015-4-6 08:52:25
|
显示全部楼层
这是我用的里面的第25号例子的代码
PRO ex25
d=NCREAD('C:\idl_guide5\data\gdata.nc')
PSOPEN
CS, SCALE=1, NCOLS=14
LEVS, MIN=-300, MAX=300, STEP=50
map_g5
con_, FIELD=d.ht(*,*,0), X=d.lon, Y=d.lat, /NOCOLBAR
f=FEATURES(FIELD=d.ht(*,*,0), MIN=-100, MAX=200, X=d.lon, Y=d.lat, $
THRESHOLD=10, LABEL=0, CHARSIZE=300, COL=1)
PSCLOSE
END
运行后弹出了psclose.pro
代码如下:
PRO PSCLOSE, NOVIEW=noview, GV=gv
;Procedure to close and view a postscipt file.
;(C) NCAS 2010
;Check !guide structure exists.
DEFSYSV, '!guide', exists=exists
IF (exists EQ 0) THEN BEGIN
PRINT, ''
PRINT, 'ERROR - PSOPEN must first be called to initiate a postscript file.'
PRINT, ''
STOP
ENDIF
DEVICE, /CLOSE
os=STRLOWCASE(!version.os_family)
IF ((os EQ 'unix') OR (os EQ 'macos'))THEN BEGIN
IF (NOT KEYWORD_SET(noview)) THEN BEGIN
IF NOT KEYWORD_SET(GV) THEN BEGIN
com='display +antialias -density 150 -resize 60% '
IF NOT KEYWORD_SET(!guide.portrait) THEN com=com+'-rotate -90 '
com=com+!guide.psfile
SPAWN, com
ENDIF
IF KEYWORD_SET(GV) THEN BEGIN
IF (!guide.portrait NE 1) THEN com='gsview -seascape '+!guide.psfile
IF (!guide.portrait EQ 1) THEN com='gsview '+!guide.psfile
SPAWN, com
ENDIF
ENDIF
ENDIF
IF (os EQ 'windows') THEN BEGIN
IF (NOT KEYWORD_SET(noview)) THEN BEGIN
com=!guide.windows_viewer+' ' +!guide.psfile
SPAWN, com, /NOSHELL
ENDIF
ENDIF
出现这样的错误,
% SPAWN: Error executing spawn command.
系统找不到指定的文件。
% Execution halted at: PSCLOSE 37 C:\idl_guide5\lib\psclose.pro
% EX25 10 C:\idl_guide5\examples\ex25.pro
% $MAIN$
这是什么回事??小白一个,请教请教。
END
|
|