【已解决】如何实现同时出好几张一页多图的物理页啊

莎朗嘿哟YY

请教大神，如何实现同时出好几张一页多图的物理页啊？比如我要画8个时次，我就要同时出两张每一张上有4幅图的。。。。
我编的脚本如下：（我这个脚本只能一次出一张上面有4幅图的，我其实有8个时次）
'reinit'
rc=gsfallow("on")
nrows=2
ncols=2
args=nrows%'  '%ncols
'enable print E:\nfsj\draw.gmf'
'open E:\nfsj\air.ctl'
'open E:\nfsj\hgt.ctl'
'set mproj scaled'
panels(args)
p=1
ptot=nrows*ncols
while(p<=ptot)
_vpg.p
'set parea 1 9.8 1 7.5'
'set t 'p''
'set xlint 10'
'set ylint 10'
'set grads off'
'set grid off'
'set mpdraw on'
'set map  1'
'set xlopts 1 5 0.14'
'set ylopts 1 5 0.14'
'set lev 500'
'set cint 4'
'set ccolor 2'
'set cthick 8'
'set cstyle 2'
'd air-273.15'
'set cint 4'
'd hgt.2*0.1'
'q w2xy 65 75'
x1=subwrd(result,3)
y1=subwrd(result,6)
'set string 1 c 8 0'
'set strsiz 0.2'
'set font 5'
if(p=1);mm=a;endif;
if(p=2);mm=b;endif;
if(p=3);mm=c;endif;
if(p=4);mm=d;endif;
'draw string 'x1' 'y1' ('mm')'
'print'
p=p+1
endwhile
'set vpage off'
'disable print'
'reinit'
;

leeol

外面再加一个循环就可以实现了

leeol

给你个参考：
'reinit'
rc=gsfallow("on");nrows=2;ncols=2
args=nrows%' '%ncols
'enable print E:\test1\3\kelvin_wave2.gmf'
'open E:\test1\3\kelvin_wave.ctl'
tt=1;while(tt<=8)
panels(args);p=1;ptot=nrows*ncols
while(p<=ptot);_vpg.p
'set parea 1 10.5 1 7.5'
'set grads off';'set grid off';'set mproj off'
'set xlopts 1 6 0.18';'set ylopts 1 6 0.18'
'set x 1 101';'set y 1 51';'set z 1';'set t 'tt''
'set gxout vector';'set arrowhead 0.08'
'd skip(u,5,5);skip(v,5,5)'
'set gxout contour';'set ccolor 1';'set clopts -1 -1 0.15'
'd eta'
'draw title kelvin wave (ita0=1 h0=6*10`a-`n`a7`n sigma>0) t='tt''
p=p+1;tt=tt+1;endwhile
'set parea off';'set vpage off'
'print';'c'
endwhile
'disable print'

莎朗嘿哟YY

leeol 发表于 2014-4-17 23:51
给你个参考：
'reinit'
rc=gsfallow("on");nrows=2;ncols=2

太感谢了，我之前把tt＝tt＋1的位置写错了，所以出错

leeol

莎朗嘿哟YY 发表于 2014-4-18 00:17
太感谢了，我之前把tt＝tt＋1的位置写错了，所以出错

可以把修改后的程序贴出来

leeol

莎朗嘿哟YY 发表于 2014-4-18 00:17
太感谢了，我之前把tt＝tt＋1的位置写错了，所以出错

可以把修改后的程序贴出来

莎朗嘿哟YY

leeol 发表于 2014-4-18 20:20
可以把修改后的程序贴出来

好的，等明天用电脑了就贴～其实前辈给的参考就很好啦～

zhouling

莎朗嘿哟YY 发表于 2014-4-19 10:01
好的，等明天用电脑了就贴～其实前辈给的参考就很好啦～

你不会是周静吧？

zhouling

leeol 发表于 2014-4-18 20:20
可以把修改后的程序贴出来

狂魔，来指导学妹吗？

zhouling

leeol 发表于 2014-4-18 20:20
可以把修改后的程序贴出来

狂魔，来指导学妹吗？{:lol:}