/* Interp.js - change control section ID Date Notes EN001 01/03/00 Update parser to permit repeat E [L] EN002 01/03/00 Update parser to permit bk (backwards) dv (dive) rl (roll) DB002 01/03/00 Check for parse errors before executing the tree walkover */ function first(a){ return(a[1]); } function second(a){ return(first(a[2])); } function Sew(a,b){ var y=Math.max(a.length,b.length); var x1=a[0].length; var x2=b[0].length; var r = new Array() for (i=0;iwinwidth){ pw = p2(winwidth/x[0].length); } for (var i=0;i"; } rs+="
\n"; } if (debug) document.debuggery.tree_out.value = rs; } else alert(ParseError); return(rs); } function Go(s,debug,winwidth,winhieght,pw){ if (arguments.length<3) winwidth = 600; //alert(winwidth); //winwidth = document.forms[0].winwidth.value; if (arguments.length<4) winheight = 600; //winheight = document.forms[0].winheight.value; if (arguments.length<5) pw = 32; //pw=document.forms[0].pw.value; newwin("\n"+GoStr(s,debug,winwidth,winhieght,pw)+""); }