From 8b1625a174a997fb85838dc1f7bd34c075228b40 Mon Sep 17 00:00:00 2001 From: Jeff Date: Mon, 13 Mar 2017 10:33:22 -0700 Subject: [PATCH] Added support for MACRO-10 literals --- modules/pdp10/lib/macro10.js | 111 +++++++++++++++++----- versions/pdpjs/1.34.2/pdp10-dbg.js | 148 ++++++++++++++--------------- 2 files changed, 163 insertions(+), 96 deletions(-) diff --git a/modules/pdp10/lib/macro10.js b/modules/pdp10/lib/macro10.js index 576e27d31..7fe627faf 100644 --- a/modules/pdp10/lib/macro10.js +++ b/modules/pdp10/lib/macro10.js @@ -44,7 +44,7 @@ if (NODE) { * sText:(string) * }} */ -var Macro; +var Mac; /** * @typedef {{ @@ -100,6 +100,19 @@ class Macro10 { /* * Initialize all the tables that MACRO-10 uses. + * + * The Macros and Symbols tables are fairly straightforward: they are indexed by a macro or symbol + * name, and each index points to a Mac or Sym object, respectively. + * + * We also treat REPEAT blocks and conditional (eg, IFE) blocks like macros, except that they are + * anonymous and immediately invoked as appropriate. What does that mean? Well, REPEAT blocks are + * always immediately invoked (repeatedly, based on the repeat count), whereas conditional blocks are + * either immediately invoked if the associated condition is true or skipped if the condition is false. + * + * Finally, we have LITERAL blocks, which are also semi-anonymous (because we give each one an + * auto-generated label based on the current line number), but they are never immediately invoked; + * instead, after we've finished processing all the lines in the original input file, we run through + * all the LITERAL entries in the Macros table and process the associated statement(s). */ this.tblMacros = {}; this.tblSymbols = {}; @@ -111,6 +124,7 @@ class Macro10 { this.sOperator = null; // the active operator, if any this.nMacroDef = 0; // the active MACRO definition state this.sMacroDef = null; // the active MACRO definition name + this.chMacroOpen = this.chMacroClose = ''; /* * If an ASCII/ASCIZ/SIXBIT pseudo-op is active, chASCII is set to the separator and sASCII collects @@ -190,7 +204,7 @@ class Macro10 { { if (this.nMacroDef) { if (this.nMacroDef == 1) { - var i = sLine.indexOf('<'); + var i = sLine.indexOf(this.chMacroOpen); if (i >= 0) { this.nMacroDef++; sLine = sLine.substr(i+1); @@ -233,6 +247,14 @@ class Macro10 { this.sOperator = sOperator; sOperands = sOperands.trim(); + /* + * Check the operands for a literal. + */ + var sLiteral = this.getLiteral(sOperands); + if (sLiteral) { + sOperands = sOperands.replace(sLiteral, this.addMacro(Macro10.PSEUDO_OP.LITERAL, sLiteral)); + } + if (!this.parseMacro(sOperator, sOperands)) { switch (sOperator) { @@ -397,20 +419,20 @@ class Macro10 { } /** - * getExpression(sInput, sDelims) + * getExpression(sOperands, sDelims) * * @this {Macro10} - * @param {string} sInput - * @param {string} [sDelims] - * @return {string|null} (if the input string begins with an expression, return it) + * @param {string} sOperands + * @param {string} [sDelims] (eg, comma, closing parenthesis) + * @return {string|null} (if the operands begin with an expression, return it) */ - getExpression(sInput, sDelims = "") + getExpression(sOperands, sDelims = ",") { var i = 0; var sExp = null; var cNesting = 0; - while (i < sInput.length) { - var ch = sInput[i]; + while (i < sOperands.length) { + var ch = sOperands[i]; if (sDelims.indexOf(ch) >= 0) { break; } @@ -418,21 +440,50 @@ class Macro10 { cNesting++; } else if (ch == '>') { if (--cNesting < 0) { - this.error("missing angle bracket(s): " + sInput); + this.error("missing bracket(s): " + sOperands); break; } } i++; } if (!cNesting) { - sExp = sInput.substr(0, i); + sExp = sOperands.substr(0, i); } else if (cNesting > 0) { - this.error("extra angle bracket(s): " + sInput); + this.error("extra bracket(s): " + sOperands); } return sExp; } + /** + * getLiteral(sOperands) + * + * @this {Macro10} + * @param {string} sOperands + * @return {string|null} (if the operands contain a literal, return it) + */ + getLiteral(sOperands) + { + var sLit = null; + var cNesting = 0; + var i = 0, iLiteral = -1; + while (i < sOperands.length) { + var ch = sOperands[i]; + if (ch == '[') { + if (!cNesting++) iLiteral = i; + } + i++; + if (ch == ']' && --cNesting <= 0) break; + } + if (cNesting < 0) { + this.error("missing bracket(s): " + sOperands); + } + if (iLiteral >= 0) { + sLit = sOperands.substr(iLiteral, i - iLiteral); + } + return sLit; + } + /** * addASCII(sOperands) * @@ -513,16 +564,20 @@ class Macro10 { * @this {Macro10} * @param {string} sOperator * @param {string} sOperands + * @return {string} */ addMacro(sOperator, sOperands) { var match, name, aParms, nOperand, iBracket; + this.chMacroOpen = '<'; + this.chMacroClose = '>'; + if (sOperator == Macro10.PSEUDO_OP.DEFINE) { match = sOperands.match(/([A-Z$%.][0-9A-Z$%.]*)\s*(\([^)]*\)|)\s*(<|)(.*)/i); if (!match) { this.error("unrecognized " + sOperator + " definition: " + sOperands); - return; + return ""; } /* * TODO: Tighten up this parsing at some point. All this is doing is extracting entire symbols @@ -533,11 +588,21 @@ class Macro10 { aParms = match[2].match(/[A-Z$%.][0-9A-Z$%.]*/g); nOperand = -1; iBracket = 3; - } else { - var sExp = this.getExpression(sOperands, ','); + } + else if (sOperator == Macro10.PSEUDO_OP.LITERAL) { + this.chMacroOpen = '['; + this.chMacroClose = ']'; + name = '@' + Str.toDec(this.nLine, 5); + match = [sOperands[0], sOperands.substr(1)]; + aParms = []; + nOperand = this.nLine; + iBracket = 0; + } + else { + var sExp = this.getExpression(sOperands); if (!sExp) { this.error("missing " + sOperator + " expression: " + sOperands); - return; + return ""; } sOperands = sOperands.substr(sExp.length + 1); sExp = sExp.trim(); @@ -557,11 +622,11 @@ class Macro10 { this.nMacroDef = 1; var sText = ""; - if (match[iBracket]) { // if there IS an angle bracket... - this.nMacroDef = 2; // then the macro definition has begun + if (match[iBracket]) { // if there IS also an opening bracket... + this.nMacroDef = 2; // then the macro definition has begun sText = match[iBracket + 1]; - if (sText.slice(-1) == '>') { // and if there is ALSO a closing angle bracket... - this.nMacroDef = 0; // the macro definition has also ended + if (sText.slice(-1) == this.chMacroClose) { // and if there is ALSO a closing bracket... + this.nMacroDef = 0; // the macro definition has ended as well sText = sText.slice(0, -1); } } @@ -578,6 +643,7 @@ class Macro10 { } else { this.sMacroDef = name; } + return name; } /** @@ -591,9 +657,9 @@ class Macro10 { { var sRemain = ""; for (var i = 0; i < sLine.length; i++) { - if (sLine[i] == '<') { + if (sLine[i] == this.chMacroOpen) { this.nMacroDef++; - } else if (sLine[i] == '>') { + } else if (sLine[i] == this.chMacroClose) { this.nMacroDef--; if (this.nMacroDef == 1) { this.nMacroDef = 0; @@ -701,6 +767,7 @@ Macro10.PSEUDO_OP = { ASCIZ: "ASCIZ", SIXBIT: "SIXBIT", DEFINE: "DEFINE", + LITERAL:"LITERAL", IFE: "IFE", REPEAT: "REPEAT", PAGE: "PAGE", diff --git a/versions/pdpjs/1.34.2/pdp10-dbg.js b/versions/pdpjs/1.34.2/pdp10-dbg.js index d57065728..7318b3eaa 100644 --- a/versions/pdpjs/1.34.2/pdp10-dbg.js +++ b/versions/pdpjs/1.34.2/pdp10-dbg.js @@ -63,37 +63,37 @@ Array.prototype.indexOf||(Array.prototype.indexOf=function(a,b){b=b||0;for(var c Function.prototype.bind||(Function.prototype.bind=function(a){function b(){return e.apply(this instanceof c&&a?this:a,d.concat(Array.prototype.slice.call(arguments)))}function c(){}if("function"!=typeof this)throw new TypeError("Function.prototype.bind: non-callable object");var d=Array.prototype.slice.call(arguments,1),e=this;c.prototype=this.prototype;b.prototype=new c;return b}); var v="pdp10",Pb="PDPjs",Qb=Math.pow(2,18)-1,Rb=Math.pow(2,18),Sb=Math.pow(2,17)-1,x=Math.pow(2,18)-1,y=Math.pow(2,18),z=Math.pow(2,35)-1,A=Math.pow(2,35),C=Math.pow(2,36)-1,D=Math.pow(2,36),E=Math.pow(2,32),Tb=Math.pow(2,34),Ub=Math.pow(2,36),Vb=Math.pow(2,21),Wb=Math.pow(2,26),Xb=Math.pow(2,23),Yb=Math.pow(2,30),v="pdp10",Pb="PDPjs",Zb={cpu:1,trap:2,fault:4,"int":8,bus:16,memory:32,mmu:64,rom:128,device:256,panel:512,keyboard:1024,key:2048,paper:4096,read:16384,write:32768,serial:1048576,timer:2097152, speaker:16777216,computer:33554432,log:268435456,warn:536870912,buffer:1073741824,halt:-2147483648}; -function $b(a,b){t.call(this,"Panel",a,512);this.K=this.M=0;this.T=b;this.i=this.I=this.u=this.w=0;this.N=this.O=-1;this.P=this.R=this.F=!1;this.S=ac;this.B={};this.b={START:[1,1,!0,!1,this.Sb],STEP:[1,1,!1,!1,this.Tb],ENABLE:[1,1,!1,!1,this.Nb],CONT:[1,1,!0,!1,this.Lb],DEP:[0,0,!0,!1,this.Mb],EXAM:[1,1,!0,!1,this.Ob],LOAD:[1,1,!0,!1,this.Qb],TEST:[0,0,!0,!1,this.Pb]};for(a=0;22>a;a++)this.b["S"+a]=[0,0,!1,!1,this.Rb,a];this.C=this.v=this.H=this.G=null;this.exports={hold:this.Jb,toggle:this.bc,reset:this.Yb, +function $b(a,b){t.call(this,"Panel",a,512);this.K=this.L=0;this.T=b;this.i=this.I=this.u=this.w=0;this.N=this.O=-1;this.P=this.R=this.F=!1;this.S=ac;this.B={};this.b={START:[1,1,!0,!1,this.Sb],STEP:[1,1,!1,!1,this.Tb],ENABLE:[1,1,!1,!1,this.Nb],CONT:[1,1,!0,!1,this.Lb],DEP:[0,0,!0,!1,this.Mb],EXAM:[1,1,!0,!1,this.Ob],LOAD:[1,1,!0,!1,this.Qb],TEST:[0,0,!0,!1,this.Pb]};for(a=0;22>a;a++)this.b["S"+a]=[0,0,!1,!1,this.Rb,a];this.C=this.v=this.H=this.G=null;this.exports={hold:this.Jb,toggle:this.bc,reset:this.Yb, set:this.ac};Kb(this)}ka($b,t);l=$b.prototype;l.reset=function(a){this.stop();a&&bc(this,this.w=0)}; -l.ka=function(a,b,c,d){if(this.G&&this.G.ka(a,b,c,d)||this.v&&this.v.ka(a,b,c,d)||this.C&&this.C.ka(a,b,c,d))return!0;switch(b){case "PC":return this.J[b]=c,this.M++,!0;default:return"led"==a||"rled"==a?(this.J[b]=c,this.B[b]=d?1:0,this.M++,!0):"switch"==a?(void 0===this.b[b]&&(this.b[b]=[d?1:0,d?1:0]),this.J[b]=c,a=c.parentElement||c,a=a.parentElement||a,a.onmousedown=function(a,b){return function(){cc(a,b)}}(this,b),a.onmouseup=a.onmouseout=function(a,b){return function(){dc(a,b)}}(this,b),a.ontouchstart= +l.ka=function(a,b,c,d){if(this.G&&this.G.ka(a,b,c,d)||this.v&&this.v.ka(a,b,c,d)||this.C&&this.C.ka(a,b,c,d))return!0;switch(b){case "PC":return this.J[b]=c,this.L++,!0;default:return"led"==a||"rled"==a?(this.J[b]=c,this.B[b]=d?1:0,this.L++,!0):"switch"==a?(void 0===this.b[b]&&(this.b[b]=[d?1:0,d?1:0]),this.J[b]=c,a=c.parentElement||c,a=a.parentElement||a,a.onmousedown=function(a,b){return function(){cc(a,b)}}(this,b),a.onmouseup=a.onmouseout=function(a,b){return function(){dc(a,b)}}(this,b),a.ontouchstart= function(a,b){return function(c){cc(a,b);c.preventDefault()}}(this,b),a.ontouchend=function(a,b){return function(){dc(a,b)}}(this,b),!0):t.prototype.ka.call(this,a,b,c,d)}};l.Da=function(a,b,c,d){this.G=a;this.H=b;this.v=c;this.C=d;ec(this);fc(this)};l.ua=function(a,b){if(!b)if(this.T&&gc(),!a)this.reset(!0);else if(!this.restore(a))return!1;return!0};l.ja=function(a){return a?this.save():!0};l.save=function(){var a=new F(this);a.set(0,[this.i,this.w,this.u]);return a.data()}; l.restore=function(a){if(a=a[0])hc(this,this.i=a[0]),bc(this,this.w=a[1]),ic(this,a[2]);return!0};l.Yb=function(){for(var a in this.b){var b=this.b[a];b[1]=b[0]}fc(this);return!0};function jc(a,b,c){if(a=a.J[b])a.style.backgroundColor=c?"#ff0000":"#000000"}function ec(a,b){for(var c in a.B)jc(a,c,null!=b?b:a.B[c])}function kc(a,b,c){if(a=a.J[b])a.style.marginTop=c?"0px":"20px",a.style.backgroundColor=c?"#00ff00":"#228B22"}function fc(a){for(var b in a.b)kc(a,b,a.b[b][1])} l.Jb=function(a,b,c){if(cc(this,b)){if(c){var d=this;setTimeout(function(){dc(d,b);a&&a()},+c);return!1}dc(this,b)}return!0};l.ac=function(a,b){if("SR"==a)return ic(this,sa(b,8));var c=this.b[a];return c?(c[1]=+b?1:0,kc(this,a,c[1]),!0):!1};l.bc=function(a){return cc(this,a)?(dc(this,a),!0):!1};function cc(a,b){var c=a.b[b];return c?(kc(a,b,c[1]=1-c[1]),c[3]=!0,c[4]&&c[4].call(a,c[1],c[5]),b!=lc&&(a.P=b==mc,a.R=b==nc),!0):!1} -function dc(a,b){var c=a.b[b];c&&(c[2]&&c[3]&&(kc(a,b,c[1]=c[0]),c[4]&&c[4].call(a,c[1],c[5])),c[3]=!1)}l.Sb=function(a){a||this.v.A.L||(G(this.v,this.i),this.b[oc]&&this.b[oc][1]&&pc(this.v))};l.Tb=function(){};l.Nb=function(a){a||this.v.W()}; -l.Lb=function(a){if(!a&&!this.v.A.L)if(this.b[oc]&&this.b[oc][1])pc(this.v);else{if((a=this.C)&&!Lb(a,!0))Mb(a,!0),qc(a,0,null),Mb(a,!1);else try{var b=this.v.Oa(1);0c;c++){var d=a,e="A"+c,f=b&1<c;c++){var d=a,e="D"+c,f=b&1<b;b++)a.b["S"+b][1]=a.u&1<d.length){for(var e=0,f=Array(4096),g=0;g>>a.i;0f&&(n=f);if(h&&h.size){if(h.type==d){if(e+f<=h.D)return h.Ma+=h.D-e,h.D=e,!0;if(e>=h.D+h.Ma){n=h.size-(e-k);n>f&&(n=f);h.Ma=e-h.D+n;e=k+16384;f-=n;g++;continue}}return Gc(Hc,e,f)}e=new Cc(a,e,n,16384,d);Dc(e,a.C,h);a.b[g++]=e;e=k+16384;f-=n}return 0>=f?(a.status("Added "+(c>>10)+"Kb "+Ic[d]+" at "+ua(b)),!0):Gc(Jc,b,c)} -function Ac(a,b){var c=a.b[(b&a.u)>>>a.i];a.w++;b=c.C(b&16383,b);a.w--;return b}function vc(a,b,c){var d=a.b[(b&a.u)>>>a.i];a.w++;d.w(c,b&16383,b);a.w--}function Ec(a){for(var b=0,c=[],d=0;d>>a.i];a.w++;b=c.C(b&16383,b);a.w--;return b}function vc(a,b,c){var d=a.b[(b&a.u)>>>a.i];a.w++;d.w(c,b&16383,b);a.w--}function Ec(a){for(var b=0,c=[],d=0;d=a.ha&&(a.ha+=a.la,c=!0);0<=a.ma&&a.ma<=dd(a)&&(a.la=a.ma=-1,$c(a),a.W(),c=!0);c&&a.j(dd(a)+" cycles: checksum="+m(a.za))}} -l.ka=function(a,b,c){var d=this;switch(b){case "power":case "reset":return this.J[b]=c,!0;case "run":return this.J[b]=c,c.onclick=function(){var a;if(a=d.G)if(a=d.G,a.A.V)a=!0;else{var b=null,c,h=pb(a.id);for(c=0;c=a.ha&&(a.ha+=a.la,c=!0);0<=a.ma&&a.ma<=dd(a)&&(a.la=a.ma=-1,$c(a),a.W(),c=!0);c&&a.j(dd(a)+" cycles: checksum="+m(a.za))}} +l.ka=function(a,b,c){var d=this;switch(b){case "power":case "reset":return this.J[b]=c,!0;case "run":return this.J[b]=c,c.onclick=function(){var a;if(a=d.G)if(a=d.G,a.A.V)a=!0;else{var b=null,c,h=pb(a.id);for(c=0;ca.aa/a.ba?b=1:d=!0;a.ea=b;b=a.Za*a.ea;if(a.ba!=b){a.ba=b;b=a.ba.toFixed(2)+"Mhz";var e=a.J.setSpeed;e&&(e.textContent=b);a.j("target speed: "+b)}c&&a.G&&hd(a.G)}sc(a,a.N);a.N=0;a.M=nb();a.P=0;fd(a);return d}function id(a,b){for(var c=a.O.length-1;0<=c;c--){var d=a.O[c];0>d[0]||b>d[0]&&(b=d[0])}return b}function jd(a){for(var b=[],c=0;ca.aa/a.ba?b=1:d=!0;a.ea=b;b=a.Za*a.ea;if(a.ba!=b){a.ba=b;b=a.ba.toFixed(2)+"Mhz";var e=a.J.setSpeed;e&&(e.textContent=b);a.j("target speed: "+b)}c&&a.G&&hd(a.G)}sc(a,a.N);a.N=0;a.L=nb();a.P=0;fd(a);return d}function id(a,b){for(var c=a.O.length-1;0<=c;c--){var d=a.O[c];0>d[0]||b>d[0]&&(b=d[0])}return b}function jd(a){for(var b=[],c=0;cd[0]||(d[0]-=b,0>=d[0]&&(d[0]=-1,d[1]()))}}function kd(a,b){var c=a.R-=a.S;a.S=0;b&&(a.R=0);return c} -l.Zb=function(){if(this.A.L){this.Sa>=this.ab&&fd(this,!0);this.na=0;this.ya=nb();if(this.P){var a=this.ya-this.P;a>this.$a&&(this.M+=a,this.M>this.ya&&(this.M=this.ya))}try{do{var b=id(this,this.A.Ia?1:this.Ba);try{this.Oa(b)}catch(e){if("number"!=typeof e)throw e;}b=kd(this,!0);this.na+=b;this.N+=b;tc(this,b);rc(this,b);this.fa-=b;if(0>=this.fa){this.fa+=this.Ba;++this.bb>=ld&&(this.G&&H(this.G,void 0),this.bb=0);break}}while(this.A.L)}catch(e){this.W();this.G&&this.G.stop(nb(),dd(this));Hb(this, -e.stack||e.message);return}if(this.A.L){a=setTimeout;b=this.sb;this.P=nb();var c=this.$a;this.na&&(c=Math.round(c*this.na/this.Ba));var c=c-(this.P-this.ya),d=this.P-this.M;d&&(this.aa=Math.round(this.N/(10*d))/100,864E5<=d&&(this.T=0,ed(this)));if(0>c||this.aac&&(this.M-=c),c=0;this.Sa+=this.na;this.P+=c;a(b,c)}}}; -function pc(a,b){if(!Ib(a))if(a.A.L)a.j(a.toString()+" busy");else{ed(a);a.A.L=!0;a.A.Xa=!0;var c=a.J.run;c&&(c.textContent="Halt");a.G&&(b&&hd(a.G,!0),a.G.start(a.M,dd(a)));a.C||a.status("Started");setTimeout(a.sb,0)}}l.Oa=function(){return 0};l.W=function(a){var b=!1;if(this.A.L){kd(this);sc(this,this.N);this.N=0;this.A.L=!1;if(b=this.J.run)b.textContent="Run";this.G&&this.G.stop(nb(),dd(this));b=!0;this.C||this.status("Stopped")}this.A.complete=a;return b};var gd=30,ld=15,Xc=["power","reset"]; -function md(a){var b=+a.model||1001;Wc.call(this,a,1E6);this.rb=b;this.Pa=+a.addrReset||0;this.Fb=nd.bind(this);this.w=J.bind(this);this.wa=null;this.ob=[];this.A.complete=!1}ka(md,Wc);l=md.prototype;l.reset=function(){this.status("Model "+this.rb);this.A.L&&this.W();this.b=this.K=this.Ca=0;this.i=this.xa=this.Pa;this.I=this.qa=-1;this.F=this.u=0;this.cb=[0,0];this.oa=[0,0];this.ga=[0,0];this.pa=[0,0];this.va=this.i;this.B=0;this.f=this.Vb;this.g=this.fc;this.wa=null;Zc(this);this.A.error=!1;Wc.prototype.reset.call(this)}; +l.Zb=function(){if(this.A.M){this.Sa>=this.ab&&fd(this,!0);this.na=0;this.ya=nb();if(this.P){var a=this.ya-this.P;a>this.$a&&(this.L+=a,this.L>this.ya&&(this.L=this.ya))}try{do{var b=id(this,this.A.Ia?1:this.Ba);try{this.Oa(b)}catch(e){if("number"!=typeof e)throw e;}b=kd(this,!0);this.na+=b;this.N+=b;tc(this,b);rc(this,b);this.fa-=b;if(0>=this.fa){this.fa+=this.Ba;++this.bb>=ld&&(this.G&&H(this.G,void 0),this.bb=0);break}}while(this.A.M)}catch(e){this.W();this.G&&this.G.stop(nb(),dd(this));Hb(this, +e.stack||e.message);return}if(this.A.M){a=setTimeout;b=this.sb;this.P=nb();var c=this.$a;this.na&&(c=Math.round(c*this.na/this.Ba));var c=c-(this.P-this.ya),d=this.P-this.L;d&&(this.aa=Math.round(this.N/(10*d))/100,864E5<=d&&(this.T=0,ed(this)));if(0>c||this.aac&&(this.L-=c),c=0;this.Sa+=this.na;this.P+=c;a(b,c)}}}; +function pc(a,b){if(!Ib(a))if(a.A.M)a.j(a.toString()+" busy");else{ed(a);a.A.M=!0;a.A.Xa=!0;var c=a.J.run;c&&(c.textContent="Halt");a.G&&(b&&hd(a.G,!0),a.G.start(a.L,dd(a)));a.C||a.status("Started");setTimeout(a.sb,0)}}l.Oa=function(){return 0};l.W=function(a){var b=!1;if(this.A.M){kd(this);sc(this,this.N);this.N=0;this.A.M=!1;if(b=this.J.run)b.textContent="Run";this.G&&this.G.stop(nb(),dd(this));b=!0;this.C||this.status("Stopped")}this.A.complete=a;return b};var gd=30,ld=15,Xc=["power","reset"]; +function md(a){var b=+a.model||1001;Wc.call(this,a,1E6);this.rb=b;this.Pa=+a.addrReset||0;this.Fb=nd.bind(this);this.w=J.bind(this);this.wa=null;this.ob=[];this.A.complete=!1}ka(md,Wc);l=md.prototype;l.reset=function(){this.status("Model "+this.rb);this.A.M&&this.W();this.b=this.K=this.Ca=0;this.i=this.xa=this.Pa;this.I=this.qa=-1;this.F=this.u=0;this.cb=[0,0];this.oa=[0,0];this.ga=[0,0];this.pa=[0,0];this.va=this.i;this.B=0;this.f=this.Vb;this.g=this.fc;this.wa=null;Zc(this);this.A.error=!1;Wc.prototype.reset.call(this)}; l.wb=function(){return 0};l.save=function(){var a=new F(this);a.set(0,[this.b,this.K,this.Ca,this.i,this.qa,this.I,this.u,this.B,this.xa,this.va,this.Pa]);a.set(1,[]);a.set(2,[this.T,this.ea,this.A.Z]);a.set(3,od(this));a.set(4,jd(this));return a.data()}; l.restore=function(a){var b;b=a[0];ga();ca();ga();var c=b[Symbol.iterator];b=c?c.call(b):ha(b);this.b=b.next().value;this.K=b.next().value;this.Ca=b.next().value;this.i=b.next().value;this.qa=b.next().value;this.I=b.next().value;this.u=b.next().value;this.B=b.next().value;this.xa=b.next().value;this.va=b.next().value;this.Pa=b.next().value;b=a[2];this.T=b[0];ed(this,b[1]);this.A.Z=b[2];b=a[3];for(c=b.length-1;0<=c;c--){var d;a:{for(d=0;d>>b.i].f(a&16383,a)};l.fc=function(a,b){var c=this.H;a=this.va=a;c.b[(a&c.u)>>>c.i].g(b,a&16383,a);return b}; @@ -121,7 +121,7 @@ function(a,b){a=this.f(b);b=this.f(b+1&15);b=oe.call(this,b,a,this.f(this.b));0> this.g(b,a)}},function(a,b){if(a=(this.b<<14>>14)%36){var c=this.f(b);0>a&&(a=36+a);c=c*Math.pow(2,a)%D+Math.trunc(c/Math.pow(2,36-a));this.g(b,c)}},function(a,b){if(a=(this.b<<14>>14)%256){var c=this.f(b),c=0=a?0:Math.trunc(c/Math.pow(2,-a));this.g(b,c)}},function(a,b){a=0;var c=this.f(b);if(c){for(;c>14)%256){var c,d=this.f(b),e=this.f(b+1&15);if(0z&& dz&&ez&&(this.u|=131072):e-c<=z&&(this.u|=131072);e=0;f>z&&(d+=A,e+=A)}else d=d*Math.pow(2,a)%A+Math.trunc(e%A/Math.pow(2,35-a)),e=e*Math.pow(2,a)%A,c=A-Math.pow(2,35-a),f<=z?f+c>z&&(this.u|=131072):(f-c<=z&&(this.u|=131072),d+=A,e+=A)}else-36>=a?(e=-72>=a?d>z?C:0:Math.trunc(d%A/Math.pow(2,-a-35)),d<=z?d=0:(d=C,e+=A)):(c=d>z?D-Math.pow(2,36+a):0,e=Math.trunc(e%A/Math.pow(2,-a))+ d%A*Math.pow(2,35+a)%A,d=Math.trunc(d/Math.pow(2,-a))+c,d>z&&(e+=A));this.g(b,d);this.g(b+1&15,e)}},function(a,b){if(a=(this.b<<14>>14)%72){var c=this.f(b),d=this.f(b+1&15),e=c;0>a&&(a=72+a);36>a?(c=c*Math.pow(2,a)%D+Math.trunc(d/Math.pow(2,36-a)),d=d*Math.pow(2,a)%D+Math.trunc(e/Math.pow(2,36-a))):(c=d*Math.pow(2,a-36)%D+Math.trunc(c/Math.pow(2,72-a)),d=e*Math.pow(2,a-36)%D+Math.trunc(d/Math.pow(2,72-a)));this.g(b,c);this.g(b+1&15,d)}},function(a,b){if(a=(this.b<<14>>14)%256){var c=this.f(b),d=this.f(b+ -1&15);0=a?(d=-72>=a?0:Math.trunc(c/Math.pow(2,-a-36)),c=0):(d=Math.trunc(d/Math.pow(2,-a))+c*Math.pow(2,36+a)%D,c=Math.trunc(c/Math.pow(2,-a)));this.g(b,c);this.g(b+1&15,d)}},J,function(a,b){a=this.f(b);this.g(b,this.f(this.b));this.g(this.b,a)},function(a,b){a=!1;for(var c=this.f(b),d=c/y|0,c=c&x;!a;)this.g(c,this.f(d)),c==this.b&&(a=!0),d=d+1&x,c=c+1&x,this.A.L||(this.g(b,d* +1&15);0=a?(d=-72>=a?0:Math.trunc(c/Math.pow(2,-a-36)),c=0):(d=Math.trunc(d/Math.pow(2,-a))+c*Math.pow(2,36+a)%D,c=Math.trunc(c/Math.pow(2,-a)));this.g(b,c);this.g(b+1&15,d)}},J,function(a,b){a=this.f(b);this.g(b,this.f(this.b));this.g(this.b,a)},function(a,b){a=!1;for(var c=this.f(b),d=c/y|0,c=c&x;!a;)this.g(c,this.f(d)),c==this.b&&(a=!0),d=d+1&x,c=c+1&x,this.A.M||(this.g(b,d* y+c),a||pd(this,-1),a=!0)},function(a,b){a=(this.f(b)+262145)%C;this.g(b,a);a=A&&G(this,this.b)},function(a){this.w(a)},function(a,b){a=b<<14;this.u&a&&(this.u&=~a,G(this,this.b))},function(){this.qa=this.b},J,function(a){this.w(a)},function(a,b){a=this.f(b);a+=262145;this.g(a&x,this.f(this.b));a>=D&&(a-=D);a/y|0||(this.u|=262144);this.g(b,a)},function(a,b){a=this.f(b);var c=this.f(a&x);this.g(this.b,c);this.b==b&&(a=c);a-=262145; 0>a&&(a+=D);(a/y|0)==x&&(this.u|=262144);this.g(b,a)},function(a){this.w(a)},function(){this.g(this.b,(this.u&x)*y+this.i);G(this,this.b+1)},function(a,b){this.g(b,(this.u&x)*y+this.i);G(this,this.b)},function(a){this.w(a)},function(a){this.w(a)},function(a,b){this.g(b,N.call(this,this.f(b),this.f(this.b)))},function(a,b){this.g(b,N.call(this,this.f(b),this.b))},function(a,b){this.g(this.b,N.call(this,this.f(b),this.f(this.b)))},function(a,b){this.g(this.b,this.g(b,N.call(this,this.f(b),this.f(this.b))))}, function(a,b){this.g(b,O.call(this,this.f(b),this.f(this.b)))},function(a,b){this.g(b,O.call(this,this.f(b),this.b))},function(a,b){this.g(this.b,O.call(this,this.f(b),this.f(this.b)))},function(a,b){this.g(this.b,this.g(b,O.call(this,this.f(b),this.f(this.b))))},ke,function(a,b){0>R(this.f(b),this.b)&&G(this,this.i+1)},function(a,b){R(this.f(b),this.b)||G(this,this.i+1)},function(a,b){0>=R(this.f(b),this.b)&&G(this,this.i+1)},function(){G(this,this.i+1)},function(a,b){0<=R(this.f(b),this.b)&&G(this, @@ -156,7 +156,7 @@ function ze(a){t.call(this,"RAM",a);this.U=this.Ga=null;this.i=+a.addr;this.u=+a c.U=a.U,null==c.sa&&(c.sa=a.sa),null==c.ra&&(c.ra=a.ra)):c.b=null);Ae(c)})}}ka(ze,t);ze.prototype.Da=function(a,b,c,d){this.H=b;this.v=c;this.C=d;Ae(this)};ze.prototype.ua=function(a,b){this.U&&(this.C&&ye(this.C,this.id,this.i,this.u,this.U),delete this.U);b||this.reset();return!0};ze.prototype.ja=function(){return!0}; function Ae(a){if(a.H&&(!a.w&&a.u&&(Fc(a.H,a.i,a.u,1)?a.w=!0:a.u=0),!Jb(a))){if(!a.w)r("No RAM allocated");else if(a.b){if(!a.Ga)return;Be(a,a.Ga,a.sa,a.ra,a.i)?a.status('Loaded image "'+a.B+'"'):a.da('Error loading image "'+a.B+'"')}a.F=!0;Kb(a)}} ze.prototype.reset=function(){if(this.w&&!this.F){for(var a=this.H,b=this.i,c=this.u,d=b&16383,b=b>>>a.i;0g&&g>=-A&&(g+=D);for(var g=Math.trunc(Math.abs(g))%D,h=d;f--&&h=ra.lb&&c<=ra.Db&&(b=c-(ra.lb-ra.zb));b&&(a.preventDefault&&a.preventDefault(),d.Va(b));return!0},c.onkeypress=function(a){a=a||window.event;if(!a.metaKey){var b=a.which||a.keyCode;a.altKey&&b==ra.Bb&&(b=ra.Ab);d.Va(b);a.preventDefault&&a.preventDefault()}return!0},c.onpaste=function(a){a.stopPropagation&&a.stopPropagation(); a.preventDefault&&a.preventDefault();(a=a.clipboardData||window.clipboardData)&&d.Va(a.getData("Text"))},c.removeAttribute("readonly"),!0}return!1};l.Da=function(a,b,c,d){this.G=a;this.H=b;this.v=c;this.C=d;Kb(this)}; @@ -172,22 +172,22 @@ function Ke(a,b){var c,d=a.na[0],e=a.na[1];c="("==d||"{"==d||"["==d?"\\":"";for( d)break;a=a.replace(b[0],d.toString())}return a}function Le(a,b,c,d){var e;null!=b?(e=a.hb(b),0<=e?e=a.ib(e):(e=a.K[b],null==e&&(e=sa(b,a.ca))),null!=e||d||a.j("invalid "+(c?c:"value")+": "+b)):d||a.j("missing "+(c||"value"));return e} function Ne(a,b,c){var d,e=!1;if(void 0!==c){e=!0;d=c;var f=4,g="";if(!f||4>=1,S--;g=q+g;d>>=8}d=m(c,0,!0)+" "+c+". "+ua(c,0,!0)+" "+("0b"+g);32<=c&&127>c&&(d+=" '"+String.fromCharCode(c)+"'")}a.j((null!=b?b+": ":"")+d);return e} function Oe(a,b){if(b)return Ne(a,b,a.K[b]);var c=0;for(b in a.K)Ne(a,b,a.K[b]),c++;return 0>2:0)}0>c?c=a.replace(/^0+([0-9A-F]+)$/i,"$1"):c=a;return c}var Me={"||":0,"&&":1,"!":2,"|":2,"^^":3,"&":4,"!=":5,"==":5,">=":6,">":6,"<=":6,"<":6,">>>":7,">>":7,"<<":7,"-":8,"+":8,"%":9,"/":9,"*":9},Ie=Math.pow(2,32); -function Pe(a){Ee.call(this,a);this.Aa=!1;this.ya=18;this.la=36;this.na=["<",">"];this.ma=[];this.za=X();this.M=X(0);this.ga=X(0);this.ba=X(0);this.F=[];this.b=this.N=this.I=[];Qe(this);this.S=this.ha=0;this.i=[];this.va=void 0;Re(this);this.C=this;this.oa={};this.X=this.tb=0;this.T=null;this.P=[];Se(this,a.messages);this.xa=a.commands;this.O=0;this.Fa=this.wa=null;this.B=this.Ca=this.Ba=this.fa=this.qa=0;this.pa=this.ea=this.aa=null;var b=this;window?void 0===window[v]&&(window[v]=function(a){return cd(b, +function Pe(a){Ee.call(this,a);this.Aa=!1;this.ya=18;this.la=36;this.na=["<",">"];this.ma=[];this.za=X();this.L=X(0);this.ga=X(0);this.ba=X(0);this.F=[];this.b=this.N=this.I=[];Qe(this);this.S=this.ha=0;this.i=[];this.va=void 0;Re(this);this.C=this;this.oa={};this.X=this.tb=0;this.T=null;this.P=[];Se(this,a.messages);this.xa=a.commands;this.O=0;this.Fa=this.wa=null;this.B=this.Ca=this.Ba=this.fa=this.qa=0;this.pa=this.ea=this.aa=null;var b=this;window?void 0===window[v]&&(window[v]=function(a){return cd(b, a)}):void 0===global[v]&&(global[v]=function(a){return cd(b,a)})}ka(Pe,Ee);function Te(a){a=a&&a.D;null==a&&(a=-1);return a}function X(a,b,c){return{D:void 0===a?null:a,Ta:void 0===b?!1:b,ia:!1,ca:c}}function Ue(a,b,c,d){a.D=b;a.Ta=c||!1;a.ia=!1;a.ca=d}function Ve(a){return[a.D,a.Ta,a.ia,a.ca,a.Wa]}function We(a,b){var c=X(b[0],b[1],b[2]);c.ia=b[3];b[4]&&(c.pb=Fe(a,c.Wa=b[4]));return c}l=Pe.prototype; l.Da=function(a,b,c,d){this.H=b;this.G=a;this.v=c;this.ea=a.u;this.ya=b.F;(a=Yc(a,"messages"))&&Se(this,a);Xe(this,function(a){a:{var b=d.H.b,c=a[0],e=a=0,k=b.length;if(c){a=Te(Ye(d,c,d.ga));if(-1===a){d.j("invalid address: "+c);break a}e=a>>>d.H.i;k=1}d.j("blockid physical blockaddr used size type");d.j("-------- --------- --------- ------ ------ ----");for(var c=-1,n=0;k--;){var p=b[e];p.type==c?n++||d.j("..."):(c=p.type,n=Ic[c],p&&d.j(m(p.id,8)+" %"+m(e<a&&a>=-A&&(a+=D);return Math.trunc(Math.abs(a))%Math.pow(2,void 0===b?36:b)}function Y(a,b){return I(a,b.D)}function af(a){return ua(a/Rb,6)+" "+ua(a%Rb,6)} function Se(a,b){a.C=a;a.X=a.tb=536870916;a.T=null;a.P=[];b=Fe(a,b.replace("keys","key").replace("kbd","keyboard"),!1,"|");if(b.length)for(var c in Zb){var d;a:if(d=void 0,Array.prototype.indexOf)d=b.indexOf(c,d);else{d=d||0;0>d&&(d+=b.length);0>d&&(d=0);for(var e=b.length;d>23&&a.v.xa==b&&(b=pd(a.v,1)));if(0d&&(d=a.v.f(b)),0<=d&&(Ue(a.i[a.S],b),++a.S==a.i.length&&(a.S=0)));return!1} function sf(a,b,c,d){var e=X(b.D),f=a.Ea(b,1),g,h,k,n=0,p=f/Vb|0,q;for(q in tf)if(g=tf[q][p&q]){h=+q;p>>=6;switch(h){case 32512:k=uf;n=p&3;break;case 32256:k=vf;n=p&7;break;case 29248:k=wf,n=(p&48)>>2|(p&6)>>1}break}k=k&&k[n]||"";"S"==k&&g>xf&&(k="B");k=ag[g||0]+k;if(g){if(28700==h)n=f/Wb&127,h=I(a,n,-1);else if(n=f>>23&15,h=I(a,n,-1),g==cg&&(g=dg[n]))k=ag[g],h="";k=Da(k,8)+(h?h+",":"");f&4194304&&(k+="@");k+=I(a,f&262143,-1);(f=f>>18&15)&&(k+="("+I(a,f,-1)+")")}else k=Da(k,8)+af(f);f=k;g="";h=Y(a, e)+":";if(-1!==e.D&&-1!==b.D){do if(k=a.Ea(e,1),g+=" "+af(k),null==e.D)break;while(e.D!=b.D)}h+=Da(g,16)+f;c&&(h=Da(h,48)+";"+(c||""),h=a.v.A.Ia?h+("cycles="+dd(a.v).toString()+" cs="+m(a.v.za)):h+(null!=d?"="+d.toString():""));return h} @@ -196,7 +196,7 @@ h);e=-1;break}n=h.match(/(@?)([^(]*)\(?([^)]*)\)?/);if(!n){a.j("unknown operand: 15>>d.i],!1)}a.N=["br"];if(a.I)for(b=1;b>>d.i],!0);a.I=["bw"];a.qa=0;a.ha=0} l.Ha=function(a,b,c){var d=!0;c||fg(this,a,b,!1,!0);if(a!=this.b){var e=Te(b);if(-1===e)this.j("invalid address: "+Y(this,b)),d=!1;else{var f=this.H;f.b[e>>>f.i].Ha(e&16383,a==this.I)}}d&&(a.push(b),c?b.ia=!0:(gg(this,a,a.length-1,"set"),Re(this)));return d};function fg(a,b,c,d,e){var f=!1;c=Te(c);for(var g=1;g>>d.i],b==a.I));h.ia||Re(a);break}}return f} function hg(a,b){for(var c=1;cd;d++){!d||d&3||(c+="\n");var e=a,f=ua(d,2);Ue(e.za,d);f+="="+I(e,e.Ea(e.za),36)+" ";c+=f}if(b){b="";for(d=0;d=ff?1:d==df?23:18)+" "),b+=e;c+="\n"+b}return c}l.ub=function(a,b){return a[0]>b[0]?1:a[0]>>0,g],q=Fa(p,k,a.ub);0>q&&p.splice(-(q+1),0,k)}n&&(h.a=n.replace(/''/g,'"'))}a.F.push({od:b,D:c,Kb:d,U:e,qb:f})}function kg(a,b,c){var d=[],e=Te(b)>>>0;for(b=0;b>>0,h=f.Kb;if(e>=g&&eb){a.j("unknown register: "+f);return}var f=0,h=a.v;switch(b){case cf:G(h, -g);Ue(a.M,h.i);break;case ff:f=65536;break;case gf:f=32768;break;case hf:f=131072;break;case jf:f=32;break;case kf:f=262144}f&&(h.u=g?h.u|f:h.u&~f);H(a.G);a.j("updated registers:")}}a.j(jg(a,e));c&&(Ue(a.M,d.i),qf(a,Y(a,a.M)))}}function qg(a,b){b=Ea(b);var c=b.match(/^(['"])(.*?)\1$/);c?1h[0].indexOf("+"))){var n=h[0]+":";h[2]&&(n+=" "+h[2]);a.j(n)}h[3]&&(g=h[3],f=null);h=a.ba;n=b;h.D=n.D;h.Ta=n.Ta;h.ia=n.ia;h.ca=n.ca;a.j(sf(a,b,g,f));e-=b.D-k;c++}}} +function qf(a,b,c,d){if(b=Ye(a,b,a.L)){void 0===d&&(d=1);var e=256;if(void 0!==c)if("l"==c.charAt(0))c=Le(a,c.substr(1)),null!=c&&(d=c);else{d=Ye(a,c);if(!d||d.Dh[0].indexOf("+"))){var n=h[0]+":";h[2]&&(n+=" "+h[2]);a.j(n)}h[3]&&(g=h[3],f=null);h=a.ba;n=b;h.D=n.D;h.Ta=n.Ta;h.ia=n.ia;h.ca=n.ca;a.j(sf(a,b,g,f));e-=b.D-k;c++}}} function ig(a,b,c){var d=!0;try{b.length&&"end"!=b?c||a.j(of+b):(a.R&&(a.j("ended assemble at "+Y(a,a.ba)),a.R=!1),b="");var e=b.charAt(0);if('"'==e||"'"==e)return!0;a.T=null;if(Jb(a)&&0p||"z"na.length&&(a.j("note: only "+na.length+" available"),ea=na.length);ia-=ea;0>ia&&(null==na[na.length-1].D?(ea=ia+ea,ia=0):ia+=na.length);var Ed= -[];"call"==Df&&(wb=1E5,Ed=["CALL"]);for(void 0!==Cf&&a.j(ea+" instructions earlier:");0=na.length&&(ia=0);a.va=ea;Ff++;wb--}}Ff||(a.j("no "+Ef+"history available"),a.va=void 0)}else{var db=Ye(a,ma,a.ga);if(db){var Ia=0,If="ds"==ab;if(za){if("l"==za.charAt(0))za=za.substr(1)||dh,Ia=Le(a,za);else{var Jf=Ye(a,za);Jf&& -(Ia=Jf.D-db.D)}0>Ia&&(Ia=0);65536Nf;Nf++)Lf+=String.fromCharCode((wc%64|0)+32),wc/=64}Ja&&(Ja+="\n");Ja=If?Ja+(Ka+","):Ja+(ma+": "+Ka+(0>Mf?" "+Lf:""))}Ja&&a.j(Ja);a.ca=fh}}}}break;case "e":if("else"==g[0])break;var Of,Pf,Qf= -g[0],Hd=g[1];"e"==Qf||"ew"==Qf?(Of=a.Ea,Pf=a.nb):Hd=null;if(null==Hd)a.j("edit memory commands:"),a.j("\tew [a] [...] edit words at address a");else{var xc=Ye(a,Hd,a.ga);if(xc)for(var Id=2;IdLd;){for(var La=null,jh=256;65536>Ab.D>>>0;){Md.D=a.Ea(Ab,2);if(null==Ab.D||!jh--)break;if(!(Md.D&1)){for(var kh= -a,yc=Md,Sf=null,Bb=yc.D,Tf=Bb,Nd=1;6>=Nd&&Bb;Nd++){if(2Zf)a.j("step commands:"),a.j("\tp\tstep over instruction"),a.j("\tpr\tstep over instruction with register update"); +[];"call"==Df&&(wb=1E5,Ed=["CALL"]);for(void 0!==Cf&&a.j(ea+" instructions earlier:");0=na.length&&(ia=0);a.va=ea;Ff++;wb--}}Ff||(a.j("no "+Ef+"history available"),a.va=void 0)}else{var db=Ye(a,ma,a.ga);if(db){var Ia=0,If="ds"==ab;if(za){if("l"==za.charAt(0))za=za.substr(1)||fh,Ia=Le(a,za);else{var Jf=Ye(a,za);Jf&& +(Ia=Jf.D-db.D)}0>Ia&&(Ia=0);65536Nf;Nf++)Lf+=String.fromCharCode((xc%64|0)+32),xc/=64}Ja&&(Ja+="\n");Ja=If?Ja+(Ka+","):Ja+(ma+": "+Ka+(0>Mf?" "+Lf:""))}Ja&&a.j(Ja);a.ca=hh}}}}break;case "e":if("else"==g[0])break;var Of,Pf,Qf= +g[0],Hd=g[1];"e"==Qf||"ew"==Qf?(Of=a.Ea,Pf=a.nb):Hd=null;if(null==Hd)a.j("edit memory commands:"),a.j("\tew [a] [...] edit words at address a");else{var yc=Ye(a,Hd,a.ga);if(yc)for(var Id=2;IdLd;){for(var La=null,lh=256;65536>Ab.D>>>0;){Md.D=a.Ea(Ab,2);if(null==Ab.D||!lh--)break;if(!(Md.D&1)){for(var mh= +a,zc=Md,Sf=null,Bb=zc.D,Tf=Bb,Nd=1;6>=Nd&&Bb;Nd++){if(2Zf)a.j("step commands:"),a.j("\tp\tstep over instruction"),a.j("\tpr\tstep over instruction with register update"); else if(a.O)a.j("step in progress");else{var $f=X(a.v.i);a.Ea($f);a.O?(a.Ha(a.b,$f,!0),mf(a)||(a.G&&hd(a.G),a.O=0)):rg(a,Zf?"tr":"t")}break;case "r":if("reset"==b){a.G&&a.G.reset();break}pf(a,g);break;case "s":a:switch(g[1]){case "base":if(g[2]){var Db=+g[2];if(8==Db||10==Db||16==Db)a.ca=Db;else{a.j("invalid base: "+Db);break}}a.j("default base: "+a.ca);break;case "cs":var Eb;void 0!==g[3]&&(Eb=+g[3]);switch(g[2]){case "int":a.v.la=Eb;break;case "start":a.v.Aa=Eb;break;case "stop":a.v.ma=Eb;break; default:a.j("unknown cs option");break a}void 0!==Eb&&$c(a.v);a.j("checksums "+(a.v.A.Ia?"enabled":"disabled"));break;case "sp":void 0!==g[2]&&(ed(a.v,+g[2])||a.j("warning: using 1x multiplier, previous target not reached"));a.j("target speed: "+(a.v.ba.toFixed(2)+"Mhz")+" ("+a.v.ea+"x)");break;default:if(g[1]){a.j("unknown option: "+g[1]);break}case "?":a.j("debugger options:"),a.j("\tbase #\t\tset default base to #"),a.j("\tcs int #\tset checksum cycle interval to #"),a.j("\tcs start #\tset checksum cycle start count to #"), a.j("\tcs stop #\tset checksum cycle stop count to #"),a.j("\tsp #\t\tset speed multiplier to #")}break;case "t":rg(a,g[0],g[1]);break;case "u":qf(a,g[1],g[2],8);break;case "v":if("var"==g[0]){og(a,b.substr(3))||(d=!1);break}if("ver"==g[0]){a.j((Pb||"PDP10")+" version 1.34.2 ("+a.v.rb+",RELEASE)");a.j(window?window.navigator.userAgent:"");break}f=!0;break;case "?":if(g[1]){qg(a,b.substr(1));break}var Od="commands:",Pd;for(Pd in tg)Od+="\n"+Da(Pd,9)+tg[Pd];qd(a)||(Od+="\nnote: history disabled if no exec breakpoints"); @@ -227,46 +227,46 @@ var tg={"?":"help/print","a [#]":"assemble","b [#]":"breakpoint",c:"clear output cf=0,df=1,ef=2,ff=3,gf=4,hf=5,jf=6,kf=7,bf="PC RA EA C0 C1 OV ND PD".split(" "),ug={},tf=(ug[28672]={0:101},ug[32704]={5632:64,5696:63,5760:58,5824:27,5888:28,5952:25,6016:29,6080:26,10240:56,10304:48,10368:46,10432:84,10496:57,10560:49,10624:47,10752:21,10816:22,10880:69,10944:70,11008:88,11072:cg,11136:83,11264:91,11328:23,11392:24,11456:92,11520:86,11584:87,11648:89,11712:90},ug[32512]={6144:65,6400:59,6656:66,6912:60,7168:67,7424:61,7680:68,7936:62,8192:17,8448:18,8704:19,8960:xf,9216:53,9472:52, 9728:55,9984:54,11776:50,12032:51,16384:30,16640:36,16896:37,17152:34,17408:38,17664:32,17920:44,18176:40,18432:39,18688:45,18944:33,19200:41,19456:35,19712:42,19968:43,20224:31,20480:1,20736:5,20992:2,21248:6,21504:3,21760:7,22016:4,22272:8,22528:9,22784:13,23040:10,23296:14,23552:11,23808:15,24064:12,24320:16},ug[32256]={12288:71,12800:72,13312:73,13824:74,14336:75,14848:76,15360:77,15872:78},ug[29248]={24576:79,24640:80,25088:81,25152:82},ug[28700]={28672:93,28676:94,28680:95,28684:96,28688:97, 28692:98,28696:99,28700:100},ug),uf=["","I","M","S"],vf=" L E LE A GE N G".split(" "),wf="N NE NA NN Z ZE ZA ZN C CE CA CN O OE OA ON".split(" "),dg={8:102,4:103,2:104,6:105,1:106},lf=1E3,of=">> ";Ya(function(){for(var a=w(document,v,"debugger"),b=0;b([\s\S]*?)<\/pre>/gi;f=g.exec(b);){var h=f[1];0<=h.indexOf("&")&&(h=h.replace(/</gi,"<").replace(/>/gi,">").replace(/&/gi,"&"));d+=h}(f=d.match(/&[a-z]+;/i))&&e.j("warning"+(e.u?" at line "+va(e.u):"")+": "+("unrecognized HTML entity: "+ -f[0]))}var B,S=d.split(/\r?\n/);for(B=0;B"==c[d]&&(a.b--,1==a.b)){a.b=0;b=c.substr(d+1);c=c.substr(0,d);break}d=a.J||"";a.G[d].La+=c;a.b||(a.J=null,wg(a,d))}if(a.b)return!0}null!=a.i&&(b=xg(a,b));c=b.match(/\s*([A-Z$%.][0-9A-Z$%.]*[:=]|)\s*([A-Z$%.][0-9A-Z$%.]*|)\s*([^;]+|)\s*(;?.*)/i);if(!c||c[4]&&";"!=c[4].slice(0,1))return a.error("failed to parse line: "+ -b),!1;b=c[1];d=c[2].toUpperCase();c=c[3].trim();if(b){var e=b.slice(-1);b=b.slice(0,-1);":"==e?yg(a,b,a.H,!0):(c=d+c,d=e)}a.C=d;c=c.trim();if(!wg(a,d,c))switch(d){case "=":d=Je(a.v,c);void 0===d?a.error("parseExpression("+c+")"):yg(a,b,d);break;case zg:case Ag:case Bg:xg(a,c);break;case Cg:case Dg:case Eg:a:{b=d;var d=c,f;if(b==Cg){c=d.match(/([A-Z$%.][0-9A-Z$%.]*)\s*(\([^)]*\)|)\s*(<|)(.*)/i);if(!c){a.error("unrecognized "+b+" definition: "+d);break a}b=c[1];d=c[2].match(/[A-Z$%.][0-9A-Z$%.]*/g); -e=-1;f=3}else{e=Fg(a,d,",");if(!e){a.error("missing "+b+" expression: "+d);break a}d=d.substr(e.length+1);e=e.trim();c=d.match(/\s*(<|)(.*)/i);b="@"+b;d=[];e=Je(a.v,e);f=1}b=b.toUpperCase();a.b=1;var g="";c[f]&&(a.b=2,g=c[f+1],">"==g.slice(-1)&&(a.b=0,g=g.slice(0,-1)));a.G[b]={name:b,Eb:d,yb:e,La:g};a.b?a.J=b:wg(a,b)}}return 820<=a.u?(Oe(a.v),a.error("temporary line limit reached"),!1):!0} -function wg(a,b,c){var d=a.G[b];if(!d)return!1;if(null!=c){b=[];var e=",";"("==c[0]&&(e+=")",c=c.substr(1));for(;c;){c=c.trim();var f=Fg(a,c,e);if(!f)break;b.push(f);c=c.substr(f.length+1)}Gg(a,d.La,d.Eb,b);return!0}if("@"!=b[0])return!1;switch(b.substr(1)){case Dg:d.yb||Gg(a,d.La);break;case Eg:for(;0p)break;var n=p+1,q=p+h.length;p&&f[p-1].match(/[0-9A-Z$%.]/i)||!(q>=f.length)&&f[q].match(/[0-9A-Z$%.]/i)||(f=f.substr(0,p)+k+f.substr(q),n=p+k.length)}if(!vg(a,f))break}}ng.prototype.error=function(a){throw Error("error"+(this.u?" at line "+va(this.u):"")+": "+a);}; -function Fg(a,b,c){c=void 0===c?"":c;for(var d=0,e=null,f=0;d"==g&&0>--f){a.error("missing angle bracket(s): "+b);break}d++}f?0d?c="":(c=b.substr(d+1),b=b.substr(0,d),a.i=null);a.w+=b}if(null==a.i){var e=0;b=0;var f,g,d=a.w.length;a.C==Ag&&d++;for(var h=0;h=k&&(k-=32),k=k+32&63);b+=k*Math.pow(2,g);g-=f;e++;0>g&&(e=b,a.B[a.H++]=e,e=0)}e&&(a.B[a.H++]=b)}return c} -function yg(a,b,c,d){var e,f;d=void 0===d?!1:d;e=void 0===e?!1:e;f=void 0===f?!1:f;b=b.toUpperCase().substr(0,6);d&&void 0!==a.I[b]?a.error("label "+b+" redefined"):(a.I[b]={name:b,value:c,dd:d,cd:e,ed:f},a.v.K[b]=c)}var zg="ASCII",Ag="ASCIZ",Bg="SIXBIT",Cg="DEFINE",Dg="IFE",Eg="REPEAT"; -function Hg(a,b,c){t.call(this,"Computer",a,33554432);this.A.V=!1;this.R=null;Ig(this,b);this.O=Yc(this,"autoPower",a,6);this.w=0;this.aa=+a.busWidth||+a.buswidth;this.M=this.F=this.N=null;this.K=this.T=!1;this.I=this.B=null;this.S=this.P=!1;this.ba=Yc(this,"url")||"";(Math.random()+.1).toString(36);this.i=Jg(this);if(this.v=rb("CPU",this.id)){this.C=rb("Debugger",this.id);this.H=new Bc({id:this.Ra+".bus",busWidth:this.aa},this.v,this.C);var d,e=pb(this.id);if((this.u=rb("Panel",this.id))&&this.u.ta)for(b= -0;b\nLicense: GPL version 3 or later ");for(b=0;bKg){if(Lg(d,this.M)){this.B=new F(this,"1.34.2",Ug);Lg(this.B)&&(Vg(this,d),a=Wg,Xg(this.B));this.B.set(Rg,Ga());Yg(this.B);var e=this.b&&!this.K;if(a==Sg||ob("Click OK to restore the previous "+Pb+" machine state, or CANCEL to reset the machine.")){if(c=Qg(d)){var f=d.get("code"),g=d.get("data");f&&("ok"==f?Lg(d,g):("error"==f&&"no machine state"!= -g?(this.da("Error: "+g),"unable to verify user"==g&&(Ra(Zg,""),this.i=null)):this.j(f+": "+g),Xg(d),Lg(d)?(c=Qg(d),e=!0):c=!1))}e&&Og(this,c?d:null)}else a==Wg&&d.clear()}else Og(this);delete this.M;delete this.I}e=pb(this.id);for(f=0;fa[1];a=a[2];this.S=!0;this.A.V=!0;var d=this.J.power;d&&(d.textContent="Shutdown");this.v&&($g(this,this.v,b,c,a),H(this,-2),this.v.Z());this.P&&(Vg(this,b),b.clear());!c&&this.B&&(this.B.clear(),delete this.B);this.w=0}; -function Vg(a,b){if(ob("There may be a problem with your "+Pb+" machine.\n\nTo help us diagnose it, click OK to send this "+Pb+" machine state to http://www.pcjs.org.")){var c=a.ba;a=a.i||"";b=b.toString();var d={};d.app=Pb;d.ver="1.34.2";d.url=c;d.user=a;d.type="bug";d.data=b;Ha("http://www.pcjs.org/api/v1/report",d,!0)}} -function sg(a,b,c){var d,e="none";if(a.w)return null;a.w--;var f=new F(a,"1.34.2"),g=new F(a,"1.34.2",Pg),h=Ga();g.set(Rg,h);f.set(Rg,h);f.set(ah,"1.34.2");f.set(bh,window?window.location.href:null);f.set(ch,window?window.navigator.userAgent:"");a.v&&a.v.ja&&(c&&(b&&(a.v.A.Z=a.v.A.L),a.v.W()),d=a.v.ja(b,c),"object"===typeof d&&f.set(a.v.id,d),c&&(a.v.A.V=!1,!1===d&&(e=null)));for(var h=pb(a.id),k=0;k([\s\S]*?)<\/pre>/gi;f=g.exec(b);){var h=f[1];0<=h.indexOf("&")&&(h=h.replace(/</gi,"<").replace(/>/gi,">").replace(/&/gi,"&"));d+=h}(f=d.match(/&[a-z]+;/i))&&e.j("warning"+(e.v?" at line "+ +va(e.v):"")+": "+("unrecognized HTML entity: "+f[0]))}var B,S=d.split(/\r?\n/);for(B=0;B=--g)break}0>g&&a.error("missing bracket(s): "+e);0<=k&&(f=e.substr(k,h-k));(e=f)&&(d=d.replace(e,zg(a,Ag,e)));if(!wg(a,c,d))switch(c){case "=":c=d;d=Je(a.u,c);void 0===d?a.error("parseExpression("+c+")"):yg(a,b,d);break;case Bg:case Cg:case Dg:xg(a,d);break;case Eg:case Fg:case Gg:zg(a, +c,d)}return 820<=a.v?(Oe(a.u),a.error("temporary line limit reached"),!1):!0}function wg(a,b,c){var d=a.J[b];if(!d)return!1;if(null!=c){b=[];var e=",";"("==c[0]&&(e+=")",c=c.substr(1));for(;c;){c=c.trim();var f=Hg(a,c,e);if(!f)break;b.push(f);c=c.substr(f.length+1)}Ig(a,d.La,d.Eb,b);return!0}if("@"!=b[0])return!1;switch(b.substr(1)){case Fg:d.yb||Ig(a,d.La);break;case Gg:for(;0p)break;var n=p+1,q=p+h.length;p&&f[p-1].match(/[0-9A-Z$%.]/i)||!(q>=f.length)&&f[q].match(/[0-9A-Z$%.]/i)||(f=f.substr(0,p)+k+f.substr(q),n=p+k.length)}if(!vg(a,f))break}}ng.prototype.error=function(a){throw Error("error"+(this.v?" at line "+va(this.v):"")+": "+a);}; +function Hg(a,b,c){c=void 0===c?",":c;for(var d=0,e=null,f=0;d"==g&&0>--f){a.error("missing bracket(s): "+b);break}d++}f?0d?c="":(c=b.substr(d+1),b=b.substr(0,d),a.i=null);a.w+=b}if(null==a.i){var e=0;b=0;var f,g,d=a.w.length;a.H==Cg&&d++;for(var h=0;h=k&&(k-=32),k=k+32&63);b+=k*Math.pow(2,g);g-=f;e++;0>g&&(e=b,a.I[a.B++]=e,e=0)}e&&(a.I[a.B++]=b)}return c} +function zg(a,b,c){var d,e,f;a.G="<";a.C=">";if(b==Eg){d=c.match(/([A-Z$%.][0-9A-Z$%.]*)\s*(\([^)]*\)|)\s*(<|)(.*)/i);if(!d)return a.error("unrecognized "+b+" definition: "+c),"";b=d[1];c=d[2].match(/[A-Z$%.][0-9A-Z$%.]*/g);e=-1;f=3}else if(b==Ag)a.G="[",a.C="]",b="@"+va(a.v,5),d=[c[0],c.substr(1)],c=[],e=a.v,f=0;else{e=Hg(a,c);if(!e)return a.error("missing "+b+" expression: "+c),"";c=c.substr(e.length+1);e=e.trim();d=c.match(/\s*(<|)(.*)/i);b="@"+b;c=[];e=Je(a.u,e);f=1}b=b.toUpperCase();a.b=1;var g= +"";d[f]&&(a.b=2,g=d[f+1],g.slice(-1)==a.C&&(a.b=0,g=g.slice(0,-1)));a.J[b]={name:b,Eb:c,yb:e,La:g};a.b?a.F=b:wg(a,b);return b}function yg(a,b,c,d){var e,f;d=void 0===d?!1:d;e=void 0===e?!1:e;f=void 0===f?!1:f;b=b.toUpperCase().substr(0,6);d&&void 0!==a.L[b]?a.error("label "+b+" redefined"):(a.L[b]={name:b,value:c,dd:d,cd:e,ed:f},a.u.K[b]=c)}var Bg="ASCII",Cg="ASCIZ",Dg="SIXBIT",Eg="DEFINE",Ag="LITERAL",Fg="IFE",Gg="REPEAT"; +function Jg(a,b,c){t.call(this,"Computer",a,33554432);this.A.V=!1;this.R=null;Kg(this,b);this.O=Yc(this,"autoPower",a,6);this.w=0;this.aa=+a.busWidth||+a.buswidth;this.L=this.F=this.N=null;this.K=this.T=!1;this.I=this.B=null;this.S=this.P=!1;this.ba=Yc(this,"url")||"";(Math.random()+.1).toString(36);this.i=Lg(this);if(this.v=rb("CPU",this.id)){this.C=rb("Debugger",this.id);this.H=new Bc({id:this.Ra+".bus",busWidth:this.aa},this.v,this.C);var d,e=pb(this.id);if((this.u=rb("Panel",this.id))&&this.u.ta)for(b= +0;b\nLicense: GPL version 3 or later ");for(b=0;bMg){if(Ng(d,this.L)){this.B=new F(this,"1.34.2",Wg);Ng(this.B)&&(Xg(this,d),a=Yg,Zg(this.B));this.B.set(Tg,Ga());$g(this.B);var e=this.b&&!this.K;if(a==Ug||ob("Click OK to restore the previous "+Pb+" machine state, or CANCEL to reset the machine.")){if(c=Sg(d)){var f=d.get("code"),g=d.get("data");f&&("ok"==f?Ng(d,g):("error"==f&&"no machine state"!= +g?(this.da("Error: "+g),"unable to verify user"==g&&(Ra(ah,""),this.i=null)):this.j(f+": "+g),Zg(d),Ng(d)?(c=Sg(d),e=!0):c=!1))}e&&Qg(this,c?d:null)}else a==Yg&&d.clear()}else Qg(this);delete this.L;delete this.I}e=pb(this.id);for(f=0;fa[1];a=a[2];this.S=!0;this.A.V=!0;var d=this.J.power;d&&(d.textContent="Shutdown");this.v&&(bh(this,this.v,b,c,a),H(this,-2),this.v.Z());this.P&&(Xg(this,b),b.clear());!c&&this.B&&(this.B.clear(),delete this.B);this.w=0}; +function Xg(a,b){if(ob("There may be a problem with your "+Pb+" machine.\n\nTo help us diagnose it, click OK to send this "+Pb+" machine state to http://www.pcjs.org.")){var c=a.ba;a=a.i||"";b=b.toString();var d={};d.app=Pb;d.ver="1.34.2";d.url=c;d.user=a;d.type="bug";d.data=b;Ha("http://www.pcjs.org/api/v1/report",d,!0)}} +function sg(a,b,c){var d,e="none";if(a.w)return null;a.w--;var f=new F(a,"1.34.2"),g=new F(a,"1.34.2",Rg),h=Ga();g.set(Tg,h);f.set(Tg,h);f.set(ch,"1.34.2");f.set(dh,window?window.location.href:null);f.set(eh,window?window.navigator.userAgent:"");a.v&&a.v.ja&&(c&&(b&&(a.v.A.Z=a.v.A.M),a.v.W()),d=a.v.ja(b,c),"object"===typeof d&&f.set(a.v.id,d),c&&(a.v.A.V=!1,!1===d&&(e=null)));for(var h=pb(a.id),k=0;k=d||30<=(c.Ya+=d))&&(e.textContent=c.A.L?c.aa.toFixed(2)+"Mhz":"Stopped",c.Ya=0)}if(a.u&&(a=a.u,b=b||0,a.M)){c=a.v.A.L;d=!!(a.v.B&8);if(0>=b||60<=(a.K+=b)){e=a.v.i;if(a.J.PC){var f=a.C&&a.C.ca||8,e=e||0,e=8==f?ua(e,void 0):m(e,void 0);a.J.PC.textContent!=e&&(a.J.PC.textContent=e)}a.K=0}-1>b?a.i=a.v.i:0g.indexOf("/")&&"/"==window.location.pathname.slice(-1)&&(g=window.location.pathname+g),e?"}"==e.slice(-1)?(e=e.slice(0,-1),1]*\sid=)(['"]).*?\2/,"$1$2"+c+"$2"+(e?" parms='"+e+"'":"")+(g?' url="'+g+'"':"")));f||(a=a.replace(/().*?(<\/xsl:variable>)/,"$1PDPjs$2"), -a=a.replace(/().*?(<\/xsl:variable>)/,"$1"+d+"$2"));g=null;if("<"==a.charAt(0))try{f||(a=a.replace(/\s*/g,"")),window.ActiveXObject||"ActiveXObject"in window?(g=new window.ActiveXObject("Microsoft.XMLDOM"),g.async=!1,g.loadXML(a)):g=(new window.DOMParser).parseFromString(a,"text/xml")}catch(q){g=null,a=q.message}else a="unrecognized XML: "+(255/g.exec(a)){var e=d[2];b("Loading "+e+"...");Ha(e,null,!0,function(f,g,h){if(h||!g)c(a,"unable to resolve XML reference: "+d[0]+" ("+h+")");else{if(f=d[3])if(h=g.match(new RegExp("<"+d[1]+"[^>]*>"))){for(var k=h[0],n,p=/( [a-z]+=)(['"])(.*?)\2/g;n=p.exec(f);)k=0>k.indexOf(n[1])?k.replace(">",n[0]+">"):k.replace(new RegExp(n[1]+"(['\"])(.*?)\\1"),n[0]);h[0]!=k&&(g=g.replace(h[0],k))}else{c(a,"missing <"+d[1]+"> in "+e);return}g=g.replace(/<\?xml[^>]*>[\r\n]*/, -"");a=a.replace(d[0],g);uh(a,b,c)}})}else c(a,null)} -function vh(a,b,c,d,e){function f(a){if(void 0===k){var b=h&&w(h,"machine-warning");k=b&&b[0]||h}k&&(k.innerHTML=Ba(a))}function g(a){f("Error: "+a);n&&(--rh||gb(!0));n=!1}var h,k,n=!0;rh++;mb[b]={};try{if(h=document.getElementById(b)){var p;if("object"==typeof resources&&(p=resources.css)){var q=document.head||document.getElementsByTagName("head")[0],B=document.createElement("style");B.type="text/css";B.styleSheet?B.styleSheet.cssText=p:B.appendChild(document.createTextNode(p));q.appendChild(B)}d|| -(p=a,"pdp"==a.substr(0,3)&&(p="pdpjs"),d="/versions/"+p+"/1.34.2/components.xsl");p=function(e,k){k?sh(d,null,a,null,!1,f,function(a,e){e?(lb(b,d,a),f("Processing "+c+"..."),window.ActiveXObject||"ActiveXObject"in window?(e=k.transformNode(e))?(h.outerHTML=e,--rh||gb(!0)):g("transformNodeToObject failed"):document.implementation&&document.implementation.createDocument?(a=new XSLTProcessor,a.importStylesheet(e),(e=a.transformToFragment(k,document))?h.parentNode?(h.parentNode.replaceChild(e,h),--rh|| -gb(!0)):g("invalid machine element: "+b):g("transformToFragment failed")):g("unable to transform XML: unsupported browser")):g(a)}):g(e)};"<"!=c.charAt(0)?sh(c,b,a,e,!0,f,p):th(c,null,b,a,e,!1,f,p)}else g("missing machine element: "+b)}catch(S){g(S.message)}return n}window.embedPDP10=function(a,b,c,d){gb(!1);return vh("pdp10",a,b,c,d)};window.embedPDP11=function(a,b,c,d){gb(!1);return vh("pdp11",a,b,c,d)};window.findMachineComponent=function(a,b){return rb(b,a+".machine")}; +function H(a,b){if(a.v){var c=a.v,d=b||0,e=c.J.speed;e&&(0>=d||30<=(c.Ya+=d))&&(e.textContent=c.A.M?c.aa.toFixed(2)+"Mhz":"Stopped",c.Ya=0)}if(a.u&&(a=a.u,b=b||0,a.L)){c=a.v.A.M;d=!!(a.v.B&8);if(0>=b||60<=(a.K+=b)){e=a.v.i;if(a.J.PC){var f=a.C&&a.C.ca||8,e=e||0,e=8==f?ua(e,void 0):m(e,void 0);a.J.PC.textContent!=e&&(a.J.PC.textContent=e)}a.K=0}-1>b?a.i=a.v.i:0g.indexOf("/")&&"/"==window.location.pathname.slice(-1)&&(g=window.location.pathname+g),e?"}"==e.slice(-1)?(e=e.slice(0,-1),1]*\sid=)(['"]).*?\2/,"$1$2"+c+"$2"+(e?" parms='"+e+"'":"")+(g?' url="'+g+'"':"")));f||(a=a.replace(/().*?(<\/xsl:variable>)/,"$1PDPjs$2"), +a=a.replace(/().*?(<\/xsl:variable>)/,"$1"+d+"$2"));g=null;if("<"==a.charAt(0))try{f||(a=a.replace(/\s*/g,"")),window.ActiveXObject||"ActiveXObject"in window?(g=new window.ActiveXObject("Microsoft.XMLDOM"),g.async=!1,g.loadXML(a)):g=(new window.DOMParser).parseFromString(a,"text/xml")}catch(q){g=null,a=q.message}else a="unrecognized XML: "+(255/g.exec(a)){var e=d[2];b("Loading "+e+"...");Ha(e,null,!0,function(f,g,h){if(h||!g)c(a,"unable to resolve XML reference: "+d[0]+" ("+h+")");else{if(f=d[3])if(h=g.match(new RegExp("<"+d[1]+"[^>]*>"))){for(var k=h[0],n,p=/( [a-z]+=)(['"])(.*?)\2/g;n=p.exec(f);)k=0>k.indexOf(n[1])?k.replace(">",n[0]+">"):k.replace(new RegExp(n[1]+"(['\"])(.*?)\\1"),n[0]);h[0]!=k&&(g=g.replace(h[0],k))}else{c(a,"missing <"+d[1]+"> in "+e);return}g=g.replace(/<\?xml[^>]*>[\r\n]*/, +"");a=a.replace(d[0],g);wh(a,b,c)}})}else c(a,null)} +function xh(a,b,c,d,e){function f(a){if(void 0===k){var b=h&&w(h,"machine-warning");k=b&&b[0]||h}k&&(k.innerHTML=Ba(a))}function g(a){f("Error: "+a);n&&(--th||gb(!0));n=!1}var h,k,n=!0;th++;mb[b]={};try{if(h=document.getElementById(b)){var p;if("object"==typeof resources&&(p=resources.css)){var q=document.head||document.getElementsByTagName("head")[0],B=document.createElement("style");B.type="text/css";B.styleSheet?B.styleSheet.cssText=p:B.appendChild(document.createTextNode(p));q.appendChild(B)}d|| +(p=a,"pdp"==a.substr(0,3)&&(p="pdpjs"),d="/versions/"+p+"/1.34.2/components.xsl");p=function(e,k){k?uh(d,null,a,null,!1,f,function(a,e){e?(lb(b,d,a),f("Processing "+c+"..."),window.ActiveXObject||"ActiveXObject"in window?(e=k.transformNode(e))?(h.outerHTML=e,--th||gb(!0)):g("transformNodeToObject failed"):document.implementation&&document.implementation.createDocument?(a=new XSLTProcessor,a.importStylesheet(e),(e=a.transformToFragment(k,document))?h.parentNode?(h.parentNode.replaceChild(e,h),--th|| +gb(!0)):g("invalid machine element: "+b):g("transformToFragment failed")):g("unable to transform XML: unsupported browser")):g(a)}):g(e)};"<"!=c.charAt(0)?uh(c,b,a,e,!0,f,p):vh(c,null,b,a,e,!1,f,p)}else g("missing machine element: "+b)}catch(S){g(S.message)}return n}window.embedPDP10=function(a,b,c,d){gb(!1);return xh("pdp10",a,b,c,d)};window.embedPDP11=function(a,b,c,d){gb(!1);return xh("pdp11",a,b,c,d)};window.findMachineComponent=function(a,b){return rb(b,a+".machine")}; window.processMachineScript=function(a,b){var c=!1;a+=".machine";if("string"==typeof b&&!ub[a]){for(var c=!0,d=ub,e=a,f=b.length,g=[],h=[],k="",n=null,p=0;p