1
function [stk,txt,top]=sci_close()
4
stk=list('xdel()','0','0','0','1')
6
if convstr(stk(top)(1))=='''all''' then
7
txt='for %w=winsid(),xdel(%w);end'
8
stk=list(' ','-2','0','0','1')
9
elseif stk(top)(5)=='1' then
10
stk=list('xdel('+stk(top)(1)+')','0','0','0','1')
12
set_infos(['Not enough information on '+stk(top)(1);
13
'using mtlb_close insted of xdel'],1)
14
stk=list('mtlb_close('+stk(top)(1)+')','0','0','0','1')
17
txt='for %w=winsid(),xdel(%w);end'
18
stk=list(' ','-2','0','0','1')