怎么画任意两点间的连线

7792

我想画任意两点间的垂直剖面，可参考了网上看到的gs文件后还是画不出来，于是想一步步来，先画出某一固定垂直高度x-y剖面的任意两点间的连线，可命令窗口总是不提示我点击鼠标选择点，请高手帮我看看，下面的gs文件问题在哪里？
'open /＊/＊/grads/test.ctl'
'set parea 0 10.5 0 8.2'
'set parea off'
'set mpdraw off'
'set grads off'
'set mproj off'
'set x 0 50'
'set y 0 50'
'set z 20'
'set t 38'
'd REFL_10CM'   
say 'click a'
'query bpos'                                            
x0=subwrd(result,3)                           
y0=subwrd(result,4)                                                                     
say 'click b'     
'q bpos'                                       
x1=subwrd (result,3)                           
y1=subwrd (result,4)                                                              
' draw line 'x0'  'y0'  'x1'  'y1' '        
return   

mofangbao

论坛river的帖子看过了吗,一遍做不出来就多试几遍