Fixed the PC11 component to deliver bytes at (roughly) the same rate as a physical "high speed" paper tape reader would (TODO: Add a paper tape status display)
This commit is contained in:
Jeff Parsons
Jeff Parsons
parent
13a1dedbc7
commit
bff199ee7f
3 changed files with 153 additions and 152 deletions
|
|
@ -714,23 +714,12 @@ PC11.prototype.advanceReader = function()
|
|||
if (!(this.prs & PDP11.PC11.PRS.DONE)) {
|
||||
if (this.iTapeData < this.aTapeData.length) {
|
||||
this.prb = this.aTapeData[this.iTapeData++] & 0xff;
|
||||
if (MAXDEBUG) this.println("tape read " + str.toHexByte(this.prb) + " at pos " + str.toHexWord(this.iTapeData));
|
||||
this.prs |= PDP11.PC11.PRS.DONE;
|
||||
this.prs &= ~PDP11.PC11.PRS.BUSY;
|
||||
if (this.prs & PDP11.PC11.PRS.RIE) {
|
||||
this.cpu.setTrigger(this.triggerReaderInterrupt);
|
||||
}
|
||||
/*
|
||||
* The PC11, by virtue of its "high speed", is supposed to deliver characters at 300 CPS, so
|
||||
* that's the rate we'll choose as well (ie, 1000ms / 300). As an aside, the original "low speed"
|
||||
* version of the reader ran at 10 CPS.
|
||||
*
|
||||
* TODO: Review this code. If we don't set the fReset parameter to true, the timer will eventually
|
||||
* fire while the "Absolute Loader" tape is still reading bytes from, say, the "BASIC (Single User)"
|
||||
* tape, causing an EXTRA advance to occur and a byte to be skipped. Passing true ensures that the
|
||||
* timer cannot fire for AT LEAST 3ms after each advance. But we need to understand the reader's
|
||||
* actual behavior.
|
||||
*/
|
||||
this.cpu.setTimer(this.timerReaderAdvance, 1000/300, true);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -763,19 +752,31 @@ PC11.prototype.readPRS = function(addr)
|
|||
PC11.prototype.writePRS = function(data, addr)
|
||||
{
|
||||
if (data & PDP11.PC11.PRS.RE) {
|
||||
/*
|
||||
* From the 1976 Peripherals Handbook, p. 4-378:
|
||||
*
|
||||
* Set [RE] to allow the Reader to fetch one character. The setting of this bit clears Done,
|
||||
* sets Busy, and clears the Reader Buffer (PRB). Operation of this bit is disabled if Error = 1;
|
||||
* attempting to set it when Error = 1 will cause an immediate interrupt if Interrupt Enable = 1.
|
||||
*/
|
||||
if (this.prs & PDP11.PC11.PRS.ERROR) {
|
||||
data &= ~PDP11.PC11.PRS.RE;
|
||||
// if (this.prs & PDP11.PC11.PRS.RIE) {
|
||||
// TODO: Generate an interrupt (error condition)
|
||||
// }
|
||||
if (this.prs & PDP11.PC11.PRS.RIE) {
|
||||
this.cpu.setTrigger(this.triggerReaderInterrupt);
|
||||
}
|
||||
} else {
|
||||
this.prs &= ~PDP11.PC11.PRS.DONE;
|
||||
this.prs |= PDP11.PC11.PRS.BUSY;
|
||||
this.prb = 0;
|
||||
/*
|
||||
* The PC11, by virtue of its "high speed", is supposed to deliver characters at 300 CPS, so
|
||||
* that's the rate we'll choose as well (ie, 1000ms / 300). As an aside, the original "low speed"
|
||||
* version of the reader ran at 10 CPS.
|
||||
*/
|
||||
this.cpu.setTimer(this.timerReaderAdvance, 1000/300);
|
||||
}
|
||||
}
|
||||
this.prs = (this.prs & ~PDP11.PC11.PRS.WMASK) | (data & PDP11.PC11.PRS.WMASK);
|
||||
this.advanceReader();
|
||||
};
|
||||
|
||||
/**
|
||||
|
|
|
|||
|
|
@ -53,9 +53,9 @@ function nb(a,b){if(a.v.Lb)return a.v.Ia=!1,a.v.Lb=!1;if(a.v.error)return a.j(a.
|
|||
Array.prototype.indexOf||(Array.prototype.indexOf=function(a,b){b=b||0;for(var c=this.length;b<c;b++)if(this[b]===a)return b;return-1});
|
||||
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 sb="undefined"!==typeof ArrayBuffer,tb={cpu:1,trap:16,bus:64,memory:128,device:256,keyboard:65536,key:131072,disk:2097152,serial:8388608,speaker:33554432,computer:67108864,log:268435456,warn:536870912,buffer:1073741824,halt:-2147483648};function ub(a){r.call(this,"Panel",a,ub);this.f=0;this.v.Xb=!0}u(ub);k=ub.prototype;
|
||||
k.ra=function(a,b,c,d){if(this.D&&this.D.ra(a,b,c,d)||this.b&&this.b.ra(a,b,c,d)||this.i&&this.i.ra(a,b,c,d))return!0;switch(b){case "R0":case "R1":case "R2":case "R3":case "R4":case "R5":case "R6":case "R7":case "NF":case "ZF":case "VF":case "CF":case "PS":return this.I[b]=c,this.f++,!0;default:return"rled"==a?(this.I[b]=c,this.f++,!0):this.parent.ra.call(this,a,b,c,d)}};k.Ca=function(a,b,c,d){this.D=a;this.w=b;this.b=c;this.i=d};k.Aa=function(a,b){b||Ib();return!0};k.za=function(){return!0};
|
||||
k.ra=function(a,b,c,d){if(this.D&&this.D.ra(a,b,c,d)||this.b&&this.b.ra(a,b,c,d)||this.i&&this.i.ra(a,b,c,d))return!0;switch(b){case "R0":case "R1":case "R2":case "R3":case "R4":case "R5":case "R6":case "R7":case "NF":case "ZF":case "VF":case "CF":case "PS":return this.I[b]=c,this.f++,!0;default:return"rled"==a?(this.I[b]=c,this.f++,!0):this.parent.ra.call(this,a,b,c,d)}};k.Ca=function(a,b,c,d){this.D=a;this.w=b;this.b=c;this.i=d};k.Aa=function(a,b){b||vb();return!0};k.za=function(){return!0};
|
||||
function Jb(a,b,c,d){if(a.I[b]){void 0===c&&(rb(a,"Value for "+b+" is invalid"),a.b.aa());var e=a.i&&a.i.ma||8;c=!a.b.v.da||a.v.Xb?8==e?na(c,d):l(c,d):"--------".substr(0,d||4);a.I[b].textContent!=c&&(a.I[b].textContent=c)}}function Kb(a,b,c,d){for(var e=0;e<d;e++){var f=a.I[b+e];f&&(f.style.backgroundColor=c&1<<e?"#ff0000":"#000000")}}
|
||||
k.$=function(a){if(this.f&&(a||!this.b.v.da||this.v.Xb)){for(a=0;a<this.b.u.length;a++)Jb(this,"R"+a,this.b.u[a]);a=Lb(this.b);Jb(this,"PS",a);Jb(this,"NF",a&8?1:0,1);Jb(this,"ZF",a&4?1:0,1);Jb(this,"VF",a&2?1:0,1);Jb(this,"CF",a&1?1:0,1);Kb(this,"D",this.b.u[0],16);Kb(this,"A",this.b.u[7],22)}};function Ib(){for(var a=!1,b=B(document,"pdp11","panel"),c=0;c<b.length;c++){var d=b[c],e=z(d),f=lb(e.id);f||(a=!0,f=new ub(e));A(f,d);a&&H(f)}}Ta(Ib);
|
||||
k.$=function(a){if(this.f&&(a||!this.b.v.da||this.v.Xb)){for(a=0;a<this.b.u.length;a++)Jb(this,"R"+a,this.b.u[a]);a=Lb(this.b);Jb(this,"PS",a);Jb(this,"NF",a&8?1:0,1);Jb(this,"ZF",a&4?1:0,1);Jb(this,"VF",a&2?1:0,1);Jb(this,"CF",a&1?1:0,1);Kb(this,"D",this.b.u[0],16);Kb(this,"A",this.b.u[7],22)}};function vb(){for(var a=!1,b=B(document,"pdp11","panel"),c=0;c<b.length;c++){var d=b[c],e=z(d),f=lb(e.id);f||(a=!0,f=new ub(e));A(f,d);a&&H(f)}}Ta(vb);
|
||||
function Mb(a,b,c){r.call(this,"Bus",a,Mb,64);this.b=b;this.i=c;this.M=a.busWidth||16;this.g=0;this.K=[];this.F=null;this.H=Math.pow(2,this.M);this.f=this.H-1|0;this.ua=Nb;this.ia=Math.log2(this.ua);this.J=this.ua>>2;this.w=this.ua-1;this.C=this.H/this.ua|0;this.Ha=[];this.A=0;this.D=[];this.mc=[Ob,Pb,Qb,Rb];a=new I(this);Sb(a,this.i);this.W=Array(this.C);for(b=0;b<this.C;b++)this.W[b]=a;H(this)}u(Mb);var Nb=8192,Tb=Nb-1;
|
||||
function Ob(a,b){var c=-1,d=this.controller,e=d.Ha[a];e?e[0]?c=e[0](b):e[2]&&(c=b&1?e[2](b&-2)>>8:e[2](b)&255):b&1&&(e=d.Ha[a&-2])&&e[2]&&(c=e[2](b&-2)>>8);if(0<=c)return this.i&&D(this.i,64)&&C(this.i,e[4]+".readByte("+J(this.i,b)+"): "+J(this.i,c),!0,!0),c;c=Ub(d,b,!0);this.i&&D(this.i,64)&&C(this.i,"warning: unconverted read access to byte @"+J(this.i,b)+": "+J(this.i,c),!0,!0);return c}
|
||||
function Pb(a,b,c){var d=!1,e=this.controller,f=e.Ha[a];if(f)if(f[1])f[1](b,c),d=!0;else{if(f[3]){a=f[2]?f[2](0):0;if(c&1)f[3](a&255|b<<8,c&-2);else f[3](a&-256|b,c);d=!0}}else c&1&&(f=e.Ha[a&-2])&&f[3]&&(c&=-2,a=f[2]?f[2](0):0,f[3](a&255|b<<8,c),d=!0);d?this.i&&D(this.i,64)&&C(this.i,f[4]+".writeByte("+J(this.i,c)+","+J(this.i,b)+")",!0,!0):(Ub(e,c,!0,b),this.i&&D(this.i,64)&&C(this.i,"warning: unconverted write access to byte @"+J(this.i,c)+": "+J(this.i,b),!0,!0))}
|
||||
|
|
@ -102,7 +102,7 @@ k.Aa=function(a,b){if(!b){if(a&&this.restore){Qc(this);if(!this.restore(a))retur
|
|||
function Rc(a){void 0===a.tb&&(a.tb=0);void 0===a.gb&&(a.gb=-1);void 0===a.hb&&(a.hb=-1);a.v.cb=0<=a.tb&&0<a.gb;a.v.cb&&(a.sb=0,a.ma=a.tb-a.fa)}function Tc(a,b){if(a.v.cb){var c=!1;a.sb=a.sb+a.$b()|0;a.ma-=b;0>=a.ma&&(a.ma+=a.gb,c=!0);0<=a.hb&&a.hb<=Uc(a)&&(a.gb=a.hb=-1,Rc(a),a.aa(),c=!0);c&&a.j(Uc(a)+" cycles: checksum="+l(a.sb))}}
|
||||
k.ra=function(a,b,c){var d=this;switch(b){case "power":case "reset":return this.I[b]=c,!0;case "run":return this.I[b]=c,c.onclick=function(){var a;if(a=d.D)if(a=d.D,a.v.ga)a=!0;else{var b=null,c,h=kb(a.id);for(c=0;c<h.length&&(b=h[c],b===a||b.v.ready);c++);if(c==h.length)for(c=0;c<h.length&&(b=h[c],b===a||b.v.ga);c++);c==h.length&&(b=a);n("The "+b.type+" component ("+b.id+") is not "+(b.v.ready?"powered yet":"ready yet"+(b.Bb?" (waiting for notification)":""))+".");a=!1}a&&(d.v.da?d.aa():d.lb())},
|
||||
!0;case "speed":return this.I[b]=c,!0;case "setSpeed":return this.I[b]=c,c.onclick=function(){Vc(d,d.Ma<<1,!0)},c.textContent=this.Wa.toFixed(2)+"Mhz",!0}return!1};k.$=function(){var a=this.I.speed;a&&(a.textContent=this.v.da&&this.U?this.U.toFixed(2)+"Mhz":"Stopped")};function Wc(a,b,c){a.fa+=b;c&&(a.ca=a.b=0)}function Xc(a,b){var c=1;b&&1<a.Ma&&a.U&&(c=a.U/a.ab);a.Cb=Math.round(1E3/30);a.Qa=Math.floor(a.Ga/30*c);b||(a.pa=a.Qa);a.eb=0}function Uc(a){return a.fa+a.O+a.ca-a.b}
|
||||
function Qc(a){a.U=0;a.Eb=0;a.fa=a.O=a.ca=a.b=0;Rc(a);Vc(a,1)}function Vc(a,b,c){var d=!1;if(void 0!==b){.8>a.U/a.Wa?b=1:d=!0;a.Ma=b;b=a.ab*a.Ma;if(a.Wa!=b){a.Wa=b;b=a.Wa.toFixed(2)+"Mhz";var e=a.I.setSpeed;e&&(e.textContent=b);a.j("target speed: "+b)}c&&a.D&&a.D.wb()}Wc(a,a.O);a.O=0;a.N=za();a.ba=0;Xc(a);return d}function hc(a,b){var c=a.K.length;a.K.push([-1,b]);return c}function jc(a,b,c,d){0<=b&&b<a.K.length&&(d||0>a.K[b][0])&&(c=a.Ga*a.Ma/1E3*c|0,a.K[b][0]=c+Yc(a))}
|
||||
function Qc(a){a.U=0;a.Eb=0;a.fa=a.O=a.ca=a.b=0;Rc(a);Vc(a,1)}function Vc(a,b,c){var d=!1;if(void 0!==b){.8>a.U/a.Wa?b=1:d=!0;a.Ma=b;b=a.ab*a.Ma;if(a.Wa!=b){a.Wa=b;b=a.Wa.toFixed(2)+"Mhz";var e=a.I.setSpeed;e&&(e.textContent=b);a.j("target speed: "+b)}c&&a.D&&a.D.wb()}Wc(a,a.O);a.O=0;a.N=za();a.ba=0;Xc(a);return d}function hc(a,b){var c=a.K.length;a.K.push([-1,b]);return c}function jc(a,b,c){0<=b&&b<a.K.length&&0>a.K[b][0]&&(c=a.Ga*a.Ma/1E3*c|0,a.K[b][0]=c+Yc(a))}
|
||||
function Zc(a,b){for(var c=a.K.length-1;0<=c;c--){var d=a.K[c];0>d[0]||b>d[0]&&(b=d[0])}return b}function $c(a,b){for(var c=a.K.length-1;0<=c;c--){var d=a.K[c];0>d[0]||(d[0]-=b,0>=d[0]&&(d[0]=-1,d[1]()))}}function Yc(a,b){var c=a.ca-=a.b;a.b=0;b&&(a.ca=0);return c}
|
||||
k.fd=function(){if(this.v.da){this.eb>=this.Ga&&Xc(this,!0);this.sa=0;this.Fa=za();if(this.ba){var a=this.Fa-this.ba;a>this.Cb&&(this.N+=a,this.N>this.Fa&&(this.N=this.Fa))}try{do{var b=Zc(this,this.v.cb?1:this.Qa);try{this.mb(b)}catch(e){if("number"!=typeof e)throw e;}b=Yc(this,!0);this.sa+=b;this.O+=b;Tc(this,b);$c(this,b);this.pa-=b;if(0>=this.pa){this.pa+=this.Qa;15<=++this.Eb&&(this.D&&this.D.$(),this.Eb=0);break}}while(this.v.da)}catch(e){this.aa();this.D&&this.D.stop(za(),Uc(this));rb(this,
|
||||
e.stack||e.message);return}if(this.v.da){a=setTimeout;b=this.Fb;this.ba=za();var c=this.Cb;this.sa&&(c=Math.round(c*this.sa/this.Qa));var c=c-(this.ba-this.Fa),d=this.ba-this.N;d&&(this.U=Math.round(this.O/(10*d))/100,864E5<=d&&(this.fa=0,Vc(this)));if(0>c||this.U<this.Wa)-1E3>c&&(this.N-=c),c=0;this.eb+=this.sa;this.ba+=c;a(b,c)}}};
|
||||
|
|
@ -145,7 +145,7 @@ function wf(a){R(this,a,Sd(this,a),ye);this.b-=this.g?9:3+(7==this.f?2:0)}functi
|
|||
function Mf(a){Nf[a>>6&3].call(this,a)}
|
||||
var xf=[function(a){Of[a>>8&15].call(this,a)},jf,Ye,Ie,Ee,Ge,ze,V,function(a){Pf[a>>8&15].call(this,a)},kf,Ze,Je,Fe,He,sf,V],Of=[function(a){Qf[a>>4&15].call(this,a)},Ve,Se,Ke,Le,Qe,Me,Oe,gf,gf,yf,Af,Cf,V,V,V],zf=[function(a){Ed(this,Xd(this,a,0));this.b-=this.g?9:3+(7==this.f?2:0)},function(a){R(this,a,0,je);this.b-=this.g?9:3+(7==this.f?2:0)},function(a){R(this,a,1,ne);this.b-=this.g?9:3+(7==this.f?2:0)},function(a){R(this,a,1,le);this.b-=this.g?9:3+(7==this.f?2:0)}],Bf=[function(a){R(this,a,0,
|
||||
pe);this.b-=this.g?11:6},function(a){R(this,a,gd(this)?1:0,$d);this.b-=this.g?9:3+(7==this.f?2:0)},function(a){R(this,a,gd(this)?1:0,ve);this.b-=this.g?9:3+(7==this.f?2:0)},function(a){a=Vd(this,a);Ed(this,a);this.b-=this.g?4:3+(7==this.f?2:0)}],Df=[function(a){R(this,a,0,te);this.b-=this.g?9:3+(7==this.f?2:0)},function(a){R(this,a,0,re);this.b-=this.g?9:3+(7==this.f?2:0)},function(a){R(this,a,0,de);this.b-=this.g?9:3+(7==this.f?2:0)},function(a){R(this,a,0,be);this.b-=this.g?9:3+(7==this.f?2:0)}],
|
||||
Qf=[function(a){Rf[a&15].call(this,a)},V,V,V,ef,ef,ef,ef,qf,V,Ef,Gf,tf,tf,tf,tf],Rf=[bf,vf,pf,Ue,cf,of,V,V,V,V,V,V,V,V,V,V],Ff=[nf,function(){this.R=0;this.b-=5},function(){this.S=0;this.b-=5},T,function(){this.X=1;this.b-=5},T,T,T,function(){this.V=0;this.b-=5},T,T,T,T,T,T,T],Hf=[nf,function(){this.R=65536;this.b-=5},function(){this.S=32768;this.b-=5},W,function(){this.X=0;this.b-=5},W,W,W,function(){this.V=32768;this.b-=5},W,W,W,W,W,W,W],Pf=[Te,Re,Ne,Pe,We,Xe,Ce,De,af,uf,If,Kf,Mf,V,V,V],Jf=[function(a){Ed(this,
|
||||
Qf=[function(a){jg[a&15].call(this,a)},V,V,V,ef,ef,ef,ef,qf,V,Ef,Gf,tf,tf,tf,tf],jg=[bf,vf,pf,Ue,cf,of,V,V,V,V,V,V,V,V,V,V],Ff=[nf,function(){this.R=0;this.b-=5},function(){this.S=0;this.b-=5},T,function(){this.X=1;this.b-=5},T,T,T,function(){this.V=0;this.b-=5},T,T,T,T,T,T,T],Hf=[nf,function(){this.R=65536;this.b-=5},function(){this.S=32768;this.b-=5},W,function(){this.X=0;this.b-=5},W,W,W,function(){this.V=32768;this.b-=5},W,W,W,W,W,W,W],Pf=[Te,Re,Ne,Pe,We,Xe,Ce,De,af,uf,If,Kf,Mf,V,V,V],Jf=[function(a){Ed(this,
|
||||
Wd(this,a,0));this.b-=this.g?9:3+(7==this.f?2:0)},function(a){Q(this,a,0,ke);this.b-=this.g?9:3+(7==this.f?2:0)},function(a){Q(this,a,1,oe);this.b-=this.g?9:3+(7==this.f?2:0)},function(a){Q(this,a,1,me);this.b-=this.g?9:3+(7==this.f?2:0)}],Lf=[function(a){Q(this,a,0,qe);this.b-=this.g?11:6},function(a){Q(this,a,gd(this)?1:0,ae);this.b-=this.g?9:3+(7==this.f?2:0)},function(a){Q(this,a,gd(this)?1:0,we);this.b-=this.g?9:3+(7==this.f?2:0)},function(a){a=Ud(this,a);Ed(this,a<<8);this.b-=this.g?4:3+(7==
|
||||
this.f?2:0)}],Nf=[function(a){Q(this,a,0,ue);this.b-=this.g?9+(this.$a&1):3+(7==this.f?2:0)},function(a){Q(this,a,0,se);this.b-=this.g?9:3+(7==this.f?2:0)},function(a){Q(this,a,0,ee);this.b-=this.g?9+(this.$a&1):3+(7==this.f?2:0)},function(a){Q(this,a,0,ce);this.b-=this.g?9:3+(7==this.f?2:0)}];function cd(a){kg[a>>12].call(this,a)}
|
||||
var kg=[function(a){lg[a>>8&15].call(this,a)},jf,Ye,Ie,Ee,Ge,ze,function(a){mg[a>>8&15].call(this,a)},function(a){ng[a>>8&15].call(this,a)},kf,Ze,Je,Fe,He,sf,V],lg=[function(a){og[a>>4&15].call(this,a)},Ve,Se,Ke,Le,Qe,Me,Oe,gf,gf,yf,Af,Cf,function(a){pg[a>>6&3].call(this,a)},V,V],pg=[function(a){a=this.u[7]+((a&63)<<1)&65535;var b=this.oa(a|this.M);N(this,this.u[5]);this.u[6]=a+2&65535;this.u[5]=b;this.b-=8},function(a){a=Pd(this,a,0);Id(this,a);P(this,a);this.b-=11},function(a){var b=Kd(this),c=
|
||||
|
|
@ -170,103 +170,103 @@ this.F="";10!=a&&(this.F+=String.fromCharCode(a))}this.g&=-129;jc(this.b,this.U,
|
|||
function wc(a){r.call(this,"PC11",a,wc);this.g=a.autoMount||null;this.M=this.J=this.f=this.C=0;this.K=[];this.H=Cg;this.A=Dg;this.F="";this.N=!La("Mobi")&&window&&"FileReader"in window}u(wc);var Cg="",Dg=0;k=wc.prototype;
|
||||
k.ra=function(a,b,c){var d=this,e=Dg;switch(b){case "listTapes":return this.I[b]=c,c.onchange=function(){var a=d.I.descTape,b=c.options[c.selectedIndex];if(a&&b){var e={};if(b=b.getAttribute("data-value"))try{e=eval("("+b+")")}catch(m){n("PC11 option error: "+m.message)}b=e.desc;void 0===b&&(b="");e=e.href;void 0!==e&&(b='<a href="'+e+'" target="_blank">'+b+"</a>");a.innerHTML=b}},!0;case "descTape":return this.I[b]=c,!0;case "loadTape":e=2;case "attachTape":return e||(e=1),this.I[b]=c,c.onclick=
|
||||
function(){var a=d.I.listTapes;a&&Eg(d,a.options[a.selectedIndex].text,a.value,e)},!0;case "mountTape":if(this.N)return this.I[b]=c,c.addEventListener("change",function(){var a=c.children[0];a.children[1].disabled=!a.children[0].files.length}),c.onsubmit=function(a){if(a=a.currentTarget[1].files[0]){var b=a.name;Eg(d,oa(b,!0),b,1,a)}return!1},!0;c.parentNode.removeChild(c)}return!1};
|
||||
k.Ca=function(a,b,c,d){this.D=a;this.w=b;this.b=c;this.i=d;this.O=Fg(a);var e=this;if((this.g=Pc(this.D,"autoMount")||this.g)&&"string"==typeof this.g)try{this.g=eval("("+this.g+")")}catch(f){n("PC11 auto-mount error: "+f.message+" ("+this.g+")"),this.g=null}this.U=kc(56,4);this.P=hc(this.b,function(){Gg(e)});ec(b,this,Hg);Ig(this,"None",Cg,!0);this.N&&Ig(this,"Local Tape","?");Ig(this,"Remote Tape","??");Jg(this)||H(this)};
|
||||
k.Aa=function(a,b){if(!b)if(!a||!this.restore)this.reset();else if(!this.restore(a))return!1;return!0};k.za=function(a){return a?this.save():!0};k.reset=function(){this.f&=-2241;this.J=0};function Jg(a){a.C=0;if(a.g){var b=a.g.path||"",c;if(!(c=a.g.name))a:{if((c=a.I.listTapes)&&c.options)for(var d=0;d<c.options.length;d++){var e=c.options[d];if(e.value==b){c=e.text;break a}}c=oa(b,!0)}b&&c?Kg(a,c,b,1,!0):Lg(a)}return!!a.C}
|
||||
function Eg(a,b,c,d,e){if(c)if("?"==c)a.ja('Use "Choose File" and "Mount" to select and load a local tape.');else{if("??"==c){c=window.prompt("Enter the URL of a remote tape image.","")||"";if(!c)return;b=oa(c);a.status("Attempting to load "+c+' as "'+b+'"');a.H="??"}else a.H=c;Kg(a,b,c,d,!1,e)}else Mg(a,!1)}
|
||||
function Kg(a,b,c,d,e,f){var g=-1;if(a.F.toLowerCase()!=c.toLowerCase()||a.A!=d)g++,Mg(a,!0),a.v.Ia?a.ja("PC11 busy"):(e&&(a.C++,D(a)&&C(a,"auto-loading tape: "+b)),Ng(a,b,c,d,f)?g++:a.v.Ia=!0);g&&a.status(1==a.A?"tape attached":"tape loaded")}
|
||||
function Ng(a,b,c,d,e){var f=c;if(e){var g=new FileReader;g.onload=function(){var e=g.result;e&&(e=new Uint8Array(e,0,e.byteLength),Og(a,b,c,d,e),a.H="?");Lg(a)};g.readAsArrayBuffer(e);return!0}0>c.indexOf("/api/v1/dump")&&(e=pa(c),f="json"==e||"gz"==e?encodeURI(c):ra()+"/api/v1/dump?path="+encodeURIComponent(c)+"&format=json");return!!Ba(f,null,!0,function(e,f,g){var h=0>g&&a.D&&!a.D.v.ga;g?a.ja('Unable to load tape "'+b+'" (error '+g+": "+e+")",h):(jb(a.Ra,e,f),(e=Ca(e,f))&&Og(a,b,c,d,e.ha,e.Ua,
|
||||
e.Ta));a.v.Ia=!1;a.C&&(a.C--,a.C||H(a));Lg(a)})}function Ig(a,b,c,d){if((a=a.I.listTapes)&&a.options){for(var e=0;e<a.options.length;e++)if(a.options[e].value==c)return;e=document.createElement("option");e.text=b;e.value=c;d&&a.childNodes[0]?a.insertBefore(e,a.childNodes[0]):a.appendChild(e)}}
|
||||
function Lg(a){var b=a.I.listTapes;if(b&&b.options){a=a.H||a.F;for(var c=0;c<b.options.length;c++)if(b.options[c].value==a){b.selectedIndex!=c&&(b.selectedIndex=c);break}c==b.options.length&&(b.selectedIndex=0)}}function Og(a,b,c,d,e,f,g){a.F=c;a.A=d;2==d?a.O&&wg(a.O,e,f,g)?a.status("tape loaded: "+b):(a.F="",a.H=Cg,a.A=Dg,a.status("error loading tape: "+b)):(a.M=0,a.K=e,a.status("tape attached: "+b))}
|
||||
function Mg(a,b){if(a.F||!1===b)a.F="",b||(a.A&&a.status(1==a.A?"tape detached":"tape unloaded"),a.H=Cg,a.A=Dg,Lg(a))}k.save=function(){return(new O(this)).data()};k.restore=function(){return!0};function Gg(a){1==(a.f&32769)&&!(a.f&128)&&a.M<a.K.length&&(a.J=a.K[a.M++]&255,a.f|=128,a.f&=-2049,a.f&64&&ic(a.b,a.U),jc(a.b,a.P,1E3/300,!0))}k.Lc=function(){return this.f&65534};k.xd=function(a){a&1&&(this.f&32768?a&=-2:(this.f&=-129,this.f|=2048,this.J=0));this.f=this.f&-66|a&65;Gg(this)};
|
||||
k.Kc=function(){this.f&=-129;this.f|=2048;return this.J};k.wd=function(){};var Pg={},Hg=(Pg[65384]=[null,null,wc.prototype.Lc,wc.prototype.xd,"PRS"],Pg[65386]=[null,null,wc.prototype.Kc,wc.prototype.wd,"PRB"],Pg);function Qg(a){r.call(this,"Debugger",a,Qg);this.ma=a.base||16;this.ya=!1;this.N=this.xa=this.H=0;this.P=!1;this.A=-1;this.g=[];this.ba={}}u(Qg);var Rg={"||":0,"&&":1,"|":2,"^":3,"&":4,"!=":5,"==":5,">=":6,">":6,"<=":6,"<":6,">>>":7,">>":7,"<<":7,"-":8,"+":8,"%":9,"/":9,"*":9};
|
||||
Qg.prototype.ac=function(){return-1};Qg.prototype.bc=function(){};function Sg(a,b,c,d){if(c)if(b){0>a.A&&a.g.length&&(a.A=0);if(0>a.A||b!=a.g[a.A])a.g.splice(0,0,b),a.A=0;a.A--}else a.P?b="end":b=a.g[a.A+1];a=[];if(b){b=b.replace(/""/g,"'");c=0;var e=null;d=d||";";for(var f=0;f<=b.length;f++){var g=b.charAt(f);if('"'==g||"'"==g)e?g==e&&(e=null):e=g;else if(g==d&&!e||!g)a.push(va(b.substring(c,f))),c=f+1}}return a}
|
||||
function Tg(a,b,c){for(c=c||-1;c--&&b.length;){var d=b.pop();if(2>a.length)return!1;var e=a.pop(),f=a.pop();switch(d){case "*":d=f*e;break;case "/":if(!e)return!1;d=f/e;break;case "%":if(!e)return!1;d=f%e;break;case "+":d=f+e;break;case "-":d=f-e;break;case "<<":d=f<<e;break;case ">>":d=f>>e;break;case ">>>":d=f>>>e;break;case "<":d=f<e?1:0;break;case "<=":d=f<=e?1:0;break;case ">":d=f>e?1:0;break;case ">=":d=f>=e?1:0;break;case "==":d=f==e?1:0;break;case "!=":d=f!=e?1:0;break;case "&":d=f&e;break;
|
||||
k.Ca=function(a,b,c,d){this.D=a;this.w=b;this.b=c;this.i=d;this.O=Fg(a);var e=this;if((this.g=Pc(this.D,"autoMount")||this.g)&&"string"==typeof this.g)try{this.g=eval("("+this.g+")")}catch(f){n("PC11 auto-mount error: "+f.message+" ("+this.g+")"),this.g=null}this.P=kc(56,4);this.U=hc(this.b,function(){1==(e.f&32769)&&!(e.f&128)&&e.M<e.K.length&&(e.J=e.K[e.M++]&255,e.f|=128,e.f&=-2049,e.f&64&&ic(e.b,e.P))});ec(b,this,Gg);Hg(this,"None",Cg,!0);this.N&&Hg(this,"Local Tape","?");Hg(this,"Remote Tape",
|
||||
"??");Ig(this)||H(this)};k.Aa=function(a,b){if(!b)if(!a||!this.restore)this.reset();else if(!this.restore(a))return!1;return!0};k.za=function(a){return a?this.save():!0};k.reset=function(){this.f&=-2241;this.J=0};function Ig(a){a.C=0;if(a.g){var b=a.g.path||"",c;if(!(c=a.g.name))a:{if((c=a.I.listTapes)&&c.options)for(var d=0;d<c.options.length;d++){var e=c.options[d];if(e.value==b){c=e.text;break a}}c=oa(b,!0)}b&&c?Jg(a,c,b,1,!0):Kg(a)}return!!a.C}
|
||||
function Eg(a,b,c,d,e){if(c)if("?"==c)a.ja('Use "Choose File" and "Mount" to select and load a local tape.');else{if("??"==c){c=window.prompt("Enter the URL of a remote tape image.","")||"";if(!c)return;b=oa(c);a.status("Attempting to load "+c+' as "'+b+'"');a.H="??"}else a.H=c;Jg(a,b,c,d,!1,e)}else Lg(a,!1)}
|
||||
function Jg(a,b,c,d,e,f){var g=-1;if(a.F.toLowerCase()!=c.toLowerCase()||a.A!=d)g++,Lg(a,!0),a.v.Ia?a.ja("PC11 busy"):(e&&(a.C++,D(a)&&C(a,"auto-loading tape: "+b)),Mg(a,b,c,d,f)?g++:a.v.Ia=!0);g&&a.status(1==a.A?"tape attached":"tape loaded")}
|
||||
function Mg(a,b,c,d,e){var f=c;if(e){var g=new FileReader;g.onload=function(){var e=g.result;e&&(e=new Uint8Array(e,0,e.byteLength),Ng(a,b,c,d,e),a.H="?");Kg(a)};g.readAsArrayBuffer(e);return!0}0>c.indexOf("/api/v1/dump")&&(e=pa(c),f="json"==e||"gz"==e?encodeURI(c):ra()+"/api/v1/dump?path="+encodeURIComponent(c)+"&format=json");return!!Ba(f,null,!0,function(e,f,g){var h=0>g&&a.D&&!a.D.v.ga;g?a.ja('Unable to load tape "'+b+'" (error '+g+": "+e+")",h):(jb(a.Ra,e,f),(e=Ca(e,f))&&Ng(a,b,c,d,e.ha,e.Ua,
|
||||
e.Ta));a.v.Ia=!1;a.C&&(a.C--,a.C||H(a));Kg(a)})}function Hg(a,b,c,d){if((a=a.I.listTapes)&&a.options){for(var e=0;e<a.options.length;e++)if(a.options[e].value==c)return;e=document.createElement("option");e.text=b;e.value=c;d&&a.childNodes[0]?a.insertBefore(e,a.childNodes[0]):a.appendChild(e)}}
|
||||
function Kg(a){var b=a.I.listTapes;if(b&&b.options){a=a.H||a.F;for(var c=0;c<b.options.length;c++)if(b.options[c].value==a){b.selectedIndex!=c&&(b.selectedIndex=c);break}c==b.options.length&&(b.selectedIndex=0)}}function Ng(a,b,c,d,e,f,g){a.F=c;a.A=d;2==d?a.O&&wg(a.O,e,f,g)?a.status("tape loaded: "+b):(a.F="",a.H=Cg,a.A=Dg,a.status("error loading tape: "+b)):(a.M=0,a.K=e,a.status("tape attached: "+b))}
|
||||
function Lg(a,b){if(a.F||!1===b)a.F="",b||(a.A&&a.status(1==a.A?"tape detached":"tape unloaded"),a.H=Cg,a.A=Dg,Kg(a))}k.save=function(){return(new O(this)).data()};k.restore=function(){return!0};k.Lc=function(){return this.f&65534};k.xd=function(a){a&1&&(this.f&32768?(a&=-2,this.f&64&&ic(this.b,this.P)):(this.f&=-129,this.f|=2048,this.J=0,jc(this.b,this.U,1E3/300)));this.f=this.f&-66|a&65};k.Kc=function(){this.f&=-129;this.f|=2048;return this.J};k.wd=function(){};
|
||||
var Og={},Gg=(Og[65384]=[null,null,wc.prototype.Lc,wc.prototype.xd,"PRS"],Og[65386]=[null,null,wc.prototype.Kc,wc.prototype.wd,"PRB"],Og);function Pg(a){r.call(this,"Debugger",a,Pg);this.ma=a.base||16;this.ya=!1;this.N=this.xa=this.H=0;this.P=!1;this.A=-1;this.g=[];this.ba={}}u(Pg);var Qg={"||":0,"&&":1,"|":2,"^":3,"&":4,"!=":5,"==":5,">=":6,">":6,"<=":6,"<":6,">>>":7,">>":7,"<<":7,"-":8,"+":8,"%":9,"/":9,"*":9};Pg.prototype.ac=function(){return-1};Pg.prototype.bc=function(){};
|
||||
function Rg(a,b,c,d){if(c)if(b){0>a.A&&a.g.length&&(a.A=0);if(0>a.A||b!=a.g[a.A])a.g.splice(0,0,b),a.A=0;a.A--}else a.P?b="end":b=a.g[a.A+1];a=[];if(b){b=b.replace(/""/g,"'");c=0;var e=null;d=d||";";for(var f=0;f<=b.length;f++){var g=b.charAt(f);if('"'==g||"'"==g)e?g==e&&(e=null):e=g;else if(g==d&&!e||!g)a.push(va(b.substring(c,f))),c=f+1}}return a}
|
||||
function Sg(a,b,c){for(c=c||-1;c--&&b.length;){var d=b.pop();if(2>a.length)return!1;var e=a.pop(),f=a.pop();switch(d){case "*":d=f*e;break;case "/":if(!e)return!1;d=f/e;break;case "%":if(!e)return!1;d=f%e;break;case "+":d=f+e;break;case "-":d=f-e;break;case "<<":d=f<<e;break;case ">>":d=f>>e;break;case ">>>":d=f>>>e;break;case "<":d=f<e?1:0;break;case "<=":d=f<=e?1:0;break;case ">":d=f>e?1:0;break;case ">=":d=f>=e?1:0;break;case "==":d=f==e?1:0;break;case "!=":d=f!=e?1:0;break;case "&":d=f&e;break;
|
||||
case "^":d=f^e;break;case "|":d=f|e;break;case "&&":d=f&&e?1:0;break;case "||":d=f||e?1:0;break;default:return!1}a.push(d|0)}return!0}
|
||||
function Ug(a,b,c){var d;if(b){b=Vg(a,b);for(var e=0,f=!1,g=b,h=[],m=[],p=b.split(/(\|\||&&|\||^|&|!=|==|>=|>>>|>>|>|<=|<<|<|-|\+|%|\/|\*)/);e<p.length;){var q=p[e++],v=q.length,q=va(q);if(!q){f=!0;break}q=Wg(a,q,null,!1===c);if(void 0===q){f=!0;c=!1;break}h.push(q);if(e==p.length)break;var q=p[e++],w=q.length;m.length&&Rg[q]<Rg[m[m.length-1]]&&Tg(h,m,1);m.push(q);b=b.substr(v+w)}Tg(h,m)&&1==h.length||(f=!0);f?c&&a.j("error parsing '"+g+"' at character "+(g.length-b.length)):(d=h.pop(),c&&Xg(a,null,
|
||||
d))}return d}function Vg(a,b){for(var c,d=a.ya?"(":"{",e=a.ya?")":"}",f=new RegExp(a.ya?"\\((.*?)\\)":"\\{(.*?)\\}");(c=b.match(f))&&!(0<=c[1].indexOf(d));){var g=Ug(a,c[1]);b=b.replace(d+c[1]+e,null!=g?J(a,g):"undefined")}for(;(c=b.match(/\[(.*?)]/))&&!(0<=c[1].indexOf("["));)b=b.replace("["+c[1]+"]","unimplemented");for(;c=b.match(/\$([a-z]+)/i);){d=null;switch(c[1].toLowerCase()){case "ops":d=a.N-a.xa}if(null==d)break;b=b.replace(c[0],d.toString())}return b}
|
||||
function Wg(a,b,c,d){var e;if(null!=b){e=a.ac(b);if(0<=e)e=a.bc(e);else if(e=a.ba[b],null==e){e=b;var f=a.ma,g;if(e){f||(f=10);var h=e.charAt(0),m=0<e.indexOf(",");m&&(e=e.replace(/,/g,""));"#"==h?(f=8,h=null):"$"==h&&(f=16,h=null);null==h?e=e.substr(1):("0"==h&&(h=e.charAt(1),"b"==h&&m&&(f=2,h=null),"o"==h?(f=8,h=null):"x"==h&&(f=16,h=null)),null==h?e=e.substr(2):(h=e.charAt(e.length-1).toLowerCase(),"y"==h?(f=2,h=null):"."==h?(f=10,h=null):"h"==h&&(f=16,h=null),null==h&&(e=e.substr(0,e.length-1))));
|
||||
function Tg(a,b,c){var d;if(b){b=Ug(a,b);for(var e=0,f=!1,g=b,h=[],m=[],p=b.split(/(\|\||&&|\||^|&|!=|==|>=|>>>|>>|>|<=|<<|<|-|\+|%|\/|\*)/);e<p.length;){var q=p[e++],v=q.length,q=va(q);if(!q){f=!0;break}q=Vg(a,q,null,!1===c);if(void 0===q){f=!0;c=!1;break}h.push(q);if(e==p.length)break;var q=p[e++],w=q.length;m.length&&Qg[q]<Qg[m[m.length-1]]&&Sg(h,m,1);m.push(q);b=b.substr(v+w)}Sg(h,m)&&1==h.length||(f=!0);f?c&&a.j("error parsing '"+g+"' at character "+(g.length-b.length)):(d=h.pop(),c&&Wg(a,null,
|
||||
d))}return d}function Ug(a,b){for(var c,d=a.ya?"(":"{",e=a.ya?")":"}",f=new RegExp(a.ya?"\\((.*?)\\)":"\\{(.*?)\\}");(c=b.match(f))&&!(0<=c[1].indexOf(d));){var g=Tg(a,c[1]);b=b.replace(d+c[1]+e,null!=g?J(a,g):"undefined")}for(;(c=b.match(/\[(.*?)]/))&&!(0<=c[1].indexOf("["));)b=b.replace("["+c[1]+"]","unimplemented");for(;c=b.match(/\$([a-z]+)/i);){d=null;switch(c[1].toLowerCase()){case "ops":d=a.N-a.xa}if(null==d)break;b=b.replace(c[0],d.toString())}return b}
|
||||
function Vg(a,b,c,d){var e;if(null!=b){e=a.ac(b);if(0<=e)e=a.bc(e);else if(e=a.ba[b],null==e){e=b;var f=a.ma,g;if(e){f||(f=10);var h=e.charAt(0),m=0<e.indexOf(",");m&&(e=e.replace(/,/g,""));"#"==h?(f=8,h=null):"$"==h&&(f=16,h=null);null==h?e=e.substr(1):("0"==h&&(h=e.charAt(1),"b"==h&&m&&(f=2,h=null),"o"==h?(f=8,h=null):"x"==h&&(f=16,h=null)),null==h?e=e.substr(2):(h=e.charAt(e.length-1).toLowerCase(),"y"==h?(f=2,h=null):"."==h?(f=10,h=null):"h"==h&&(f=16,h=null),null==h&&(e=e.substr(0,e.length-1))));
|
||||
var p,h=e;((m=f)&&10!=m?16==m?h.match(/^[0-9a-f]+$/i):8==m?h.match(/^[0-7]+$/):2==m&&h.match(/^[01]+$/):h.match(/^[0-9]+$/))&&!isNaN(p=parseInt(e,f))&&(g=p|0)}e=g}null!=e||d||a.j("invalid "+(c?c:"value")+": "+b)}else d||a.j("missing "+(c||"value"));return e}
|
||||
function Xg(a,b,c){var d,e=!1;if(void 0!==c){e=!0;d=c;var f=0,g="";if(!f||4<f)f=4;for(var h=0;h<f;h++){g&&(g=","+g);var m=d&255,p=8,q="";p?32<p&&(p=32):p=32;if(null==m||isNaN(m))for(;0<p--;)q="?"+q;else for(;0<p--;)q=(m&1?"1":"0")+q,m>>=1;g=q+g;d>>=8}d=l(c,0,!0)+" "+c+". "+na(c,0,!0)+" "+("0b"+g);32<=c&&127>c&&(d+=" '"+String.fromCharCode(c)+"'")}a.j((null!=b?b+": ":"")+d);return e}function Yg(a,b){if(b)return Xg(a,b,a.ba[b]);var c=0;for(b in a.ba)Xg(a,b,a.ba[b]),c++;return 0<c}
|
||||
function Wg(a,b,c){var d,e=!1;if(void 0!==c){e=!0;d=c;var f=0,g="";if(!f||4<f)f=4;for(var h=0;h<f;h++){g&&(g=","+g);var m=d&255,p=8,q="";p?32<p&&(p=32):p=32;if(null==m||isNaN(m))for(;0<p--;)q="?"+q;else for(;0<p--;)q=(m&1?"1":"0")+q,m>>=1;g=q+g;d>>=8}d=l(c,0,!0)+" "+c+". "+na(c,0,!0)+" "+("0b"+g);32<=c&&127>c&&(d+=" '"+String.fromCharCode(c)+"'")}a.j((null!=b?b+": ":"")+d);return e}function Xg(a,b){if(b)return Wg(a,b,a.ba[b]);var c=0;for(b in a.ba)Wg(a,b,a.ba[b]),c++;return 0<c}
|
||||
function J(a,b,c,d){switch(a.ma){case 8:a=na(b,3*c);break;case 10:a=b.toString();break;default:a=l(b,2*c)}d?d=a.replace(/^0+([0-9A-F]+)$/i,"$1"):d=a;return d}
|
||||
function Zg(a){Qg.call(this,a);this.$a=!1;this.ya=!0;this.K=Z(0);this.Qa=Z(0);this.O=Z(0);this.F=[];this.f=this.M=this.C=[];$g(this);this.qa=0;ah(this);this.Fa={};bh(this,a.messages);this.Ga=a.commands;var b=this;window?void 0===window.pdp11&&(window.pdp11=function(a){return Sc(b,a)}):void 0===global.pdp11&&(global.pdp11=function(a){return Sc(b,a)})}u(Zg,Qg);
|
||||
var ch={"?":"help/print","a [#]":"assemble","b [#]":"breakpoint",c:"clear output","d [#]":"dump memory","e [#]":"edit memory","g [#]":"go [to #]",h:"halt","if":"eval expression","int [#]":"request interrupt",k:"stack trace",ln:"list nearest symbol(s)",m:"messages",p:"step over",print:"print expression",r:"dump/set registers",reset:"reset machine",s:"set options","t [#]":"trace","u [#]":"unassemble","var":"assign variable",ver:"print version"},dh=".WORD ADC ADCB ADD ASL ASLB ASR ASRB BCC BCS BEQ BGE BGT BHI BIC BICB BIS BISB BIT BITB BLE BLOS BLT BMI BNE BPL BPT BR BVC BVS CCC CLC CLCN CLCV CLCVN CLCVZ CLCZ CLCZN CLN CLR CLRB CLV CLVN CLVZ CLVZN CLZ CLZN CMP CMPB COM COMB DEC DECB INC INCB HALT JMP JSR MARK MFPD MFPI MFPS MOV MOVB MTPD MTPI MTPS NEG NEGB NOP RESET ROL ROLB ROR RORB RTI RTS SBC SBCB SCC SEC SECN SECV SECVN SECVZ SECZ SECZN SEN SEV SEVN SEVZ SEVZN SEZ SEZN SUB SWAB SXT TST TSTB WAIT MUL DIV ASH ASHC XOR SOB EMT TRAP SPL IOT RTT MFPT".split(" "),
|
||||
eh={61440:{4096:[62,4032,63],8192:[47,4032,63],12288:[18,4032,63],16384:[14,4032,63],20480:[16,4032,63],24576:[3,4032,63],36864:[63,4032,63],40960:[48,4032,63],45056:[19,4032,63],49152:[15,4032,63],53248:[17,4032,63],57344:[94,4032,63]},65024:{2048:[57,448,63],28672:[100,63,448],29184:[101,63,448],29696:[102,63,448],30208:[103,63,448],30720:[104,448,63],32256:[105,448,8192]},65280:{256:[27,4096],512:[24,4096],768:[10,4096],1024:[11,4096],1280:[22,4096],1536:[12,4096],1792:[20,4096],32768:[25,4096],
|
||||
function Yg(a){Pg.call(this,a);this.$a=!1;this.ya=!0;this.K=Z(0);this.Qa=Z(0);this.O=Z(0);this.F=[];this.f=this.M=this.C=[];Zg(this);this.qa=0;$g(this);this.Fa={};ah(this,a.messages);this.Ga=a.commands;var b=this;window?void 0===window.pdp11&&(window.pdp11=function(a){return Sc(b,a)}):void 0===global.pdp11&&(global.pdp11=function(a){return Sc(b,a)})}u(Yg,Pg);
|
||||
var bh={"?":"help/print","a [#]":"assemble","b [#]":"breakpoint",c:"clear output","d [#]":"dump memory","e [#]":"edit memory","g [#]":"go [to #]",h:"halt","if":"eval expression","int [#]":"request interrupt",k:"stack trace",ln:"list nearest symbol(s)",m:"messages",p:"step over",print:"print expression",r:"dump/set registers",reset:"reset machine",s:"set options","t [#]":"trace","u [#]":"unassemble","var":"assign variable",ver:"print version"},ch=".WORD ADC ADCB ADD ASL ASLB ASR ASRB BCC BCS BEQ BGE BGT BHI BIC BICB BIS BISB BIT BITB BLE BLOS BLT BMI BNE BPL BPT BR BVC BVS CCC CLC CLCN CLCV CLCVN CLCVZ CLCZ CLCZN CLN CLR CLRB CLV CLVN CLVZ CLVZN CLZ CLZN CMP CMPB COM COMB DEC DECB INC INCB HALT JMP JSR MARK MFPD MFPI MFPS MOV MOVB MTPD MTPI MTPS NEG NEGB NOP RESET ROL ROLB ROR RORB RTI RTS SBC SBCB SCC SEC SECN SECV SECVN SECVZ SECZ SECZN SEN SEV SEVN SEVZ SEVZN SEZ SEZN SUB SWAB SXT TST TSTB WAIT MUL DIV ASH ASHC XOR SOB EMT TRAP SPL IOT RTT MFPT".split(" "),
|
||||
dh={61440:{4096:[62,4032,63],8192:[47,4032,63],12288:[18,4032,63],16384:[14,4032,63],20480:[16,4032,63],24576:[3,4032,63],36864:[63,4032,63],40960:[48,4032,63],45056:[19,4032,63],49152:[15,4032,63],53248:[17,4032,63],57344:[94,4032,63]},65024:{2048:[57,448,63],28672:[100,63,448],29184:[101,63,448],29696:[102,63,448],30208:[103,63,448],30720:[104,448,63],32256:[105,448,8192]},65280:{256:[27,4096],512:[24,4096],768:[10,4096],1024:[11,4096],1280:[22,4096],1536:[12,4096],1792:[20,4096],32768:[25,4096],
|
||||
33024:[23,4096],33280:[13,4096],33536:[21,4096],33792:[28,4096],34048:[29,4096],34304:[8,4096],34560:[9,4096],34816:[106],35072:[107]},65472:{64:[56,63],192:[95,63],2560:[39,63],2624:[49,63],2688:[53,63],2752:[51,63],2816:[67,63],2880:[1,63],2944:[77,63],3008:[97,63],3072:[73,63],3136:[71,63],3200:[6,63],3264:[4,63],3328:[58,24576],3392:[60,63],3456:[65,63],3520:[96,63],35328:[40,63],35392:[50,63],35456:[54,63],35520:[52,63],35584:[68,63],35648:[2,63],35712:[78,63],35776:[98,63],35840:[74,63],35904:[72,
|
||||
63],35968:[7,63],36032:[5,63],36096:[66,63],36160:[59,63],36224:[64,63],36288:[61,63]},65528:{128:[76,7],152:[108,12288]},65535:{0:[55],1:[99],2:[75],3:[26],4:[109],5:[70],6:[110],7:[111],160:[69],161:[31],162:[41],163:[33],164:[45],165:[36],166:[43],167:[35],168:[38],169:[32],170:[42],171:[34],172:[46],173:[37],174:[44],175:[30],176:[69],177:[80],178:[88],179:[82],180:[92],181:[85],182:[90],183:[84],184:[87],185:[81],186:[89],187:[83],188:[93],189:[86],190:[91],191:[79]}},fh=[0],gh=[58,60,65,96,
|
||||
108,110,100,101,102,103,104,105,59,64];k=Zg.prototype;
|
||||
k.Ca=function(a,b,c,d){this.w=b;this.b=c;this.D=a;(a=Pc(a,"messages"))&&bh(this,a);this.eb=eh;this.zb=1145>this.b.fb?gh:[];hh(this,function(a){a:{var b=d.w.W,c=a[0],e=a=0,m=b.length;if(c){a=d.Y(ih(d,c));if(-1===a){d.j("invalid address: "+c);break a}e=a>>>d.w.ia;m=1}d.j("blockid physical blockaddr used size type");d.j("-------- --------- ---------- ------ ------ ----");for(var c=-1,p=0;m--;){var q=b[e];q.type==c?p++||d.j("..."):(c=q.type,p=bc[c],q&&d.j(l(q.id,8)+" %"+l(e<<d.w.ia,
|
||||
63],35968:[7,63],36032:[5,63],36096:[66,63],36160:[59,63],36224:[64,63],36288:[61,63]},65528:{128:[76,7],152:[108,12288]},65535:{0:[55],1:[99],2:[75],3:[26],4:[109],5:[70],6:[110],7:[111],160:[69],161:[31],162:[41],163:[33],164:[45],165:[36],166:[43],167:[35],168:[38],169:[32],170:[42],171:[34],172:[46],173:[37],174:[44],175:[30],176:[69],177:[80],178:[88],179:[82],180:[92],181:[85],182:[90],183:[84],184:[87],185:[81],186:[89],187:[83],188:[93],189:[86],190:[91],191:[79]}},eh=[0],fh=[58,60,65,96,
|
||||
108,110,100,101,102,103,104,105,59,64];k=Yg.prototype;
|
||||
k.Ca=function(a,b,c,d){this.w=b;this.b=c;this.D=a;(a=Pc(a,"messages"))&&ah(this,a);this.eb=dh;this.zb=1145>this.b.fb?fh:[];gh(this,function(a){a:{var b=d.w.W,c=a[0],e=a=0,m=b.length;if(c){a=d.Y(hh(d,c));if(-1===a){d.j("invalid address: "+c);break a}e=a>>>d.w.ia;m=1}d.j("blockid physical blockaddr used size type");d.j("-------- --------- ---------- ------ ------ ----");for(var c=-1,p=0;m--;){var q=b[e];q.type==c?p++||d.j("..."):(c=q.type,p=bc[c],q&&d.j(l(q.id,8)+" %"+l(e<<d.w.ia,
|
||||
8)+" %%"+l(q.B,8)+" "+l(q.xb,4,!0)+" "+l(q.size,4,!0)+" "+p),c!=Bc&&(c=-1),p=0);a+=d.w.ua;e++}}});H(this)};
|
||||
k.ra=function(a,b,c){var d=this;switch(b){case "debugInput":return this.pa=this.I[b]=c,c.onkeydown=function(a){var b;if(13==a.keyCode)b=c.value,c.value="",Sc(d,b,!0);else if(27==a.keyCode)c.value=b="";else if(38==a.keyCode?(b=null,d.A<d.g.length-1&&(b=d.g[++d.A])):40==a.keyCode&&(0<d.A?b=d.g[--d.A]:(b="",d.A=-1)),null!=b){var e=b.length;c.value=b;c.setSelectionRange(e,e)}null!=b&&a.preventDefault&&a.preventDefault()},!0;case "debugEnter":return this.I[b]=c,Na(c,function(){if(d.pa){var a=d.pa.value;
|
||||
d.pa.value="";Sc(d,a,!0);return!0}return!1}),!0;case "step":return this.I[b]=c,Na(c,function(a){var b=!1;ob(d,!0)||(nb(d,!0),b=d.mb(a?1:0),nb(d,!1));return b}),!0}return!1};k.wb=function(){this.pa&&this.pa.focus()};k.Y=function(a){a=a&&a.B;null==a&&(a=-1);return a};k.qb=function(a,b){var c=255,d=this.Y(a,!1,1);-1!==d&&(c=a.Ab?this.w.Db(d):this.b.Db(d),b&&jh(a,b));return c};k.na=function(a,b){var c=65535,d=this.Y(a,!1,2);-1!==d&&(c=a.Ab?this.w.rb(d):this.b.rb(d),b&&jh(a,b));return c};
|
||||
k.Ib=function(a,b,c){var d=this.Y(a,!0,1);-1!==d&&(a.Ab?this.w.Xa(d,b):this.b.Xa(d,b),c&&jh(a,c),this.D.$(!0))};k.Ya=function(a,b,c){var d=this.Y(a,!0,2);-1!==d&&(a.Ab?this.w.Jb(d,b):this.b.Jb(d,b),c&&jh(a,c),this.D.$(!0))};function Z(a,b){return{B:a,Ab:b,Ba:!1}}function kh(a){return[a.B,a.Ba]}function lh(a){return{B:a[0],Ba:a[1]}}
|
||||
function ih(a,b,c){var d,e=(c?a.K:a.Qa).B;c=!1;if(void 0!==b){b=Vg(a,b);"%"==b.charAt(0)&&(c=!0,b=b.substr(1));d=b;var f;if(d.match(/^[a-z_][a-z0-9_]*$/i))for(d=d.toUpperCase(),e=0;e<a.F.length;e++){var g=a.F[e].ka[d];if(void 0!==g){d=g.o;void 0!==d&&(f=Z(d));break}}if(d=f)return d;e=Ug(a,b,void 0)}null!=e&&(d=Z(e,c));return d}function mh(a,b,c){c&&(c=c.match(/(['"])(.*?)\1/))&&(b.lc=Sg(a,b.hc=c[2]))}function jh(a,b){null!=a.B&&(a.B+=b||1)}
|
||||
function bh(a,b){a.i=a;a.la=a.nc=536870912;a.sa=null;a.wa=[];b=Sg(a,b.replace("keys","key").replace("kbd","keyboard"),!1,"|");if(b.length)for(var c in tb){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<e;d++)if(d in b&&b[d]===c)break a;d=-1}0<=d&&(a.la|=tb[c],a.j(c+" messages enabled"))}}function hh(a,b){for(var c in tb)if(64==tb[c]){a.Fa[c]=b;break}}
|
||||
k.ac=function(a){var b=-1;a=a.toUpperCase();switch(a){case "SP":b=6;break;case "PC":b=7;break;default:"R"==a.charAt(0)&&(b=+a.charAt(1),0>b||7<b)&&(b=-1)}return b};function nh(a){return 6>a?"R"+a:6==a?"SP":"PC"}k.bc=function(a){var b;0<=a&&(8>a?b=this.b.u[a]:16>a?b=this.b.Ea[a-8]:20>a?b=this.b.va[a-16]:20==a&&(b=Lb(this.b)));return b};
|
||||
d.pa.value="";Sc(d,a,!0);return!0}return!1}),!0;case "step":return this.I[b]=c,Na(c,function(a){var b=!1;ob(d,!0)||(nb(d,!0),b=d.mb(a?1:0),nb(d,!1));return b}),!0}return!1};k.wb=function(){this.pa&&this.pa.focus()};k.Y=function(a){a=a&&a.B;null==a&&(a=-1);return a};k.qb=function(a,b){var c=255,d=this.Y(a,!1,1);-1!==d&&(c=a.Ab?this.w.Db(d):this.b.Db(d),b&&ih(a,b));return c};k.na=function(a,b){var c=65535,d=this.Y(a,!1,2);-1!==d&&(c=a.Ab?this.w.rb(d):this.b.rb(d),b&&ih(a,b));return c};
|
||||
k.Ib=function(a,b,c){var d=this.Y(a,!0,1);-1!==d&&(a.Ab?this.w.Xa(d,b):this.b.Xa(d,b),c&&ih(a,c),this.D.$(!0))};k.Ya=function(a,b,c){var d=this.Y(a,!0,2);-1!==d&&(a.Ab?this.w.Jb(d,b):this.b.Jb(d,b),c&&ih(a,c),this.D.$(!0))};function Z(a,b){return{B:a,Ab:b,Ba:!1}}function jh(a){return[a.B,a.Ba]}function kh(a){return{B:a[0],Ba:a[1]}}
|
||||
function hh(a,b,c){var d,e=(c?a.K:a.Qa).B;c=!1;if(void 0!==b){b=Ug(a,b);"%"==b.charAt(0)&&(c=!0,b=b.substr(1));d=b;var f;if(d.match(/^[a-z_][a-z0-9_]*$/i))for(d=d.toUpperCase(),e=0;e<a.F.length;e++){var g=a.F[e].ka[d];if(void 0!==g){d=g.o;void 0!==d&&(f=Z(d));break}}if(d=f)return d;e=Tg(a,b,void 0)}null!=e&&(d=Z(e,c));return d}function lh(a,b,c){c&&(c=c.match(/(['"])(.*?)\1/))&&(b.lc=Rg(a,b.hc=c[2]))}function ih(a,b){null!=a.B&&(a.B+=b||1)}
|
||||
function ah(a,b){a.i=a;a.la=a.nc=536870912;a.sa=null;a.wa=[];b=Rg(a,b.replace("keys","key").replace("kbd","keyboard"),!1,"|");if(b.length)for(var c in tb){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<e;d++)if(d in b&&b[d]===c)break a;d=-1}0<=d&&(a.la|=tb[c],a.j(c+" messages enabled"))}}function gh(a,b){for(var c in tb)if(64==tb[c]){a.Fa[c]=b;break}}
|
||||
k.ac=function(a){var b=-1;a=a.toUpperCase();switch(a){case "SP":b=6;break;case "PC":b=7;break;default:"R"==a.charAt(0)&&(b=+a.charAt(1),0>b||7<b)&&(b=-1)}return b};function mh(a){return 6>a?"R"+a:6==a?"SP":"PC"}k.bc=function(a){var b;0<=a&&(8>a?b=this.b.u[a]:16>a?b=this.b.Ea[a-8]:20>a?b=this.b.va[a-16]:20==a&&(b=Lb(this.b)));return b};
|
||||
k.message=function(a,b){b&&(a+=" @"+J(this,Z(this.b.vb).B));this.la&1073741824?this.wa.push(a):this.sa&&a==this.sa||(this.sa=a,this.la&-2147483648&&(this.aa(),a+=" (cpu halted)"),this.j(a),this.b&&(a=this.b,Yc(a),a.pa=0,a.D.$()))};
|
||||
function ah(a){var b;if(Yd(a)){if(!a.J||!a.J.length){a.J=Array(1E3);for(b=0;b<a.J.length;b++)a.J[b]=Z();a.fa=0;a.j("instruction history buffer allocated")}if(!a.ca||!a.ca.length)for(a.ca=Array(256),b=0;b<a.ca.length;b++)a.ca[b]=[b,0]}else a.J&&a.J.length&&a.j("instruction history buffer freed"),a.fa=0,a.J=[],a.ca=[]}k.lb=function(a,b){if(!oh(this,b))return!1;this.b.lb(a);return!0};
|
||||
k.mb=function(a,b,c){if(!oh(this))return!1;this.H=0;a||Yd(this)&&Zd(this,this.b.u[7],0);try{a=Zc(this.b,a);var d=this.b.mb(a);0<d&&($c(this.b,a),this.H+=d,Wc(this.b,d,!0),Tc(this.b,d),this.N++)}catch(e){"number"!=typeof e&&(this.H=0,rb(this.b,e.stack||e.message))}!1!==c&&this.D.$();this.$(b||!1);return 0<this.H};k.aa=function(a){this.b&&this.b.aa(a)};k.$=function(a){this.$a&&(void 0===a&&(a=!0),this.K=Z(this.b.u[7]),a&&1!=this.U?ph(this):qh(this))};
|
||||
function oh(a,b){var c;(c=!a.b||!pb(a.b))||(c=a.b,c.v.ga?c=!0:(c.j(c.toString()+" not powered"),c=!1),c=!c);return c||a.b.v.da?(b||a.j("cpu busy or unavailable, command ignored"),!1):!qb(a.b)}k.Aa=function(a,b){return!b&&(this.reset(!0),a&&this.restore&&!this.restore(a))?!1:!0};k.za=function(a,b){b&&this.j(a?"suspending":"shutting down");return a?this.save():!0};k.reset=function(a){ah(this);this.N=this.xa=0;this.sa=null;this.H=0;this.K=Z(this.b.u[7]);this.v.da=!1;rh(this);a||this.$()};
|
||||
k.save=function(){var a=new O(this);a.set(0,kh(this.K));a.set(1,kh(this.O));a.set(2,[this.g,this.P,this.la]);a.set(3,this.F);return a.data()};k.restore=function(a){var b=0;void 0!==a[2]&&(this.K=lh(a[b++]),this.O=lh(a[b++]),this.g=a[b][0],"string"==typeof this.g&&(this.g=[this.g]),this.P=a[b][1],this.la|=a[b][2]);a[3]&&(this.F=a[3]);return!0};k.start=function(a,b){this.U||this.j("running");this.v.da=!0;this.Cb=a;this.Eb=b};
|
||||
k.stop=function(a,b){if(this.v.da){this.v.da=!1;this.H=b-this.Eb;if(!this.U){b="stopped";if(this.H){a-=this.Cb;var c=0<a?Math.round(1E3*this.H/a):0;b+=" (";Yd(this)&&(b+=this.N+" opcodes, ",this.xa-=this.N,this.N=0);b+=this.H+" cycles, "+a+" ms, "+c+" hz)"}else D(this,-2147483648)&&(b+=" (use the 't' command to execute blocked faults)");this.j(b)}this.$(!0);this.wb();rh(this,this.b.u[7])}};function Yd(a){return 1<a.f.length||!!a.qa}
|
||||
function Zd(a,b,c){var d=a.b;if(0<c&&(a.qa&&!--a.qa||Kc(a,b,1,a.f)))return!0;0<=c&&a.ca.length&&(a.N++,null!=a.b.rb(b)&&(b=a.J[a.fa],b.B=d.u[7],b.Ba=!1,++a.fa==a.J.length&&(a.fa=0)));return!1}function $b(a){var b=a.b;if(b.v.da)throw N(b,a.b.vb),a.aa(),-1;return!1}function $g(a){var b,c;a.f=["bp"];if(a.M)for(b=1;b<a.M.length;b++){c=a.M[b];var d=a.w;c=a.Y(c);Lc(d.W[c>>>d.ia],!1)}a.M=["br"];if(a.C)for(b=1;b<a.C.length;b++)c=a.C[b],d=a.w,c=a.Y(c),Lc(d.W[c>>>d.ia],!0);a.C=["bw"];a.ab=0}
|
||||
k.Sa=function(a,b,c){var d=!0;c||sh(this,a,b,!1,!0);if(a!=this.f){var e=this.Y(b);if(-1===e)this.j("invalid address: "+J(this,b.B)),d=!1;else{var f=this.w;f.W[e>>>f.ia].Sa(e&f.w,a==this.C)}}d&&(a.push(b),c?b.Ba=!0:(th(this,a,a.length-1,"set"),ah(this)));return d};function sh(a,b,c,d,e){var f=!1;c=a.Y(c);for(var g=1;g<b.length;g++){var h=b[g];if(c==a.Y(h)&&(!d||h.Ba)){f=!0;h.Ba||e||th(a,b,g,"cleared");b.splice(g,1);b!=a.f&&(d=a.w,Lc(d.W[c>>>d.ia],b==a.C));h.Ba||ah(a);break}}return f}
|
||||
function uh(a,b){for(var c=1;c<b.length;c++)th(a,b,c);return b.length-1}function th(a,b,c,d){c=b[c];a.j(b[0]+" "+J(a,c.B)+(d?" "+d:c.hc?' "'+c.hc+'"':""))}function rh(a,b){if(void 0!==b)Kc(a,b,1,a.f,!0),a.U=0;else for(b=1;b<a.f.length;b++){var c=a.f[b];if(c.Ba){if(!sh(a,a.f,c,!0))break;b=0}}}
|
||||
function Kc(a,b,c,d,e){var f=!1;if(!a.ab++)for(var g=1;!f&&g<d.length;g++){var h=d[g];if(!e||h.Ba)for(var m=a.Y(h),p=0;p<c;p++)if(b+p==m){var q,f=!0;h.Ba&&(sh(a,d,h,!0),e=!0);if(q=h.lc){for(var f=!1,v=0;v<q.length;v++)if(!vh(a,q[v],!0)){if(q[v].indexOf("if")){f=!0;break}for(var w=v+1;w<q.length&&q[w].indexOf("else");w++)v++;if(w==q.length){f=!0;break}}a.b.v.da||(f=!0)}if(f){e||th(a,d,g,"hit");break}}}a.ab--;return f}
|
||||
function wh(a,b,c,d){var e=Z(b.B),f=a.na(b,2),g,h;for(h in a.eb)if(g=a.eb[h][f&h])break;g||(g=fh);var m=g[0];0<=a.zb.indexOf(m)&&(g=fh,m=g[0]);var p=h="",q=dh[m],v=g.length-1;m||v||(h=J(a,f));for(m=1;m<=v;m++){var w=g[m];if(void 0!==w){var x;x=a;var E=w,w=b,y="",F=E&61440;if(4096==F)w=w.B+((f&255)<<24>>23)&65535,y=J(x,w);else if(8192==F)w=w.B-((f&63)<<1)&65535,y=J(x,w);else if(12288==F)y=J(x,f&7,1);else if(24576==F)y=J(x,f&63,1);else if(F=f&E,E&4032&&(F>>=6,E>>=6),E&63)switch(E=F&7,F&56){case 0:y=
|
||||
nh(E);break;case 8:y="@"+nh(E);break;case 16:7>E?y="("+nh(E)+")+":(F=x.na(w,2),y="#"+J(x,F,0,!0));break;case 24:7>E?y="@("+nh(E)+")+":(F=x.na(w,2),y="@#"+J(x,F,0,!0));break;case 32:y="-("+nh(E)+")";break;case 40:y="@-("+nh(E)+")";break;case 48:F=x.na(w,2);y=J(x,F,0,!0)+"("+nh(E)+")";7==E&&(y=[y,J(x,F+w.B&65535)]);break;case 56:F=x.na(w,2),y="@"+J(x,F)+"("+nh(E)+")",7==E&&(y=[y,J(x,F+w.B&65535)])}x=y;if(!x||!x.length){h="INVALID";break}"string"!=typeof x&&(p=x[1],x=x[0]);0<h.length&&(h+=",");h+=x||
|
||||
"???"}}f="";g=J(a,e.B)+":";if(-1!==e.B&&-1!==b.B){do if(f+=" "+J(a,a.na(e,2)),null==e.B)break;while(e.B!=b.B)}g+=ua(f,24);g+=ua(q,5);h&&(g+=" "+h);if(c||p)g=ua(g,60)+";"+(c||""),g=a.b.v.cb?g+("cycles="+Uc(a.b).toString()+" cs="+l(a.b.sb)):g+(null!=d?"="+d.toString():""),p&&(g+=" @"+p);return g}function xh(a,b){switch(b){case "N":a=a.b.Da();break;case "Z":a=id(a.b);break;case "V":a=hd(a.b);break;case "C":a=gd(a.b);break;default:a=0}return b.charAt(0)+(a?"1":"0")+" "}
|
||||
function yh(a,b){var c="",d=a.b;8>b?(c=nh(b),c+="="+J(a,d.u[b])):13>b?c="A"+(b-8)+"="+J(a,d.Ea[b-8]):16<=b&&20>b?c="S"+(b-16)+"="+J(a,d.va[b-16]):20==b&&(c="PS="+J(a,Lb(d)));c&&(c+=" ");return c}function zh(a){var b,c="";for(b=0;6>b;b++)c+=yh(a,b);c=c+"\n"+(yh(a,6)+yh(a,7)+yh(a,20));return c+=xh(a,"T")+xh(a,"N")+xh(a,"Z")+xh(a,"V")+xh(a,"C")}k.Wb=function(a,b){return a[0]>b[0]?1:a[0]<b[0]?-1:0};
|
||||
function Ah(a,b,c){var d=[],e=a.Y(b)>>>0;for(b=0;b<a.F.length;b++){var f=a.F[b],g=f.B>>>0,h=f.vc;if(e>=g&&e<g+h){e=ya(f.Vb,[e-g],a.Wb);0<=e?Bh(a,b,e,d):c&&(e=~e,Bh(a,b,e-1,d),Bh(a,b,e,d));break}}return d}function Bh(a,b,c,d){var e={},f=a.F[b].Vb,g=0,h=null;0<=c&&c<f.length&&(g=f[c][0],h=f[c][1]);h&&(e=a.F[b].ka[h],h="."==h.charAt(0)?null:e.l||h);d.push(h);d.push(g);d.push(e.a);d.push(e.c)}
|
||||
function Ch(a,b){var c=b.match(/^\s*([A-Z_]?[A-Z0-9_]*)\s*(=?)\s*(.*)$/i);if(c){if(!c[1])return Yg(a)||a.j("no variables"),!0;if(!c[2])return Yg(a,c[1]);if(!c[3])return delete a.ba[c[1]],!0;b=Ug(a,c[3]);return void 0!==b?(a.ba[c[1]]=b,!0):!1}a.j("invalid assignment:"+b);return!1}
|
||||
function Dh(a,b,c){var d=null;if(b=ih(a,b,!0)){a.Y(b);var e=Ah(a,b,!0);if(e.length){var f,g;e[0]&&(g="",(f=b.B-e[1])&&(g=" + "+l(f,4,!0)),f=e[0]+" ("+J(a,e[1])+")"+g,c&&a.j(f),d=f);4<e.length&&e[4]&&(g="",(f=e[5]-b.B)&&(g=" - "+l(f,4,!0)),f=e[4]+" ("+J(a,e[5])+")"+g,c&&a.j(f),d||(d=f))}else c&&a.j("no symbols")}return d}
|
||||
function ph(a,b){var c;if(b&&"?"==b[1])a.j("register commands:"),a.j("\tr\tdump registers"),a.j("\trx [#]\tset flag or register x to [#]");else{var d=a.b;null==c&&(c=!0);if(b&&1<b.length){var e=b[1],f=e.indexOf("=");if(0<f)b=e.substr(f+1),e=e.substr(0,f);else if(2<b.length)b=b[2];else{a.j("missing value for "+b[1]);return}f=Ug(a,b);if(void 0===f)return;b=e.toUpperCase();switch(b){case "SP":case "R6":d.u[6]=f&65535;break;case "PC":case "R7":N(d,f);a.K=Z(d.u[7]);break;case "N":d.V=f?32768:0;break;case "Z":d.X=
|
||||
f?0:1;break;case "V":d.S=f?32768:0;break;case "C":d.R=f?65536:0;break;default:if("R"==b.charAt(0)&&(b=+b.charAt(1),0<=b&&6>b)){d.u[b]=f&65535;break}a.j("unknown register: "+e);return}a.D.$();a.j("updated registers:")}a.j(zh(a));c&&(a.K=Z(d.u[7]),qh(a,J(a,a.K.B)))}}function Eh(a,b){b=va(b);var c=b.match(/^(['"])(.*?)\1$/);c?1<c[2].length?a.j(c[2]):Xg(a,null,c[2].charCodeAt(0)):Ug(a,b,!0)}
|
||||
function Fh(a,b,c){var d="t"!=b;c=Wg(a,c,null,!0)||1;var e=1==c?0:1;"tc"==b&&(e=c,c=1);Ma(c,function(){return nb(a,!0)&&a.mb(e,d,!1)},function(){a.D.$();nb(a,!1)})}
|
||||
function qh(a,b,c,d){if(b=ih(a,b,!0)){void 0===d&&(d=1);var e=256;if(void 0!==c)if("l"==c.charAt(0))c=Wg(a,c.substr(1)),null!=c&&(d=c);else{d=ih(a,c,!0);if(!d||d.B<b.B)return;e=d.B-b.B;if(256<e){a.j("range too large");return}d=-1}c=0;for(var f;0<e&&d--;){f=ob(a,!1)||a.U?a.H:null;var g=null!=f?"cycles":null,h=Ah(a,b),m=b.B;if(h[0]&&d&&(!c&&d||0>h[0].indexOf("+"))){var p=h[0]+":";h[2]&&(p+=" "+h[2]);a.j(p)}h[3]&&(g=h[3],f=null);f=wh(a,b,g,f);a.j(f);a.K=b;e-=b.B-m;c++}}}
|
||||
function vh(a,b,c){var d=!0;try{b.length&&"end"!=b?c||a.j(">> "+b):(a.P&&(a.j("ended assemble at "+J(a,a.O.B)),a.K=a.O,a.P=!1),b="");var e=b.charAt(0);if('"'==e||"'"==e)return!0;a.sa=null;if(pb(a)&&0<b.length){a.P&&(b="a "+J(a,a.O.B)+" "+b);var f=!1,g=b.replace(/ +/g," ").split(" ");if(g&&g.length)for(var h=g[0],m=h.charAt(0),p=1;p<h.length;p++){var q=h.charAt(p);if("?"==m||"r"==m||"a">q||"z"<q){g[0]=h.substr(p);g.unshift(h.substr(0,p));break}}g[0]=g[0].toLowerCase();switch(g[0].charAt(0)){case "a":var v=
|
||||
ih(a,g[1],!0);if(v)if(a.O=v,void 0===g[2])a.j("begin assemble at "+J(a,v.B)),a.P=!0,a.D.$();else{var w;a.j("not supported yet");w=[];if(w.length){for(var x=0;x<w.length;x++)a.Ib(v,w[x],1);a.j(wh(a,a.O))}}break;case "b":a:{var E=g[0],y=g[1],F=b;if("?"==y)a.j("breakpoint commands:"),a.j("\tbp [a]\tset exec breakpoint at addr [a]"),a.j("\tbr [a]\tset read breakpoint at addr [a]"),a.j("\tbw [a]\tset write breakpoint at addr [a]"),a.j("\tbc [a]\tclear breakpoint at addr [a]"),a.j("\tbl\tlist all breakpoints"),
|
||||
a.j("\tbn [n]\tbreak after [n] instruction(s)");else{var Fa=E.charAt(1);if("l"==Fa){var kd;kd=0+uh(a,a.f);kd+=uh(a,a.M);(kd+=uh(a,a.C))||a.j("no breakpoints")}else if("n"==Fa)a.qa=Wg(a,y),a.j("break after "+a.qa+" instruction(s)");else if(void 0===y)a.j("missing breakpoint address");else{var U=Z();if("*"!=y&&(U=ih(a,y,!0),!U))break a;"c"==Fa?null==U.B?($g(a),a.j("all breakpoints cleared")):sh(a,a.f,U)||sh(a,a.M,U)||sh(a,a.C,U)||a.j("breakpoint missing: "+J(a,U.B)):null!=U.B&&(mh(a,U,F),"p"==Fa?a.Sa(a.f,
|
||||
U):"r"==Fa?a.Sa(a.M,U):"w"==Fa?a.Sa(a.C,U):a.j("unknown breakpoint command: "+Fa))}}}break;case "c":a.Va&&(a.Va.value="");break;case "d":a:{var Xa,Ya=g[0],ja=g[1],Ga=g[2],Yh=g[3];if("?"==ja){var Za="";for(Xa in tb)a.Fa[Xa]&&(Za&&(Za+=","),Za+=Xa);Za+=",state,symbols";a.j("dump memory commands:");a.j("\tdb [a] [#] dump # bytes at address a");a.j("\tdw [a] [#] dump # words at address a");a.j("\tdd [a] [#] dump # dwords at address a");a.j("\tdh [#] [#] dump # instructions from history");
|
||||
Za.length&&a.j("dump extension commands:\n\t"+Za)}else if("state"==ja){var Sf=Gh(a.D,!0);"console"==Ga?console.log(Sf):(a.Va&&(a.Va.value=""),a.j(Sf))}else if("symbols"==ja)for(var ld=0;ld<a.F.length;ld++){var md=a.F[ld],$a;for($a in md.ka)if("."!=$a.charAt(0)){var Tf=md.ka[$a].o;if(void 0!==Tf){var Uf=md.ka[$a].l;Uf&&($a=Uf);a.j(J(a,Tf)+" "+$a)}}}else{if("d"==Ya){for(Xa in tb)if(g[1]==Xa){var Vf=a.Fa[Xa];Vf?(g.shift(),g.shift(),Vf(g)):a.j("no dump registered for "+ja);break a}ja||(Ya=a.Fb||"db")}else a.Fb=
|
||||
Ya;if("dh"==Ya){var Wf=ja,Xf=Ga,Yf="",Zf=0,ca=a.fa,ka=a.J;if(ka.length){var Y=+Wf||a.bb,vb=+Xf||10;isNaN(Y)?Y=vb:Yf="more ";Y>ka.length&&(a.j("note: only "+ka.length+" available"),Y=ka.length);ca-=Y;0>ca&&(null==ka[ka.length-1].B?(Y=ca+Y,ca=0):ca+=ka.length);var nd=[];"call"==Xf&&(vb=1E5,nd=["CALL"]);for(void 0!==Wf&&a.j(Y+" instructions earlier:");0<vb&&ca!=a.fa;){var $f=ka[ca++];if(null==$f.B)break;var wb=Z($f.B),Zh=Y--,ag=wh(a,wb,"history",Zh);(!nd.length||0<=ag.indexOf(nd[0]))&&a.j(ag);wb.Mb&&
|
||||
(ca+=wb.Mb,vb-=wb.Mb,Y-=wb.Mb);ca>=ka.length&&(ca=0);a.bb=Y;Zf++;vb--}}Zf||(a.j("no "+Yf+"history available"),a.bb=void 0)}else{var xb=ih(a,ja);if(xb){var lc=0;Ga&&("l"==Ga.charAt(0)&&(Ga=Ga.substr(1)||Yh),lc=Wg(a,Ga)>>>0,65536<lc&&(lc=65536));for(var yb="",ab="dd"==Ya?4:"dw"==Ya?2:1,mc=ab*lc||128,$h=mc+15>>4||1;$h--&&0<mc;){var nc=0,zb=0,Ab,od="",bg="",ja=J(a,xb.B);for(Ab=4==ab?16:a.ma;0<Ab&&0<mc;Ab--){var pd,oc=2==ab?a.na(xb,pd=2):a.qb(xb,pd=1),nc=nc|oc<<(zb<<3),zb=zb+pd;zb==ab&&(od+=J(a,nc,ab),
|
||||
od+=1==ab?9==Ab?"-":" ":" ",nc=zb=0);bg+=32<=oc&&128>oc?String.fromCharCode(oc):".";mc--}yb&&(yb+="\n");yb+=ja+" "+od+(0==Ab?" "+bg:"")}yb&&a.j(yb);a.Qa=xb}}}}break;case "e":if("else"==g[0])break;var bb,qd,rd,sd,td=g[0],ud=g[1];"eb"==td?(bb=1,qd=255,rd=a.qb,sd=a.Ib):"e"==td||"ew"==td?(bb=2,qd=65535,rd=a.na,sd=a.Ya):ud=null;if(null==ud)a.j("edit memory commands:"),a.j("\teb [a] [...] edit bytes at address a"),a.j("\tew [a] [...] edit words at address a");else{var pc=ih(a,ud);if(pc)for(var qc=2;qc<
|
||||
g.length;qc++){var Bb=Ug(a,g[qc]);if(void 0===Bb){a.j("unrecognized value: "+g[qc]);break}Bb&~qd&&a.j("warning: "+l(Bb)+" exceeds "+bb+"-byte value");var ai=rd.call(a,pc);a.j("changing "+J(a,pc.B)+" from "+J(a,ai,bb)+" to "+J(a,Bb,bb));sd.call(a,pc,Bb,bb)}}break;case "g":a:{var cg=g[1],bi=b;if(void 0!==cg){var vd=ih(a,cg,!0);if(!vd)break a;mh(a,vd,bi);a.Sa(a.f,vd,!0)}a.lb(!0,c)}break;case "h":a.v.da?(c||a.j("halting"),a.aa()):ob(a,!0)||c||a.j("already halted");break;case "i":if("if"==g[0]){var wd;
|
||||
var Cb=b.substr(2),Cb=va(Cb);Ug(a,Cb)?(c||a.j("true: "+Cb),wd=!0):(c||a.j("false: "+Cb),wd=!1);wd||(d=!1);break}f=!0;break;case "k":var ci=g[0];if("?"==g[1])a.j("stack trace commands:"),a.j("\tk\tshow frame addresses"),a.j("\tks\tshow symbol information");else{var xd=0,yd=Z(),Db=Z(a.b.u[6]);for(a.j("stack trace for "+J(a,Db.B));10>xd;){for(var Ha=null,di=256;65536>Db.B>>>0;){yd.B=a.na(Db,2);if(null==Db.B||!di--)break;if(!(yd.B&1)){for(var ei=a,rc=yd,dg=null,Eb=rc.B,eg=Eb,zd=1;6>=zd&&Eb;zd++){if(2<
|
||||
zd){rc.B=Eb;var sc=wh(ei,rc);if(0<=sc.indexOf("JSR")){var fg=sc.indexOf(" ");if(Eb+(sc.indexOf(" ",fg+1)-fg-1)/2==eg){dg=sc;break}}}Eb-=2}rc.B=eg;if(Ha=dg)break}}if(!Ha||null==Ha)break;var gg=null;if("ks"==ci){var hg=Ha.match(/[0-9A-F]+$/);hg&&(gg=Dh(a,hg[0]))}Ha=ua(Ha,50)+" ;"+(gg||"stack="+J(a,Db.B));a.j(Ha);xd++}xd||a.j("no return addresses found")}break;case "l":if("ln"==g[0]){Dh(a,g[1],!0);break}f=!0;break;case "m":a:{var la,ma=null,G=g[1];"?"==G&&(G=void 0);if(void 0!==G){var xa=0;if("all"==
|
||||
G)xa=1878917119,G=null;else if("on"==G)ma=!0,G=null;else if("off"==G)ma=!1,G=null;else{"keys"==G&&(G="key");"kbd"==G&&(G="keyboard");for(la in tb)if(G==la){xa=tb[la];ma=!!(a.la&xa);break}if(!xa){a.j("unknown message category: "+G);break a}}if(xa)if("on"==g[2])a.la|=xa,ma=!0;else if("off"==g[2]&&(a.la&=~xa,ma=!1,1073741824==xa)){for(var Ad=0;Ad<a.wa.length;Ad++)a.j(a.wa[Ad]);a.wa=[]}}var fi=0,Fb="";for(la in tb)if(!G||G==la){var gi=!!(a.la&tb[la]);if(null===ma||ma==gi)Fb&&(Fb+=","),++fi%10||(Fb+="\n\t"),
|
||||
"key"==la&&(la="keys"),Fb+=la}void 0===G&&a.j("message commands:\n\tm [category] [on|off]\tturn categories on/off");a.j((null!==ma?ma?"messages on: ":"messages off: ":"message categories:\n\t")+(Fb||"none"));ah(a)}break;case "p":if("print"==g[0]){Eh(a,b.substr(5));break}var hi="pr"==g[0]?1:0;if(a.U)a.j("step in progress");else{var ig=Z(a.b.u[7]);a.qb(ig);a.U?(a.Sa(a.f,ig,!0),a.lb()||(a.D&&a.D.wb(),a.U=0)):Fh(a,hi?"tr":"t")}break;case "r":if("reset"==b){a.D&&a.D.reset();break}ph(a,g);break;case "s":a:switch(g[1]){case "base":if(g[2]){var Gb=
|
||||
+g[2];if(8==Gb||10==Gb||16==Gb)a.ma=Gb;else{a.j("invalid base: "+Gb);break}}a.j("default base: "+a.ma);break;case "cs":var Hb;void 0!==g[3]&&(Hb=+g[3]);switch(g[2]){case "int":a.b.gb=Hb;break;case "start":a.b.tb=Hb;break;case "stop":a.b.hb=Hb;break;default:a.j("unknown cs option");break a}void 0!==Hb&&Rc(a.b);a.j("checksums "+(a.b.v.cb?"enabled":"disabled"));break;case "sp":void 0!==g[2]&&(Vc(a.b,+g[2])||a.j("warning: using 1x multiplier, previous target not reached"));a.j("target speed: "+(a.b.Wa.toFixed(2)+
|
||||
"Mhz")+" ("+a.b.Ma+"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":Fh(a,g[0],g[1]);break;case "u":qh(a,g[1],g[2],8);break;case "v":if("var"==g[0]){Ch(a,b.substr(3))||(d=!1);break}if("ver"==
|
||||
g[0]){a.j("PDPjs version 1.30.1 ("+a.b.fb+",RELEASE"+(sb?",TYPEDARRAYS":",LONGARRAYS")+")");a.j(window?window.navigator.userAgent:"");break}f=!0;break;case "?":if(g[1]){Eh(a,b.substr(1));break}var Bd="commands:",Cd;for(Cd in ch)Bd+="\n"+ua(Cd,9)+ch[Cd];Yd(a)||(Bd+="\nnote: history disabled if no exec breakpoints");a.j(Bd);break;default:f=!0}f&&(a.j("unknown command: "+b),d=!1)}}catch(jg){a.j("debugger error: "+(jg.stack||jg.message)),d=!1}return d}
|
||||
function Sc(a,b,c){b=Sg(a,b,c);for(var d in b)if(!vh(a,b[+d]))return!1;return!0}Ta(function(){for(var a=B(document,"pdp11","debugger"),b=0;b<a.length;b++){var c=a[b],d=z(c),d=new Zg(d);A(d,c)}});
|
||||
function Hh(a,b,c){r.call(this,"Computer",a,Hh,67108864);this.v.ga=!1;Ih(this,b);this.M=Pc(this,"autoPower",a);this.D=0;this.ba=a.busWidth||a.buswidth;this.f=Jh;this.J=null;this.F=this.P=!1;this.ca=Pc(this,"url")||"";(Math.random()+.1).toString(36);this.g=Kh(this);if(this.b=mb("CPU",this.id)){this.i=mb("Debugger",this.id);this.w=new Mb({id:this.Ra+".bus",busWidth:this.ba},this.b,this.i);var d,e=kb(this.id);if((this.A=mb("Panel",this.id))&&this.A.Va)for(b=0;b<e.length;b++)d=e[b],d.ja=this.A.ja,d.j=
|
||||
this.A.j,d.Va=this.A.Va;this.j("PDPjs v1.30.1\nCopyright \u00a9 2012-2016 Jeff Parsons <Jeff@pcjs.org>\nLicense: GPL version 3 or later <http://gnu.org/licenses/gpl.html>");this.j("Portions adapted from the PDP-11/70 Emulator v1.4 by Paul Nankervis <paulnank@hotmail.com>");for(b=0;b<e.length;b++)d=e[b],d.Ca&&d.Ca(this,this.w,this.b,this.i);b=null;d=a.resume;void 0!==d&&(1<d.length?b=this.H=d:this.f=parseInt(d,10));var f;if(a=Pc(this,"state")||(f=!0,a.state))b=this.N=a,f||(this.F=!0,this.f=Jh),this.f&&
|
||||
(this.K=new O(this,"1.30.1"),Lh(this.K)?b=null:delete this.K);!b&&this.f&&(b=Mh(this))&&(this.F=!0);if(b){var g=this;Ba(b,null,!0,function(a,b,c){c?(g.H=null,g.F=!1,g.ja("Unable to load machine state from server (error "+c+(b?": "+va(b):"")+")")):(g.J=b,g.P=!0);H(g)})}else H(this);this.I.power||(this.M=!0);!c&&this.M&&Nh(this,this.ub)}else n("Unable to find CPU component")}u(Hh);var Jh=0;
|
||||
function Ih(a,b){if(!b){var c;if("object"==typeof resources&&(c=resources.parms))try{b=eval("("+c+")")}catch(d){n(d.message+" ("+c+")")}}a.U=b}function Pc(a,b,c){var d=b.toLowerCase(),d=db[b]||db[d];void 0===d&&a.U&&(d=a.U[b]);void 0===d&&c&&(d=c[b]);void 0===d&&"object"==typeof resources&&resources[b]&&(d=b);return d}function Nh(a,b,c){for(var d=kb(a.id),e=0;e<=d.length;e++){var f=e<d.length?d[e]:a;if(!pb(f)){pb(f,function(){Nh(a,b,c)});return}}b.call(a,c)}
|
||||
function Oh(a,b){var c=new O(a,"1.30.1","validate");if(Lh(c)&&Ph(c)){var d=c.get("timestamp"),e=b?b.get("timestamp"):"unknown";d!=e&&(a.ja("Machine state may be out-of-date\n("+d+" vs. "+e+")\nCheck your browser's local storage limits"),b||c.clear())}}k=Hh.prototype;
|
||||
k.ub=function(a){void 0===a&&(a=this.f||(this.J?1:Jh));if(!this.D){this.D++;var b=!1,c=!1;this.O=!1;var d=this.K||new O(this,"1.30.1");if(-1==a)b=!0;else if(a>Jh){if(Lh(d,this.J)){this.C=new O(this,"1.30.1","failsafe");Lh(this.C)&&(Qh(this,d),a=2,Rh(this.C));this.C.set("timestamp",Aa());Sh(this.C);var e=this.f&&!this.F;if(1==a||Da("Click OK to restore the previous PDPjs machine state, or CANCEL to reset the machine.")){if(c=Ph(d)){var f=d.get("code"),g=d.get("data");f&&("ok"==f?Lh(d,g):("error"==
|
||||
f&&"no machine state"!=g?(this.ja("Error: "+g),"unable to verify user"==g&&(Ka("user",""),this.g=null)):this.j(f+": "+g),Rh(d),Lh(d)?(c=Ph(d),e=!0):c=!1))}e&&Oh(this,c?d:null)}else 2==a&&d.clear()}else Oh(this);delete this.J;delete this.K}e=kb(this.id);for(f=0;f<e.length;f++)g=e[f],g!==this&&g!=this.b&&(c=Th(this,g,d,b,c));b=[d,a,c];-1!=a?Nh(this,this.Yb,b):this.Yb(b)}};
|
||||
function Th(a,b,c,d,e){if(!b.v.ga){b.v.ga=!0;if(b.Aa){var f=null;e&&((f=c.get(b.id))||(f=c.get(b.id.replace(/[a-z0-9]\./i,"."))));"string"===typeof f&&(f=null);!b.Aa(f,d)&&f&&(n("Unable to restore state for "+b.type),a.N&&!a.P?(c.clear(),a.f=Jh,window&&window.location.reload()):a.O=!0,b.Aa(null),e=!1)}if(!d&&b.Zb)for(a=b.Zb.split("|"),c=0;c<a.length;c++)b.status(a[c])}return e}
|
||||
k.Yb=function(a){var b=a[0],c=0>a[1];a=a[2];this.fa=!0;this.v.ga=!0;var d=this.I.power;d&&(d.textContent="Shutdown");this.b&&(Th(this,this.b,b,c,a),this.b.pb());this.O&&(Qh(this,b),b.clear());!c&&this.C&&(this.C.clear(),delete this.C);this.D=0};
|
||||
function Qh(a,b){if(Da("There may be a problem with your PDPjs machine.\n\nTo help us diagnose it, click OK to send this PDPjs machine state to http://www.pcjs.org.")){var c=a.g||"";b=b.toString();var d={app:"PDPjs",ver:"1.30.1"};d.url=a.ca;d.user=c;d.type="bug";d.data=b;Ba("http://www.pcjs.org/api/v1/report",d,!0)}}
|
||||
function Gh(a,b,c){var d,e="none";if(a.D)return null;a.D--;var f=new O(a,"1.30.1"),g=new O(a,"1.30.1","validate"),h=Aa();g.set("timestamp",h);f.set("timestamp",h);f.set("version","1.30.1");f.set("url",window?window.location.href:null);f.set("browser",window?window.navigator.userAgent:"");a.b&&a.b.za&&(c&&a.b.aa(),d=a.b.za(b,c),"object"===typeof d&&f.set(a.b.id,d),c&&(a.b.v.ga=!1,!1===d&&(e=null)));for(var h=kb(a.id),m=0;m<h.length;m++){var p=h[m];p.v.ga&&(p.za&&(d=p.za(b,c),"object"===typeof d&&f.set(p.id,
|
||||
d)),c&&(p.v.ga=!1,!1===d&&(e=null)))}e&&(c?(h=d=!1,b?(a.g&&Uh(a,a.g,f.toString()),Sh(g)&&Sh(f)||(e=null,d=h=!0)):a.f&&(d=!0,h=3==a.f),d&&f.clear(h)):e=f.toString());c&&(a.v.ga=!1,b=a.I.power)&&(b.textContent="Power");a.D=0;return e}k.reset=function(){this.w&&this.w.reset&&(C(this,"Resetting "+this.w.type),this.w.reset());for(var a=kb(this.id),b=0;b<a.length;b++){var c=a[b];c!==this&&c!==this.w&&c.reset&&(C(this,"Resetting "+c.type),c.reset())}};
|
||||
function $g(a){var b;if(Yd(a)){if(!a.J||!a.J.length){a.J=Array(1E3);for(b=0;b<a.J.length;b++)a.J[b]=Z();a.fa=0;a.j("instruction history buffer allocated")}if(!a.ca||!a.ca.length)for(a.ca=Array(256),b=0;b<a.ca.length;b++)a.ca[b]=[b,0]}else a.J&&a.J.length&&a.j("instruction history buffer freed"),a.fa=0,a.J=[],a.ca=[]}k.lb=function(a,b){if(!nh(this,b))return!1;this.b.lb(a);return!0};
|
||||
k.mb=function(a,b,c){if(!nh(this))return!1;this.H=0;a||Yd(this)&&Zd(this,this.b.u[7],0);try{a=Zc(this.b,a);var d=this.b.mb(a);0<d&&($c(this.b,a),this.H+=d,Wc(this.b,d,!0),Tc(this.b,d),this.N++)}catch(e){"number"!=typeof e&&(this.H=0,rb(this.b,e.stack||e.message))}!1!==c&&this.D.$();this.$(b||!1);return 0<this.H};k.aa=function(a){this.b&&this.b.aa(a)};k.$=function(a){this.$a&&(void 0===a&&(a=!0),this.K=Z(this.b.u[7]),a&&1!=this.U?oh(this):ph(this))};
|
||||
function nh(a,b){var c;(c=!a.b||!pb(a.b))||(c=a.b,c.v.ga?c=!0:(c.j(c.toString()+" not powered"),c=!1),c=!c);return c||a.b.v.da?(b||a.j("cpu busy or unavailable, command ignored"),!1):!qb(a.b)}k.Aa=function(a,b){return!b&&(this.reset(!0),a&&this.restore&&!this.restore(a))?!1:!0};k.za=function(a,b){b&&this.j(a?"suspending":"shutting down");return a?this.save():!0};k.reset=function(a){$g(this);this.N=this.xa=0;this.sa=null;this.H=0;this.K=Z(this.b.u[7]);this.v.da=!1;qh(this);a||this.$()};
|
||||
k.save=function(){var a=new O(this);a.set(0,jh(this.K));a.set(1,jh(this.O));a.set(2,[this.g,this.P,this.la]);a.set(3,this.F);return a.data()};k.restore=function(a){var b=0;void 0!==a[2]&&(this.K=kh(a[b++]),this.O=kh(a[b++]),this.g=a[b][0],"string"==typeof this.g&&(this.g=[this.g]),this.P=a[b][1],this.la|=a[b][2]);a[3]&&(this.F=a[3]);return!0};k.start=function(a,b){this.U||this.j("running");this.v.da=!0;this.Cb=a;this.Eb=b};
|
||||
k.stop=function(a,b){if(this.v.da){this.v.da=!1;this.H=b-this.Eb;if(!this.U){b="stopped";if(this.H){a-=this.Cb;var c=0<a?Math.round(1E3*this.H/a):0;b+=" (";Yd(this)&&(b+=this.N+" opcodes, ",this.xa-=this.N,this.N=0);b+=this.H+" cycles, "+a+" ms, "+c+" hz)"}else D(this,-2147483648)&&(b+=" (use the 't' command to execute blocked faults)");this.j(b)}this.$(!0);this.wb();qh(this,this.b.u[7])}};function Yd(a){return 1<a.f.length||!!a.qa}
|
||||
function Zd(a,b,c){var d=a.b;if(0<c&&(a.qa&&!--a.qa||Kc(a,b,1,a.f)))return!0;0<=c&&a.ca.length&&(a.N++,null!=a.b.rb(b)&&(b=a.J[a.fa],b.B=d.u[7],b.Ba=!1,++a.fa==a.J.length&&(a.fa=0)));return!1}function $b(a){var b=a.b;if(b.v.da)throw N(b,a.b.vb),a.aa(),-1;return!1}function Zg(a){var b,c;a.f=["bp"];if(a.M)for(b=1;b<a.M.length;b++){c=a.M[b];var d=a.w;c=a.Y(c);Lc(d.W[c>>>d.ia],!1)}a.M=["br"];if(a.C)for(b=1;b<a.C.length;b++)c=a.C[b],d=a.w,c=a.Y(c),Lc(d.W[c>>>d.ia],!0);a.C=["bw"];a.ab=0}
|
||||
k.Sa=function(a,b,c){var d=!0;c||rh(this,a,b,!1,!0);if(a!=this.f){var e=this.Y(b);if(-1===e)this.j("invalid address: "+J(this,b.B)),d=!1;else{var f=this.w;f.W[e>>>f.ia].Sa(e&f.w,a==this.C)}}d&&(a.push(b),c?b.Ba=!0:(sh(this,a,a.length-1,"set"),$g(this)));return d};function rh(a,b,c,d,e){var f=!1;c=a.Y(c);for(var g=1;g<b.length;g++){var h=b[g];if(c==a.Y(h)&&(!d||h.Ba)){f=!0;h.Ba||e||sh(a,b,g,"cleared");b.splice(g,1);b!=a.f&&(d=a.w,Lc(d.W[c>>>d.ia],b==a.C));h.Ba||$g(a);break}}return f}
|
||||
function th(a,b){for(var c=1;c<b.length;c++)sh(a,b,c);return b.length-1}function sh(a,b,c,d){c=b[c];a.j(b[0]+" "+J(a,c.B)+(d?" "+d:c.hc?' "'+c.hc+'"':""))}function qh(a,b){if(void 0!==b)Kc(a,b,1,a.f,!0),a.U=0;else for(b=1;b<a.f.length;b++){var c=a.f[b];if(c.Ba){if(!rh(a,a.f,c,!0))break;b=0}}}
|
||||
function Kc(a,b,c,d,e){var f=!1;if(!a.ab++)for(var g=1;!f&&g<d.length;g++){var h=d[g];if(!e||h.Ba)for(var m=a.Y(h),p=0;p<c;p++)if(b+p==m){var q,f=!0;h.Ba&&(rh(a,d,h,!0),e=!0);if(q=h.lc){for(var f=!1,v=0;v<q.length;v++)if(!uh(a,q[v],!0)){if(q[v].indexOf("if")){f=!0;break}for(var w=v+1;w<q.length&&q[w].indexOf("else");w++)v++;if(w==q.length){f=!0;break}}a.b.v.da||(f=!0)}if(f){e||sh(a,d,g,"hit");break}}}a.ab--;return f}
|
||||
function vh(a,b,c,d){var e=Z(b.B),f=a.na(b,2),g,h;for(h in a.eb)if(g=a.eb[h][f&h])break;g||(g=eh);var m=g[0];0<=a.zb.indexOf(m)&&(g=eh,m=g[0]);var p=h="",q=ch[m],v=g.length-1;m||v||(h=J(a,f));for(m=1;m<=v;m++){var w=g[m];if(void 0!==w){var x;x=a;var E=w,w=b,y="",F=E&61440;if(4096==F)w=w.B+((f&255)<<24>>23)&65535,y=J(x,w);else if(8192==F)w=w.B-((f&63)<<1)&65535,y=J(x,w);else if(12288==F)y=J(x,f&7,1);else if(24576==F)y=J(x,f&63,1);else if(F=f&E,E&4032&&(F>>=6,E>>=6),E&63)switch(E=F&7,F&56){case 0:y=
|
||||
mh(E);break;case 8:y="@"+mh(E);break;case 16:7>E?y="("+mh(E)+")+":(F=x.na(w,2),y="#"+J(x,F,0,!0));break;case 24:7>E?y="@("+mh(E)+")+":(F=x.na(w,2),y="@#"+J(x,F,0,!0));break;case 32:y="-("+mh(E)+")";break;case 40:y="@-("+mh(E)+")";break;case 48:F=x.na(w,2);y=J(x,F,0,!0)+"("+mh(E)+")";7==E&&(y=[y,J(x,F+w.B&65535)]);break;case 56:F=x.na(w,2),y="@"+J(x,F)+"("+mh(E)+")",7==E&&(y=[y,J(x,F+w.B&65535)])}x=y;if(!x||!x.length){h="INVALID";break}"string"!=typeof x&&(p=x[1],x=x[0]);0<h.length&&(h+=",");h+=x||
|
||||
"???"}}f="";g=J(a,e.B)+":";if(-1!==e.B&&-1!==b.B){do if(f+=" "+J(a,a.na(e,2)),null==e.B)break;while(e.B!=b.B)}g+=ua(f,24);g+=ua(q,5);h&&(g+=" "+h);if(c||p)g=ua(g,60)+";"+(c||""),g=a.b.v.cb?g+("cycles="+Uc(a.b).toString()+" cs="+l(a.b.sb)):g+(null!=d?"="+d.toString():""),p&&(g+=" @"+p);return g}function wh(a,b){switch(b){case "N":a=a.b.Da();break;case "Z":a=id(a.b);break;case "V":a=hd(a.b);break;case "C":a=gd(a.b);break;default:a=0}return b.charAt(0)+(a?"1":"0")+" "}
|
||||
function xh(a,b){var c="",d=a.b;8>b?(c=mh(b),c+="="+J(a,d.u[b])):13>b?c="A"+(b-8)+"="+J(a,d.Ea[b-8]):16<=b&&20>b?c="S"+(b-16)+"="+J(a,d.va[b-16]):20==b&&(c="PS="+J(a,Lb(d)));c&&(c+=" ");return c}function yh(a){var b,c="";for(b=0;6>b;b++)c+=xh(a,b);c=c+"\n"+(xh(a,6)+xh(a,7)+xh(a,20));return c+=wh(a,"T")+wh(a,"N")+wh(a,"Z")+wh(a,"V")+wh(a,"C")}k.Wb=function(a,b){return a[0]>b[0]?1:a[0]<b[0]?-1:0};
|
||||
function zh(a,b,c){var d=[],e=a.Y(b)>>>0;for(b=0;b<a.F.length;b++){var f=a.F[b],g=f.B>>>0,h=f.vc;if(e>=g&&e<g+h){e=ya(f.Vb,[e-g],a.Wb);0<=e?Ah(a,b,e,d):c&&(e=~e,Ah(a,b,e-1,d),Ah(a,b,e,d));break}}return d}function Ah(a,b,c,d){var e={},f=a.F[b].Vb,g=0,h=null;0<=c&&c<f.length&&(g=f[c][0],h=f[c][1]);h&&(e=a.F[b].ka[h],h="."==h.charAt(0)?null:e.l||h);d.push(h);d.push(g);d.push(e.a);d.push(e.c)}
|
||||
function Bh(a,b){var c=b.match(/^\s*([A-Z_]?[A-Z0-9_]*)\s*(=?)\s*(.*)$/i);if(c){if(!c[1])return Xg(a)||a.j("no variables"),!0;if(!c[2])return Xg(a,c[1]);if(!c[3])return delete a.ba[c[1]],!0;b=Tg(a,c[3]);return void 0!==b?(a.ba[c[1]]=b,!0):!1}a.j("invalid assignment:"+b);return!1}
|
||||
function Ch(a,b,c){var d=null;if(b=hh(a,b,!0)){a.Y(b);var e=zh(a,b,!0);if(e.length){var f,g;e[0]&&(g="",(f=b.B-e[1])&&(g=" + "+l(f,4,!0)),f=e[0]+" ("+J(a,e[1])+")"+g,c&&a.j(f),d=f);4<e.length&&e[4]&&(g="",(f=e[5]-b.B)&&(g=" - "+l(f,4,!0)),f=e[4]+" ("+J(a,e[5])+")"+g,c&&a.j(f),d||(d=f))}else c&&a.j("no symbols")}return d}
|
||||
function oh(a,b){var c;if(b&&"?"==b[1])a.j("register commands:"),a.j("\tr\tdump registers"),a.j("\trx [#]\tset flag or register x to [#]");else{var d=a.b;null==c&&(c=!0);if(b&&1<b.length){var e=b[1],f=e.indexOf("=");if(0<f)b=e.substr(f+1),e=e.substr(0,f);else if(2<b.length)b=b[2];else{a.j("missing value for "+b[1]);return}f=Tg(a,b);if(void 0===f)return;b=e.toUpperCase();switch(b){case "SP":case "R6":d.u[6]=f&65535;break;case "PC":case "R7":N(d,f);a.K=Z(d.u[7]);break;case "N":d.V=f?32768:0;break;case "Z":d.X=
|
||||
f?0:1;break;case "V":d.S=f?32768:0;break;case "C":d.R=f?65536:0;break;default:if("R"==b.charAt(0)&&(b=+b.charAt(1),0<=b&&6>b)){d.u[b]=f&65535;break}a.j("unknown register: "+e);return}a.D.$();a.j("updated registers:")}a.j(yh(a));c&&(a.K=Z(d.u[7]),ph(a,J(a,a.K.B)))}}function Dh(a,b){b=va(b);var c=b.match(/^(['"])(.*?)\1$/);c?1<c[2].length?a.j(c[2]):Wg(a,null,c[2].charCodeAt(0)):Tg(a,b,!0)}
|
||||
function Eh(a,b,c){var d="t"!=b;c=Vg(a,c,null,!0)||1;var e=1==c?0:1;"tc"==b&&(e=c,c=1);Ma(c,function(){return nb(a,!0)&&a.mb(e,d,!1)},function(){a.D.$();nb(a,!1)})}
|
||||
function ph(a,b,c,d){if(b=hh(a,b,!0)){void 0===d&&(d=1);var e=256;if(void 0!==c)if("l"==c.charAt(0))c=Vg(a,c.substr(1)),null!=c&&(d=c);else{d=hh(a,c,!0);if(!d||d.B<b.B)return;e=d.B-b.B;if(256<e){a.j("range too large");return}d=-1}c=0;for(var f;0<e&&d--;){f=ob(a,!1)||a.U?a.H:null;var g=null!=f?"cycles":null,h=zh(a,b),m=b.B;if(h[0]&&d&&(!c&&d||0>h[0].indexOf("+"))){var p=h[0]+":";h[2]&&(p+=" "+h[2]);a.j(p)}h[3]&&(g=h[3],f=null);f=vh(a,b,g,f);a.j(f);a.K=b;e-=b.B-m;c++}}}
|
||||
function uh(a,b,c){var d=!0;try{b.length&&"end"!=b?c||a.j(">> "+b):(a.P&&(a.j("ended assemble at "+J(a,a.O.B)),a.K=a.O,a.P=!1),b="");var e=b.charAt(0);if('"'==e||"'"==e)return!0;a.sa=null;if(pb(a)&&0<b.length){a.P&&(b="a "+J(a,a.O.B)+" "+b);var f=!1,g=b.replace(/ +/g," ").split(" ");if(g&&g.length)for(var h=g[0],m=h.charAt(0),p=1;p<h.length;p++){var q=h.charAt(p);if("?"==m||"r"==m||"a">q||"z"<q){g[0]=h.substr(p);g.unshift(h.substr(0,p));break}}g[0]=g[0].toLowerCase();switch(g[0].charAt(0)){case "a":var v=
|
||||
hh(a,g[1],!0);if(v)if(a.O=v,void 0===g[2])a.j("begin assemble at "+J(a,v.B)),a.P=!0,a.D.$();else{var w;a.j("not supported yet");w=[];if(w.length){for(var x=0;x<w.length;x++)a.Ib(v,w[x],1);a.j(vh(a,a.O))}}break;case "b":a:{var E=g[0],y=g[1],F=b;if("?"==y)a.j("breakpoint commands:"),a.j("\tbp [a]\tset exec breakpoint at addr [a]"),a.j("\tbr [a]\tset read breakpoint at addr [a]"),a.j("\tbw [a]\tset write breakpoint at addr [a]"),a.j("\tbc [a]\tclear breakpoint at addr [a]"),a.j("\tbl\tlist all breakpoints"),
|
||||
a.j("\tbn [n]\tbreak after [n] instruction(s)");else{var Fa=E.charAt(1);if("l"==Fa){var kd;kd=0+th(a,a.f);kd+=th(a,a.M);(kd+=th(a,a.C))||a.j("no breakpoints")}else if("n"==Fa)a.qa=Vg(a,y),a.j("break after "+a.qa+" instruction(s)");else if(void 0===y)a.j("missing breakpoint address");else{var U=Z();if("*"!=y&&(U=hh(a,y,!0),!U))break a;"c"==Fa?null==U.B?(Zg(a),a.j("all breakpoints cleared")):rh(a,a.f,U)||rh(a,a.M,U)||rh(a,a.C,U)||a.j("breakpoint missing: "+J(a,U.B)):null!=U.B&&(lh(a,U,F),"p"==Fa?a.Sa(a.f,
|
||||
U):"r"==Fa?a.Sa(a.M,U):"w"==Fa?a.Sa(a.C,U):a.j("unknown breakpoint command: "+Fa))}}}break;case "c":a.Va&&(a.Va.value="");break;case "d":a:{var Xa,Ya=g[0],ja=g[1],Ga=g[2],Xh=g[3];if("?"==ja){var Za="";for(Xa in tb)a.Fa[Xa]&&(Za&&(Za+=","),Za+=Xa);Za+=",state,symbols";a.j("dump memory commands:");a.j("\tdb [a] [#] dump # bytes at address a");a.j("\tdw [a] [#] dump # words at address a");a.j("\tdd [a] [#] dump # dwords at address a");a.j("\tdh [#] [#] dump # instructions from history");
|
||||
Za.length&&a.j("dump extension commands:\n\t"+Za)}else if("state"==ja){var Rf=Fh(a.D,!0);"console"==Ga?console.log(Rf):(a.Va&&(a.Va.value=""),a.j(Rf))}else if("symbols"==ja)for(var ld=0;ld<a.F.length;ld++){var md=a.F[ld],$a;for($a in md.ka)if("."!=$a.charAt(0)){var Sf=md.ka[$a].o;if(void 0!==Sf){var Tf=md.ka[$a].l;Tf&&($a=Tf);a.j(J(a,Sf)+" "+$a)}}}else{if("d"==Ya){for(Xa in tb)if(g[1]==Xa){var Uf=a.Fa[Xa];Uf?(g.shift(),g.shift(),Uf(g)):a.j("no dump registered for "+ja);break a}ja||(Ya=a.Fb||"db")}else a.Fb=
|
||||
Ya;if("dh"==Ya){var Vf=ja,Wf=Ga,Xf="",Yf=0,ca=a.fa,ka=a.J;if(ka.length){var Y=+Vf||a.bb,wb=+Wf||10;isNaN(Y)?Y=wb:Xf="more ";Y>ka.length&&(a.j("note: only "+ka.length+" available"),Y=ka.length);ca-=Y;0>ca&&(null==ka[ka.length-1].B?(Y=ca+Y,ca=0):ca+=ka.length);var nd=[];"call"==Wf&&(wb=1E5,nd=["CALL"]);for(void 0!==Vf&&a.j(Y+" instructions earlier:");0<wb&&ca!=a.fa;){var Zf=ka[ca++];if(null==Zf.B)break;var xb=Z(Zf.B),Yh=Y--,$f=vh(a,xb,"history",Yh);(!nd.length||0<=$f.indexOf(nd[0]))&&a.j($f);xb.Mb&&
|
||||
(ca+=xb.Mb,wb-=xb.Mb,Y-=xb.Mb);ca>=ka.length&&(ca=0);a.bb=Y;Yf++;wb--}}Yf||(a.j("no "+Xf+"history available"),a.bb=void 0)}else{var yb=hh(a,ja);if(yb){var lc=0;Ga&&("l"==Ga.charAt(0)&&(Ga=Ga.substr(1)||Xh),lc=Vg(a,Ga)>>>0,65536<lc&&(lc=65536));for(var zb="",ab="dd"==Ya?4:"dw"==Ya?2:1,mc=ab*lc||128,Zh=mc+15>>4||1;Zh--&&0<mc;){var nc=0,Ab=0,Bb,od="",ag="",ja=J(a,yb.B);for(Bb=4==ab?16:a.ma;0<Bb&&0<mc;Bb--){var pd,oc=2==ab?a.na(yb,pd=2):a.qb(yb,pd=1),nc=nc|oc<<(Ab<<3),Ab=Ab+pd;Ab==ab&&(od+=J(a,nc,ab),
|
||||
od+=1==ab?9==Bb?"-":" ":" ",nc=Ab=0);ag+=32<=oc&&128>oc?String.fromCharCode(oc):".";mc--}zb&&(zb+="\n");zb+=ja+" "+od+(0==Bb?" "+ag:"")}zb&&a.j(zb);a.Qa=yb}}}}break;case "e":if("else"==g[0])break;var bb,qd,rd,sd,td=g[0],ud=g[1];"eb"==td?(bb=1,qd=255,rd=a.qb,sd=a.Ib):"e"==td||"ew"==td?(bb=2,qd=65535,rd=a.na,sd=a.Ya):ud=null;if(null==ud)a.j("edit memory commands:"),a.j("\teb [a] [...] edit bytes at address a"),a.j("\tew [a] [...] edit words at address a");else{var pc=hh(a,ud);if(pc)for(var qc=2;qc<
|
||||
g.length;qc++){var Cb=Tg(a,g[qc]);if(void 0===Cb){a.j("unrecognized value: "+g[qc]);break}Cb&~qd&&a.j("warning: "+l(Cb)+" exceeds "+bb+"-byte value");var $h=rd.call(a,pc);a.j("changing "+J(a,pc.B)+" from "+J(a,$h,bb)+" to "+J(a,Cb,bb));sd.call(a,pc,Cb,bb)}}break;case "g":a:{var bg=g[1],ai=b;if(void 0!==bg){var vd=hh(a,bg,!0);if(!vd)break a;lh(a,vd,ai);a.Sa(a.f,vd,!0)}a.lb(!0,c)}break;case "h":a.v.da?(c||a.j("halting"),a.aa()):ob(a,!0)||c||a.j("already halted");break;case "i":if("if"==g[0]){var wd;
|
||||
var Db=b.substr(2),Db=va(Db);Tg(a,Db)?(c||a.j("true: "+Db),wd=!0):(c||a.j("false: "+Db),wd=!1);wd||(d=!1);break}f=!0;break;case "k":var bi=g[0];if("?"==g[1])a.j("stack trace commands:"),a.j("\tk\tshow frame addresses"),a.j("\tks\tshow symbol information");else{var xd=0,yd=Z(),Eb=Z(a.b.u[6]);for(a.j("stack trace for "+J(a,Eb.B));10>xd;){for(var Ha=null,ci=256;65536>Eb.B>>>0;){yd.B=a.na(Eb,2);if(null==Eb.B||!ci--)break;if(!(yd.B&1)){for(var di=a,rc=yd,cg=null,Fb=rc.B,dg=Fb,zd=1;6>=zd&&Fb;zd++){if(2<
|
||||
zd){rc.B=Fb;var sc=vh(di,rc);if(0<=sc.indexOf("JSR")){var eg=sc.indexOf(" ");if(Fb+(sc.indexOf(" ",eg+1)-eg-1)/2==dg){cg=sc;break}}}Fb-=2}rc.B=dg;if(Ha=cg)break}}if(!Ha||null==Ha)break;var fg=null;if("ks"==bi){var gg=Ha.match(/[0-9A-F]+$/);gg&&(fg=Ch(a,gg[0]))}Ha=ua(Ha,50)+" ;"+(fg||"stack="+J(a,Eb.B));a.j(Ha);xd++}xd||a.j("no return addresses found")}break;case "l":if("ln"==g[0]){Ch(a,g[1],!0);break}f=!0;break;case "m":a:{var la,ma=null,G=g[1];"?"==G&&(G=void 0);if(void 0!==G){var xa=0;if("all"==
|
||||
G)xa=1878917119,G=null;else if("on"==G)ma=!0,G=null;else if("off"==G)ma=!1,G=null;else{"keys"==G&&(G="key");"kbd"==G&&(G="keyboard");for(la in tb)if(G==la){xa=tb[la];ma=!!(a.la&xa);break}if(!xa){a.j("unknown message category: "+G);break a}}if(xa)if("on"==g[2])a.la|=xa,ma=!0;else if("off"==g[2]&&(a.la&=~xa,ma=!1,1073741824==xa)){for(var Ad=0;Ad<a.wa.length;Ad++)a.j(a.wa[Ad]);a.wa=[]}}var ei=0,Gb="";for(la in tb)if(!G||G==la){var fi=!!(a.la&tb[la]);if(null===ma||ma==fi)Gb&&(Gb+=","),++ei%10||(Gb+="\n\t"),
|
||||
"key"==la&&(la="keys"),Gb+=la}void 0===G&&a.j("message commands:\n\tm [category] [on|off]\tturn categories on/off");a.j((null!==ma?ma?"messages on: ":"messages off: ":"message categories:\n\t")+(Gb||"none"));$g(a)}break;case "p":if("print"==g[0]){Dh(a,b.substr(5));break}var gi="pr"==g[0]?1:0;if(a.U)a.j("step in progress");else{var hg=Z(a.b.u[7]);a.qb(hg);a.U?(a.Sa(a.f,hg,!0),a.lb()||(a.D&&a.D.wb(),a.U=0)):Eh(a,gi?"tr":"t")}break;case "r":if("reset"==b){a.D&&a.D.reset();break}oh(a,g);break;case "s":a:switch(g[1]){case "base":if(g[2]){var Hb=
|
||||
+g[2];if(8==Hb||10==Hb||16==Hb)a.ma=Hb;else{a.j("invalid base: "+Hb);break}}a.j("default base: "+a.ma);break;case "cs":var Ib;void 0!==g[3]&&(Ib=+g[3]);switch(g[2]){case "int":a.b.gb=Ib;break;case "start":a.b.tb=Ib;break;case "stop":a.b.hb=Ib;break;default:a.j("unknown cs option");break a}void 0!==Ib&&Rc(a.b);a.j("checksums "+(a.b.v.cb?"enabled":"disabled"));break;case "sp":void 0!==g[2]&&(Vc(a.b,+g[2])||a.j("warning: using 1x multiplier, previous target not reached"));a.j("target speed: "+(a.b.Wa.toFixed(2)+
|
||||
"Mhz")+" ("+a.b.Ma+"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":Eh(a,g[0],g[1]);break;case "u":ph(a,g[1],g[2],8);break;case "v":if("var"==g[0]){Bh(a,b.substr(3))||(d=!1);break}if("ver"==
|
||||
g[0]){a.j("PDPjs version 1.30.1 ("+a.b.fb+",RELEASE"+(sb?",TYPEDARRAYS":",LONGARRAYS")+")");a.j(window?window.navigator.userAgent:"");break}f=!0;break;case "?":if(g[1]){Dh(a,b.substr(1));break}var Bd="commands:",Cd;for(Cd in bh)Bd+="\n"+ua(Cd,9)+bh[Cd];Yd(a)||(Bd+="\nnote: history disabled if no exec breakpoints");a.j(Bd);break;default:f=!0}f&&(a.j("unknown command: "+b),d=!1)}}catch(ig){a.j("debugger error: "+(ig.stack||ig.message)),d=!1}return d}
|
||||
function Sc(a,b,c){b=Rg(a,b,c);for(var d in b)if(!uh(a,b[+d]))return!1;return!0}Ta(function(){for(var a=B(document,"pdp11","debugger"),b=0;b<a.length;b++){var c=a[b],d=z(c),d=new Yg(d);A(d,c)}});
|
||||
function Gh(a,b,c){r.call(this,"Computer",a,Gh,67108864);this.v.ga=!1;Hh(this,b);this.M=Pc(this,"autoPower",a);this.D=0;this.ba=a.busWidth||a.buswidth;this.f=Ih;this.J=null;this.F=this.P=!1;this.ca=Pc(this,"url")||"";(Math.random()+.1).toString(36);this.g=Jh(this);if(this.b=mb("CPU",this.id)){this.i=mb("Debugger",this.id);this.w=new Mb({id:this.Ra+".bus",busWidth:this.ba},this.b,this.i);var d,e=kb(this.id);if((this.A=mb("Panel",this.id))&&this.A.Va)for(b=0;b<e.length;b++)d=e[b],d.ja=this.A.ja,d.j=
|
||||
this.A.j,d.Va=this.A.Va;this.j("PDPjs v1.30.1\nCopyright \u00a9 2012-2016 Jeff Parsons <Jeff@pcjs.org>\nLicense: GPL version 3 or later <http://gnu.org/licenses/gpl.html>");this.j("Portions adapted from the PDP-11/70 Emulator v1.4 by Paul Nankervis <paulnank@hotmail.com>");for(b=0;b<e.length;b++)d=e[b],d.Ca&&d.Ca(this,this.w,this.b,this.i);b=null;d=a.resume;void 0!==d&&(1<d.length?b=this.H=d:this.f=parseInt(d,10));var f;if(a=Pc(this,"state")||(f=!0,a.state))b=this.N=a,f||(this.F=!0,this.f=Ih),this.f&&
|
||||
(this.K=new O(this,"1.30.1"),Kh(this.K)?b=null:delete this.K);!b&&this.f&&(b=Lh(this))&&(this.F=!0);if(b){var g=this;Ba(b,null,!0,function(a,b,c){c?(g.H=null,g.F=!1,g.ja("Unable to load machine state from server (error "+c+(b?": "+va(b):"")+")")):(g.J=b,g.P=!0);H(g)})}else H(this);this.I.power||(this.M=!0);!c&&this.M&&Mh(this,this.ub)}else n("Unable to find CPU component")}u(Gh);var Ih=0;
|
||||
function Hh(a,b){if(!b){var c;if("object"==typeof resources&&(c=resources.parms))try{b=eval("("+c+")")}catch(d){n(d.message+" ("+c+")")}}a.U=b}function Pc(a,b,c){var d=b.toLowerCase(),d=db[b]||db[d];void 0===d&&a.U&&(d=a.U[b]);void 0===d&&c&&(d=c[b]);void 0===d&&"object"==typeof resources&&resources[b]&&(d=b);return d}function Mh(a,b,c){for(var d=kb(a.id),e=0;e<=d.length;e++){var f=e<d.length?d[e]:a;if(!pb(f)){pb(f,function(){Mh(a,b,c)});return}}b.call(a,c)}
|
||||
function Nh(a,b){var c=new O(a,"1.30.1","validate");if(Kh(c)&&Oh(c)){var d=c.get("timestamp"),e=b?b.get("timestamp"):"unknown";d!=e&&(a.ja("Machine state may be out-of-date\n("+d+" vs. "+e+")\nCheck your browser's local storage limits"),b||c.clear())}}k=Gh.prototype;
|
||||
k.ub=function(a){void 0===a&&(a=this.f||(this.J?1:Ih));if(!this.D){this.D++;var b=!1,c=!1;this.O=!1;var d=this.K||new O(this,"1.30.1");if(-1==a)b=!0;else if(a>Ih){if(Kh(d,this.J)){this.C=new O(this,"1.30.1","failsafe");Kh(this.C)&&(Ph(this,d),a=2,Qh(this.C));this.C.set("timestamp",Aa());Rh(this.C);var e=this.f&&!this.F;if(1==a||Da("Click OK to restore the previous PDPjs machine state, or CANCEL to reset the machine.")){if(c=Oh(d)){var f=d.get("code"),g=d.get("data");f&&("ok"==f?Kh(d,g):("error"==
|
||||
f&&"no machine state"!=g?(this.ja("Error: "+g),"unable to verify user"==g&&(Ka("user",""),this.g=null)):this.j(f+": "+g),Qh(d),Kh(d)?(c=Oh(d),e=!0):c=!1))}e&&Nh(this,c?d:null)}else 2==a&&d.clear()}else Nh(this);delete this.J;delete this.K}e=kb(this.id);for(f=0;f<e.length;f++)g=e[f],g!==this&&g!=this.b&&(c=Sh(this,g,d,b,c));b=[d,a,c];-1!=a?Mh(this,this.Yb,b):this.Yb(b)}};
|
||||
function Sh(a,b,c,d,e){if(!b.v.ga){b.v.ga=!0;if(b.Aa){var f=null;e&&((f=c.get(b.id))||(f=c.get(b.id.replace(/[a-z0-9]\./i,"."))));"string"===typeof f&&(f=null);!b.Aa(f,d)&&f&&(n("Unable to restore state for "+b.type),a.N&&!a.P?(c.clear(),a.f=Ih,window&&window.location.reload()):a.O=!0,b.Aa(null),e=!1)}if(!d&&b.Zb)for(a=b.Zb.split("|"),c=0;c<a.length;c++)b.status(a[c])}return e}
|
||||
k.Yb=function(a){var b=a[0],c=0>a[1];a=a[2];this.fa=!0;this.v.ga=!0;var d=this.I.power;d&&(d.textContent="Shutdown");this.b&&(Sh(this,this.b,b,c,a),this.b.pb());this.O&&(Ph(this,b),b.clear());!c&&this.C&&(this.C.clear(),delete this.C);this.D=0};
|
||||
function Ph(a,b){if(Da("There may be a problem with your PDPjs machine.\n\nTo help us diagnose it, click OK to send this PDPjs machine state to http://www.pcjs.org.")){var c=a.g||"";b=b.toString();var d={app:"PDPjs",ver:"1.30.1"};d.url=a.ca;d.user=c;d.type="bug";d.data=b;Ba("http://www.pcjs.org/api/v1/report",d,!0)}}
|
||||
function Fh(a,b,c){var d,e="none";if(a.D)return null;a.D--;var f=new O(a,"1.30.1"),g=new O(a,"1.30.1","validate"),h=Aa();g.set("timestamp",h);f.set("timestamp",h);f.set("version","1.30.1");f.set("url",window?window.location.href:null);f.set("browser",window?window.navigator.userAgent:"");a.b&&a.b.za&&(c&&a.b.aa(),d=a.b.za(b,c),"object"===typeof d&&f.set(a.b.id,d),c&&(a.b.v.ga=!1,!1===d&&(e=null)));for(var h=kb(a.id),m=0;m<h.length;m++){var p=h[m];p.v.ga&&(p.za&&(d=p.za(b,c),"object"===typeof d&&f.set(p.id,
|
||||
d)),c&&(p.v.ga=!1,!1===d&&(e=null)))}e&&(c?(h=d=!1,b?(a.g&&Th(a,a.g,f.toString()),Rh(g)&&Rh(f)||(e=null,d=h=!0)):a.f&&(d=!0,h=3==a.f),d&&f.clear(h)):e=f.toString());c&&(a.v.ga=!1,b=a.I.power)&&(b.textContent="Power");a.D=0;return e}k.reset=function(){this.w&&this.w.reset&&(C(this,"Resetting "+this.w.type),this.w.reset());for(var a=kb(this.id),b=0;b<a.length;b++){var c=a[b];c!==this&&c!==this.w&&c.reset&&(C(this,"Resetting "+c.type),c.reset())}};
|
||||
k.start=function(a,b){for(var c=kb(this.id),d=0;d<c.length;d++){var e=c[d];"CPU"!=e.type&&e!==this&&e.start&&e.start(a,b)}this.$(!0)};k.stop=function(a,b){for(var c=kb(this.id),d=0;d<c.length;d++){var e=c[d];"CPU"!=e.type&&e!==this&&e.stop&&e.stop(a,b)}this.$(!0)};
|
||||
k.ra=function(a,b,c){var d=this;switch(b){case "power":return this.I[b]=c,c.onclick=function(){d.D||(d.v.ga?Gh(d,!1,!0):Nh(d,d.ub))},!0;case "reset":return this.I[b]=c,c.onclick=function(){if(d.v.ga&&!d.D)if(d.f&&!d.H){var a=Da("Click OK to save changes to this PDPjs machine.\n\nWARNING: If you CANCEL, all disk changes will be discarded.");Gh(d,a,!0);!a&&d.N?window&&window.location.reload():d.ub(Jh)}else d.reset(),d.b&&d.b.pb()},!0;case "save":if(qa())c.parentNode.removeChild(c);else return this.I[b]=
|
||||
c,c.onclick=function(){var a=Kh(d,!0);if(a){var b=!!(d.f&&!d.H||d.N),c=Gh(d,b);b?Uh(d,a,c):d.ja("Resume disabled, machine state not saved")}},!0}return!1};
|
||||
function Kh(a,b){var c=a.g;c||((c=Ja("user"),void 0!==c)?!c&&b&&(b=null,window&&(b=window.prompt("Saving machine states on the pcjs.org server is currently unsupported.\n\nIf you're running your own server, enter your user ID below.","")),c=b)&&((c=Vh(a,c))||a.ja("The user ID is invalid.")):b&&a.ja("Browser local storage is not available"));return c}
|
||||
function Vh(a,b){a.g=null;b=Ba(ra()+"/api/v1/user?req=verify&user="+b);var c=b[1];if(!b[0]&&c)try{b=eval("("+c+")"),b.code&&"ok"==b.code&&(Ka("user",b.data),a.g=b.data)}catch(d){n(d.message+" ("+c+")")}return a.g}function Mh(a){var b=null;a.g&&(b=ra()+"/api/v1/user?req=load&user="+a.g+"&state="+Wh(a,"1.30.1"));return b}
|
||||
function Uh(a,b,c){if(c){var d={req:"store"};d.user=b;d.state=Wh(a,"1.30.1");d.data=c;b=Ba(ra()+"/api/v1/user",d);d=b[0];if(b[1]){if(d){var e=d.indexOf("\n");0<e&&(d=d.substr(0,e));d.indexOf("Error: ")||(d=d.substr(7))}d='{"code":'+b[1]+',"data":"'+d+'"}'}b=JSON.parse(d);b&&"ok"==b.code?a.ja("Machine state saved to server"):c&&(c=b&&b.data||"unable to save machine state",c="error"==b.code?"Error: "+c:"Error "+b.code+": "+c,a.ja(c),Ka("user",""),a.g=null)}}
|
||||
function Fg(a){var b;a=kb(a.id);for(var c=0;c<a.length;c++){var d=a[c];if(b)b==d&&(b=null);else if("RAM"==d.type)return d}return null}k.wb=function(){};k.$=function(a){this.b&&this.b.$(a);this.A&&this.A.$(a)};Ta(function(){for(var a=B(document,"pdp11-machine"),b=0;b<a.length;b++)for(var c=a[b],d=z(c),c=B(c,"pdp11","computer"),e=0;e<c.length;e++){var f=c[e],g=z(f),g=new Hh(g,d,!0);A(g,f);g.M&&Nh(g,g.ub)}});
|
||||
Oa.show.push(function(){for(var a=B(document,"pdp11","computer"),b=0;b<a.length;b++){var c=z(a[b]);(c=mb("Computer",c.id))&&c.fa&&!c.v.ga&&c.ub(-1)}});Oa.exit.push(function(){for(var a=B(document,"pdp11","computer"),b=0;b<a.length;b++){var c=z(a[b]);(c=mb("Computer",c.id))&&c.v.ga&&Gh(c,!(!c.f||c.H),!0)}});function O(a,b,c){this.id=a.id;this.key=Wh(a,b,c);this.i=a.i;Rh(this,a.tc)}function Wh(a,b,c){a=a.id;if(b){var d=b.indexOf(".");0<d&&(a+=".v"+b.substr(0,d))}c&&(a+="."+c);return a}
|
||||
O.prototype={constructor:O,set:function(a,b){try{this[this.id][a]=b}catch(c){}},get:function(a){return this[this.id][a]||null},value:function(){return this[this.id]},data:function(){return this[this.id]},toString:function(){var a=this[this.id];return"string"==typeof a?a:JSON.stringify(a)},clear:function(a){Rh(this);var b=[];try{for(var c=0,d=window.localStorage.length;c<d;c++)b.push(window.localStorage.key(c))}catch(e){}for(c=0;c<b.length;c++)if((d=b[c])&&(a||d.substr(0,this.key.length)==this.key)){try{window.localStorage.removeItem(d)}catch(e){}b.splice(c,
|
||||
1);c=0}}};function Rh(a,b){a[a.id]={};b&&a.set("parms",b);a.b=!1}function Sh(a){var b=!0;if(Ia()){var c=JSON.stringify(a[a.id]);Ka(a.key,c)||(n("Unable to store "+c.length+" bytes in browser local storage"),b=!1)}return b}function Ph(a){var b=!0;try{a[a.id]=JSON.parse(a[a.id])}catch(c){n(c.message||c),b=!1}return b}function Lh(a,b){return b?(a[a.id]=b,a.b=!0):a.b?!0:Ia()&&(b=Ja(a.key))?(a[a.id]=b,a.b=!0):!1}var Xh=0;
|
||||
function ii(a,b,c,d,e,f){e("Loading "+a+"...");Ba(a,null,!0,function(g,h,m){m?(h||(h="unable to load "+a+" ("+m+")"),f(h,null)):ji(h,a,b,c,d,e,f)})}
|
||||
function ji(a,b,c,d,e,f,g){function h(a,f){if(f)g(f,null);else{c&&(jb(c,b,a),(f=b)&&0>f.indexOf("/")&&"/"==window.location.pathname.slice(-1)&&(f=window.location.pathname+f),d?"}"==d.slice(-1)?(d=d.slice(0,-1),1<d.length&&(d+=",")):d='{state:"'+d+'",':d="{",d+='url:"'+f+'"}',"object"==typeof resources&&(f=null),a=a.replace(/(<machine[^>]*\sid=)(['"]).*?\2/,"$1$2"+c+"$2"+(d?" parms='"+d+"'":"")+(f?' url="'+f+'"':"")));e||(a=a.replace(/(<xsl:variable name="APPNAME">).*?(<\/xsl:variable>)/,"$1PDPjs$2"),
|
||||
a=a.replace(/(<xsl:variable name="APPCLASS">).*?(<\/xsl:variable>)/,"$1pdp11$2"));f=null;if("<"==a.charAt(0))try{e||(a=a.replace(/<!DOCTYPE(.|[\r\n])*]>\s*/g,"")),window.ActiveXObject||"ActiveXObject"in window?(f=new window.ActiveXObject("Microsoft.XMLDOM"),f.async=!1,f.loadXML(a)):f=(new window.DOMParser).parseFromString(a,"text/xml")}catch(q){f=null,a=q.message}else a="unrecognized XML: "+(255<a.length?a.substr(0,255)+"...":a);g(a,f)}}a?e?ki(a,f,h):h(a,null):g("no data"+(b?" for file: "+b:""),null)}
|
||||
function ki(a,b,c){var d;if(d=/<([a-z]+)\s+ref="(.*?)"(.*?)\/>/g.exec(a)){var e=d[2];b("Loading "+e+"...");Ba(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 m=h[0],p,q=/( [a-z]+=)(['"])(.*?)\2/g;p=q.exec(f);)m=0>m.indexOf(p[1])?m.replace(">",p[0]+">"):m.replace(new RegExp(p[1]+"(['\"])(.*?)\\1"),p[0]);h[0]!=m&&(g=g.replace(h[0],m))}else{c(a,"missing <"+d[1]+"> in "+e);return}g=g.replace(/<\?xml[^>]*>[\r\n]*/,
|
||||
"");a=a.replace(d[0],g);ki(a,b,c)}})}else c(a,null)}
|
||||
function li(a,b,c,d){function e(a){if(void 0===h){var b=g&&B(g,"machine-warning");h=b&&b[0]||g}h&&(h.innerHTML=ta(a))}function f(a){e("Error: "+a);m&&(--Xh||Va(!0));m=!1}var g,h,m=!0;Xh++;ib[a]={};try{if(g=document.getElementById(a)){var p;if("object"==typeof resources&&(p=resources.css)){var q=document.head||document.getElementsByTagName("head")[0],v=document.createElement("style");v.type="text/css";v.styleSheet?v.styleSheet.cssText=p:v.appendChild(document.createTextNode(p));q.appendChild(v)}c||
|
||||
(c="/versions/pdpjs/1.30.1/components.xsl");p=function(d,h){h?ii(c,null,null,!1,e,function(d,m){m?(jb(a,c,d),e("Processing "+b+"..."),window.ActiveXObject||"ActiveXObject"in window?(m=h.transformNode(m))?(g.outerHTML=m,--Xh||Va(!0)):f("transformNodeToObject failed"):document.implementation&&document.implementation.createDocument?(d=new XSLTProcessor,d.importStylesheet(m),(m=d.transformToFragment(h,document))?g.parentNode?(g.parentNode.replaceChild(m,g),--Xh||Va(!0)):f("invalid machine element: "+
|
||||
a):f("transformToFragment failed")):f("unable to transform XML: unsupported browser")):f(d)}):f(d)};"<"!=b.charAt(0)?ii(b,a,d,!0,e,p):ji(b,null,a,d,!1,e,p)}else f("missing machine element: "+a)}catch(w){f(w.message)}return m}window.embedPDP11=function(a,b,c,d){Va(!1);return li(a,b,c,d)};window.enableEvents=Va;window.sendEvent=Wa;})();//# sourceMappingURL=/tmp/pdpjs/1.30.1/pdp11-dbg.map
|
||||
k.ra=function(a,b,c){var d=this;switch(b){case "power":return this.I[b]=c,c.onclick=function(){d.D||(d.v.ga?Fh(d,!1,!0):Mh(d,d.ub))},!0;case "reset":return this.I[b]=c,c.onclick=function(){if(d.v.ga&&!d.D)if(d.f&&!d.H){var a=Da("Click OK to save changes to this PDPjs machine.\n\nWARNING: If you CANCEL, all disk changes will be discarded.");Fh(d,a,!0);!a&&d.N?window&&window.location.reload():d.ub(Ih)}else d.reset(),d.b&&d.b.pb()},!0;case "save":if(qa())c.parentNode.removeChild(c);else return this.I[b]=
|
||||
c,c.onclick=function(){var a=Jh(d,!0);if(a){var b=!!(d.f&&!d.H||d.N),c=Fh(d,b);b?Th(d,a,c):d.ja("Resume disabled, machine state not saved")}},!0}return!1};
|
||||
function Jh(a,b){var c=a.g;c||((c=Ja("user"),void 0!==c)?!c&&b&&(b=null,window&&(b=window.prompt("Saving machine states on the pcjs.org server is currently unsupported.\n\nIf you're running your own server, enter your user ID below.","")),c=b)&&((c=Uh(a,c))||a.ja("The user ID is invalid.")):b&&a.ja("Browser local storage is not available"));return c}
|
||||
function Uh(a,b){a.g=null;b=Ba(ra()+"/api/v1/user?req=verify&user="+b);var c=b[1];if(!b[0]&&c)try{b=eval("("+c+")"),b.code&&"ok"==b.code&&(Ka("user",b.data),a.g=b.data)}catch(d){n(d.message+" ("+c+")")}return a.g}function Lh(a){var b=null;a.g&&(b=ra()+"/api/v1/user?req=load&user="+a.g+"&state="+Vh(a,"1.30.1"));return b}
|
||||
function Th(a,b,c){if(c){var d={req:"store"};d.user=b;d.state=Vh(a,"1.30.1");d.data=c;b=Ba(ra()+"/api/v1/user",d);d=b[0];if(b[1]){if(d){var e=d.indexOf("\n");0<e&&(d=d.substr(0,e));d.indexOf("Error: ")||(d=d.substr(7))}d='{"code":'+b[1]+',"data":"'+d+'"}'}b=JSON.parse(d);b&&"ok"==b.code?a.ja("Machine state saved to server"):c&&(c=b&&b.data||"unable to save machine state",c="error"==b.code?"Error: "+c:"Error "+b.code+": "+c,a.ja(c),Ka("user",""),a.g=null)}}
|
||||
function Fg(a){var b;a=kb(a.id);for(var c=0;c<a.length;c++){var d=a[c];if(b)b==d&&(b=null);else if("RAM"==d.type)return d}return null}k.wb=function(){};k.$=function(a){this.b&&this.b.$(a);this.A&&this.A.$(a)};Ta(function(){for(var a=B(document,"pdp11-machine"),b=0;b<a.length;b++)for(var c=a[b],d=z(c),c=B(c,"pdp11","computer"),e=0;e<c.length;e++){var f=c[e],g=z(f),g=new Gh(g,d,!0);A(g,f);g.M&&Mh(g,g.ub)}});
|
||||
Oa.show.push(function(){for(var a=B(document,"pdp11","computer"),b=0;b<a.length;b++){var c=z(a[b]);(c=mb("Computer",c.id))&&c.fa&&!c.v.ga&&c.ub(-1)}});Oa.exit.push(function(){for(var a=B(document,"pdp11","computer"),b=0;b<a.length;b++){var c=z(a[b]);(c=mb("Computer",c.id))&&c.v.ga&&Fh(c,!(!c.f||c.H),!0)}});function O(a,b,c){this.id=a.id;this.key=Vh(a,b,c);this.i=a.i;Qh(this,a.tc)}function Vh(a,b,c){a=a.id;if(b){var d=b.indexOf(".");0<d&&(a+=".v"+b.substr(0,d))}c&&(a+="."+c);return a}
|
||||
O.prototype={constructor:O,set:function(a,b){try{this[this.id][a]=b}catch(c){}},get:function(a){return this[this.id][a]||null},value:function(){return this[this.id]},data:function(){return this[this.id]},toString:function(){var a=this[this.id];return"string"==typeof a?a:JSON.stringify(a)},clear:function(a){Qh(this);var b=[];try{for(var c=0,d=window.localStorage.length;c<d;c++)b.push(window.localStorage.key(c))}catch(e){}for(c=0;c<b.length;c++)if((d=b[c])&&(a||d.substr(0,this.key.length)==this.key)){try{window.localStorage.removeItem(d)}catch(e){}b.splice(c,
|
||||
1);c=0}}};function Qh(a,b){a[a.id]={};b&&a.set("parms",b);a.b=!1}function Rh(a){var b=!0;if(Ia()){var c=JSON.stringify(a[a.id]);Ka(a.key,c)||(n("Unable to store "+c.length+" bytes in browser local storage"),b=!1)}return b}function Oh(a){var b=!0;try{a[a.id]=JSON.parse(a[a.id])}catch(c){n(c.message||c),b=!1}return b}function Kh(a,b){return b?(a[a.id]=b,a.b=!0):a.b?!0:Ia()&&(b=Ja(a.key))?(a[a.id]=b,a.b=!0):!1}var Wh=0;
|
||||
function hi(a,b,c,d,e,f){e("Loading "+a+"...");Ba(a,null,!0,function(g,h,m){m?(h||(h="unable to load "+a+" ("+m+")"),f(h,null)):ii(h,a,b,c,d,e,f)})}
|
||||
function ii(a,b,c,d,e,f,g){function h(a,f){if(f)g(f,null);else{c&&(jb(c,b,a),(f=b)&&0>f.indexOf("/")&&"/"==window.location.pathname.slice(-1)&&(f=window.location.pathname+f),d?"}"==d.slice(-1)?(d=d.slice(0,-1),1<d.length&&(d+=",")):d='{state:"'+d+'",':d="{",d+='url:"'+f+'"}',"object"==typeof resources&&(f=null),a=a.replace(/(<machine[^>]*\sid=)(['"]).*?\2/,"$1$2"+c+"$2"+(d?" parms='"+d+"'":"")+(f?' url="'+f+'"':"")));e||(a=a.replace(/(<xsl:variable name="APPNAME">).*?(<\/xsl:variable>)/,"$1PDPjs$2"),
|
||||
a=a.replace(/(<xsl:variable name="APPCLASS">).*?(<\/xsl:variable>)/,"$1pdp11$2"));f=null;if("<"==a.charAt(0))try{e||(a=a.replace(/<!DOCTYPE(.|[\r\n])*]>\s*/g,"")),window.ActiveXObject||"ActiveXObject"in window?(f=new window.ActiveXObject("Microsoft.XMLDOM"),f.async=!1,f.loadXML(a)):f=(new window.DOMParser).parseFromString(a,"text/xml")}catch(q){f=null,a=q.message}else a="unrecognized XML: "+(255<a.length?a.substr(0,255)+"...":a);g(a,f)}}a?e?ji(a,f,h):h(a,null):g("no data"+(b?" for file: "+b:""),null)}
|
||||
function ji(a,b,c){var d;if(d=/<([a-z]+)\s+ref="(.*?)"(.*?)\/>/g.exec(a)){var e=d[2];b("Loading "+e+"...");Ba(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 m=h[0],p,q=/( [a-z]+=)(['"])(.*?)\2/g;p=q.exec(f);)m=0>m.indexOf(p[1])?m.replace(">",p[0]+">"):m.replace(new RegExp(p[1]+"(['\"])(.*?)\\1"),p[0]);h[0]!=m&&(g=g.replace(h[0],m))}else{c(a,"missing <"+d[1]+"> in "+e);return}g=g.replace(/<\?xml[^>]*>[\r\n]*/,
|
||||
"");a=a.replace(d[0],g);ji(a,b,c)}})}else c(a,null)}
|
||||
function ki(a,b,c,d){function e(a){if(void 0===h){var b=g&&B(g,"machine-warning");h=b&&b[0]||g}h&&(h.innerHTML=ta(a))}function f(a){e("Error: "+a);m&&(--Wh||Va(!0));m=!1}var g,h,m=!0;Wh++;ib[a]={};try{if(g=document.getElementById(a)){var p;if("object"==typeof resources&&(p=resources.css)){var q=document.head||document.getElementsByTagName("head")[0],v=document.createElement("style");v.type="text/css";v.styleSheet?v.styleSheet.cssText=p:v.appendChild(document.createTextNode(p));q.appendChild(v)}c||
|
||||
(c="/versions/pdpjs/1.30.1/components.xsl");p=function(d,h){h?hi(c,null,null,!1,e,function(d,m){m?(jb(a,c,d),e("Processing "+b+"..."),window.ActiveXObject||"ActiveXObject"in window?(m=h.transformNode(m))?(g.outerHTML=m,--Wh||Va(!0)):f("transformNodeToObject failed"):document.implementation&&document.implementation.createDocument?(d=new XSLTProcessor,d.importStylesheet(m),(m=d.transformToFragment(h,document))?g.parentNode?(g.parentNode.replaceChild(m,g),--Wh||Va(!0)):f("invalid machine element: "+
|
||||
a):f("transformToFragment failed")):f("unable to transform XML: unsupported browser")):f(d)}):f(d)};"<"!=b.charAt(0)?hi(b,a,d,!0,e,p):ii(b,null,a,d,!1,e,p)}else f("missing machine element: "+a)}catch(w){f(w.message)}return m}window.embedPDP11=function(a,b,c,d){Va(!1);return ki(a,b,c,d)};window.enableEvents=Va;window.sendEvent=Wa;})();//# sourceMappingURL=/tmp/pdpjs/1.30.1/pdp11-dbg.map
|
||||
|
|
|
|||
|
|
@ -92,7 +92,7 @@ g.fa=function(a,b,c,d){this.w=a;this.m=b;this.F=d;for(b=0;b<Rb.length;b++)(c=thi
|
|||
g.Fa=function(){return this.i.Fa||void 0===this.s.run?(Vb(this),!0):!1};g.mb=function(){return 0};function Ub(a){void 0===a.Qa&&(a.Qa=0);void 0===a.sa&&(a.sa=-1);void 0===a.ta&&(a.ta=-1);a.i.Ra=0<=a.Qa&&0<a.sa;a.i.Ra&&(a.Pa=0,a.ia=a.Qa-a.J)}
|
||||
g.V=function(a,b,c){var d=this;switch(b){case "power":case "reset":return this.s[b]=c,!0;case "run":return this.s[b]=c,c.onclick=function(){var a;if(a=d.w)if(a=d.w,a.i.M)a=!0;else{var b=null,c,l=x(a.id);for(c=0;c<l.length&&(b=l[c],b===a||b.i.ready);c++);if(c==l.length)for(c=0;c<l.length&&(b=l[c],b===a||b.i.M);c++);c==l.length&&(b=a);m("The "+b.type+" component ("+b.id+") is not "+(b.i.ready?"powered yet":"ready yet"+(b.Ua?" (waiting for notification)":""))+".");a=!1}a&&(d.i.U?D(d):Vb(d))},!0;case "speed":return this.s[b]=
|
||||
c,!0;case "setSpeed":return this.s[b]=c,c.onclick=function(){Wb(d,d.ea<<1)},c.textContent=this.ga.toFixed(2)+"Mhz",!0}return!1};g.ba=function(){var a=this.s.speed;a&&(a.textContent=this.i.U&&this.ca?this.ca.toFixed(2)+"Mhz":"Stopped")};function Xb(a,b){var c=1;b&&1<a.ea&&a.ca&&(c=a.ca/a.ab);a.qb=Math.round(1E3/30);a.Ta=Math.floor(a.Sa/30*c);b||(a.Ca=a.Ta);a.cb=0}function Yb(a){return a.J+a.W+a.ha-a.a}function Tb(a){a.ca=0;a.rb=0;a.J=a.W=a.ha=a.a=0;Ub(a);Wb(a,1)}
|
||||
function Wb(a,b){if(void 0!==b&&(.8>a.ca/a.ga&&(b=1),a.ea=b,b=a.ab*a.ea,a.ga!=b)){a.ga=b;b=a.ga.toFixed(2)+"Mhz";var c=a.s.setSpeed;c&&(c.textContent=b);a.P("target speed: "+b)}a.J+=a.W;a.W=0;a.O=sa();a.da=0;Xb(a)}function vb(a,b){var c=a.G.length;a.G.push([-1,b]);return c}function xb(a,b,c,d){0<=b&&b<a.G.length&&(d||0>a.G[b][0])&&(c=a.Sa*a.ea/1E3*c|0,a.G[b][0]=c+Zb(a))}function Zb(a,b){var c=a.ha-=a.a;a.a=0;b&&(a.ha=0);return c}
|
||||
function Wb(a,b){if(void 0!==b&&(.8>a.ca/a.ga&&(b=1),a.ea=b,b=a.ab*a.ea,a.ga!=b)){a.ga=b;b=a.ga.toFixed(2)+"Mhz";var c=a.s.setSpeed;c&&(c.textContent=b);a.P("target speed: "+b)}a.J+=a.W;a.W=0;a.O=sa();a.da=0;Xb(a)}function vb(a,b){var c=a.G.length;a.G.push([-1,b]);return c}function xb(a,b,c){0<=b&&b<a.G.length&&0>a.G[b][0]&&(c=a.Sa*a.ea/1E3*c|0,a.G[b][0]=c+Zb(a))}function Zb(a,b){var c=a.ha-=a.a;a.a=0;b&&(a.ha=0);return c}
|
||||
g.tc=function(){if(this.i.U){this.cb>=this.Sa&&Xb(this,!0);this.Da=0;this.Oa=sa();if(this.da){var a=this.Oa-this.da;a>this.qb&&(this.O+=a,this.O>this.Oa&&(this.O=this.Oa))}try{do{for(var b,c=this.i.Ra?1:this.Ta,d=this.G.length-1;0<=d;d--){var e=this.G[d];0>e[0]||c>e[0]&&(c=e[0])}b=c;try{this.xb(b)}catch(n){if("number"!=typeof n)throw n;}b=Zb(this,!0);this.Da+=b;this.W+=b;a=b;if(this.i.Ra){var f=!1;this.Pa=this.Pa+this.mb()|0;this.ia-=a;0>=this.ia&&(this.ia+=this.sa,f=!0);0<=this.ta&&this.ta<=Yb(this)&&
|
||||
(this.sa=this.ta=-1,Ub(this),D(this),f=!0);f&&this.P(Yb(this)+" cycles: checksum="+ja(this.Pa))}for(var a=b,h=this.G.length-1;0<=h;h--){var l=this.G[h];0>l[0]||(l[0]-=a,0>=l[0]&&(l[0]=-1,l[1]()))}this.Ca-=b;if(0>=this.Ca){this.Ca+=this.Ta;15<=++this.rb&&(this.w&&this.w.ba(),this.rb=0);break}}while(this.i.U)}catch(n){D(this);this.w&&this.w.stop(sa(),Yb(this));b=n.stack||n.message;this.i.error=!0;this.K(b);return}if(this.i.U){b=setTimeout;c=this.sb;this.da=sa();d=this.qb;this.Da&&(d=Math.round(d*this.Da/
|
||||
this.Ta));d-=this.da-this.Oa;if(e=this.da-this.O)this.ca=Math.round(this.W/(10*e))/100,864E5<=e&&(this.J=0,Wb(this));if(0>d||this.ca<this.ga)-1E3>d&&(this.O-=d),d=0;this.cb+=this.Da;this.da+=d;b(c,d)}}};function Vb(a){var b;a.i.error?(a.P(a.toString()+" error"),b=!0):b=!1;if(!b)if(a.i.U)a.P(a.toString()+" busy");else{Wb(a);a.i.U=!0;a.i.wb=!0;if(b=a.s.run)b.textContent="Halt";a.w&&a.w.start(a.O,Yb(a));setTimeout(a.sb,0)}}g.xb=function(){return 0};
|
||||
|
|
@ -128,9 +128,9 @@ function zd(){this.v&49152?(this.H|=128,G(this,4,3)):this.F?this.F.c():D(this);t
|
|||
function Fd(a){var b=R(this,a),c=this.a;O(this,wc(this,a,b));this.a=c-Ed[(this.B?8:0)+this.c]+(7!=this.b||this.c?0:2)}function Gd(a){var b=rc(this,a);O(this,vc(this,a,b,1)<<8);this.a-=this.c?9+(this.C&&6<=this.b?1:0):(this.B?5:3)+(7==this.b?2:0)}var Hd=[7,13,13,17,14,18,17,21];
|
||||
function Id(a){var b=uc(this,a);a=a>>6&7;b&32768&&(b|=-65536);var c=this.f[a];c&32768&&(c|=-65536);b=~~(b*c);this.f[a]=b>>16&65535;this.f[a|1]=b&65535;this.l&128||(this.o=b>>16,this.h=this.o|b,this.g=0,this.j=-32768>b||32767<b?65536:0);this.a-=23}function Jd(){this.a-=5}function Kd(){this.v&49152||(dc(this),this.m.reset());this.a-=667}function Ld(){kc(this);this.l|=this.v&16;this.a-=13}function Md(a){if(a&8)G(this,8,6);else{var b=lc(this);a&=7;L(this,this.f[a]);this.f[a]=b;this.a-=9}}
|
||||
function X(a){a&1&&(this.j=65536);a&2&&(this.g=32768);a&4&&(this.h=0);a&8&&(this.o=32768);this.a-=5}function Nd(a){var b=(a&448)>>6;if(this.f[b]=this.f[b]-1&65535)L(this,this.f[7]-((a&63)<<1)),this.a+=1;this.a-=6}function Od(a){T(this,a,R(this,a),Tc);this.a-=this.c?9+(this.C&&6<=this.b?1:0):(this.B?5:3)+(7==this.b?2:0)}function Pd(a){T(this,a,0,Vc);this.a-=this.c?9:3+(7==this.b?2:0)}function Qd(){G(this,28,5);this.a-=5}function Rd(){this.l&4||this.w.ba();this.l|=4;gc(this,-2);this.a-=3}
|
||||
function Sd(a){T(this,a,R(this,a),Wc);this.a-=this.c?9:3+(7==this.b?2:0)}function Y(){G(this,8,6)}function ac(a){Td[a>>12].call(this,a)}function Ud(a){Vd[a>>6&3].call(this,a)}function Wd(a){Xd[a>>6&3].call(this,a)}function Yd(a){Zd[a>>6&3].call(this,a)}function ae(a){be[a&15].call(this,a)}function ce(a){de[a&15].call(this,a)}function ee(a){fe[a>>6&3].call(this,a)}function ge(a){he[a>>6&3].call(this,a)}function ie(a){je[a>>6&3].call(this,a)}
|
||||
function Sd(a){T(this,a,R(this,a),Wc);this.a-=this.c?9:3+(7==this.b?2:0)}function Y(){G(this,8,6)}function ac(a){Td[a>>12].call(this,a)}function Ud(a){Vd[a>>6&3].call(this,a)}function Wd(a){Xd[a>>6&3].call(this,a)}function Yd(a){$d[a>>6&3].call(this,a)}function ae(a){be[a&15].call(this,a)}function ce(a){de[a&15].call(this,a)}function ee(a){fe[a>>6&3].call(this,a)}function ge(a){he[a>>6&3].call(this,a)}function ie(a){je[a>>6&3].call(this,a)}
|
||||
var Td=[function(a){ke[a>>8&15].call(this,a)},Fd,vd,fd,bd,dd,Xc,Y,function(a){le[a>>8&15].call(this,a)},Gd,wd,gd,cd,ed,Od,Y],ke=[function(a){me[a>>4&15].call(this,a)},sd,pd,hd,id,nd,jd,ld,Dd,Dd,Ud,Wd,Yd,Y,Y,Y],Vd=[function(a){P(this,wc(this,a,0));this.a-=this.c?9:3+(7==this.b?2:0)},function(a){T(this,a,0,Hc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){T(this,a,1,Lc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){T(this,a,1,Jc);this.a-=this.c?9:3+(7==this.b?2:0)}],Xd=[function(a){T(this,a,0,Nc);
|
||||
this.a-=this.c?11:6},function(a){T(this,a,N(this)?1:0,xc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){T(this,a,N(this)?1:0,Tc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){a=uc(this,a);P(this,a);this.a-=this.c?4:3+(7==this.b?2:0)}],Zd=[function(a){T(this,a,0,Rc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){T(this,a,0,Pc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){T(this,a,0,Bc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){T(this,a,0,zc);this.a-=this.c?9:3+(7==this.b?2:0)}],me=[function(a){ne[a&
|
||||
this.a-=this.c?11:6},function(a){T(this,a,N(this)?1:0,xc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){T(this,a,N(this)?1:0,Tc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){a=uc(this,a);P(this,a);this.a-=this.c?4:3+(7==this.b?2:0)}],$d=[function(a){T(this,a,0,Rc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){T(this,a,0,Pc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){T(this,a,0,Bc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){T(this,a,0,zc);this.a-=this.c?9:3+(7==this.b?2:0)}],me=[function(a){ne[a&
|
||||
15].call(this,a)},Y,Y,Y,W,W,W,W,Md,Y,ae,ce,Pd,Pd,Pd,Pd],ne=[zd,Rd,Ld,rd,Ad,Kd,Y,Y,Y,Y,Y,Y,Y,Y,Y,Y],be=[Jd,function(){this.j=0;this.a-=5},function(){this.g=0;this.a-=5},V,function(){this.h=1;this.a-=5},V,V,V,function(){this.o=0;this.a-=5},V,V,V,V,V,V,V],de=[Jd,function(){this.j=65536;this.a-=5},function(){this.g=32768;this.a-=5},X,function(){this.h=0;this.a-=5},X,X,X,function(){this.o=32768;this.a-=5},X,X,X,X,X,X,X],le=[qd,od,kd,md,td,ud,$c,ad,yd,Qd,ee,ge,ie,Y,Y,Y],fe=[function(a){P(this,vc(this,a,
|
||||
0));this.a-=this.c?9:3+(7==this.b?2:0)},function(a){S(this,a,0,Ic);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){S(this,a,1,Mc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){S(this,a,1,Kc);this.a-=this.c?9:3+(7==this.b?2:0)}],he=[function(a){S(this,a,0,Oc);this.a-=this.c?11:6},function(a){S(this,a,N(this)?1:0,yc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){S(this,a,N(this)?1:0,Uc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){a=tc(this,a);P(this,a<<8);this.a-=this.c?4:3+(7==this.b?2:0)}],
|
||||
je=[function(a){S(this,a,0,Sc);this.a-=this.c?9+(this.$a&1):3+(7==this.b?2:0)},function(a){S(this,a,0,Qc);this.a-=this.c?9:3+(7==this.b?2:0)},function(a){S(this,a,0,Cc);this.a-=this.c?9+(this.$a&1):3+(7==this.b?2:0)},function(a){S(this,a,0,Ac);this.a-=this.c?9:3+(7==this.b?2:0)}];function bc(a){oe[a>>12].call(this,a)}
|
||||
|
|
@ -156,41 +156,41 @@ this.j="";10!=a&&(this.j+=String.fromCharCode(a))}this.c&=-129;xb(this.a,this.J,
|
|||
function K(a){u.call(this,"PC11",a,K);this.c=a.autoMount||null;this.B=this.u=this.b=this.h=0;this.A=[];this.o=Ge;this.g=He;this.j="";this.C=!Aa("Mobi")&&window&&"FileReader"in window}w(K);var Ge="",He=0;g=K.prototype;
|
||||
g.V=function(a,b,c){var d=this,e=He;switch(b){case "listTapes":return this.s[b]=c,c.onchange=function(){var a=d.s.descTape,b=c.options[c.selectedIndex];if(a&&b){var e={};if(b=b.getAttribute("data-value"))try{e=eval("("+b+")")}catch(n){m("PC11 option error: "+n.message)}b=e.desc;void 0===b&&(b="");e=e.href;void 0!==e&&(b='<a href="'+e+'" target="_blank">'+b+"</a>");a.innerHTML=b}},!0;case "descTape":return this.s[b]=c,!0;case "loadTape":e=2;case "attachTape":return e||(e=1),this.s[b]=c,c.onclick=function(){var a=
|
||||
d.s.listTapes;a&&Ie(d,a.options[a.selectedIndex].text,a.value,e)},!0;case "mountTape":if(this.C)return this.s[b]=c,c.addEventListener("change",function(){var a=c.children[0];a.children[1].disabled=!a.children[0].files.length}),c.onsubmit=function(a){if(a=a.currentTarget[1].files[0]){var b=a.name;Ie(d,ka(b,!0),b,1,a)}return!1},!0;c.parentNode.removeChild(c)}return!1};
|
||||
g.fa=function(a,b,c,d){this.w=a;this.m=b;this.a=c;this.F=d;this.G=Je(a);var e=this;if((this.c=Sb(this.w,"autoMount")||this.c)&&"string"==typeof this.c)try{this.c=eval("("+this.c+")")}catch(f){m("PC11 auto-mount error: "+f.message+" ("+this.c+")"),this.c=null}this.J=yb(56,4);this.I=vb(this.a,function(){Ke(e)});sb(b,this,Le);Me(this,"None",Ge,!0);this.C&&Me(this,"Local Tape","?");Me(this,"Remote Tape","??");Ne(this)||C(this)};
|
||||
g.$=function(a,b){if(!b)if(!a||!this.restore)this.reset();else if(!this.restore(a))return!1;return!0};g.Z=function(a){return a?this.save():!0};g.reset=function(){this.b&=-2241;this.u=0};function Ne(a){a.h=0;if(a.c){var b=a.c.path||"",c;if(!(c=a.c.name))a:{if((c=a.s.listTapes)&&c.options)for(var d=0;d<c.options.length;d++){var e=c.options[d];if(e.value==b){c=e.text;break a}}c=ka(b,!0)}b&&c?Oe(a,c,b,1,!0):Pe(a)}return!!a.h}
|
||||
function Ie(a,b,c,d,e){if(c)if("?"==c)a.K('Use "Choose File" and "Mount" to select and load a local tape.');else{if("??"==c){c=window.prompt("Enter the URL of a remote tape image.","")||"";if(!c)return;b=ka(c);a.status("Attempting to load "+c+' as "'+b+'"');a.o="??"}else a.o=c;Oe(a,b,c,d,!1,e)}else Qe(a,!1)}
|
||||
function Oe(a,b,c,d,e,f){var h=-1;if(a.j.toLowerCase()!=c.toLowerCase()||a.g!=d)h++,Qe(a,!0),a.i.Ya?a.K("PC11 busy"):(e&&a.h++,Re(a,b,c,d,f)?h++:a.i.Ya=!0);h&&a.status(1==a.g?"tape attached":"tape loaded")}
|
||||
function Re(a,b,c,d,e){var f=c;if(e){var h=new FileReader;h.onload=function(){var e=h.result;e&&(e=new Uint8Array(e,0,e.byteLength),Se(a,b,c,d,e),a.o="?");Pe(a)};h.readAsArrayBuffer(e);return!0}0>c.indexOf("/api/v1/dump")&&(e=la(c),f="json"==e||"gz"==e?encodeURI(c):na()+"/api/v1/dump?path="+encodeURIComponent(c)+"&format=json");return!!k(f,null,!0,function(e,f,h){var l=0>h&&a.w&&!a.w.i.M;h?a.K('Unable to load tape "'+b+'" (error '+h+": "+e+")",l):(Pa(a.ra,e,f),(e=ua(e,f))&&Se(a,b,c,d,e.L,e.va,e.ua));
|
||||
a.i.Ya=!1;a.h&&(a.h--,a.h||C(a));Pe(a)})}function Me(a,b,c,d){if((a=a.s.listTapes)&&a.options){for(var e=0;e<a.options.length;e++)if(a.options[e].value==c)return;e=document.createElement("option");e.text=b;e.value=c;d&&a.childNodes[0]?a.insertBefore(e,a.childNodes[0]):a.appendChild(e)}}function Pe(a){var b=a.s.listTapes;if(b&&b.options){a=a.o||a.j;for(var c=0;c<b.options.length;c++)if(b.options[c].value==a){b.selectedIndex!=c&&(b.selectedIndex=c);break}c==b.options.length&&(b.selectedIndex=0)}}
|
||||
function Se(a,b,c,d,e,f,h){a.j=c;a.g=d;2==d?a.G&&Ae(a.G,e,f,h)?a.status("tape loaded: "+b):(a.j="",a.o=Ge,a.g=He,a.status("error loading tape: "+b)):(a.B=0,a.A=e,a.status("tape attached: "+b))}function Qe(a,b){if(a.j||!1===b)a.j="",b||(a.g&&a.status(1==a.g?"tape detached":"tape unloaded"),a.o=Ge,a.g=He,Pe(a))}g.save=function(){return(new M(this)).data()};g.restore=function(){return!0};
|
||||
function Ke(a){1==(a.b&32769)&&!(a.b&128)&&a.B<a.A.length&&(a.u=a.A[a.B++]&255,a.b|=128,a.b&=-2049,a.b&64&&wb(a.a,a.J),xb(a.a,a.I,1E3/300,!0))}g.Yb=function(){return this.b&65534};g.Kc=function(a){a&1&&(this.b&32768?a&=-2:(this.b&=-129,this.b|=2048,this.u=0));this.b=this.b&-66|a&65;Ke(this)};g.Xb=function(){this.b&=-129;this.b|=2048;return this.u};g.Jc=function(){};var Te={},Le=(Te[65384]=[null,null,K.prototype.Yb,K.prototype.Kc,"PRS"],Te[65386]=[null,null,K.prototype.Xb,K.prototype.Jc,"PRB"],Te);
|
||||
function Ue(a,b,c){u.call(this,"Computer",a,Ue);this.i.M=!1;Ve(this,b);this.B=Sb(this,"autoPower",a);this.g=0;this.N=a.busWidth||a.buswidth;this.b=We;this.u=null;this.o=this.I=!1;this.O=Sb(this,"url")||"";(Math.random()+.1).toString(36);this.c=Xe(this);if(this.a=Ra("CPU",this.id)){this.F=Ra("Debugger",this.id);this.m=new Za({id:this.ra+".bus",busWidth:this.N},this.a,this.F);var d,e=x(this.id);if((this.h=Ra("Panel",this.id))&&this.h.Za)for(b=0;b<e.length;b++)d=e[b],d.K=this.h.K,d.P=this.h.P,d.Za=this.h.Za;
|
||||
this.P("PDPjs v1.30.1\nCopyright \u00a9 2012-2016 Jeff Parsons <Jeff@pcjs.org>\nLicense: GPL version 3 or later <http://gnu.org/licenses/gpl.html>");this.P("Portions adapted from the PDP-11/70 Emulator v1.4 by Paul Nankervis <paulnank@hotmail.com>");for(b=0;b<e.length;b++)d=e[b],d.fa&&d.fa(this,this.m,this.a,this.F);b=null;d=a.resume;void 0!==d&&(1<d.length?b=this.w=d:this.b=parseInt(d,10));var f;if(a=Sb(this,"state")||(f=!0,a.state))b=this.C=a,f||(this.o=!0,this.b=We),this.b&&(this.A=new M(this,
|
||||
"1.30.1"),Ye(this.A)?b=null:delete this.A);!b&&this.b&&(b=Ze(this))&&(this.o=!0);if(b){var h=this;k(b,null,!0,function(a,b,c){c?(h.w=null,h.o=!1,h.K("Unable to load machine state from server (error "+c+(b?": "+qa(b):"")+")")):(h.u=b,h.I=!0);C(h)})}else C(this);this.s.power||(this.B=!0);!c&&this.B&&$e(this,this.Ha)}else m("Unable to find CPU component")}w(Ue);var We=0;
|
||||
function Ve(a,b){if(!b){var c;if("object"==typeof resources&&(c=resources.parms))try{b=eval("("+c+")")}catch(d){m(d.message+" ("+c+")")}}a.J=b}function Sb(a,b,c){var d=b.toLowerCase(),d=Ja[b]||Ja[d];void 0===d&&a.J&&(d=a.J[b]);void 0===d&&c&&(d=c[b]);void 0===d&&"object"==typeof resources&&resources[b]&&(d=b);return d}function $e(a,b,c){for(var d=x(a.id),e=0;e<=d.length;e++){var f=e<d.length?d[e]:a;if(!Sa(f)){Sa(f,function(){$e(a,b,c)});return}}b.call(a,c)}
|
||||
function af(a,b){var c=new M(a,"1.30.1","validate");if(Ye(c)&&bf(c)){var d=c.get("timestamp"),e=b?b.get("timestamp"):"unknown";d!=e&&(a.K("Machine state may be out-of-date\n("+d+" vs. "+e+")\nCheck your browser's local storage limits"),b||c.clear())}}g=Ue.prototype;
|
||||
g.Ha=function(a){void 0===a&&(a=this.b||(this.u?1:We));if(!this.g){this.g++;var b=!1,c=!1;this.G=!1;var d=this.A||new M(this,"1.30.1");if(-1==a)b=!0;else if(a>We){if(Ye(d,this.u)){this.j=new M(this,"1.30.1","failsafe");Ye(this.j)&&(cf(this,d),a=2,df(this.j));this.j.set("timestamp",ta());ef(this.j);var e=this.b&&!this.o;if(1==a||va("Click OK to restore the previous PDPjs machine state, or CANCEL to reset the machine.")){if(c=bf(d)){var f=d.get("code"),h=d.get("data");f&&("ok"==f?Ye(d,h):("error"==
|
||||
f&&"no machine state"!=h?(this.K("Error: "+h),"unable to verify user"==h&&(za("user",""),this.c=null)):this.P(f+": "+h),df(d),Ye(d)?(c=bf(d),e=!0):c=!1))}e&&af(this,c?d:null)}else 2==a&&d.clear()}else af(this);delete this.u;delete this.A}e=x(this.id);for(f=0;f<e.length;f++)h=e[f],h!==this&&h!=this.a&&(c=ff(this,h,d,b,c));b=[d,a,c];-1!=a?$e(this,this.lb,b):this.lb(b)}};
|
||||
function ff(a,b,c,d,e){if(!b.i.M){b.i.M=!0;if(b.$){var f=null;e&&((f=c.get(b.id))||(f=c.get(b.id.replace(/[a-z0-9]\./i,"."))));"string"===typeof f&&(f=null);!b.$(f,d)&&f&&(m("Unable to restore state for "+b.type),a.C&&!a.I?(c.clear(),a.b=We,window&&window.location.reload()):a.G=!0,b.$(null),e=!1)}if(!d&&b.pb)for(a=b.pb.split("|"),c=0;c<a.length;c++)b.status(a[c])}return e}
|
||||
g.lb=function(a){var b=a[0],c=0>a[1];a=a[2];this.T=!0;this.i.M=!0;var d=this.s.power;d&&(d.textContent="Shutdown");this.a&&(ff(this,this.a,b,c,a),this.a.Fa());this.G&&(cf(this,b),b.clear());!c&&this.j&&(this.j.clear(),delete this.j);this.g=0};
|
||||
function cf(a,b){if(va("There may be a problem with your PDPjs machine.\n\nTo help us diagnose it, click OK to send this PDPjs machine state to http://www.pcjs.org.")){var c=a.c||"";b=b.toString();var d={app:"PDPjs",ver:"1.30.1"};d.url=a.O;d.user=c;d.type="bug";d.data=b;k("http://www.pcjs.org/api/v1/report",d,!0)}}
|
||||
function gf(a,b,c){var d,e="none";if(a.g)return null;a.g--;var f=new M(a,"1.30.1"),h=new M(a,"1.30.1","validate"),l=ta();h.set("timestamp",l);f.set("timestamp",l);f.set("version","1.30.1");f.set("url",window?window.location.href:null);f.set("browser",window?window.navigator.userAgent:"");a.a&&a.a.Z&&(c&&D(a.a),d=a.a.Z(b,c),"object"===typeof d&&f.set(a.a.id,d),c&&(a.a.i.M=!1,!1===d&&(e=null)));for(var l=x(a.id),n=0;n<l.length;n++){var r=l[n];r.i.M&&(r.Z&&(d=r.Z(b,c),"object"===typeof d&&f.set(r.id,
|
||||
d)),c&&(r.i.M=!1,!1===d&&(e=null)))}e&&(c?(l=d=!1,b?(a.c&&hf(a,a.c,f.toString()),ef(h)&&ef(f)||(e=null,d=l=!0)):a.b&&(d=!0,l=3==a.b),d&&f.clear(l)):e=f.toString());c&&(a.i.M=!1,b=a.s.power)&&(b.textContent="Power");a.g=0;return e}g.reset=function(){this.m&&this.m.reset&&this.m.reset();for(var a=x(this.id),b=0;b<a.length;b++){var c=a[b];c!==this&&c!==this.m&&c.reset&&c.reset()}};g.start=function(a,b){for(var c=x(this.id),d=0;d<c.length;d++){var e=c[d];"CPU"!=e.type&&e!==this&&e.start&&e.start(a,b)}this.ba(!0)};
|
||||
g.fa=function(a,b,c,d){this.w=a;this.m=b;this.a=c;this.F=d;this.G=Je(a);var e=this;if((this.c=Sb(this.w,"autoMount")||this.c)&&"string"==typeof this.c)try{this.c=eval("("+this.c+")")}catch(f){m("PC11 auto-mount error: "+f.message+" ("+this.c+")"),this.c=null}this.I=yb(56,4);this.J=vb(this.a,function(){1==(e.b&32769)&&!(e.b&128)&&e.B<e.A.length&&(e.u=e.A[e.B++]&255,e.b|=128,e.b&=-2049,e.b&64&&wb(e.a,e.I))});sb(b,this,Ke);Le(this,"None",Ge,!0);this.C&&Le(this,"Local Tape","?");Le(this,"Remote Tape",
|
||||
"??");Me(this)||C(this)};g.$=function(a,b){if(!b)if(!a||!this.restore)this.reset();else if(!this.restore(a))return!1;return!0};g.Z=function(a){return a?this.save():!0};g.reset=function(){this.b&=-2241;this.u=0};function Me(a){a.h=0;if(a.c){var b=a.c.path||"",c;if(!(c=a.c.name))a:{if((c=a.s.listTapes)&&c.options)for(var d=0;d<c.options.length;d++){var e=c.options[d];if(e.value==b){c=e.text;break a}}c=ka(b,!0)}b&&c?Ne(a,c,b,1,!0):Oe(a)}return!!a.h}
|
||||
function Ie(a,b,c,d,e){if(c)if("?"==c)a.K('Use "Choose File" and "Mount" to select and load a local tape.');else{if("??"==c){c=window.prompt("Enter the URL of a remote tape image.","")||"";if(!c)return;b=ka(c);a.status("Attempting to load "+c+' as "'+b+'"');a.o="??"}else a.o=c;Ne(a,b,c,d,!1,e)}else Pe(a,!1)}
|
||||
function Ne(a,b,c,d,e,f){var h=-1;if(a.j.toLowerCase()!=c.toLowerCase()||a.g!=d)h++,Pe(a,!0),a.i.Ya?a.K("PC11 busy"):(e&&a.h++,Qe(a,b,c,d,f)?h++:a.i.Ya=!0);h&&a.status(1==a.g?"tape attached":"tape loaded")}
|
||||
function Qe(a,b,c,d,e){var f=c;if(e){var h=new FileReader;h.onload=function(){var e=h.result;e&&(e=new Uint8Array(e,0,e.byteLength),Re(a,b,c,d,e),a.o="?");Oe(a)};h.readAsArrayBuffer(e);return!0}0>c.indexOf("/api/v1/dump")&&(e=la(c),f="json"==e||"gz"==e?encodeURI(c):na()+"/api/v1/dump?path="+encodeURIComponent(c)+"&format=json");return!!k(f,null,!0,function(e,f,h){var l=0>h&&a.w&&!a.w.i.M;h?a.K('Unable to load tape "'+b+'" (error '+h+": "+e+")",l):(Pa(a.ra,e,f),(e=ua(e,f))&&Re(a,b,c,d,e.L,e.va,e.ua));
|
||||
a.i.Ya=!1;a.h&&(a.h--,a.h||C(a));Oe(a)})}function Le(a,b,c,d){if((a=a.s.listTapes)&&a.options){for(var e=0;e<a.options.length;e++)if(a.options[e].value==c)return;e=document.createElement("option");e.text=b;e.value=c;d&&a.childNodes[0]?a.insertBefore(e,a.childNodes[0]):a.appendChild(e)}}function Oe(a){var b=a.s.listTapes;if(b&&b.options){a=a.o||a.j;for(var c=0;c<b.options.length;c++)if(b.options[c].value==a){b.selectedIndex!=c&&(b.selectedIndex=c);break}c==b.options.length&&(b.selectedIndex=0)}}
|
||||
function Re(a,b,c,d,e,f,h){a.j=c;a.g=d;2==d?a.G&&Ae(a.G,e,f,h)?a.status("tape loaded: "+b):(a.j="",a.o=Ge,a.g=He,a.status("error loading tape: "+b)):(a.B=0,a.A=e,a.status("tape attached: "+b))}function Pe(a,b){if(a.j||!1===b)a.j="",b||(a.g&&a.status(1==a.g?"tape detached":"tape unloaded"),a.o=Ge,a.g=He,Oe(a))}g.save=function(){return(new M(this)).data()};g.restore=function(){return!0};g.Yb=function(){return this.b&65534};
|
||||
g.Kc=function(a){a&1&&(this.b&32768?(a&=-2,this.b&64&&wb(this.a,this.I)):(this.b&=-129,this.b|=2048,this.u=0,xb(this.a,this.J,1E3/300)));this.b=this.b&-66|a&65};g.Xb=function(){this.b&=-129;this.b|=2048;return this.u};g.Jc=function(){};var Se={},Ke=(Se[65384]=[null,null,K.prototype.Yb,K.prototype.Kc,"PRS"],Se[65386]=[null,null,K.prototype.Xb,K.prototype.Jc,"PRB"],Se);
|
||||
function Te(a,b,c){u.call(this,"Computer",a,Te);this.i.M=!1;Ue(this,b);this.B=Sb(this,"autoPower",a);this.g=0;this.N=a.busWidth||a.buswidth;this.b=Ve;this.u=null;this.o=this.I=!1;this.O=Sb(this,"url")||"";(Math.random()+.1).toString(36);this.c=We(this);if(this.a=Ra("CPU",this.id)){this.F=Ra("Debugger",this.id);this.m=new Za({id:this.ra+".bus",busWidth:this.N},this.a,this.F);var d,e=x(this.id);if((this.h=Ra("Panel",this.id))&&this.h.Za)for(b=0;b<e.length;b++)d=e[b],d.K=this.h.K,d.P=this.h.P,d.Za=this.h.Za;
|
||||
this.P("PDPjs v1.30.1\nCopyright \u00a9 2012-2016 Jeff Parsons <Jeff@pcjs.org>\nLicense: GPL version 3 or later <http://gnu.org/licenses/gpl.html>");this.P("Portions adapted from the PDP-11/70 Emulator v1.4 by Paul Nankervis <paulnank@hotmail.com>");for(b=0;b<e.length;b++)d=e[b],d.fa&&d.fa(this,this.m,this.a,this.F);b=null;d=a.resume;void 0!==d&&(1<d.length?b=this.w=d:this.b=parseInt(d,10));var f;if(a=Sb(this,"state")||(f=!0,a.state))b=this.C=a,f||(this.o=!0,this.b=Ve),this.b&&(this.A=new M(this,
|
||||
"1.30.1"),Xe(this.A)?b=null:delete this.A);!b&&this.b&&(b=Ye(this))&&(this.o=!0);if(b){var h=this;k(b,null,!0,function(a,b,c){c?(h.w=null,h.o=!1,h.K("Unable to load machine state from server (error "+c+(b?": "+qa(b):"")+")")):(h.u=b,h.I=!0);C(h)})}else C(this);this.s.power||(this.B=!0);!c&&this.B&&Ze(this,this.Ha)}else m("Unable to find CPU component")}w(Te);var Ve=0;
|
||||
function Ue(a,b){if(!b){var c;if("object"==typeof resources&&(c=resources.parms))try{b=eval("("+c+")")}catch(d){m(d.message+" ("+c+")")}}a.J=b}function Sb(a,b,c){var d=b.toLowerCase(),d=Ja[b]||Ja[d];void 0===d&&a.J&&(d=a.J[b]);void 0===d&&c&&(d=c[b]);void 0===d&&"object"==typeof resources&&resources[b]&&(d=b);return d}function Ze(a,b,c){for(var d=x(a.id),e=0;e<=d.length;e++){var f=e<d.length?d[e]:a;if(!Sa(f)){Sa(f,function(){Ze(a,b,c)});return}}b.call(a,c)}
|
||||
function $e(a,b){var c=new M(a,"1.30.1","validate");if(Xe(c)&&af(c)){var d=c.get("timestamp"),e=b?b.get("timestamp"):"unknown";d!=e&&(a.K("Machine state may be out-of-date\n("+d+" vs. "+e+")\nCheck your browser's local storage limits"),b||c.clear())}}g=Te.prototype;
|
||||
g.Ha=function(a){void 0===a&&(a=this.b||(this.u?1:Ve));if(!this.g){this.g++;var b=!1,c=!1;this.G=!1;var d=this.A||new M(this,"1.30.1");if(-1==a)b=!0;else if(a>Ve){if(Xe(d,this.u)){this.j=new M(this,"1.30.1","failsafe");Xe(this.j)&&(bf(this,d),a=2,cf(this.j));this.j.set("timestamp",ta());df(this.j);var e=this.b&&!this.o;if(1==a||va("Click OK to restore the previous PDPjs machine state, or CANCEL to reset the machine.")){if(c=af(d)){var f=d.get("code"),h=d.get("data");f&&("ok"==f?Xe(d,h):("error"==
|
||||
f&&"no machine state"!=h?(this.K("Error: "+h),"unable to verify user"==h&&(za("user",""),this.c=null)):this.P(f+": "+h),cf(d),Xe(d)?(c=af(d),e=!0):c=!1))}e&&$e(this,c?d:null)}else 2==a&&d.clear()}else $e(this);delete this.u;delete this.A}e=x(this.id);for(f=0;f<e.length;f++)h=e[f],h!==this&&h!=this.a&&(c=ef(this,h,d,b,c));b=[d,a,c];-1!=a?Ze(this,this.lb,b):this.lb(b)}};
|
||||
function ef(a,b,c,d,e){if(!b.i.M){b.i.M=!0;if(b.$){var f=null;e&&((f=c.get(b.id))||(f=c.get(b.id.replace(/[a-z0-9]\./i,"."))));"string"===typeof f&&(f=null);!b.$(f,d)&&f&&(m("Unable to restore state for "+b.type),a.C&&!a.I?(c.clear(),a.b=Ve,window&&window.location.reload()):a.G=!0,b.$(null),e=!1)}if(!d&&b.pb)for(a=b.pb.split("|"),c=0;c<a.length;c++)b.status(a[c])}return e}
|
||||
g.lb=function(a){var b=a[0],c=0>a[1];a=a[2];this.T=!0;this.i.M=!0;var d=this.s.power;d&&(d.textContent="Shutdown");this.a&&(ef(this,this.a,b,c,a),this.a.Fa());this.G&&(bf(this,b),b.clear());!c&&this.j&&(this.j.clear(),delete this.j);this.g=0};
|
||||
function bf(a,b){if(va("There may be a problem with your PDPjs machine.\n\nTo help us diagnose it, click OK to send this PDPjs machine state to http://www.pcjs.org.")){var c=a.c||"";b=b.toString();var d={app:"PDPjs",ver:"1.30.1"};d.url=a.O;d.user=c;d.type="bug";d.data=b;k("http://www.pcjs.org/api/v1/report",d,!0)}}
|
||||
function ff(a,b,c){var d,e="none";if(a.g)return null;a.g--;var f=new M(a,"1.30.1"),h=new M(a,"1.30.1","validate"),l=ta();h.set("timestamp",l);f.set("timestamp",l);f.set("version","1.30.1");f.set("url",window?window.location.href:null);f.set("browser",window?window.navigator.userAgent:"");a.a&&a.a.Z&&(c&&D(a.a),d=a.a.Z(b,c),"object"===typeof d&&f.set(a.a.id,d),c&&(a.a.i.M=!1,!1===d&&(e=null)));for(var l=x(a.id),n=0;n<l.length;n++){var r=l[n];r.i.M&&(r.Z&&(d=r.Z(b,c),"object"===typeof d&&f.set(r.id,
|
||||
d)),c&&(r.i.M=!1,!1===d&&(e=null)))}e&&(c?(l=d=!1,b?(a.c&&gf(a,a.c,f.toString()),df(h)&&df(f)||(e=null,d=l=!0)):a.b&&(d=!0,l=3==a.b),d&&f.clear(l)):e=f.toString());c&&(a.i.M=!1,b=a.s.power)&&(b.textContent="Power");a.g=0;return e}g.reset=function(){this.m&&this.m.reset&&this.m.reset();for(var a=x(this.id),b=0;b<a.length;b++){var c=a[b];c!==this&&c!==this.m&&c.reset&&c.reset()}};g.start=function(a,b){for(var c=x(this.id),d=0;d<c.length;d++){var e=c[d];"CPU"!=e.type&&e!==this&&e.start&&e.start(a,b)}this.ba(!0)};
|
||||
g.stop=function(a,b){for(var c=x(this.id),d=0;d<c.length;d++){var e=c[d];"CPU"!=e.type&&e!==this&&e.stop&&e.stop(a,b)}this.ba(!0)};
|
||||
g.V=function(a,b,c){var d=this;switch(b){case "power":return this.s[b]=c,c.onclick=function(){d.g||(d.i.M?gf(d,!1,!0):$e(d,d.Ha))},!0;case "reset":return this.s[b]=c,c.onclick=function(){if(d.i.M&&!d.g)if(d.b&&!d.w){var a=va("Click OK to save changes to this PDPjs machine.\n\nWARNING: If you CANCEL, all disk changes will be discarded.");gf(d,a,!0);!a&&d.C?window&&window.location.reload():d.Ha(We)}else d.reset(),d.a&&d.a.Fa()},!0;case "save":if(ma())c.parentNode.removeChild(c);else return this.s[b]=
|
||||
c,c.onclick=function(){var a=Xe(d,!0);if(a){var b=!!(d.b&&!d.w||d.C),c=gf(d,b);b?hf(d,a,c):d.K("Resume disabled, machine state not saved")}},!0}return!1};
|
||||
function Xe(a,b){var c=a.c;c||((c=ya("user"),void 0!==c)?!c&&b&&(b=null,window&&(b=window.prompt("Saving machine states on the pcjs.org server is currently unsupported.\n\nIf you're running your own server, enter your user ID below.","")),c=b)&&((c=jf(a,c))||a.K("The user ID is invalid.")):b&&a.K("Browser local storage is not available"));return c}
|
||||
function jf(a,b){a.c=null;b=k(na()+"/api/v1/user?req=verify&user="+b);var c=b[1];if(!b[0]&&c)try{b=eval("("+c+")"),b.code&&"ok"==b.code&&(za("user",b.data),a.c=b.data)}catch(d){m(d.message+" ("+c+")")}return a.c}function Ze(a){var b=null;a.c&&(b=na()+"/api/v1/user?req=load&user="+a.c+"&state="+kf(a,"1.30.1"));return b}
|
||||
function hf(a,b,c){if(c){var d={req:"store"};d.user=b;d.state=kf(a,"1.30.1");d.data=c;b=k(na()+"/api/v1/user",d);d=b[0];if(b[1]){if(d){var e=d.indexOf("\n");0<e&&(d=d.substr(0,e));d.indexOf("Error: ")||(d=d.substr(7))}d='{"code":'+b[1]+',"data":"'+d+'"}'}b=JSON.parse(d);b&&"ok"==b.code?a.K("Machine state saved to server"):c&&(c=b&&b.data||"unable to save machine state",c="error"==b.code?"Error: "+c:"Error "+b.code+": "+c,a.K(c),za("user",""),a.c=null)}}
|
||||
function Je(a){var b;a=x(a.id);for(var c=0;c<a.length;c++){var d=a[c];if(b)b==d&&(b=null);else if("RAM"==d.type)return d}return null}g.ba=function(a){this.a&&this.a.ba(a);this.h&&this.h.ba(a)};q(function(){for(var a=B(document,"pdp11-machine"),b=0;b<a.length;b++)for(var c=a[b],d=z(c),c=B(c,"pdp11","computer"),e=0;e<c.length;e++){var f=c[e],h=z(f),h=new Ue(h,d,!0);A(h,f);h.B&&$e(h,h.Ha)}});
|
||||
p.show.push(function(){for(var a=B(document,"pdp11","computer"),b=0;b<a.length;b++){var c=z(a[b]);(c=Ra("Computer",c.id))&&c.T&&!c.i.M&&c.Ha(-1)}});p.exit.push(function(){for(var a=B(document,"pdp11","computer"),b=0;b<a.length;b++){var c=z(a[b]);(c=Ra("Computer",c.id))&&c.i.M&&gf(c,!(!c.b||c.w),!0)}});function M(a,b,c){this.id=a.id;this.key=kf(a,b,c);this.F=a.F;df(this,a.Hb)}function kf(a,b,c){a=a.id;if(b){var d=b.indexOf(".");0<d&&(a+=".v"+b.substr(0,d))}c&&(a+="."+c);return a}
|
||||
M.prototype={constructor:M,set:function(a,b){try{this[this.id][a]=b}catch(c){}},get:function(a){return this[this.id][a]||null},value:function(){return this[this.id]},data:function(){return this[this.id]},toString:function(){var a=this[this.id];return"string"==typeof a?a:JSON.stringify(a)},clear:function(a){df(this);var b=[];try{for(var c=0,d=window.localStorage.length;c<d;c++)b.push(window.localStorage.key(c))}catch(e){}for(c=0;c<b.length;c++)if((d=b[c])&&(a||d.substr(0,this.key.length)==this.key)){try{window.localStorage.removeItem(d)}catch(e){}b.splice(c,
|
||||
1);c=0}}};function df(a,b){a[a.id]={};b&&a.set("parms",b);a.a=!1}function ef(a){var b=!0;if(xa()){var c=JSON.stringify(a[a.id]);za(a.key,c)||(m("Unable to store "+c.length+" bytes in browser local storage"),b=!1)}return b}function bf(a){var b=!0;try{a[a.id]=JSON.parse(a[a.id])}catch(c){m(c.message||c),b=!1}return b}function Ye(a,b){return b?(a[a.id]=b,a.a=!0):a.a?!0:xa()&&(b=ya(a.key))?(a[a.id]=b,a.a=!0):!1}var lf=0;
|
||||
function mf(a,b,c,d,e,f){e("Loading "+a+"...");k(a,null,!0,function(h,l,n){n?(l||(l="unable to load "+a+" ("+n+")"),f(l,null)):nf(l,a,b,c,d,e,f)})}
|
||||
function nf(a,b,c,d,e,f,h){function l(a,f){if(f)h(f,null);else{c&&(Pa(c,b,a),(f=b)&&0>f.indexOf("/")&&"/"==window.location.pathname.slice(-1)&&(f=window.location.pathname+f),d?"}"==d.slice(-1)?(d=d.slice(0,-1),1<d.length&&(d+=",")):d='{state:"'+d+'",':d="{",d+='url:"'+f+'"}',"object"==typeof resources&&(f=null),a=a.replace(/(<machine[^>]*\sid=)(['"]).*?\2/,"$1$2"+c+"$2"+(d?" parms='"+d+"'":"")+(f?' url="'+f+'"':"")));e||(a=a.replace(/(<xsl:variable name="APPNAME">).*?(<\/xsl:variable>)/,"$1PDPjs$2"),
|
||||
a=a.replace(/(<xsl:variable name="APPCLASS">).*?(<\/xsl:variable>)/,"$1pdp11$2"));f=null;if("<"==a.charAt(0))try{e||(a=a.replace(/<!DOCTYPE(.|[\r\n])*]>\s*/g,"")),window.ActiveXObject||"ActiveXObject"in window?(f=new window.ActiveXObject("Microsoft.XMLDOM"),f.async=!1,f.loadXML(a)):f=(new window.DOMParser).parseFromString(a,"text/xml")}catch(t){f=null,a=t.message}else a="unrecognized XML: "+(255<a.length?a.substr(0,255)+"...":a);h(a,f)}}a?e?of(a,f,l):l(a,null):h("no data"+(b?" for file: "+b:""),null)}
|
||||
function of(a,b,c){var d;if(d=/<([a-z]+)\s+ref="(.*?)"(.*?)\/>/g.exec(a)){var e=d[2];b("Loading "+e+"...");k(e,null,!0,function(f,h,l){if(l||!h)c(a,"unable to resolve XML reference: "+d[0]+" ("+l+")");else{if(f=d[3])if(l=h.match(new RegExp("<"+d[1]+"[^>]*>"))){for(var n=l[0],r,t=/( [a-z]+=)(['"])(.*?)\2/g;r=t.exec(f);)n=0>n.indexOf(r[1])?n.replace(">",r[0]+">"):n.replace(new RegExp(r[1]+"(['\"])(.*?)\\1"),r[0]);l[0]!=n&&(h=h.replace(l[0],n))}else{c(a,"missing <"+d[1]+"> in "+e);return}h=h.replace(/<\?xml[^>]*>[\r\n]*/,
|
||||
"");a=a.replace(d[0],h);of(a,b,c)}})}else c(a,null)}
|
||||
function pf(a,b,c,d){function e(a){if(void 0===l){var b=h&&B(h,"machine-warning");l=b&&b[0]||h}l&&(l.innerHTML=pa(a))}function f(a){e("Error: "+a);n&&(--lf||Ga(!0));n=!1}var h,l,n=!0;lf++;Oa[a]={};try{if(h=document.getElementById(a)){var r;if("object"==typeof resources&&(r=resources.css)){var t=document.head||document.getElementsByTagName("head")[0],y=document.createElement("style");y.type="text/css";y.styleSheet?y.styleSheet.cssText=r:y.appendChild(document.createTextNode(r));t.appendChild(y)}c||
|
||||
(c="/versions/pdpjs/1.30.1/components.xsl");r=function(d,l){l?mf(c,null,null,!1,e,function(d,n){n?(Pa(a,c,d),e("Processing "+b+"..."),window.ActiveXObject||"ActiveXObject"in window?(n=l.transformNode(n))?(h.outerHTML=n,--lf||Ga(!0)):f("transformNodeToObject failed"):document.implementation&&document.implementation.createDocument?(d=new XSLTProcessor,d.importStylesheet(n),(n=d.transformToFragment(l,document))?h.parentNode?(h.parentNode.replaceChild(n,h),--lf||Ga(!0)):f("invalid machine element: "+
|
||||
a):f("transformToFragment failed")):f("unable to transform XML: unsupported browser")):f(d)}):f(d)};"<"!=b.charAt(0)?mf(b,a,d,!0,e,r):nf(b,null,a,d,!1,e,r)}else f("missing machine element: "+a)}catch($d){f($d.message)}return n}window.embedPDP11=function(a,b,c,d){Ga(!1);return pf(a,b,c,d)};window.enableEvents=Ga;window.sendEvent=Ha;})();//# sourceMappingURL=/tmp/pdpjs/1.30.1/pdp11.map
|
||||
g.V=function(a,b,c){var d=this;switch(b){case "power":return this.s[b]=c,c.onclick=function(){d.g||(d.i.M?ff(d,!1,!0):Ze(d,d.Ha))},!0;case "reset":return this.s[b]=c,c.onclick=function(){if(d.i.M&&!d.g)if(d.b&&!d.w){var a=va("Click OK to save changes to this PDPjs machine.\n\nWARNING: If you CANCEL, all disk changes will be discarded.");ff(d,a,!0);!a&&d.C?window&&window.location.reload():d.Ha(Ve)}else d.reset(),d.a&&d.a.Fa()},!0;case "save":if(ma())c.parentNode.removeChild(c);else return this.s[b]=
|
||||
c,c.onclick=function(){var a=We(d,!0);if(a){var b=!!(d.b&&!d.w||d.C),c=ff(d,b);b?gf(d,a,c):d.K("Resume disabled, machine state not saved")}},!0}return!1};
|
||||
function We(a,b){var c=a.c;c||((c=ya("user"),void 0!==c)?!c&&b&&(b=null,window&&(b=window.prompt("Saving machine states on the pcjs.org server is currently unsupported.\n\nIf you're running your own server, enter your user ID below.","")),c=b)&&((c=hf(a,c))||a.K("The user ID is invalid.")):b&&a.K("Browser local storage is not available"));return c}
|
||||
function hf(a,b){a.c=null;b=k(na()+"/api/v1/user?req=verify&user="+b);var c=b[1];if(!b[0]&&c)try{b=eval("("+c+")"),b.code&&"ok"==b.code&&(za("user",b.data),a.c=b.data)}catch(d){m(d.message+" ("+c+")")}return a.c}function Ye(a){var b=null;a.c&&(b=na()+"/api/v1/user?req=load&user="+a.c+"&state="+jf(a,"1.30.1"));return b}
|
||||
function gf(a,b,c){if(c){var d={req:"store"};d.user=b;d.state=jf(a,"1.30.1");d.data=c;b=k(na()+"/api/v1/user",d);d=b[0];if(b[1]){if(d){var e=d.indexOf("\n");0<e&&(d=d.substr(0,e));d.indexOf("Error: ")||(d=d.substr(7))}d='{"code":'+b[1]+',"data":"'+d+'"}'}b=JSON.parse(d);b&&"ok"==b.code?a.K("Machine state saved to server"):c&&(c=b&&b.data||"unable to save machine state",c="error"==b.code?"Error: "+c:"Error "+b.code+": "+c,a.K(c),za("user",""),a.c=null)}}
|
||||
function Je(a){var b;a=x(a.id);for(var c=0;c<a.length;c++){var d=a[c];if(b)b==d&&(b=null);else if("RAM"==d.type)return d}return null}g.ba=function(a){this.a&&this.a.ba(a);this.h&&this.h.ba(a)};q(function(){for(var a=B(document,"pdp11-machine"),b=0;b<a.length;b++)for(var c=a[b],d=z(c),c=B(c,"pdp11","computer"),e=0;e<c.length;e++){var f=c[e],h=z(f),h=new Te(h,d,!0);A(h,f);h.B&&Ze(h,h.Ha)}});
|
||||
p.show.push(function(){for(var a=B(document,"pdp11","computer"),b=0;b<a.length;b++){var c=z(a[b]);(c=Ra("Computer",c.id))&&c.T&&!c.i.M&&c.Ha(-1)}});p.exit.push(function(){for(var a=B(document,"pdp11","computer"),b=0;b<a.length;b++){var c=z(a[b]);(c=Ra("Computer",c.id))&&c.i.M&&ff(c,!(!c.b||c.w),!0)}});function M(a,b,c){this.id=a.id;this.key=jf(a,b,c);this.F=a.F;cf(this,a.Hb)}function jf(a,b,c){a=a.id;if(b){var d=b.indexOf(".");0<d&&(a+=".v"+b.substr(0,d))}c&&(a+="."+c);return a}
|
||||
M.prototype={constructor:M,set:function(a,b){try{this[this.id][a]=b}catch(c){}},get:function(a){return this[this.id][a]||null},value:function(){return this[this.id]},data:function(){return this[this.id]},toString:function(){var a=this[this.id];return"string"==typeof a?a:JSON.stringify(a)},clear:function(a){cf(this);var b=[];try{for(var c=0,d=window.localStorage.length;c<d;c++)b.push(window.localStorage.key(c))}catch(e){}for(c=0;c<b.length;c++)if((d=b[c])&&(a||d.substr(0,this.key.length)==this.key)){try{window.localStorage.removeItem(d)}catch(e){}b.splice(c,
|
||||
1);c=0}}};function cf(a,b){a[a.id]={};b&&a.set("parms",b);a.a=!1}function df(a){var b=!0;if(xa()){var c=JSON.stringify(a[a.id]);za(a.key,c)||(m("Unable to store "+c.length+" bytes in browser local storage"),b=!1)}return b}function af(a){var b=!0;try{a[a.id]=JSON.parse(a[a.id])}catch(c){m(c.message||c),b=!1}return b}function Xe(a,b){return b?(a[a.id]=b,a.a=!0):a.a?!0:xa()&&(b=ya(a.key))?(a[a.id]=b,a.a=!0):!1}var kf=0;
|
||||
function lf(a,b,c,d,e,f){e("Loading "+a+"...");k(a,null,!0,function(h,l,n){n?(l||(l="unable to load "+a+" ("+n+")"),f(l,null)):mf(l,a,b,c,d,e,f)})}
|
||||
function mf(a,b,c,d,e,f,h){function l(a,f){if(f)h(f,null);else{c&&(Pa(c,b,a),(f=b)&&0>f.indexOf("/")&&"/"==window.location.pathname.slice(-1)&&(f=window.location.pathname+f),d?"}"==d.slice(-1)?(d=d.slice(0,-1),1<d.length&&(d+=",")):d='{state:"'+d+'",':d="{",d+='url:"'+f+'"}',"object"==typeof resources&&(f=null),a=a.replace(/(<machine[^>]*\sid=)(['"]).*?\2/,"$1$2"+c+"$2"+(d?" parms='"+d+"'":"")+(f?' url="'+f+'"':"")));e||(a=a.replace(/(<xsl:variable name="APPNAME">).*?(<\/xsl:variable>)/,"$1PDPjs$2"),
|
||||
a=a.replace(/(<xsl:variable name="APPCLASS">).*?(<\/xsl:variable>)/,"$1pdp11$2"));f=null;if("<"==a.charAt(0))try{e||(a=a.replace(/<!DOCTYPE(.|[\r\n])*]>\s*/g,"")),window.ActiveXObject||"ActiveXObject"in window?(f=new window.ActiveXObject("Microsoft.XMLDOM"),f.async=!1,f.loadXML(a)):f=(new window.DOMParser).parseFromString(a,"text/xml")}catch(t){f=null,a=t.message}else a="unrecognized XML: "+(255<a.length?a.substr(0,255)+"...":a);h(a,f)}}a?e?nf(a,f,l):l(a,null):h("no data"+(b?" for file: "+b:""),null)}
|
||||
function nf(a,b,c){var d;if(d=/<([a-z]+)\s+ref="(.*?)"(.*?)\/>/g.exec(a)){var e=d[2];b("Loading "+e+"...");k(e,null,!0,function(f,h,l){if(l||!h)c(a,"unable to resolve XML reference: "+d[0]+" ("+l+")");else{if(f=d[3])if(l=h.match(new RegExp("<"+d[1]+"[^>]*>"))){for(var n=l[0],r,t=/( [a-z]+=)(['"])(.*?)\2/g;r=t.exec(f);)n=0>n.indexOf(r[1])?n.replace(">",r[0]+">"):n.replace(new RegExp(r[1]+"(['\"])(.*?)\\1"),r[0]);l[0]!=n&&(h=h.replace(l[0],n))}else{c(a,"missing <"+d[1]+"> in "+e);return}h=h.replace(/<\?xml[^>]*>[\r\n]*/,
|
||||
"");a=a.replace(d[0],h);nf(a,b,c)}})}else c(a,null)}
|
||||
function of(a,b,c,d){function e(a){if(void 0===l){var b=h&&B(h,"machine-warning");l=b&&b[0]||h}l&&(l.innerHTML=pa(a))}function f(a){e("Error: "+a);n&&(--kf||Ga(!0));n=!1}var h,l,n=!0;kf++;Oa[a]={};try{if(h=document.getElementById(a)){var r;if("object"==typeof resources&&(r=resources.css)){var t=document.head||document.getElementsByTagName("head")[0],y=document.createElement("style");y.type="text/css";y.styleSheet?y.styleSheet.cssText=r:y.appendChild(document.createTextNode(r));t.appendChild(y)}c||
|
||||
(c="/versions/pdpjs/1.30.1/components.xsl");r=function(d,l){l?lf(c,null,null,!1,e,function(d,n){n?(Pa(a,c,d),e("Processing "+b+"..."),window.ActiveXObject||"ActiveXObject"in window?(n=l.transformNode(n))?(h.outerHTML=n,--kf||Ga(!0)):f("transformNodeToObject failed"):document.implementation&&document.implementation.createDocument?(d=new XSLTProcessor,d.importStylesheet(n),(n=d.transformToFragment(l,document))?h.parentNode?(h.parentNode.replaceChild(n,h),--kf||Ga(!0)):f("invalid machine element: "+
|
||||
a):f("transformToFragment failed")):f("unable to transform XML: unsupported browser")):f(d)}):f(d)};"<"!=b.charAt(0)?lf(b,a,d,!0,e,r):mf(b,null,a,d,!1,e,r)}else f("missing machine element: "+a)}catch(Zd){f(Zd.message)}return n}window.embedPDP11=function(a,b,c,d){Ga(!1);return of(a,b,c,d)};window.enableEvents=Ga;window.sendEvent=Ha;})();//# sourceMappingURL=/tmp/pdpjs/1.30.1/pdp11.map
|
||||
|
|
|
|||
Loading…
Reference in a new issue