Retro/pcjs
Watch
1
0
Fork
You've already forked pcjs
 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

The Computer component's 'resume' property can now be overridden from the URL, since we now query it with getMachineParm(); a default machine parameter value can now be included on the call, too

Browse source
This commit is contained in:
Jeff Parsons 2016-12-31 17:18:06 -08:00 • committed by Jeff Parsons
commit 2a96d37c14
4 changed files with 63 additions and 76 deletions
Download patch file Download diff file Expand all files Collapse all files

30
versions/pdpjs/1.32.0/pdp11.js
View file

@ -219,7 +219,7 @@ h.ca=function(a,b,c){var d=this;switch(b){case "listDisks":return this.j[b]=c,c.
!0;case "loadDisk":return this.j[b]=c,c.onclick=function(){var a=d.j.listDisks;a&&a.options&&ig(d,a.options[a.selectedIndex].text,a.value)},!0;case "bootDisk":return this.j[b]=c,c.onclick=function(){var a,b=d.j.listDrives,b=b&&r(b.value);null==b||0>b||b>=d.f.length||!(a=d.f[b])?d.B("Unable to boot the selected drive"):a.T?(Xc(d.c,0,!0),(a=d.sc(a,0,0,0,512,0,2))&&d.B("Unable to read the boot sector ("+a+")")):d.B("Load a disk into the drive first")},!0;case "saveDisk":if(!this.s){c.parentNode.removeChild(c);
break}this.j[b]=c;c.onclick=function(){var a=d.j.listDrives;a&&a.options&&d.f&&((a=d.f[r(a.value)||0])?(a=a.T)?(a=La(eg(a),a.Ib.replace(".json",".img")),z(a)):d.B("No disk loaded in drive."):d.B("No disk drive selected."))};return!0;case "mountDisk":if(this.s)return this.j[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;ig(d,u(b,!0),b,a)}return!1},!0;c.parentNode.removeChild(c)}return!1};
h.aa=function(a,b,c,d){this.A=a;this.u=b;this.c=c;this.D=d;if(a=gg(this,Kc(this.A,"autoMount")))for(var e in a)e.substr(0,2)==this.type.substr(0,2)&&(this.o[e]=a[e]);jg(this);this.Ia=lc(this.c,144,5,65536);kb(b,this,kg);mb(b,this.reset.bind(this));lg(this,"None",mg,!0);this.s&&lg(this,"Local Disk",ng);lg(this,"Remote Disk",og);pg(this)||H(this)};
h.ha=function(a,b){if(!b){if(!a||!this.restore){if(this.reset(),this.A.i){for(a=0;a<this.f.length;a++)qg(this,a,!0);pg(this,!0)}}else if(!this.restore(a))return!1;if(a=this.j.listDrives){for(;a.firstChild;)a.removeChild(a.firstChild);a.value="";for(b=0;8>b;b++){var c=document.createElement("option");c.value=b;c.text="RK"+b;a.appendChild(c)}a.value="0";hg(this,0)}}return!0};h.ga=function(a){return a?this.save():!0};h.reset=function(){jg(this)};h.save=function(){return(new K(this)).data()};
h.ha=function(a,b){if(!b){if(!a||!this.restore){if(this.reset(),this.A.m){for(a=0;a<this.f.length;a++)qg(this,a,!0);pg(this,!0)}}else if(!this.restore(a))return!1;if(a=this.j.listDrives){for(;a.firstChild;)a.removeChild(a.firstChild);a.value="";for(b=0;8>b;b++){var c=document.createElement("option");c.value=b;c.text="RK"+b;a.appendChild(c)}a.value="0";hg(this,0)}}return!0};h.ga=function(a){return a?this.save():!0};h.reset=function(){jg(this)};h.save=function(){return(new K(this)).data()};
h.restore=function(a){return jg(this,a[0])};function pg(a,b){b||(a.m=0);for(var c in a.o){var d=a.o[c],e=d.path||"",f;if(!(f=d.name))a:{if((f=a.j.listDisks)&&f.options)for(var g=0;g<f.options.length;g++){var k=f.options[g];if(k.value==e){f=k.text;break a}}f=u(e,!0)}if(e&&f&&(g=-1,c&&(g=c.charCodeAt(c.length-1)-48,0>g||9<g)&&(g=-1),0<=g&&g<a.f.length)){!rg(a,g,f,e,!0)&&b&&H(a,!1);continue}a.B("Incorrect auto-mount settings for drive "+c+" ("+JSON.stringify(d)+")")}return!!a.m}
function ig(a,b,c,d){var e=a.j.listDrives,e=e&&r(e.value);if(void 0===e||0>e||e>=a.f.length)a.B("Unable to load the selected drive");else if(c)if(c==ng)a.B('Use "Choose File" and "Mount" to select and load a local disk.');else{if(c==og){c=window.prompt("Enter the URL of a remote disk image.","")||"";if(!c)return;b=u(c);a.status("Attempting to load "+c+' as "'+b+'"')}rg(a,e,b,c,!1,d)}else qg(a,e)}
function rg(a,b,c,d,e,f){var g=-1,k=a.f[b];k.ba.toLowerCase()!=d.toLowerCase()&&(g++,qg(a,b,!0),k.Ua?a.B("RK11 busy"):(k.Ua=!0,e&&(k.Ta=!0,a.m++),k.ya=!!f,$f(new Wf(a,k,"preload"),c,d,f,a.Mc)&&g++));return g}h.Mc=function(a,b,c,d,e){a.Ua=!1;b&&(b.J>a.J||b.O>a.O)&&(this.B('Disk "'+c+'" too large for drive '+("RK"+a.Va)),b=null);b?(a.T=b,a.na=c,a.ba=d,this.B('Loaded disk "'+c+'" in drive '+("RK"+a.Va),a.Ta||e),this.A&&Rc(this.A)):a.ya=!1;a.Ta&&(a.Ta=!1,--this.m||H(this));hg(this,a.Va)};
@ -237,7 +237,7 @@ h.ca=function(a,b,c){var d=this;switch(b){case "listDisks":return this.j[b]=c,c.
!0;case "loadDisk":return this.j[b]=c,c.onclick=function(){var a=d.j.listDisks;a&&a.options&&wg(d,a.options[a.selectedIndex].text,a.value)},!0;case "bootDisk":return this.j[b]=c,c.onclick=function(){var a,b=d.j.listDrives,b=b&&r(b.value);null==b||0>b||b>=d.b.length||!(a=d.b[b])?d.B("Unable to boot the selected drive"):a.T?(Xc(d.c,0,!0),(a=d.tc(a,0,0,0,512,0))&&d.B("Unable to read the boot sector ("+a+")")):d.B("Load a disk into the drive first")},!0;case "saveDisk":if(!this.v){c.parentNode.removeChild(c);
break}this.j[b]=c;c.onclick=function(){var a=d.j.listDrives;a&&a.options&&d.b&&((a=d.b[r(a.value)||0])?(a=a.T)?(a=La(eg(a),a.Ib.replace(".json",".img")),z(a)):d.B("No disk loaded in drive."):d.B("No disk drive selected."))};return!0;case "mountDisk":if(this.v)return this.j[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;wg(d,u(b,!0),b,a)}return!1},!0;c.parentNode.removeChild(c)}return!1};
h.aa=function(a,b,c,d){this.A=a;this.u=b;this.c=c;this.D=d;if(a=ug(this,Kc(this.A,"autoMount")))for(var e in a)e.substr(0,2)==this.type.substr(0,2)&&(this.s[e]=a[e]);xg(this);this.Ia=lc(this.c,112,5,131072);kb(b,this,yg);mb(b,this.reset.bind(this));zg(this,"None",Ag,!0);this.v&&zg(this,"Local Disk",Bg);zg(this,"Remote Disk",Cg);Dg(this)||H(this)};
h.ha=function(a,b){if(!b){if(!a||!this.restore){if(this.reset(),this.A.i){for(a=0;a<this.b.length;a++)Eg(this,a,!0);Dg(this,!0)}}else if(!this.restore(a))return!1;if(a=this.j.listDrives){for(;a.firstChild;)a.removeChild(a.firstChild);a.value="";for(b=0;4>b;b++){var c=document.createElement("option");c.value=b;c.text="RL"+b;a.appendChild(c)}a.value="0";vg(this,0)}}return!0};h.ga=function(a){return a?this.save():!0};h.reset=function(){xg(this)};h.save=function(){return(new K(this)).data()};
h.ha=function(a,b){if(!b){if(!a||!this.restore){if(this.reset(),this.A.m){for(a=0;a<this.b.length;a++)Eg(this,a,!0);Dg(this,!0)}}else if(!this.restore(a))return!1;if(a=this.j.listDrives){for(;a.firstChild;)a.removeChild(a.firstChild);a.value="";for(b=0;4>b;b++){var c=document.createElement("option");c.value=b;c.text="RL"+b;a.appendChild(c)}a.value="0";vg(this,0)}}return!0};h.ga=function(a){return a?this.save():!0};h.reset=function(){xg(this)};h.save=function(){return(new K(this)).data()};
h.restore=function(a){return xg(this,a[0])};function Dg(a,b){b||(a.o=0);for(var c in a.s){var d=a.s[c],e=d.path||"",f;if(!(f=d.name))a:{if((f=a.j.listDisks)&&f.options)for(var g=0;g<f.options.length;g++){var k=f.options[g];if(k.value==e){f=k.text;break a}}f=u(e,!0)}if(e&&f&&(g=-1,c&&(g=c.charCodeAt(c.length-1)-48,0>g||9<g)&&(g=-1),0<=g&&g<a.b.length)){!Fg(a,g,f,e,!0)&&b&&H(a,!1);continue}a.B("Incorrect auto-mount settings for drive "+c+" ("+JSON.stringify(d)+")")}return!!a.o}
function wg(a,b,c,d){var e=a.j.listDrives,e=e&&r(e.value);if(void 0===e||0>e||e>=a.b.length)a.B("Unable to load the selected drive");else if(c)if(c==Bg)a.B('Use "Choose File" and "Mount" to select and load a local disk.');else{if(c==Cg){c=window.prompt("Enter the URL of a remote disk image.","")||"";if(!c)return;b=u(c);a.status("Attempting to load "+c+' as "'+b+'"')}Fg(a,e,b,c,!1,d)}else Eg(a,e)}
function Fg(a,b,c,d,e,f){var g=-1,k=a.b[b];k.ba.toLowerCase()!=d.toLowerCase()&&(g++,Eg(a,b,!0),k.Ua?a.B("RL11 busy"):(k.Ua=!0,e&&(k.Ta=!0,a.o++),k.ya=!!f,$f(new Wf(a,k,"preload"),c,d,f,a.Pc)&&g++));return g}h.Pc=function(a,b,c,d,e){a.Ua=!1;b&&(b.J>a.J||b.O>a.O)&&(this.B('Disk "'+c+'" too large for drive '+("RL"+a.Va)),b=null);b?(a.T=b,a.na=c,a.ba=d,this.B('Loaded disk "'+c+'" in drive '+("RL"+a.Va),a.Ta||e),this.A&&Rc(this.A)):a.ya=!1;a.Ta&&(a.Ta=!1,--this.o||H(this));vg(this,a.Va)};
@ -250,27 +250,27 @@ h.Oc=function(a,b,c,d,e,f){this.m=f&65535;this.a=this.a&-49|f>>12&48;this.h=f>>1
h.hf=function(a){this.a=this.a&-1023|a&1022;this.h=this.h&60|(a&48)>>4;if(!(this.a&128)){a=!0;var b,c=this.b[(this.a&768)>>8],d=c.T,e,f,g;this.a&=-2;switch(this.a&14){case 4:this.i&8&&(this.a&=63);this.i=c.status|this.g&64|(d&&512==d.J?128:0);break;case 6:1==(this.f&3)&&(b=this.f&65408,c=(this.f&16)<<2,this.g=this.f&4?this.g+b:this.g-b,this.f=this.g=this.g&65408|c);break;case 8:this.i=this.g;break;case 12:b=this.tc;case 10:b||(b=this.Qc),e=this.f>>7,f=this.f&64?1:0,g=this.f&63,!d||e>=d.J||g>=d.M?
this.a|=37888:(a=65536-this.i&65535,d=(this.h&63)<<16|this.m,a=b.call(this,c,e,f,g,a,d,this.Oc.bind(this)))}a&&(this.a|=129,this.a&64&&jc(this.c,this.Ia))}};h.Xd=function(){return this.m};h.ff=function(a){this.m=a&65534};h.$d=function(){return this.f};h.jf=function(a){this.f=a};h.ae=function(){return this.i};h.kf=function(a){this.i=a};h.Yd=function(){return this.h};h.gf=function(a){this.h=a&63;this.a=this.a&-49|(this.h&3)<<4};
var Ag="",Bg="?",Cg="??",Gg={},yg=(Gg[63744]=[null,null,P.prototype.Zd,P.prototype.hf,"RLCS"],Gg[63746]=[null,null,P.prototype.Xd,P.prototype.ff,"RLBA"],Gg[63748]=[null,null,P.prototype.$d,P.prototype.jf,"RLDA"],Gg[63750]=[null,null,P.prototype.ae,P.prototype.kf,"RLMP"],Gg[63752]=[null,null,P.prototype.Yd,P.prototype.gf,"RLBE"],Gg);
function Hg(a,b,c){A.call(this,"Computer",a,0,33554432);this.l.R=!1;this.F=null;Ig(this,b);this.w=Kc(this,"autoPower",a,6);this.g=0;this.K=+a.busWidth||+a.buswidth;this.a=Jg;this.s=null;this.H=this.i=this.C=this.m=this.I=!1;this.h=null;this.L=Kc(this,"url")||"";(Math.random()+.1).toString(36);this.b=Kg(this);if(this.c=Ya("CPU",this.id)){this.D=Ya("Debugger",this.id);this.u=new Mb({id:this.La+".bus",busWidth:this.K},this.c,this.D);var d,e=C(this.id);if((this.f=Ya("Panel",this.id))&&this.f.ab)for(b=
0;b<e.length;b++)d=e[b],d.B=this.f.B,d.V=this.f.V,d.ab=this.f.ab;this.V(cb+" v1.32.0\nCopyright \u00a9 2012-2017 Jeff Parsons <Jeff@pcjs.org>\nLicense: GPL version 3 or later <http://gnu.org/licenses/gpl.html>");this.V("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.aa&&d.aa(this,this.u,this.c,this.D);b=null;d=a.resume;void 0!==d&&(1<d.length?b=this.o=d:this.a=parseInt(d,10));var f;if(a=Kc(this,"state")||(f=!0,a.state))b=
this.G=a,f||(this.m=!0,this.a=Jg),this.a&&(this.v=new K(this,"1.32.0"),Lg(this.v)?b=null:delete this.v);!b&&this.a&&(b=Mg(this))&&(this.m=!0);if(b){var g=this;v(b,null,!0,function(a,b,c){c?(g.o=null,g.m=!1,g.B("Unable to load machine state from server (error "+c+(b?": "+wa(b):"")+")")):(g.s=b,g.I=!0);H(g)})}else H(this);this.j.power||(this.w=!0);!c&&this.w&&Ng(this,this.ub)}else y("Unable to find CPU component")}n(Hg,A);
function Ig(a,b){if(!b){var c;if("object"==typeof resources&&(c=resources.parms))try{b=eval("("+c+")")}catch(d){y(d.message+" ("+c+")")}}a.F=b}function Kc(a,b,c,d){var e=b.toLowerCase(),e=Ja(b)||Ja(e);void 0===e&&a.F&&(e=a.F[b]);void 0===e&&c&&(e=c[b]);void 0===e&&"object"==typeof resources&&resources[b]&&(e=b);if("string"==typeof e&&d)switch(d){case 4:e=+e;break;case 6:e="true"==e}return e}
function Hg(a,b,c){A.call(this,"Computer",a,0,33554432);this.l.R=!1;this.G=null;Ig(this,b);this.C=Kc(this,"autoPower",a,6);this.g=0;this.K=+a.busWidth||+a.buswidth;this.v=this.s=this.w=null;this.o=this.I=!1;this.i=this.h=null;this.H=this.m=this.F=!1;this.L=Kc(this,"url")||"";(Math.random()+.1).toString(36);this.b=Jg(this);if(this.c=Ya("CPU",this.id)){this.D=Ya("Debugger",this.id);this.u=new Mb({id:this.La+".bus",busWidth:this.K},this.c,this.D);var d,e=C(this.id);if((this.f=Ya("Panel",this.id))&&this.f.ab)for(b=
0;b<e.length;b++)d=e[b],d.B=this.f.B,d.V=this.f.V,d.ab=this.f.ab;this.V(cb+" v1.32.0\nCopyright \u00a9 2012-2017 Jeff Parsons <Jeff@pcjs.org>\nLicense: GPL version 3 or later <http://gnu.org/licenses/gpl.html>");this.V("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.aa&&d.aa(this,this.u,this.c,this.D);this.a=Kc(this,"resume",a,4,Kg);var f;b=null;if(a=Kc(this,"state")||(f=!0,a.state))this.w=b=a,f||(this.o=!0,this.a=Kg),this.a&&
(this.i=new K(this,"1.32.0"),Lg(this.i)?b=null:delete this.i);!b&&this.a&&(b=Mg(this))&&(this.o=!0);if(b){var g=this;v(b,null,!0,function(a,b,c){c?(g.s=null,g.o=!1,g.B("Unable to load machine state from server (error "+c+(b?": "+wa(b):"")+")")):(g.v=b,g.I=!0);H(g)})}else H(this);this.j.power||(this.C=!0);!c&&this.C&&Ng(this,this.ub)}else y("Unable to find CPU component")}n(Hg,A);
function Ig(a,b){if(!b){var c;if("object"==typeof resources&&(c=resources.parms))try{b=eval("("+c+")")}catch(d){y(d.message+" ("+c+")")}}a.G=b}function Kc(a,b,c,d,e){var f=b.toLowerCase(),f=Ja(b)||Ja(f);void 0===f&&a.G&&(f=a.G[b]);void 0===f&&c&&(f=c[b]);void 0===f&&"object"==typeof resources&&resources[b]&&(f=b);void 0===f&&(f=e);if("string"==typeof f&&d)switch(d){case 4:f=+f;isNaN(f)&&(f=e||0);break;case 6:f="true"==f}return f}
function Ng(a,b,c){for(var d=C(a.id),e=0;e<=d.length;e++){var f=e<d.length?d[e]:a;if(!$a(f)){$a(f,function(){Ng(a,b,c)});return}}b.call(a,c)}function Og(a,b){var c=new K(a,"1.32.0",Pg);if(Lg(c)&&Qg(c)){var d=c.get(Rg),e=b?b.get(Rg):"unknown";d!=e&&(a.B("Machine state may be out-of-date\n("+d+" vs. "+e+")\nCheck your browser's local storage limits"),b||c.clear())}}h=Hg.prototype;
h.ub=function(a){void 0===a&&(a=this.a||(this.s?Sg:Jg));if(!this.g){this.g++;var b=!1,c=!1;this.C=!1;var d=this.v||new K(this,"1.32.0");if(a==Tg)b=!0;else if(a>Jg){if(Lg(d,this.s)){this.h=new K(this,"1.32.0",Ug);Lg(this.h)&&(Vg(this,d),a=Wg,Zg(this.h));this.h.set(Rg,za());$g(this.h);var e=this.a&&!this.m;if(a==Sg||Ca("Click OK to restore the previous "+cb+" machine state, or CANCEL to reset the machine.")){if(c=Qg(d)){var f=d.get("code"),g=d.get("data");f&&("ok"==f?Lg(d,g):("error"==f&&"no machine state"!=
g?(this.B("Error: "+g),"unable to verify user"==g&&(Ha(ah,""),this.b=null)):this.V(f+": "+g),Zg(d),Lg(d)?(c=Qg(d),e=!0):c=!1))}e&&Og(this,c?d:null)}else a==Wg&&d.clear()}else Og(this);delete this.s;delete this.v}e=C(this.id);for(f=0;f<e.length;f++)g=e[f],g!==this&&g!=this.c&&(c=bh(this,g,d,b,c));b=[d,a,c];a!=Tg?Ng(this,this.vc,b):this.vc(b)}};
function bh(a,b,c,d,e){if(!b.l.R){b.l.R=!0;var f=null;try{if(e&&((f=c.get(b.id))||(f=c.get(b.id.replace(/[a-z0-9]\./i,".")))),"string"===typeof f&&(f=null),!b.ha(f,d)&&f&&(y("Unable to restore state for "+b.type),a.G&&!a.I?(c.clear(),a.a=Jg,window&&window.location.reload()):a.C=!0,b.ha(null),e=!1),!d&&b.mc){var g=b.mc.split("|");for(a=0;a<g.length;a++)b.status(g[a])}}catch(k){y("Error restoring state for "+b.type+" ("+k.message+")")}}return e}
h.vc=function(a){var b=a[0],c=0>a[1];a=a[2];this.H=!0;this.l.R=!0;var d=this.j.power;d&&(d.textContent="Shutdown");this.c&&(bh(this,this.c,b,c,a),Cb(this),this.c.ma());this.C&&(Vg(this,b),b.clear());!c&&this.h&&(this.h.clear(),delete this.h);this.g=0};
h.ub=function(a){void 0===a&&(a=this.a||(this.v?Sg:Kg));if(!this.g){this.g++;var b=!1,c=!1;this.F=!1;var d=this.i||new K(this,"1.32.0");if(a==Tg)b=!0;else if(a>Kg){if(Lg(d,this.v)){this.h=new K(this,"1.32.0",Ug);Lg(this.h)&&(Vg(this,d),a=Wg,Zg(this.h));this.h.set(Rg,za());$g(this.h);var e=this.a&&!this.o;if(a==Sg||Ca("Click OK to restore the previous "+cb+" machine state, or CANCEL to reset the machine.")){if(c=Qg(d)){var f=d.get("code"),g=d.get("data");f&&("ok"==f?Lg(d,g):("error"==f&&"no machine state"!=
g?(this.B("Error: "+g),"unable to verify user"==g&&(Ha(ah,""),this.b=null)):this.V(f+": "+g),Zg(d),Lg(d)?(c=Qg(d),e=!0):c=!1))}e&&Og(this,c?d:null)}else a==Wg&&d.clear()}else Og(this);delete this.v;delete this.i}e=C(this.id);for(f=0;f<e.length;f++)g=e[f],g!==this&&g!=this.c&&(c=bh(this,g,d,b,c));b=[d,a,c];a!=Tg?Ng(this,this.vc,b):this.vc(b)}};
function bh(a,b,c,d,e){if(!b.l.R){b.l.R=!0;var f=null;try{if(e&&((f=c.get(b.id))||(f=c.get(b.id.replace(/[a-z0-9]\./i,".")))),"string"===typeof f&&(f=null),!b.ha(f,d)&&f&&(y("Unable to restore state for "+b.type),a.w&&!a.I?(c.clear(),a.a=Kg,window&&window.location.reload()):a.F=!0,b.ha(null),e=!1),!d&&b.mc){var g=b.mc.split("|");for(a=0;a<g.length;a++)b.status(g[a])}}catch(k){y("Error restoring state for "+b.type+" ("+k.message+")")}}return e}
h.vc=function(a){var b=a[0],c=0>a[1];a=a[2];this.H=!0;this.l.R=!0;var d=this.j.power;d&&(d.textContent="Shutdown");this.c&&(bh(this,this.c,b,c,a),Cb(this),this.c.ma());this.F&&(Vg(this,b),b.clear());!c&&this.h&&(this.h.clear(),delete this.h);this.g=0};
function Vg(a,b){if(Ca("There may be a problem with your "+cb+" machine.\n\nTo help us diagnose it, click OK to send this "+cb+" machine state to http://www.pcjs.org.")){var c=a.L;a=a.b||"";b=b.toString();var d={};d.app=cb;d.ver="1.32.0";d.url=c;d.user=a;d.type="bug";d.data=b;v("http://www.pcjs.org/api/v1/report",d,!0)}}
function ch(a,b,c){var d,e="none";if(a.g)return null;a.g--;var f=new K(a,"1.32.0"),g=new K(a,"1.32.0",Pg),k=za();g.set(Rg,k);f.set(Rg,k);f.set(dh,"1.32.0");f.set(eh,window?window.location.href:null);f.set(fh,window?window.navigator.userAgent:"");a.c&&a.c.ga&&(c&&I(a.c),d=a.c.ga(b,c),"object"===typeof d&&f.set(a.c.id,d),c&&(a.c.l.R=!1,!1===d&&(e=null)));for(var k=C(a.id),l=0;l<k.length;l++){var m=k[l];m.l.R&&(m.ga&&(d=m.ga(b,c),"object"===typeof d&&f.set(m.id,d)),c&&(m.l.R=!1,!1===d&&(e=null)))}e&&
(c?(k=d=!1,b?(a.b&&gh(a,a.b,f.toString()),$g(g)&&$g(f)||(e=null,d=k=!0)):a.a&&(d=!0,k=a.a==hh),d&&f.clear(k)):e=f.toString());c&&(a.l.R=!1,b=a.j.power)&&(b.textContent="Power");a.g=0;return e}h.reset=function(){this.u&&this.u.reset&&this.u.reset();this.c&&this.c.reset&&this.c.reset();for(var a=C(this.id),b=0;b<a.length;b++){var c=a[b];c!==this&&c!==this.u&&c!==this.c&&c.reset&&c.reset()}Cb(this,-1)};
h.start=function(a,b){for(var c=C(this.id),d=0;d<c.length;d++){var e=c[d];"CPU"!=e.type&&e!==this&&e.start&&e.start(a,b)}Cb(this,-1)};h.stop=function(a,b){for(var c=C(this.id),d=0;d<c.length;d++){var e=c[d];"CPU"!=e.type&&e!==this&&e.stop&&e.stop(a,b)}Cb(this,-1)};
function Cb(a,b){if(a.c){var c=a.c,d=b||0,e=c.j.speed;e&&(0>=d||30<=(c.ec+=d))&&(e.textContent=c.l.P?c.Ma.toFixed(2)+"Mhz":"Stopped",c.ec=0)}if(a.f&&(a=a.f,b=b||0,a.m)){c=a.c.l.P;d=!!(a.c.g&8);if(0>=b||60<=(a.i+=b)){for(e=0;e<a.c.b.length;e++)sb(a,"R"+e,a.c.b[e]);e=qc(a.c);sb(a,"PS",e);sb(a,"NF",e&8?1:0,1);sb(a,"ZF",e&4?1:0,1);sb(a,"VF",e&2?1:0,1);sb(a,"CF",e&1?1:0,1);a.i=0}Ib(a,0<b&&c&&!d?a.c.za:a.ja);Eb(a,a.h);b=a.c;b=b.Aa?b.la&16?1:2:4;Kb(a,"B22",b&1);Kb(a,"B18",b&2);Kb(a,"B16",b&4)}}
h.ca=function(a,b,c){var d=this;switch(b){case "power":return this.j[b]=c,c.onclick=function(){d.g||(d.l.R?ch(d,!1,!0):Ng(d,d.ub))},!0;case "reset":return this.j[b]=c,c.onclick=function(){if(d.l.R&&!d.g)if(d.a&&!d.o){var a=Ca("Click OK to save changes to this "+cb+" machine.\n\nWARNING: If you CANCEL, all disk changes will be discarded.");ch(d,a,!0);!a&&d.G?window&&window.location.reload():(a||(d.i=!0),d.ub(Jg),d.i=!1)}else d.reset(),d.c&&d.c.ma()},!0;case "save":if(ta(Ba(),"pcjs.org"))c.parentNode.removeChild(c);
else return this.j[b]=c,c.onclick=function(){var a=Kg(d,!0);if(a){var b=!!(d.a&&!d.o||d.G),c=ch(d,b);b?gh(d,a,c):d.B("Resume disabled, machine state not saved")}},!0}return!1};
function Kg(a,b){var c=a.b;c||((c=Ga(ah),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=ih(a,c))||a.B("The user ID is invalid.")):b&&a.B("Browser local storage is not available"));return c}
h.ca=function(a,b,c){var d=this;switch(b){case "power":return this.j[b]=c,c.onclick=function(){d.g||(d.l.R?ch(d,!1,!0):Ng(d,d.ub))},!0;case "reset":return this.j[b]=c,c.onclick=function(){if(d.l.R&&!d.g)if(d.a&&!d.s){var a=Ca("Click OK to save changes to this "+cb+" machine.\n\nWARNING: If you CANCEL, all disk changes will be discarded.");ch(d,a,!0);!a&&d.w?window&&window.location.reload():(a||(d.m=!0),d.ub(Kg),d.m=!1)}else d.reset(),d.c&&d.c.ma()},!0;case "save":if(ta(Ba(),"pcjs.org"))c.parentNode.removeChild(c);
else return this.j[b]=c,c.onclick=function(){var a=Jg(d,!0);if(a){var b=!!(d.a&&!d.s||d.w),c=ch(d,b);b?gh(d,a,c):d.B("Resume disabled, machine state not saved")}},!0}return!1};
function Jg(a,b){var c=a.b;c||((c=Ga(ah),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=ih(a,c))||a.B("The user ID is invalid.")):b&&a.B("Browser local storage is not available"));return c}
function ih(a,b){a.b=null;b=v(Ba()+"/api/v1/user?req=verify&user="+b);var c=b[1];if(!b[0]&&c)try{b=eval("("+c+")"),b.code&&"ok"==b.code&&(Ha(ah,b.data),a.b=b.data)}catch(d){y(d.message+" ("+c+")")}return a.b}function Mg(a){var b=null;a.b&&(b=Ba()+"/api/v1/user?req=load&user="+a.b+"&state="+jh(a,"1.32.0"));return b}
function gh(a,b,c){if(c){var d={req:"store"};d.user=b;d.state=jh(a,"1.32.0");d.data=c;b=v(Ba()+"/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.B("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.B(c),Ha(ah,""),a.b=null)}}
function If(a){var b;a=C(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}function Rc(a){if(a.ab){var b=0,c=0;window&&(b=window.scrollX,c=window.scrollY);a.ab.focus();window&&window.scrollTo(b,c)}}var Ug="failsafe",Pg="validate",Rg="timestamp",dh="version",eh="url",fh="browser",ah="user",Tg=-1,Jg=0,Sg=1,Wg=2,hh=3;
Na(function(){for(var a=G(document,F+"-machine"),b=0;b<a.length;b++)for(var c=a[b],d=D(c),c=G(c,F,"computer"),e=0;e<c.length;e++){var f=c[e],g=D(f),g=new Hg(g,d,!0);E(g,f);g.w&&Ng(g,g.ub)}});Oa.show.push(function(){for(var a=G(document,F,"computer"),b=0;b<a.length;b++){var c=D(a[b]);(c=Ya("Computer",c.id))&&c.H&&!c.l.R&&c.ub(Tg)}});Oa.exit.push(function(){for(var a=G(document,F,"computer"),b=0;b<a.length;b++){var c=D(a[b]);(c=Ya("Computer",c.id))&&c.l.R&&ch(c,!(!c.a||c.o),!0)}});
function If(a){var b;a=C(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}function Rc(a){if(a.ab){var b=0,c=0;window&&(b=window.scrollX,c=window.scrollY);a.ab.focus();window&&window.scrollTo(b,c)}}var Ug="failsafe",Pg="validate",Rg="timestamp",dh="version",eh="url",fh="browser",ah="user",Tg=-1,Kg=0,Sg=1,Wg=2,hh=3;
Na(function(){for(var a=G(document,F+"-machine"),b=0;b<a.length;b++)for(var c=a[b],d=D(c),c=G(c,F,"computer"),e=0;e<c.length;e++){var f=c[e],g=D(f),g=new Hg(g,d,!0);E(g,f);g.C&&Ng(g,g.ub)}});Oa.show.push(function(){for(var a=G(document,F,"computer"),b=0;b<a.length;b++){var c=D(a[b]);(c=Ya("Computer",c.id))&&c.H&&!c.l.R&&c.ub(Tg)}});Oa.exit.push(function(){for(var a=G(document,F,"computer"),b=0;b<a.length;b++){var c=D(a[b]);(c=Ya("Computer",c.id))&&c.l.R&&ch(c,!(!c.a||c.s),!0)}});
function K(a,b,c){this.id=a.id;this.a="";this.c={};this.b=this.j=!1;this.key=jh(a,b,c);Zg(this,a.Rc)}h=K.prototype;h.set=function(a,b){try{this.c[a]=b}catch(c){}};h.get=function(a){return this.c[a]||null};h.data=function(){return this.c};function Lg(a,b){return b?(a.a=b,a.b=!0,a.j=!1,!0):a.b?!0:Da()&&(b=Ga(a.key))?(a.a=b,a.b=!0):!1}function Qg(a){var b=!0;if(!a.j)try{a.c=JSON.parse(a.a),a.j=!0}catch(c){y(c.message||c),b=!1}return b}
function $g(a){var b=!0;if(Da()){var c=JSON.stringify(a.c);Ha(a.key,c)||(y("Unable to store "+c.length+" bytes in browser local storage"),b=!1)}return b}h.toString=function(){return this.c?JSON.stringify(this.c):this.a};function Zg(a,b){a.a="";a.c={};a.b=a.j=!1;b&&a.set("parms",b)}
h.clear=function(a){Zg(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 jh(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}var kh=0;