|
|
|
|
@ -161,11 +161,11 @@ function cg(a){r.call(this,"ROM",a,cg);this.ga=this.f=null;this.C=a.addr;this.g=
|
|
|
|
|
cg.prototype.za=function(){this.ga&&(this.i&&eg(this.i,this.id,this.C,this.g,this.ga),delete this.ga);return!0};cg.prototype.ya=function(){return!0};
|
|
|
|
|
function dg(a){if(!sb(a)){if(a.B){if(!a.f||!a.w)return;a.g||(a.g=a.f.length);if(a.f.length!=a.g)ub(a,"ROM size ("+l(a.f.length,8,!0)+") does not match specified size ("+l(a.g,8,!0)+")");else{var b;b=a.C;if(ac(a.w,b,a.g,Hc)){var c;for(c=0;c<a.f.length;c++)a.w.fb(b+c,a.f[c]);b=!0}else b=!1;if(b){b=[];"number"==typeof a.A?b.push(a.A):null!=a.A&&a.A.length&&(b=a.A);for(c=0;c<b.length;c++){var d=a,e=b[c],f=$b(d.w,d.C,d.g);Zb(d.w,e,d.g,f)}delete a.f}}}G(a)}}
|
|
|
|
|
Wa(function(){for(var a=D(document,"pdp11","rom"),b=0;b<a.length;b++){var c=a[b],d=A(c),d=new cg(d);C(d,c)}});
|
|
|
|
|
function yg(a){r.call(this,"RAM",a,yg);this.ga=this.g=null;this.B=a.addr;this.C=a.size;this.Ca=a.load;this.Ba=a.exec;this.A=!1;this.f=a.file;this.G=ra(this.f);if(this.f){a=this.f;var b=sa(this.G);"json"!=b&&"hex"!=b&&(a=Fa()+"/api/v1/dump?file="+this.f+"&format=bytes&decimal=true");var c=this;Da(a,null,!0,function(a,b,f){f?c.O("Unable to load RAM resource (error "+f+": "+a+")"):(mb(c.Ia,a,b),(a=Ea(a,b))?(c.g=a.ea,c.ga=a.ga,null==c.Ca&&(c.Ca=a.Ca),null==c.Ba&&(c.Ba=a.Ba)):c.f=null,zg(c))})}}u(yg);
|
|
|
|
|
yg.prototype.wa=function(a,b,c,d){this.w=b;this.b=c;this.i=d;zg(this)};yg.prototype.za=function(){this.ga&&(this.i&&eg(this.i,this.id,this.B,this.C,this.ga),delete this.ga);return!0};yg.prototype.ya=function(){return!0};function zg(a){if(a.w&&(!a.A&&a.C&&ac(a.w,a.B,a.C,1)&&(a.A=!0),!sb(a))){if(!a.A)p("No RAM allocated");else if(a.f){if(!a.g||!a.w)return;Ag(a,a.g,a.Ca,a.Ba,a.B)}G(a)}}
|
|
|
|
|
yg.prototype.reset=function(){if(this.A){for(var a=this.w,b=this.B,c=this.C,d=b&a.w,b=b>>>a.ka;0<c&&b<a.W.length;){var e=a.W[b],f=c,g,d=d||0;void 0===f&&(f=e.size);if(vb)for(g=d;f--&&g<e.F.length;g++)e.F[g]=0;else for(g=d;f--&&g<e.size;g++)e.Ub(d,0,e.D+d);c-=a.ua;b++;d=0}this.g&&Ag(this,this.g,this.Ca,this.Ba,this.B,!0)}};
|
|
|
|
|
function fg(a){r.call(this,"RAM",a,fg);this.ga=this.g=null;this.B=a.addr;this.C=a.size;this.Ca=a.load;this.Ba=a.exec;this.A=!1;this.f=a.file;this.G=ra(this.f);if(this.f){a=this.f;var b=sa(this.G);"json"!=b&&"hex"!=b&&(a=Fa()+"/api/v1/dump?file="+this.f+"&format=bytes&decimal=true");var c=this;Da(a,null,!0,function(a,b,f){f?c.O("Unable to load RAM resource (error "+f+": "+a+")"):(mb(c.Ia,a,b),(a=Ea(a,b))?(c.g=a.ea,c.ga=a.ga,null==c.Ca&&(c.Ca=a.Ca),null==c.Ba&&(c.Ba=a.Ba)):c.f=null,zg(c))})}}u(fg);
|
|
|
|
|
fg.prototype.wa=function(a,b,c,d){this.w=b;this.b=c;this.i=d;zg(this)};fg.prototype.za=function(){this.ga&&(this.i&&eg(this.i,this.id,this.B,this.C,this.ga),delete this.ga);return!0};fg.prototype.ya=function(){return!0};function zg(a){if(a.w&&(!a.A&&a.C&&ac(a.w,a.B,a.C,1)&&(a.A=!0),!sb(a))){if(!a.A)p("No RAM allocated");else if(a.f){if(!a.g||!a.w)return;Ag(a,a.g,a.Ca,a.Ba,a.B)}G(a)}}
|
|
|
|
|
fg.prototype.reset=function(){if(this.A){for(var a=this.w,b=this.B,c=this.C,d=b&a.w,b=b>>>a.ka;0<c&&b<a.W.length;){var e=a.W[b],f=c,g,d=d||0;void 0===f&&(f=e.size);if(vb)for(g=d;f--&&g<e.F.length;g++)e.F[g]=0;else for(g=d;f--&&g<e.size;g++)e.Ub(d,0,e.D+d);c-=a.ua;b++;d=0}this.g&&Ag(this,this.g,this.Ca,this.Ba,this.B,!0)}};
|
|
|
|
|
function Ag(a,b,c,d,e,f){var g=!1;if(null==c)for(var h=0;h<b.length-1;){var m=b[h]&255|(b[h+1]&255)<<8;if(m)if(m&255){if(1!=m)break;if(h+6>=b.length)break;for(var h=h+2,n=b[h++]&255|(b[h++]&255)<<8,q=b[h++]&255|(b[h++]&255)<<8,m=m+((n&255)+(n>>8)+(q&255)+(q>>8)),w=h,v=n-=6;0<n&&h<b.length;)m+=b[h++]&255,n--;if(n||h>=b.length)break;m+=b[h++]&255;if(m&255)break;if(v)for(;v--;)a.b.fb(q++,b[w++]&255);else q&1?a.b.ia():kd(a.b,q,f);g=!0}else h++;else h+=2}if(!g&&(null==c&&(c=e),null!=c)){for(e=0;e<b.length;e++)a.b.fb(c+
|
|
|
|
|
e,b[e]);null!=d&&kd(a.b,d,f);g=!0}return g}Wa(function(){for(var a=D(document,"pdp11","ram"),b=0;b<a.length;b++){var c=a[b],d=A(c),d=new yg(d);C(d,c)}});function Bg(a){r.call(this,"Keyboard",a,Bg,65536);G(this)}u(Bg);Bg.prototype.qa=function(){return!1};Bg.prototype.wa=function(a,b,c,d){this.B=a;this.b=c;this.i=d};Wa(function(){for(var a=D(document,"pdp11","keyboard"),b=0;b<a.length;b++){var c=a[b],d=A(c),d=new Bg(d);C(d,c)}});
|
|
|
|
|
e,b[e]);null!=d&&kd(a.b,d,f);g=!0}return g}Wa(function(){for(var a=D(document,"pdp11","ram"),b=0;b<a.length;b++){var c=a[b],d=A(c),d=new fg(d);C(d,c)}});function Bg(a){r.call(this,"Keyboard",a,Bg,65536);G(this)}u(Bg);Bg.prototype.qa=function(){return!1};Bg.prototype.wa=function(a,b,c,d){this.B=a;this.b=c;this.i=d};Wa(function(){for(var a=D(document,"pdp11","keyboard"),b=0;b<a.length;b++){var c=a[b],d=A(c),d=new Bg(d);C(d,c)}});
|
|
|
|
|
function X(a){this.N=a.baudReceive||9600;this.R=a.baudTransmit||9600;this.ba=a.upperCase;this.A=this.G=null;this.S=a.tabSize;this.P=a.charBOL;this.I=0;r.call(this,"SerialPort",a,X,8388608);var b=a.binding;if("console"==b)this.G="";else{var c;a=Cg;b&&(void 0===c&&(c="Panel"),(c=pb(c,this.id))&&(b=c.F[b])&&this.qa(null,a,b))}this.J=this.L=null;this.exports={connect:this.sc,receiveData:this.cc}}u(X);var Cg="buffer";k=X.prototype;
|
|
|
|
|
k.qa=function(a,b,c){var d=this;switch(b){case Cg:return this.F[b]=this.A=c,c.onkeydown=function(a){a=a||window.event;var b=a.keyCode;if(8===b||a.ctrlKey&&65<=b&&90>=b)a.preventDefault&&a.preventDefault(),64<b&&(b-=64),d.cc(b);return!0},c.onkeypress=function(a){a=a||window.event;d.cc(a.which||a.keyCode);a.preventDefault&&a.preventDefault();return!0},c.removeAttribute("readonly"),!0}return!1};
|
|
|
|
|
k.wa=function(a,b,c,d){this.B=a;this.w=b;this.b=c;this.i=d;var e=this;this.la=nc(48,4);this.Y=kc(this.b,function(){e.f&128||!e.C.length||(e.K=e.C.shift()&255,e.ba&&97<=e.K&&122>e.K&&(e.K-=32),e.f|=128,e.f&64&&lc(e.b,e.la))});this.ma=nc(52,4);this.Z=kc(this.b,function(){e.g|=128;e.g&64&&lc(e.b,e.ma)});hc(b,this,Dg);G(this)};
|
|
|
|
|
@ -204,105 +204,106 @@ function ch(a){var b=a.data,c=b.length;if(c<<2==a.length){for(var d=c-1,e=b[d],f
|
|
|
|
|
k.qa=function(a,b,c){var d=this;switch(b){case "listDisks":return this.F[b]=c,c.onchange=function(){var a=d.F.descDisk,b=c.options[c.selectedIndex];if(a&&b){var g={};if(b=b.getAttribute("data-value"))try{g=eval("("+b+")")}catch(h){p("RL11 option error: "+h.message)}b=g.desc;void 0===b&&(b="");g=g.href;void 0!==g&&(b='<a href="'+g+'" target="_blank">'+b+"</a>");a.innerHTML=b}},!0;case "descDisk":case "listDrives":return this.F[b]=c,c.onchange=function(){var a=pa(c.value,10);null!=a&&dh(d,a)},!0;case "loadDrive":return this.F[b]=
|
|
|
|
|
c,c.onclick=function(){var a=d.F.listDisks;a&&eh(d,a.options[a.selectedIndex].text,a.value)},!0;case "saveDrive":if(!this.C){c.parentNode.removeChild(c);break}this.F[b]=c;c.onclick=function(){var a=d.F.listDrives;if(a&&a.options&&d.f)if(a=d.f[pa(a.value,10)||0])if(a=a.Hb){var b;b="";for(var c=0,h;h=ah(a,c++);)for(var m=0,n=h.length;m<n;m++)b+=String.fromCharCode(bh(h,m));b=btoa(b);a=a.Ac.replace(".json",".img");c=null;b="data:application/octet-stream;base64,"+b;a&&(c=document.createElement("a"),"string"!=
|
|
|
|
|
typeof c.download&&(c=null));c?(c.href=b,c.download=a,document.body.appendChild(c),c.click(),document.body.removeChild(c),a="Check your Downloads folder for "+a+"."):(window.open(b),a="Check your browser for a new window/tab containing the requested data"+(a?" ("+a+")":"")+".");p(a)}else d.O("No disk loaded in drive.");else d.O("No disk drive selected.")};return!0;case "mountDrive":if(this.C)return this.F[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;eh(d,ra(b,!0),b,a)}return!1},!0;c.parentNode.removeChild(c)}return!1};k.wa=function(a,b,c,d){this.B=a;this.w=b;this.b=c;this.i=d;if((this.g=Uc(this.B,"autoMount")||this.g)&&"string"==typeof this.g)try{this.g=eval("("+this.g+")")}catch(e){p("RL11 auto-mount error: "+e.message+" ("+this.g+")"),this.g=null}this.P=nc(112,5);hc(b,this,fh);gh(this,"None","",!0);this.C&&gh(this,"Local Disk","?");gh(this,"Remote Disk","??");hh(this)||G(this)};
|
|
|
|
|
k.za=function(a,b){if(!b){if(!a||!this.restore){if(this.reset(),this.B.lc){for(a=0;a<this.f.length;a++)ih(this,a,!0);hh(this,!0)}}else if(!this.restore(a))return!1;if(a=this.F.listDrives){for(;a.firstChild;)a.removeChild(a.firstChild);a.value="";for(b=0;1>b;b++){var c=document.createElement("option");c.value=b;c.text="RL"+b;a.appendChild(c)}a.value="0";dh(this,0)}}return!0};k.ya=function(a){return a?this.save():!0};
|
|
|
|
|
k.reset=function(){for(var a=0;a<this.f.length;a++){var b=this.f[a];void 0===b&&(b=this.f[a]={});b.$b=a;b.Yb=b.Ib=!1;b.name=this.Za;b.Ha=512;b.Da=2;b.xa=40;b.Ja=256;b.Zb=!0;b.re=0;b.qe=0;b.pe=0;b.hc=1;b.Hc=b.xa;b.uc=b.Ja;b.ve=0;b.xe=null;b.Hb||(b.Xa="")}};k.save=function(){return(new O(this)).data()};k.restore=function(){return!0};
|
|
|
|
|
function hh(a,b){b||(a.A=0);if(a.g)for(var c in a.g){var d=a.g[c],e=d.path||"",f;if(!(f=d.name))a:{if((f=a.F.listDisks)&&f.options)for(var g=0;g<f.options.length;g++){var h=f.options[g];if(h.value==e){f=h.text;break a}}f=ra(e,!0)}if(e&&f&&(g=c.charCodeAt(0)-65,0<=g&&g<a.f.length)){!jh(a,g,f,e,!0)&&b&&G(a,!1);continue}a.O("Incorrect auto-mount settings for drive "+c+" ("+JSON.stringify(d)+")")}return!!a.A}
|
|
|
|
|
function eh(a,b,c,d){var e=a.F.listDrives,e=e&&pa(e.value,10);if(void 0===e||0>e||e>=a.f.length)a.O("Unable to load the selected drive");else if(c)if("?"==c)a.O('Use "Choose File" and "Mount" to select and load a local disk.');else{if("??"==c){c=window.prompt("Enter the URL of a remote disk image.","")||"";if(!c)return;b=ra(c);a.status("Attempting to load "+c+' as "'+b+'"')}jh(a,e,b,c,!1,d)}else ih(a,e)}
|
|
|
|
|
function jh(a,b,c,d,e,f){var g=-1,h=a.f[b];h.Xa.toLowerCase()!=d.toLowerCase()&&(g++,ih(a,b,!0),h.Yb?a.O("RL11 busy"):(h.Yb=!0,e&&(h.Xb=!0,a.A++,F(a)&&E(a,"auto-loading disk: "+c)),h.Ib=!!f,Yg(new Ug(a,h,"preload"),c,d,f,a.Jc)&&g++));return g}
|
|
|
|
|
c.onsubmit=function(a){if(a=a.currentTarget[1].files[0]){var b=a.name;eh(d,ra(b,!0),b,a)}return!1},!0;c.parentNode.removeChild(c)}return!1};
|
|
|
|
|
k.wa=function(a,b,c,d){this.B=a;this.w=b;this.b=c;this.i=d;if((this.g=Uc(this.B,"autoMount")||this.g)&&"string"==typeof this.g)try{this.g=eval("("+this.g+")")}catch(e){p("RL11 auto-mount error: "+e.message+" ("+this.g+")"),this.g=null}fh(this);this.P=nc(112,5);hc(b,this,gh);hh(this,"None","",!0);this.C&&hh(this,"Local Disk","?");hh(this,"Remote Disk","??");ih(this)||G(this)};
|
|
|
|
|
k.za=function(a,b){if(!b){if(!a||!this.restore){if(this.reset(),this.B.lc){for(a=0;a<this.f.length;a++)jh(this,a,!0);ih(this,!0)}}else if(!this.restore(a))return!1;if(a=this.F.listDrives){for(;a.firstChild;)a.removeChild(a.firstChild);a.value="";for(b=0;1>b;b++){var c=document.createElement("option");c.value=b;c.text="RL"+b;a.appendChild(c)}a.value="0";dh(this,0)}}return!0};k.ya=function(a){return a?this.save():!0};k.reset=function(){fh(this)};k.save=function(){return(new O(this)).data()};
|
|
|
|
|
k.restore=function(){return!0};function fh(a){for(var b=0;b<a.f.length;b++){var c=a.f[b];void 0===c&&(c=a.f[b]={});var d=a;c.$b=b;c.Yb=c.Ib=!1;c.name=d.Za;c.Ha=512;c.Da=2;c.xa=40;c.Ja=256;c.Zb=!0;c.re=0;c.qe=0;c.pe=0;c.hc=1;c.Hc=c.xa;c.uc=c.Ja;c.ve=0;c.xe=null;c.Hb||(c.Xa="")}}
|
|
|
|
|
function ih(a,b){b||(a.A=0);if(a.g)for(var c in a.g){var d=a.g[c],e=d.path||"",f;if(!(f=d.name))a:{if((f=a.F.listDisks)&&f.options)for(var g=0;g<f.options.length;g++){var h=f.options[g];if(h.value==e){f=h.text;break a}}f=ra(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)){!kh(a,g,f,e,!0)&&b&&G(a,!1);continue}a.O("Incorrect auto-mount settings for drive "+c+" ("+JSON.stringify(d)+")")}return!!a.A}
|
|
|
|
|
function eh(a,b,c,d){var e=a.F.listDrives,e=e&&pa(e.value,10);if(void 0===e||0>e||e>=a.f.length)a.O("Unable to load the selected drive");else if(c)if("?"==c)a.O('Use "Choose File" and "Mount" to select and load a local disk.');else{if("??"==c){c=window.prompt("Enter the URL of a remote disk image.","")||"";if(!c)return;b=ra(c);a.status("Attempting to load "+c+' as "'+b+'"')}kh(a,e,b,c,!1,d)}else jh(a,e)}
|
|
|
|
|
function kh(a,b,c,d,e,f){var g=-1,h=a.f[b];h.Xa.toLowerCase()!=d.toLowerCase()&&(g++,jh(a,b,!0),h.Yb?a.O("RL11 busy"):(h.Yb=!0,e&&(h.Xb=!0,a.A++,F(a)&&E(a,"auto-loading disk: "+c)),h.Ib=!!f,Yg(new Ug(a,h,"preload"),c,d,f,a.Jc)&&g++));return g}
|
|
|
|
|
k.Jc=function(a,b,c,d,e){var f;a.Yb=!1;b&&(f=b.b.length?[b.b.length,b.b[0].length,b.b[0][0].length,b.b[0][0][0].length]:[0,0,0,0],b&&f[0]>a.Ha||f[1]>a.Da)&&(this.O('Disk "'+c+'" too large for drive '+("RL"+a.$b)),b=null);b?(a.Hb=b,a.Oa=c,a.Xa=d,this.O('Mounted disk "'+c+'" in drive '+("RL"+a.$b),a.Xb||e),this.B&&this.B.gb()):a.Ib=!1;a.Xb&&(a.Xb=!1,--this.A||G(this));dh(this,a.$b)};
|
|
|
|
|
function gh(a,b,c,d){if((a=a.F.listDisks)&&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 dh(a,b){if(0<=b&&b<a.f.length){var c=a.f[b],d=a.F.listDisks;a=a.F.listDrives;if(d&&a&&d.options&&a.options&&(a=pa(a.value,10),c=c.Ib?"?":c.Xa,!isNaN(a)&&a==b)){for(b=0;b<d.options.length;b++)if(d.options[b].value==c){d.selectedIndex!=b&&(d.selectedIndex=b);break}b==d.options.length&&(d.selectedIndex=0)}}}function ih(a,b,c){var d=a.f[b];if(d.Hb||!1===c)d.Oa="",d.Xa="",d.Hb=null,d.Ib=!1,c||(a.O("Drive RL"+b+" unloaded",c),dh(a,b))}var fh={};
|
|
|
|
|
function kh(a){r.call(this,"Debugger",a,kh);this.Z=a.base||16;this.va=!1;this.J=0;this.P=!1;this.A=-1;this.g=[];this.S={}}u(kh);var lh={"||":0,"&&":1,"|":2,"^":3,"&":4,"!=":5,"==":5,">=":6,">":6,"<=":6,"<":6,">>>":7,">>":7,"<<":7,"-":8,"+":8,"%":9,"/":9,"*":9};kh.prototype.oc=function(){return-1};kh.prototype.pc=function(){};
|
|
|
|
|
function mh(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(xa(b.substring(c,f))),c=f+1}}return a}
|
|
|
|
|
function nh(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;
|
|
|
|
|
function hh(a,b,c,d){if((a=a.F.listDisks)&&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 dh(a,b){if(0<=b&&b<a.f.length){var c=a.f[b],d=a.F.listDisks;a=a.F.listDrives;if(d&&a&&d.options&&a.options&&(a=pa(a.value,10),c=c.Ib?"?":c.Xa,!isNaN(a)&&a==b)){for(b=0;b<d.options.length;b++)if(d.options[b].value==c){d.selectedIndex!=b&&(d.selectedIndex=b);break}b==d.options.length&&(d.selectedIndex=0)}}}function jh(a,b,c){var d=a.f[b];if(d.Hb||!1===c)d.Oa="",d.Xa="",d.Hb=null,d.Ib=!1,c||(a.O("Drive RL"+b+" unloaded",c),dh(a,b))}var gh={};
|
|
|
|
|
function lh(a){r.call(this,"Debugger",a,lh);this.Z=a.base||16;this.va=!1;this.J=0;this.P=!1;this.A=-1;this.g=[];this.S={}}u(lh);var mh={"||":0,"&&":1,"|":2,"^":3,"&":4,"!=":5,"==":5,">=":6,">":6,"<=":6,"<":6,">>>":7,">>":7,"<<":7,"-":8,"+":8,"%":9,"/":9,"*":9};lh.prototype.oc=function(){return-1};lh.prototype.pc=function(){};
|
|
|
|
|
function nh(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(xa(b.substring(c,f))),c=f+1}}return a}
|
|
|
|
|
function oh(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 oh(a,b,c){var d;if(b){b=ph(a,b);for(var e=0,f=!1,g=b,h=[],m=[],n=b.split(/(\|\||&&|\||^|&|!=|==|>=|>>>|>>|>|<=|<<|<|-|\+|%|\/|\*)/);e<n.length;){var q=n[e++],w=q.length,q=xa(q);if(!q){f=!0;break}q=qh(a,q,null,!1===c);if(void 0===q){f=!0;c=!1;break}h.push(q);if(e==n.length)break;var q=n[e++],v=q.length;m.length&&lh[q]<lh[m[m.length-1]]&&nh(h,m,1);m.push(q);b=b.substr(w+v)}nh(h,m)&&1==h.length||(f=!0);f?c&&a.j("error parsing '"+g+"' at character "+(g.length-b.length)):(d=h.pop(),c&&rh(a,null,
|
|
|
|
|
d))}return d}function ph(a,b){for(var c,d=a.va?"(":"{",e=a.va?")":"}",f=new RegExp(a.va?"\\((.*?)\\)":"\\{(.*?)\\}");(c=b.match(f))&&!(0<=c[1].indexOf(d));){var g=oh(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(a=b;b=a.match(/\$([a-z]+)/i);){c=null;switch(b[1].toLowerCase()){case "ops":c=0}if(null==c)break;a=a.replace(b[0],c.toString())}return a}
|
|
|
|
|
function qh(a,b,c,d){var e;null!=b?(e=a.oc(b),0<=e?e=a.pc(e):(e=a.S[b],null==e&&(e=pa(b,a.Z))),null!=e||d||a.j("invalid "+(c?c:"value")+": "+b)):d||a.j("missing "+(c||"value"));return e}
|
|
|
|
|
function rh(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,n=8,q="";n?32<n&&(n=32):n=32;if(null==m||isNaN(m))for(;0<n--;)q="?"+q;else for(;0<n--;)q=(m&1?"1":"0")+q,m>>=1;g=q+g;d>>=8}d=l(c,0,!0)+" "+c+". "+qa(c,0,!0)+" "+("0b"+g);32<=c&&127>c&&(d+=" '"+String.fromCharCode(c)+"'")}a.j((null!=b?b+": ":"")+d);return e}function sh(a,b){if(b)return rh(a,b,a.S[b]);var c=0;for(b in a.S)rh(a,b,a.S[b]),c++;return 0<c}
|
|
|
|
|
function ph(a,b,c){var d;if(b){b=qh(a,b);for(var e=0,f=!1,g=b,h=[],m=[],n=b.split(/(\|\||&&|\||^|&|!=|==|>=|>>>|>>|>|<=|<<|<|-|\+|%|\/|\*)/);e<n.length;){var q=n[e++],w=q.length,q=xa(q);if(!q){f=!0;break}q=rh(a,q,null,!1===c);if(void 0===q){f=!0;c=!1;break}h.push(q);if(e==n.length)break;var q=n[e++],v=q.length;m.length&&mh[q]<mh[m[m.length-1]]&&oh(h,m,1);m.push(q);b=b.substr(w+v)}oh(h,m)&&1==h.length||(f=!0);f?c&&a.j("error parsing '"+g+"' at character "+(g.length-b.length)):(d=h.pop(),c&&sh(a,null,
|
|
|
|
|
d))}return d}function qh(a,b){for(var c,d=a.va?"(":"{",e=a.va?")":"}",f=new RegExp(a.va?"\\((.*?)\\)":"\\{(.*?)\\}");(c=b.match(f))&&!(0<=c[1].indexOf(d));){var g=ph(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(a=b;b=a.match(/\$([a-z]+)/i);){c=null;switch(b[1].toLowerCase()){case "ops":c=0}if(null==c)break;a=a.replace(b[0],c.toString())}return a}
|
|
|
|
|
function rh(a,b,c,d){var e;null!=b?(e=a.oc(b),0<=e?e=a.pc(e):(e=a.S[b],null==e&&(e=pa(b,a.Z))),null!=e||d||a.j("invalid "+(c?c:"value")+": "+b)):d||a.j("missing "+(c||"value"));return e}
|
|
|
|
|
function sh(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,n=8,q="";n?32<n&&(n=32):n=32;if(null==m||isNaN(m))for(;0<n--;)q="?"+q;else for(;0<n--;)q=(m&1?"1":"0")+q,m>>=1;g=q+g;d>>=8}d=l(c,0,!0)+" "+c+". "+qa(c,0,!0)+" "+("0b"+g);32<=c&&127>c&&(d+=" '"+String.fromCharCode(c)+"'")}a.j((null!=b?b+": ":"")+d);return e}function th(a,b){if(b)return sh(a,b,a.S[b]);var c=0;for(b in a.S)sh(a,b,a.S[b]),c++;return 0<c}
|
|
|
|
|
function J(a,b,c,d){switch(a.Z){case 8:a=qa(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 th(a){kh.call(this,a);this.ab=!1;this.va=!0;this.K=Y(0);this.$a=Y(0);this.N=Y(0);this.I=[];this.f=this.L=this.C=[];uh(this);this.ma=0;vh(this);this.Ea={};wh(this,a.messages);this.Fa=a.commands;var b=this;window?void 0===window.pdp11&&(window.pdp11=function(a){return Xc(b,a)}):void 0===global.pdp11&&(global.pdp11=function(a){return Xc(b,a)})}u(th,kh);
|
|
|
|
|
var xh={"?":"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"},yh=".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(" "),
|
|
|
|
|
zh={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 uh(a){lh.call(this,a);this.ab=!1;this.va=!0;this.K=Y(0);this.$a=Y(0);this.N=Y(0);this.I=[];this.f=this.L=this.C=[];vh(this);this.ma=0;wh(this);this.Ea={};xh(this,a.messages);this.Fa=a.commands;var b=this;window?void 0===window.pdp11&&(window.pdp11=function(a){return Xc(b,a)}):void 0===global.pdp11&&(global.pdp11=function(a){return Xc(b,a)})}u(uh,lh);
|
|
|
|
|
var yh={"?":"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"},zh=".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(" "),
|
|
|
|
|
Ah={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,32768],35072:[107,32768]},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]}},Ah=[0],Bh=
|
|
|
|
|
[58,60,65,96,108,110,100,101,102,103,104,105,59,64];k=th.prototype;
|
|
|
|
|
k.wa=function(a,b,c,d){this.w=b;this.b=c;this.B=a;(a=Uc(a,"messages"))&&wh(this,a);this.jb=zh;this.wb=1145>this.b.mb?Bh:[];Ch(this,function(a){a:{var b=d.w.W,c=a[0],e=a=0,m=b.length;if(c){a=d.aa(Dh(d,c));if(-1===a){d.j("invalid address: "+c);break a}e=a>>>d.w.ka;m=1}d.j("blockid physical blockaddr used size type");d.j("-------- --------- ---------- ------ ------ ----");for(var c=-1,n=0;m--;){var q=b[e];q.type==c?n++||d.j("..."):(c=q.type,n=ec[c],q&&d.j(l(q.id,8)+" %"+l(e<<d.w.ka,
|
|
|
|
|
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]}},Bh=[0],Ch=
|
|
|
|
|
[58,60,65,96,108,110,100,101,102,103,104,105,59,64];k=uh.prototype;
|
|
|
|
|
k.wa=function(a,b,c,d){this.w=b;this.b=c;this.B=a;(a=Uc(a,"messages"))&&xh(this,a);this.jb=Ah;this.wb=1145>this.b.mb?Ch:[];Dh(this,function(a){a:{var b=d.w.W,c=a[0],e=a=0,m=b.length;if(c){a=d.aa(Eh(d,c));if(-1===a){d.j("invalid address: "+c);break a}e=a>>>d.w.ka;m=1}d.j("blockid physical blockaddr used size type");d.j("-------- --------- ---------- ------ ------ ----");for(var c=-1,n=0;m--;){var q=b[e];q.type==c?n++||d.j("..."):(c=q.type,n=ec[c],q&&d.j(l(q.id,8)+" %"+l(e<<d.w.ka,
|
|
|
|
|
8)+" %%"+l(q.D,8)+" "+l(q.Eb,4,!0)+" "+l(q.size,4,!0)+" "+n),c!=Gc&&(c=-1),n=0);a+=d.w.ua;e++}}});G(this)};
|
|
|
|
|
k.qa=function(a,b,c){var d=this;switch(b){case "debugInput":return this.la=this.F[b]=c,c.onkeydown=function(a){var b;if(13==a.keyCode)b=c.value,c.value="",Xc(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.F[b]=c,Qa(c,function(){if(d.la){var a=d.la.value;
|
|
|
|
|
d.la.value="";Xc(d,a,!0);return!0}return!1}),!0;case "step":return this.F[b]=c,Qa(c,function(a){var b=!1;rb(d,!0)||(qb(d,!0),b=d.tb(a?1:0),qb(d,!1));return b}),!0}return!1};k.gb=function(a){if(this.la){var b=0,c=0;!a&&window&&(b=window.scrollX,c=window.scrollY);this.la.focus();!a&&window&&window.scrollTo(b,c)}};k.aa=function(a){a=a&&a.D;null==a&&(a=-1);return a};k.zb=function(a,b){var c=255,d=this.aa(a,!1,1);-1!==d&&(c=a.Jb?this.w.Mb(d):this.b.Mb(d),b&&Eh(a,b));return c};
|
|
|
|
|
k.oa=function(a,b){var c=65535,d=this.aa(a,!1,2);-1!==d&&(c=a.Jb?this.w.lb(d):this.b.lb(d),b&&Eh(a,b));return c};k.Qb=function(a,b,c){var d=this.aa(a,!0,1);-1!==d&&(a.Jb?this.w.fb(d,b):this.b.fb(d,b),c&&Eh(a,c),this.B.da(!0))};k.hb=function(a,b,c){var d=this.aa(a,!0,2);-1!==d&&(a.Jb?this.w.Rb(d,b):this.b.Rb(d,b),c&&Eh(a,c),this.B.da(!0))};function Y(a,b){return{D:a,Jb:b,Ga:!1}}function Fh(a){return[a.D,a.Ga]}function Gh(a){return{D:a[0],Ga:a[1]}}
|
|
|
|
|
function Dh(a,b,c){var d,e=(c?a.K:a.$a).D;c=!1;if(void 0!==b){b=ph(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.I.length;e++){var g=a.I[e].ga[d];if(void 0!==g){d=g.o;void 0!==d&&(f=Y(d));break}}if(d=f)return d;e=oh(a,b,void 0)}null!=e&&(d=Y(e,c));return d}function Hh(a,b,c){c&&(c=c.match(/(['"])(.*?)\1/))&&(b.Ec=mh(a,b.zc=c[2]))}function Eh(a,b){null!=a.D&&(a.D+=b||1)}
|
|
|
|
|
function wh(a,b){a.i=a;a.na=a.Ic=536870912;a.ba=null;a.ra=[];b=mh(a,b.replace("keys","key").replace("kbd","keyboard"),!1,"|");if(b.length)for(var c in wb){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.na|=wb[c],a.j(c+" messages enabled"))}}function Ch(a,b){for(var c in wb)if(64==wb[c]){a.Ea[c]=b;break}}
|
|
|
|
|
k.oc=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 Ih(a){return 6>a?"R"+a:6==a?"SP":"PC"}k.pc=function(a){var b;0<=a&&(8>a?b=this.b.u[a]:16>a?b=this.b.Na[a-8]:20>a?b=this.b.Aa[a-16]:20==a&&(b=Bb(this.b)));return b};
|
|
|
|
|
k.message=function(a,b){b&&(a+=" @"+J(this,Y(this.b.Db).D));this.na&1073741824?this.ra.push(a):this.ba&&a==this.ba||(this.ba=a,this.na&-2147483648&&(this.ia(),a+=" (cpu halted)"),this.j(a),this.b&&(a=this.b,cd(a),a.ra=0,a.B.da()))};function vh(a){var b;if(!ae(a))a.G&&a.G.length&&a.j("instruction history buffer freed"),a.Y=0,a.G=[];else if(!a.G||!a.G.length){a.G=Array(1E3);for(b=0;b<a.G.length;b++)a.G[b]=Y();a.Y=0;a.j("instruction history buffer allocated")}}
|
|
|
|
|
k.sb=function(a,b){if(!Jh(this,b))return!1;this.b.sb(a);return!0};k.tb=function(a,b,c){if(!Jh(this))return!1;this.J=0;a||ae(this)&&be(this,this.b.u[7],0);try{a=dd(this.b,a);var d=this.b.tb(a);0<d&&(ed(this.b,a),this.J+=d,ad(this.b,d,!0),Yc(this.b,d),this.sa++)}catch(e){"number"!=typeof e&&(this.J=0,ub(this.b,e.stack||e.message))}!1!==c&&this.B.da();this.da(b||!1);return 0<this.J};k.ia=function(a){this.b&&this.b.ia(a)};
|
|
|
|
|
k.da=function(a){if(this.ab){void 0===a&&(a=!0);var b;b=this.b;if(b=b.H&8?b.Rc|b.Qc<<8:0){var c=b>>8;this.j("trapped to "+J(this,b&255,1)+(c?" ("+J(this,c)+")":""))}this.K=Y(this.b.u[7]);a&&1!=this.R?Kh(this):Lh(this)}};function Jh(a,b){var c;(c=!a.b||!sb(a.b))||(c=a.b,c.v.ha?c=!0:(c.j(c.toString()+" not powered"),c=!1),c=!c);return c||a.b.v.fa?(b||a.j("cpu busy or unavailable, command ignored"),!1):!tb(a.b)}k.za=function(a,b){return!b&&(this.reset(!0),a&&this.restore&&!this.restore(a))?!1:!0};
|
|
|
|
|
k.ya=function(a,b){b&&this.j(a?"suspending":"shutting down");return a?this.save():!0};k.reset=function(a){vh(this);this.sa=0;this.ba=null;this.J=0;this.K=Y(this.b.u[7]);this.v.fa=!1;Mh(this);a||this.da()};k.save=function(){var a=new O(this);a.set(0,Fh(this.K));a.set(1,Fh(this.N));a.set(2,[this.g,this.P,this.na]);a.set(3,this.I);return a.data()};
|
|
|
|
|
k.restore=function(a){var b=0;void 0!==a[2]&&(this.K=Gh(a[b++]),this.N=Gh(a[b++]),this.g=a[b][0],"string"==typeof this.g&&(this.g=[this.g]),this.P=a[b][1],this.na|=a[b][2]);a[3]&&(this.I=a[3]);return!0};k.start=function(a,b){this.R||this.j("running");this.v.fa=!0;this.xb=a;this.yb=b};
|
|
|
|
|
k.stop=function(a,b){if(this.v.fa){this.v.fa=!1;this.J=b-this.yb;if(!this.R){b="stopped";if(this.J){a-=this.xb;var c=0<a?Math.round(1E3*this.J/a):0;b+=" (";ae(this)&&(b+=this.sa+" instructions, ",this.sa=0);b+=this.J+" cycles, "+a+" ms, "+c+" hz)"}else F(this,-2147483648)&&(b+=" (use the 't' command to execute blocked faults)");this.j(b)}this.da(!0);this.gb();Mh(this,this.b.u[7]);this.ba=null}};function ae(a){return 1<a.f.length||!!a.ma}
|
|
|
|
|
d.la.value="";Xc(d,a,!0);return!0}return!1}),!0;case "step":return this.F[b]=c,Qa(c,function(a){var b=!1;rb(d,!0)||(qb(d,!0),b=d.tb(a?1:0),qb(d,!1));return b}),!0}return!1};k.gb=function(a){if(this.la){var b=0,c=0;!a&&window&&(b=window.scrollX,c=window.scrollY);this.la.focus();!a&&window&&window.scrollTo(b,c)}};k.aa=function(a){a=a&&a.D;null==a&&(a=-1);return a};k.zb=function(a,b){var c=255,d=this.aa(a,!1,1);-1!==d&&(c=a.Jb?this.w.Mb(d):this.b.Mb(d),b&&Fh(a,b));return c};
|
|
|
|
|
k.oa=function(a,b){var c=65535,d=this.aa(a,!1,2);-1!==d&&(c=a.Jb?this.w.lb(d):this.b.lb(d),b&&Fh(a,b));return c};k.Qb=function(a,b,c){var d=this.aa(a,!0,1);-1!==d&&(a.Jb?this.w.fb(d,b):this.b.fb(d,b),c&&Fh(a,c),this.B.da(!0))};k.hb=function(a,b,c){var d=this.aa(a,!0,2);-1!==d&&(a.Jb?this.w.Rb(d,b):this.b.Rb(d,b),c&&Fh(a,c),this.B.da(!0))};function Y(a,b){return{D:a,Jb:b,Ga:!1}}function Gh(a){return[a.D,a.Ga]}function Hh(a){return{D:a[0],Ga:a[1]}}
|
|
|
|
|
function Eh(a,b,c){var d,e=(c?a.K:a.$a).D;c=!1;if(void 0!==b){b=qh(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.I.length;e++){var g=a.I[e].ga[d];if(void 0!==g){d=g.o;void 0!==d&&(f=Y(d));break}}if(d=f)return d;e=ph(a,b,void 0)}null!=e&&(d=Y(e,c));return d}function Ih(a,b,c){c&&(c=c.match(/(['"])(.*?)\1/))&&(b.Ec=nh(a,b.zc=c[2]))}function Fh(a,b){null!=a.D&&(a.D+=b||1)}
|
|
|
|
|
function xh(a,b){a.i=a;a.na=a.Ic=536870912;a.ba=null;a.ra=[];b=nh(a,b.replace("keys","key").replace("kbd","keyboard"),!1,"|");if(b.length)for(var c in wb){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.na|=wb[c],a.j(c+" messages enabled"))}}function Dh(a,b){for(var c in wb)if(64==wb[c]){a.Ea[c]=b;break}}
|
|
|
|
|
k.oc=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 Jh(a){return 6>a?"R"+a:6==a?"SP":"PC"}k.pc=function(a){var b;0<=a&&(8>a?b=this.b.u[a]:16>a?b=this.b.Na[a-8]:20>a?b=this.b.Aa[a-16]:20==a&&(b=Bb(this.b)));return b};
|
|
|
|
|
k.message=function(a,b){b&&(a+=" @"+J(this,Y(this.b.Db).D));this.na&1073741824?this.ra.push(a):this.ba&&a==this.ba||(this.ba=a,this.na&-2147483648&&(this.ia(),a+=" (cpu halted)"),this.j(a),this.b&&(a=this.b,cd(a),a.ra=0,a.B.da()))};function wh(a){var b;if(!ae(a))a.G&&a.G.length&&a.j("instruction history buffer freed"),a.Y=0,a.G=[];else if(!a.G||!a.G.length){a.G=Array(1E3);for(b=0;b<a.G.length;b++)a.G[b]=Y();a.Y=0;a.j("instruction history buffer allocated")}}
|
|
|
|
|
k.sb=function(a,b){if(!Kh(this,b))return!1;this.b.sb(a);return!0};k.tb=function(a,b,c){if(!Kh(this))return!1;this.J=0;a||ae(this)&&be(this,this.b.u[7],0);try{a=dd(this.b,a);var d=this.b.tb(a);0<d&&(ed(this.b,a),this.J+=d,ad(this.b,d,!0),Yc(this.b,d),this.sa++)}catch(e){"number"!=typeof e&&(this.J=0,ub(this.b,e.stack||e.message))}!1!==c&&this.B.da();this.da(b||!1);return 0<this.J};k.ia=function(a){this.b&&this.b.ia(a)};
|
|
|
|
|
k.da=function(a){if(this.ab){void 0===a&&(a=!0);var b;b=this.b;if(b=b.H&8?b.Rc|b.Qc<<8:0){var c=b>>8;this.j("trapped to "+J(this,b&255,1)+(c?" ("+J(this,c)+")":""))}this.K=Y(this.b.u[7]);a&&1!=this.R?Lh(this):Mh(this)}};function Kh(a,b){var c;(c=!a.b||!sb(a.b))||(c=a.b,c.v.ha?c=!0:(c.j(c.toString()+" not powered"),c=!1),c=!c);return c||a.b.v.fa?(b||a.j("cpu busy or unavailable, command ignored"),!1):!tb(a.b)}k.za=function(a,b){return!b&&(this.reset(!0),a&&this.restore&&!this.restore(a))?!1:!0};
|
|
|
|
|
k.ya=function(a,b){b&&this.j(a?"suspending":"shutting down");return a?this.save():!0};k.reset=function(a){wh(this);this.sa=0;this.ba=null;this.J=0;this.K=Y(this.b.u[7]);this.v.fa=!1;Nh(this);a||this.da()};k.save=function(){var a=new O(this);a.set(0,Gh(this.K));a.set(1,Gh(this.N));a.set(2,[this.g,this.P,this.na]);a.set(3,this.I);return a.data()};
|
|
|
|
|
k.restore=function(a){var b=0;void 0!==a[2]&&(this.K=Hh(a[b++]),this.N=Hh(a[b++]),this.g=a[b][0],"string"==typeof this.g&&(this.g=[this.g]),this.P=a[b][1],this.na|=a[b][2]);a[3]&&(this.I=a[3]);return!0};k.start=function(a,b){this.R||this.j("running");this.v.fa=!0;this.xb=a;this.yb=b};
|
|
|
|
|
k.stop=function(a,b){if(this.v.fa){this.v.fa=!1;this.J=b-this.yb;if(!this.R){b="stopped";if(this.J){a-=this.xb;var c=0<a?Math.round(1E3*this.J/a):0;b+=" (";ae(this)&&(b+=this.sa+" instructions, ",this.sa=0);b+=this.J+" cycles, "+a+" ms, "+c+" hz)"}else F(this,-2147483648)&&(b+=" (use the 't' command to execute blocked faults)");this.j(b)}this.da(!0);this.gb();Nh(this,this.b.u[7]);this.ba=null}};function ae(a){return 1<a.f.length||!!a.ma}
|
|
|
|
|
function be(a,b,c){var d=-1;c||(d=a.b.lb(b),0==d&&(b=pd(a.b,2)));if(0<c&&(a.ma&&!--a.ma||Pc(a,b,1,a.f)))return!0;0<=c&&a.G.length&&(a.sa++,0>d&&(d=a.b.lb(b)),65535!=(d&65535)&&(c=a.G[a.Y],c.D=b,c.Ga=!1,++a.Y==a.G.length&&(a.Y=0)));return!1}function cc(a){var b=a.b;if(b.v.fa)throw N(b,a.b.Db),a.ia(),-1;return!1}
|
|
|
|
|
function uh(a){var b,c;a.f=["bp"];if(a.L)for(b=1;b<a.L.length;b++){c=a.L[b];var d=a.w;c=a.aa(c);Qc(d.W[c>>>d.ka],!1)}a.L=["br"];if(a.C)for(b=1;b<a.C.length;b++)c=a.C[b],d=a.w,c=a.aa(c),Qc(d.W[c>>>d.ka],!0);a.C=["bw"];a.Ya=0}k.cb=function(a,b,c){var d=!0;c||Nh(this,a,b,!1,!0);if(a!=this.f){var e=this.aa(b);if(-1===e)this.j("invalid address: "+J(this,b.D)),d=!1;else{var f=this.w;f.W[e>>>f.ka].cb(e&f.w,a==this.C)}}d&&(a.push(b),c?b.Ga=!0:(Oh(this,a,a.length-1,"set"),vh(this)));return d};
|
|
|
|
|
function Nh(a,b,c,d,e){var f=!1;c=a.aa(c);for(var g=1;g<b.length;g++){var h=b[g];if(c==a.aa(h)&&(!d||h.Ga)){f=!0;h.Ga||e||Oh(a,b,g,"cleared");b.splice(g,1);b!=a.f&&(d=a.w,Qc(d.W[c>>>d.ka],b==a.C));h.Ga||vh(a);break}}return f}function Ph(a,b){for(var c=1;c<b.length;c++)Oh(a,b,c);return b.length-1}function Oh(a,b,c,d){c=b[c];a.j(b[0]+" "+J(a,c.D)+(d?" "+d:c.zc?' "'+c.zc+'"':""))}
|
|
|
|
|
function Mh(a,b){if(void 0!==b)Pc(a,b,1,a.f,!0),a.R=0;else for(b=1;b<a.f.length;b++){var c=a.f[b];if(c.Ga){if(!Nh(a,a.f,c,!0))break;b=0}}}
|
|
|
|
|
function Pc(a,b,c,d,e){var f=!1;if(!a.Ya++)for(var g=1;!f&&g<d.length;g++){var h=d[g];if(!e||h.Ga)for(var m=a.aa(h),n=0;n<c;n++)if(b+n==m){var q,f=!0;h.Ga&&(Nh(a,d,h,!0),e=!0);if(q=h.Ec){for(var f=!1,w=0;w<q.length;w++)if(!Qh(a,q[w],!0)){if(q[w].indexOf("if")){f=!0;break}for(var v=w+1;v<q.length&&q[v].indexOf("else");v++)w++;if(v==q.length){f=!0;break}}a.b.v.fa||(f=!0)}if(f){e||Oh(a,d,g,"hit");break}}}a.Ya--;return f}
|
|
|
|
|
function Rh(a,b,c,d){var e=Y(b.D),f=a.oa(b,2),g,h;for(h in a.jb)if(g=a.jb[h][f&h])break;g||(g=Ah);var m=g[0];0<=a.wb.indexOf(m)&&(g=Ah,m=g[0]);var n=h="",q=yh[m],w=g.length-1;m||w||(h=J(a,f));for(m=1;m<=w;m++){var v=g[m];if(void 0!==v){var x;x=a;var z=v,v=b,y="",B=z&61440;if(4096==B)v=v.D+((f&255)<<24>>23)&65535,y=J(x,v);else if(8192==B)v=v.D-((f&63)<<1)&65535,y=J(x,v);else if(12288==B)y=J(x,f&7,1);else if(24576==B)y=J(x,f&63,1);else if(32768==B)y=J(x,f&255,1);else if(B=f&z,z&4032&&(B>>=6,z>>=6),
|
|
|
|
|
z&63)switch(z=B&7,B&56){case 0:y=Ih(z);break;case 8:y="@"+Ih(z);break;case 16:7>z?y="("+Ih(z)+")+":(B=x.oa(v,2),y="#"+J(x,B,0,!0));break;case 24:7>z?y="@("+Ih(z)+")+":(B=x.oa(v,2),y="@#"+J(x,B,0,!0));break;case 32:y="-("+Ih(z)+")";break;case 40:y="@-("+Ih(z)+")";break;case 48:B=x.oa(v,2);y=J(x,B,0,!0)+"("+Ih(z)+")";7==z&&(y=J(x,B+v.D&65535));break;case 56:B=x.oa(v,2),y="@"+J(x,B)+"("+Ih(z)+")",7==z&&(y="@"+J(x,B+v.D&65535))}x=y;if(!x||!x.length){h="INVALID";break}"string"!=typeof x&&(n=x[1],x=x[0]);
|
|
|
|
|
0<h.length&&(h+=",");h+=x||"???"}}f="";g=J(a,e.D)+":";if(-1!==e.D&&-1!==b.D){do if(f+=" "+J(a,a.oa(e,2)),null==e.D)break;while(e.D!=b.D)}g+=wa(f,24);g+=wa(q,5);h&&(g+=" "+h);if(c||n)g=wa(g,60)+";"+(c||""),g=a.b.v.kb?g+("cycles="+Zc(a.b).toString()+" cs="+l(a.b.Ab)):g+(null!=d?"="+d.toString():""),n&&(g+=" @"+n);return g}function Sh(a,b){switch(b){case "N":a=a.b.Ma();break;case "Z":a=nd(a.b);break;case "V":a=md(a.b);break;case "C":a=ld(a.b);break;default:a=0}return b.charAt(0)+(a?"1":"0")+" "}
|
|
|
|
|
function Th(a,b){var c="",d=a.b;8>b?(c=Ih(b),c+="="+J(a,d.u[b])):13>b?c="A"+(b-8)+"="+J(a,d.Na[b-8]):16<=b&&20>b?c="S"+(b-16)+"="+J(a,d.Aa[b-16]):20==b&&(c="PS="+J(a,Bb(d)));c&&(c+=" ");return c}function Uh(a){var b,c="";for(b=0;6>b;b++)c+=Th(a,b);c=c+"\n"+(Th(a,6)+Th(a,7)+Th(a,20));return c+=Sh(a,"T")+Sh(a,"N")+Sh(a,"Z")+Sh(a,"V")+Sh(a,"C")}k.ic=function(a,b){return a[0]>b[0]?1:a[0]<b[0]?-1:0};
|
|
|
|
|
function eg(a,b,c,d,e){var f=[],g;for(g in e){var h=e[g];"number"==typeof h&&(e[g]=h={o:h});var m=h.o,n=h.a;if(void 0!==m){var q=f,m=[m>>>0,g],w=za(q,m,a.ic);0>w&&q.splice(-(w+1),0,m)}n&&(h.a=n.replace(/''/g,'"'))}a.I.push({we:b,D:c,Pc:d,ga:e,gc:f})}function Vh(a,b,c){var d=[],e=a.aa(b)>>>0;for(b=0;b<a.I.length;b++){var f=a.I[b],g=f.D>>>0,h=f.Pc;if(e>=g&&e<g+h){e=za(f.gc,[e-g],a.ic);0<=e?Wh(a,b,e,d):c&&(e=~e,Wh(a,b,e-1,d),Wh(a,b,e,d));break}}return d}
|
|
|
|
|
function Wh(a,b,c,d){var e={},f=a.I[b].gc,g=0,h=null;0<=c&&c<f.length&&(g=f[c][0],h=f[c][1]);h&&(e=a.I[b].ga[h],h="."==h.charAt(0)?null:e.l||h);d.push(h);d.push(g);d.push(e.a);d.push(e.c)}function Xh(a,b){var c=b.match(/^\s*([A-Z_]?[A-Z0-9_]*)\s*(=?)\s*(.*)$/i);if(c){if(!c[1])return sh(a)||a.j("no variables"),!0;if(!c[2])return sh(a,c[1]);if(!c[3])return delete a.S[c[1]],!0;b=oh(a,c[3]);return void 0!==b?(a.S[c[1]]=b,!0):!1}a.j("invalid assignment:"+b);return!1}
|
|
|
|
|
function Yh(a,b,c){var d=null;if(b=Dh(a,b,!0)){a.aa(b);var e=Vh(a,b,!0);if(e.length){var f,g;e[0]&&(g="",(f=b.D-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.D)&&(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 Kh(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=oh(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=Y(d.u[7]);break;case "N":d.X=f?32768:0;break;case "Z":d.$=
|
|
|
|
|
f?0:1;break;case "V":d.U=f?32768:0;break;case "C":d.T=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.B.da();a.j("updated registers:")}a.j(Uh(a));c&&(a.K=Y(d.u[7]),Lh(a,J(a,a.K.D)))}}function Zh(a,b){b=xa(b);var c=b.match(/^(['"])(.*?)\1$/);c?1<c[2].length?a.j(c[2]):rh(a,null,c[2].charCodeAt(0)):oh(a,b,!0)}
|
|
|
|
|
function $h(a,b,c){var d="t"!=b;c=qh(a,c,null,!0)||1;var e=1==c?0:1;"tc"==b&&(e=c,c=1);Pa(c,function(){return qb(a,!0)&&a.tb(e,d,!1)},function(){a.B.da();qb(a,!1)})}
|
|
|
|
|
function Lh(a,b,c,d){if(b=Dh(a,b,!0)){void 0===d&&(d=1);var e=256;if(void 0!==c)if("l"==c.charAt(0))c=qh(a,c.substr(1)),null!=c&&(d=c);else{d=Dh(a,c,!0);if(!d||d.D<b.D)return;e=d.D-b.D;if(256<e){a.j("range too large");return}d=-1}c=0;for(var f;0<e&&d--;){f=rb(a,!1)||a.R?a.J:null;var g=null!=f?"cycles":null,h=Vh(a,b),m=b.D;if(h[0]&&d&&(!c&&d||0>h[0].indexOf("+"))){var n=h[0]+":";h[2]&&(n+=" "+h[2]);a.j(n)}h[3]&&(g=h[3],f=null);f=Rh(a,b,g,f);a.j(f);a.K=b;e-=b.D-m;c++}}}
|
|
|
|
|
function Qh(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.N.D)),a.K=a.N,a.P=!1),b="");var e=b.charAt(0);if('"'==e||"'"==e)return!0;a.ba=null;if(sb(a)&&0<b.length){a.P&&(b="a "+J(a,a.N.D)+" "+b);var f=!1,g=b.replace(/ +/g," ").split(" ");g[0]=g[0].toLowerCase();if(g&&g.length)for(var h=g[0],m=h.charAt(0),n=1;n<h.length;n++){var q=h.charAt(n);if("?"==m||"r"==m||"a">q||"z"<q){g[0]=h.substr(n);g.unshift(h.substr(0,n));break}}switch(g[0].charAt(0)){case "a":var w=
|
|
|
|
|
Dh(a,g[1],!0);if(w)if(a.N=w,void 0===g[2])a.j("begin assemble at "+J(a,w.D)),a.P=!0,a.B.da();else{var v;a.j("not supported yet");v=[];if(v.length){for(var x=0;x<v.length;x++)a.Qb(w,v[x],1);a.j(Rh(a,a.N))}}break;case "b":a:{var z=g[0],y=g[1],B=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 ia=z.charAt(1);if("l"==ia){var Ja;Ja=0+Ph(a,a.f);Ja+=Ph(a,a.L);(Ja+=Ph(a,a.C))||a.j("no breakpoints")}else if("n"==ia)a.ma=qh(a,y),a.j("break after "+a.ma+" instruction(s)");else if(void 0===y)a.j("missing breakpoint address");else{var P=Y();if("*"!=y&&(P=Dh(a,y,!0),!P))break a;"c"==ia?null==P.D?(uh(a),a.j("all breakpoints cleared")):Nh(a,a.f,P)||Nh(a,a.L,P)||Nh(a,a.C,P)||a.j("breakpoint missing: "+J(a,P.D)):null!=P.D&&(Hh(a,P,B),"p"==ia?a.cb(a.f,
|
|
|
|
|
P):"r"==ia?a.cb(a.L,P):"w"==ia?a.cb(a.C,P):a.j("unknown breakpoint command: "+ia))}}}break;case "c":a.Ka&&(a.Ka.value="");break;case "d":a:{var bb,cb=g[0],la=g[1],La=g[2],si=g[3];if("?"==la){var db="";for(bb in wb)a.Ea[bb]&&(db&&(db+=","),db+=bb);db+=",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");
|
|
|
|
|
db.length&&a.j("dump extension commands:\n\t"+db)}else if("state"==la){var fg=ai(a.B,!0);"console"==La?console.log(fg):(a.Ka&&(a.Ka.value=""),a.j(fg))}else if("symbols"==la)for(var vd=0;vd<a.I.length;vd++){var wd=a.I[vd],eb;for(eb in wd.ga)if("."!=eb.charAt(0)){var gg=wd.ga[eb].o;if(void 0!==gg){var hg=wd.ga[eb].l;hg&&(eb=hg);a.j(J(a,gg)+" "+eb)}}}else{if("d"==cb){for(bb in wb)if(g[1]==bb){var ig=a.Ea[bb];ig?(g.shift(),g.shift(),ig(g)):a.j("no dump registered for "+la);break a}la||(cb=a.Kb||"db")}else a.Kb=
|
|
|
|
|
cb;if("dh"==cb){var jg=la,kg=La,lg="",mg=0,ea=a.Y,ma=a.G;if(ma.length){var Z=+jg||a.bb,Db=+kg||10;isNaN(Z)?Z=Db:lg="more ";Z>ma.length&&(a.j("note: only "+ma.length+" available"),Z=ma.length);ea-=Z;0>ea&&(null==ma[ma.length-1].D?(Z=ea+Z,ea=0):ea+=ma.length);var xd=[];"call"==kg&&(Db=1E5,xd=["CALL"]);for(void 0!==jg&&a.j(Z+" instructions earlier:");0<Db&&ea!=a.Y;){var ng=ma[ea++];if(null==ng.D)break;var Eb=Y(ng.D),ti=Z--,og=Rh(a,Eb,"history",ti);(!xd.length||0<=og.indexOf(xd[0]))&&a.j(og);Eb.Wb&&(ea+=
|
|
|
|
|
Eb.Wb,Db-=Eb.Wb,Z-=Eb.Wb);ea>=ma.length&&(ea=0);a.bb=Z;mg++;Db--}}mg||(a.j("no "+lg+"history available"),a.bb=void 0)}else{var Fb=Dh(a,la);if(Fb){var vc=0;La&&("l"==La.charAt(0)&&(La=La.substr(1)||si),vc=qh(a,La)>>>0,65536<vc&&(vc=65536));for(var Gb="",fb="dd"==cb?4:"dw"==cb?2:1,wc=fb*vc||128,ui=wc+15>>4||1;ui--&&0<wc;){var xc=0,Hb=0,Ib,yd="",pg="",la=J(a,Fb.D);for(Ib=4==fb?16:a.Z;0<Ib&&0<wc;Ib--){var yc=1,zc=1==fb?a.zb(Fb,yc):a.oa(Fb,yc=2),xc=xc|zc<<(Hb<<3),Hb=Hb+yc;Hb==fb&&(yd+=J(a,xc,fb),yd+=1==
|
|
|
|
|
fb?9==Ib?"-":" ":" ",xc=Hb=0);pg+=32<=zc&&128>zc?String.fromCharCode(zc):".";wc-=yc}Gb&&(Gb+="\n");Gb+=la+" "+yd+(0==Ib?" "+pg:"")}Gb&&a.j(Gb);a.$a=Fb}}}}break;case "e":if("else"==g[0])break;var gb,zd,Ad,Bd,Cd=g[0],Dd=g[1];"eb"==Cd?(gb=1,zd=255,Ad=a.zb,Bd=a.Qb):"e"==Cd||"ew"==Cd?(gb=2,zd=65535,Ad=a.oa,Bd=a.hb):Dd=null;if(null==Dd)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 Ac=Dh(a,Dd);if(Ac)for(var Bc=2;Bc<g.length;Bc++){var Jb=
|
|
|
|
|
oh(a,g[Bc]);if(void 0===Jb){a.j("unrecognized value: "+g[Bc]);break}Jb&~zd&&a.j("warning: "+l(Jb)+" exceeds "+gb+"-byte value");var vi=Ad.call(a,Ac);a.j("changing "+J(a,Ac.D)+" from "+J(a,vi,gb)+" to "+J(a,Jb,gb));Bd.call(a,Ac,Jb,gb)}}break;case "g":a:{var qg=g[1],wi=b;if(void 0!==qg){var Ed=Dh(a,qg,!0);if(!Ed)break a;Hh(a,Ed,wi);a.cb(a.f,Ed,!0)}a.sb(!0,c)}break;case "h":a.v.fa?(c||a.j("halting"),a.ia()):rb(a,!0)||c||a.j("already halted");break;case "i":if("if"==g[0]){var Fd;var Kb=b.substr(2),Kb=
|
|
|
|
|
xa(Kb);oh(a,Kb)?(c||a.j("true: "+Kb),Fd=!0):(c||a.j("false: "+Kb),Fd=!1);Fd||(d=!1);break}f=!0;break;case "k":var xi=g[0];if("?"==g[1])a.j("stack trace commands:"),a.j("\tk\tshow frame addresses"),a.j("\tks\tshow symbol information");else{var Gd=0,Hd=Y(),Lb=Y(a.b.u[6]);for(a.j("stack trace for "+J(a,Lb.D));10>Gd;){for(var Ma=null,yi=256;65536>Lb.D>>>0;){Hd.D=a.oa(Lb,2);if(null==Lb.D||!yi--)break;if(!(Hd.D&1)){for(var zi=a,Cc=Hd,rg=null,Mb=Cc.D,sg=Mb,Id=1;6>=Id&&Mb;Id++){if(2<Id){Cc.D=Mb;var Dc=Rh(zi,
|
|
|
|
|
Cc);if(0<=Dc.indexOf("JSR")){var tg=Dc.indexOf(" ");if(Mb+(Dc.indexOf(" ",tg+1)-tg-1)/2==sg){rg=Dc;break}}}Mb-=2}Cc.D=sg;if(Ma=rg)break}}if(!Ma||null==Ma)break;var ug=null;if("ks"==xi){var vg=Ma.match(/[0-9A-F]+$/);vg&&(ug=Yh(a,vg[0]))}Ma=wa(Ma,50)+" ;"+(ug||"stack="+J(a,Lb.D));a.j(Ma);Gd++}Gd||a.j("no return addresses found")}break;case "l":if("ln"==g[0]){Yh(a,g[1],!0);break}f=!0;break;case "m":a:{var na,oa=null,H=g[1];"?"==H&&(H=void 0);if(void 0!==H){var Ca=0;if("all"==H)Ca=1878917119,H=null;
|
|
|
|
|
else if("on"==H)oa=!0,H=null;else if("off"==H)oa=!1,H=null;else{"keys"==H&&(H="key");"kbd"==H&&(H="keyboard");for(na in wb)if(H==na){Ca=wb[na];oa=!!(a.na&Ca);break}if(!Ca){a.j("unknown message category: "+H);break a}}if(Ca)if("on"==g[2])a.na|=Ca,oa=!0;else if("off"==g[2]&&(a.na&=~Ca,oa=!1,1073741824==Ca)){for(var Jd=0;Jd<a.ra.length;Jd++)a.j(a.ra[Jd]);a.ra=[]}}var Ai=0,Nb="";for(na in wb)if(!H||H==na){var Bi=!!(a.na&wb[na]);if(null===oa||oa==Bi)Nb&&(Nb+=","),++Ai%10||(Nb+="\n\t"),"key"==na&&(na="keys"),
|
|
|
|
|
Nb+=na}void 0===H&&a.j("message commands:\n\tm [category] [on|off]\tturn categories on/off");a.j((null!==oa?oa?"messages on: ":"messages off: ":"message categories:\n\t")+(Nb||"none"));vh(a)}break;case "p":if("print"==g[0]){Zh(a,b.substr(5));break}var Ci="pr"==g[0]?1:0;if(a.R)a.j("step in progress");else{var wg=Y(a.b.u[7]);a.zb(wg);a.R?(a.cb(a.f,wg,!0),a.sb()||(a.B&&a.B.gb(),a.R=0)):$h(a,Ci?"tr":"t")}break;case "r":if("reset"==b){a.B&&a.B.reset();break}Kh(a,g);break;case "s":a:switch(g[1]){case "base":if(g[2]){var Ob=
|
|
|
|
|
function vh(a){var b,c;a.f=["bp"];if(a.L)for(b=1;b<a.L.length;b++){c=a.L[b];var d=a.w;c=a.aa(c);Qc(d.W[c>>>d.ka],!1)}a.L=["br"];if(a.C)for(b=1;b<a.C.length;b++)c=a.C[b],d=a.w,c=a.aa(c),Qc(d.W[c>>>d.ka],!0);a.C=["bw"];a.Ya=0}k.cb=function(a,b,c){var d=!0;c||Oh(this,a,b,!1,!0);if(a!=this.f){var e=this.aa(b);if(-1===e)this.j("invalid address: "+J(this,b.D)),d=!1;else{var f=this.w;f.W[e>>>f.ka].cb(e&f.w,a==this.C)}}d&&(a.push(b),c?b.Ga=!0:(Ph(this,a,a.length-1,"set"),wh(this)));return d};
|
|
|
|
|
function Oh(a,b,c,d,e){var f=!1;c=a.aa(c);for(var g=1;g<b.length;g++){var h=b[g];if(c==a.aa(h)&&(!d||h.Ga)){f=!0;h.Ga||e||Ph(a,b,g,"cleared");b.splice(g,1);b!=a.f&&(d=a.w,Qc(d.W[c>>>d.ka],b==a.C));h.Ga||wh(a);break}}return f}function Qh(a,b){for(var c=1;c<b.length;c++)Ph(a,b,c);return b.length-1}function Ph(a,b,c,d){c=b[c];a.j(b[0]+" "+J(a,c.D)+(d?" "+d:c.zc?' "'+c.zc+'"':""))}
|
|
|
|
|
function Nh(a,b){if(void 0!==b)Pc(a,b,1,a.f,!0),a.R=0;else for(b=1;b<a.f.length;b++){var c=a.f[b];if(c.Ga){if(!Oh(a,a.f,c,!0))break;b=0}}}
|
|
|
|
|
function Pc(a,b,c,d,e){var f=!1;if(!a.Ya++)for(var g=1;!f&&g<d.length;g++){var h=d[g];if(!e||h.Ga)for(var m=a.aa(h),n=0;n<c;n++)if(b+n==m){var q,f=!0;h.Ga&&(Oh(a,d,h,!0),e=!0);if(q=h.Ec){for(var f=!1,w=0;w<q.length;w++)if(!Rh(a,q[w],!0)){if(q[w].indexOf("if")){f=!0;break}for(var v=w+1;v<q.length&&q[v].indexOf("else");v++)w++;if(v==q.length){f=!0;break}}a.b.v.fa||(f=!0)}if(f){e||Ph(a,d,g,"hit");break}}}a.Ya--;return f}
|
|
|
|
|
function Sh(a,b,c,d){var e=Y(b.D),f=a.oa(b,2),g,h;for(h in a.jb)if(g=a.jb[h][f&h])break;g||(g=Bh);var m=g[0];0<=a.wb.indexOf(m)&&(g=Bh,m=g[0]);var n=h="",q=zh[m],w=g.length-1;m||w||(h=J(a,f));for(m=1;m<=w;m++){var v=g[m];if(void 0!==v){var x;x=a;var z=v,v=b,y="",B=z&61440;if(4096==B)v=v.D+((f&255)<<24>>23)&65535,y=J(x,v);else if(8192==B)v=v.D-((f&63)<<1)&65535,y=J(x,v);else if(12288==B)y=J(x,f&7,1);else if(24576==B)y=J(x,f&63,1);else if(32768==B)y=J(x,f&255,1);else if(B=f&z,z&4032&&(B>>=6,z>>=6),
|
|
|
|
|
z&63)switch(z=B&7,B&56){case 0:y=Jh(z);break;case 8:y="@"+Jh(z);break;case 16:7>z?y="("+Jh(z)+")+":(B=x.oa(v,2),y="#"+J(x,B,0,!0));break;case 24:7>z?y="@("+Jh(z)+")+":(B=x.oa(v,2),y="@#"+J(x,B,0,!0));break;case 32:y="-("+Jh(z)+")";break;case 40:y="@-("+Jh(z)+")";break;case 48:B=x.oa(v,2);y=J(x,B,0,!0)+"("+Jh(z)+")";7==z&&(y=J(x,B+v.D&65535));break;case 56:B=x.oa(v,2),y="@"+J(x,B)+"("+Jh(z)+")",7==z&&(y="@"+J(x,B+v.D&65535))}x=y;if(!x||!x.length){h="INVALID";break}"string"!=typeof x&&(n=x[1],x=x[0]);
|
|
|
|
|
0<h.length&&(h+=",");h+=x||"???"}}f="";g=J(a,e.D)+":";if(-1!==e.D&&-1!==b.D){do if(f+=" "+J(a,a.oa(e,2)),null==e.D)break;while(e.D!=b.D)}g+=wa(f,24);g+=wa(q,5);h&&(g+=" "+h);if(c||n)g=wa(g,60)+";"+(c||""),g=a.b.v.kb?g+("cycles="+Zc(a.b).toString()+" cs="+l(a.b.Ab)):g+(null!=d?"="+d.toString():""),n&&(g+=" @"+n);return g}function Th(a,b){switch(b){case "N":a=a.b.Ma();break;case "Z":a=nd(a.b);break;case "V":a=md(a.b);break;case "C":a=ld(a.b);break;default:a=0}return b.charAt(0)+(a?"1":"0")+" "}
|
|
|
|
|
function Uh(a,b){var c="",d=a.b;8>b?(c=Jh(b),c+="="+J(a,d.u[b])):13>b?c="A"+(b-8)+"="+J(a,d.Na[b-8]):16<=b&&20>b?c="S"+(b-16)+"="+J(a,d.Aa[b-16]):20==b&&(c="PS="+J(a,Bb(d)));c&&(c+=" ");return c}function Vh(a){var b,c="";for(b=0;6>b;b++)c+=Uh(a,b);c=c+"\n"+(Uh(a,6)+Uh(a,7)+Uh(a,20));return c+=Th(a,"T")+Th(a,"N")+Th(a,"Z")+Th(a,"V")+Th(a,"C")}k.ic=function(a,b){return a[0]>b[0]?1:a[0]<b[0]?-1:0};
|
|
|
|
|
function eg(a,b,c,d,e){var f=[],g;for(g in e){var h=e[g];"number"==typeof h&&(e[g]=h={o:h});var m=h.o,n=h.a;if(void 0!==m){var q=f,m=[m>>>0,g],w=za(q,m,a.ic);0>w&&q.splice(-(w+1),0,m)}n&&(h.a=n.replace(/''/g,'"'))}a.I.push({we:b,D:c,Pc:d,ga:e,gc:f})}function Wh(a,b,c){var d=[],e=a.aa(b)>>>0;for(b=0;b<a.I.length;b++){var f=a.I[b],g=f.D>>>0,h=f.Pc;if(e>=g&&e<g+h){e=za(f.gc,[e-g],a.ic);0<=e?Xh(a,b,e,d):c&&(e=~e,Xh(a,b,e-1,d),Xh(a,b,e,d));break}}return d}
|
|
|
|
|
function Xh(a,b,c,d){var e={},f=a.I[b].gc,g=0,h=null;0<=c&&c<f.length&&(g=f[c][0],h=f[c][1]);h&&(e=a.I[b].ga[h],h="."==h.charAt(0)?null:e.l||h);d.push(h);d.push(g);d.push(e.a);d.push(e.c)}function Yh(a,b){var c=b.match(/^\s*([A-Z_]?[A-Z0-9_]*)\s*(=?)\s*(.*)$/i);if(c){if(!c[1])return th(a)||a.j("no variables"),!0;if(!c[2])return th(a,c[1]);if(!c[3])return delete a.S[c[1]],!0;b=ph(a,c[3]);return void 0!==b?(a.S[c[1]]=b,!0):!1}a.j("invalid assignment:"+b);return!1}
|
|
|
|
|
function Zh(a,b,c){var d=null;if(b=Eh(a,b,!0)){a.aa(b);var e=Wh(a,b,!0);if(e.length){var f,g;e[0]&&(g="",(f=b.D-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.D)&&(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 Lh(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=ph(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=Y(d.u[7]);break;case "N":d.X=f?32768:0;break;case "Z":d.$=
|
|
|
|
|
f?0:1;break;case "V":d.U=f?32768:0;break;case "C":d.T=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.B.da();a.j("updated registers:")}a.j(Vh(a));c&&(a.K=Y(d.u[7]),Mh(a,J(a,a.K.D)))}}function $h(a,b){b=xa(b);var c=b.match(/^(['"])(.*?)\1$/);c?1<c[2].length?a.j(c[2]):sh(a,null,c[2].charCodeAt(0)):ph(a,b,!0)}
|
|
|
|
|
function ai(a,b,c){var d="t"!=b;c=rh(a,c,null,!0)||1;var e=1==c?0:1;"tc"==b&&(e=c,c=1);Pa(c,function(){return qb(a,!0)&&a.tb(e,d,!1)},function(){a.B.da();qb(a,!1)})}
|
|
|
|
|
function Mh(a,b,c,d){if(b=Eh(a,b,!0)){void 0===d&&(d=1);var e=256;if(void 0!==c)if("l"==c.charAt(0))c=rh(a,c.substr(1)),null!=c&&(d=c);else{d=Eh(a,c,!0);if(!d||d.D<b.D)return;e=d.D-b.D;if(256<e){a.j("range too large");return}d=-1}c=0;for(var f;0<e&&d--;){f=rb(a,!1)||a.R?a.J:null;var g=null!=f?"cycles":null,h=Wh(a,b),m=b.D;if(h[0]&&d&&(!c&&d||0>h[0].indexOf("+"))){var n=h[0]+":";h[2]&&(n+=" "+h[2]);a.j(n)}h[3]&&(g=h[3],f=null);f=Sh(a,b,g,f);a.j(f);a.K=b;e-=b.D-m;c++}}}
|
|
|
|
|
function Rh(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.N.D)),a.K=a.N,a.P=!1),b="");var e=b.charAt(0);if('"'==e||"'"==e)return!0;a.ba=null;if(sb(a)&&0<b.length){a.P&&(b="a "+J(a,a.N.D)+" "+b);var f=!1,g=b.replace(/ +/g," ").split(" ");g[0]=g[0].toLowerCase();if(g&&g.length)for(var h=g[0],m=h.charAt(0),n=1;n<h.length;n++){var q=h.charAt(n);if("?"==m||"r"==m||"a">q||"z"<q){g[0]=h.substr(n);g.unshift(h.substr(0,n));break}}switch(g[0].charAt(0)){case "a":var w=
|
|
|
|
|
Eh(a,g[1],!0);if(w)if(a.N=w,void 0===g[2])a.j("begin assemble at "+J(a,w.D)),a.P=!0,a.B.da();else{var v;a.j("not supported yet");v=[];if(v.length){for(var x=0;x<v.length;x++)a.Qb(w,v[x],1);a.j(Sh(a,a.N))}}break;case "b":a:{var z=g[0],y=g[1],B=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 ia=z.charAt(1);if("l"==ia){var Ja;Ja=0+Qh(a,a.f);Ja+=Qh(a,a.L);(Ja+=Qh(a,a.C))||a.j("no breakpoints")}else if("n"==ia)a.ma=rh(a,y),a.j("break after "+a.ma+" instruction(s)");else if(void 0===y)a.j("missing breakpoint address");else{var P=Y();if("*"!=y&&(P=Eh(a,y,!0),!P))break a;"c"==ia?null==P.D?(vh(a),a.j("all breakpoints cleared")):Oh(a,a.f,P)||Oh(a,a.L,P)||Oh(a,a.C,P)||a.j("breakpoint missing: "+J(a,P.D)):null!=P.D&&(Ih(a,P,B),"p"==ia?a.cb(a.f,
|
|
|
|
|
P):"r"==ia?a.cb(a.L,P):"w"==ia?a.cb(a.C,P):a.j("unknown breakpoint command: "+ia))}}}break;case "c":a.Ka&&(a.Ka.value="");break;case "d":a:{var bb,cb=g[0],la=g[1],La=g[2],ti=g[3];if("?"==la){var db="";for(bb in wb)a.Ea[bb]&&(db&&(db+=","),db+=bb);db+=",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");
|
|
|
|
|
db.length&&a.j("dump extension commands:\n\t"+db)}else if("state"==la){var gg=bi(a.B,!0);"console"==La?console.log(gg):(a.Ka&&(a.Ka.value=""),a.j(gg))}else if("symbols"==la)for(var vd=0;vd<a.I.length;vd++){var wd=a.I[vd],eb;for(eb in wd.ga)if("."!=eb.charAt(0)){var hg=wd.ga[eb].o;if(void 0!==hg){var ig=wd.ga[eb].l;ig&&(eb=ig);a.j(J(a,hg)+" "+eb)}}}else{if("d"==cb){for(bb in wb)if(g[1]==bb){var jg=a.Ea[bb];jg?(g.shift(),g.shift(),jg(g)):a.j("no dump registered for "+la);break a}la||(cb=a.Kb||"db")}else a.Kb=
|
|
|
|
|
cb;if("dh"==cb){var kg=la,lg=La,mg="",ng=0,ea=a.Y,ma=a.G;if(ma.length){var Z=+kg||a.bb,Db=+lg||10;isNaN(Z)?Z=Db:mg="more ";Z>ma.length&&(a.j("note: only "+ma.length+" available"),Z=ma.length);ea-=Z;0>ea&&(null==ma[ma.length-1].D?(Z=ea+Z,ea=0):ea+=ma.length);var xd=[];"call"==lg&&(Db=1E5,xd=["CALL"]);for(void 0!==kg&&a.j(Z+" instructions earlier:");0<Db&&ea!=a.Y;){var og=ma[ea++];if(null==og.D)break;var Eb=Y(og.D),ui=Z--,pg=Sh(a,Eb,"history",ui);(!xd.length||0<=pg.indexOf(xd[0]))&&a.j(pg);Eb.Wb&&(ea+=
|
|
|
|
|
Eb.Wb,Db-=Eb.Wb,Z-=Eb.Wb);ea>=ma.length&&(ea=0);a.bb=Z;ng++;Db--}}ng||(a.j("no "+mg+"history available"),a.bb=void 0)}else{var Fb=Eh(a,la);if(Fb){var vc=0;La&&("l"==La.charAt(0)&&(La=La.substr(1)||ti),vc=rh(a,La)>>>0,65536<vc&&(vc=65536));for(var Gb="",fb="dd"==cb?4:"dw"==cb?2:1,wc=fb*vc||128,vi=wc+15>>4||1;vi--&&0<wc;){var xc=0,Hb=0,Ib,yd="",qg="",la=J(a,Fb.D);for(Ib=4==fb?16:a.Z;0<Ib&&0<wc;Ib--){var yc=1,zc=1==fb?a.zb(Fb,yc):a.oa(Fb,yc=2),xc=xc|zc<<(Hb<<3),Hb=Hb+yc;Hb==fb&&(yd+=J(a,xc,fb),yd+=1==
|
|
|
|
|
fb?9==Ib?"-":" ":" ",xc=Hb=0);qg+=32<=zc&&128>zc?String.fromCharCode(zc):".";wc-=yc}Gb&&(Gb+="\n");Gb+=la+" "+yd+(0==Ib?" "+qg:"")}Gb&&a.j(Gb);a.$a=Fb}}}}break;case "e":if("else"==g[0])break;var gb,zd,Ad,Bd,Cd=g[0],Dd=g[1];"eb"==Cd?(gb=1,zd=255,Ad=a.zb,Bd=a.Qb):"e"==Cd||"ew"==Cd?(gb=2,zd=65535,Ad=a.oa,Bd=a.hb):Dd=null;if(null==Dd)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 Ac=Eh(a,Dd);if(Ac)for(var Bc=2;Bc<g.length;Bc++){var Jb=
|
|
|
|
|
ph(a,g[Bc]);if(void 0===Jb){a.j("unrecognized value: "+g[Bc]);break}Jb&~zd&&a.j("warning: "+l(Jb)+" exceeds "+gb+"-byte value");var wi=Ad.call(a,Ac);a.j("changing "+J(a,Ac.D)+" from "+J(a,wi,gb)+" to "+J(a,Jb,gb));Bd.call(a,Ac,Jb,gb)}}break;case "g":a:{var rg=g[1],xi=b;if(void 0!==rg){var Ed=Eh(a,rg,!0);if(!Ed)break a;Ih(a,Ed,xi);a.cb(a.f,Ed,!0)}a.sb(!0,c)}break;case "h":a.v.fa?(c||a.j("halting"),a.ia()):rb(a,!0)||c||a.j("already halted");break;case "i":if("if"==g[0]){var Fd;var Kb=b.substr(2),Kb=
|
|
|
|
|
xa(Kb);ph(a,Kb)?(c||a.j("true: "+Kb),Fd=!0):(c||a.j("false: "+Kb),Fd=!1);Fd||(d=!1);break}f=!0;break;case "k":var yi=g[0];if("?"==g[1])a.j("stack trace commands:"),a.j("\tk\tshow frame addresses"),a.j("\tks\tshow symbol information");else{var Gd=0,Hd=Y(),Lb=Y(a.b.u[6]);for(a.j("stack trace for "+J(a,Lb.D));10>Gd;){for(var Ma=null,zi=256;65536>Lb.D>>>0;){Hd.D=a.oa(Lb,2);if(null==Lb.D||!zi--)break;if(!(Hd.D&1)){for(var Ai=a,Cc=Hd,sg=null,Mb=Cc.D,tg=Mb,Id=1;6>=Id&&Mb;Id++){if(2<Id){Cc.D=Mb;var Dc=Sh(Ai,
|
|
|
|
|
Cc);if(0<=Dc.indexOf("JSR")){var ug=Dc.indexOf(" ");if(Mb+(Dc.indexOf(" ",ug+1)-ug-1)/2==tg){sg=Dc;break}}}Mb-=2}Cc.D=tg;if(Ma=sg)break}}if(!Ma||null==Ma)break;var vg=null;if("ks"==yi){var wg=Ma.match(/[0-9A-F]+$/);wg&&(vg=Zh(a,wg[0]))}Ma=wa(Ma,50)+" ;"+(vg||"stack="+J(a,Lb.D));a.j(Ma);Gd++}Gd||a.j("no return addresses found")}break;case "l":if("ln"==g[0]){Zh(a,g[1],!0);break}f=!0;break;case "m":a:{var na,oa=null,H=g[1];"?"==H&&(H=void 0);if(void 0!==H){var Ca=0;if("all"==H)Ca=1878917119,H=null;
|
|
|
|
|
else if("on"==H)oa=!0,H=null;else if("off"==H)oa=!1,H=null;else{"keys"==H&&(H="key");"kbd"==H&&(H="keyboard");for(na in wb)if(H==na){Ca=wb[na];oa=!!(a.na&Ca);break}if(!Ca){a.j("unknown message category: "+H);break a}}if(Ca)if("on"==g[2])a.na|=Ca,oa=!0;else if("off"==g[2]&&(a.na&=~Ca,oa=!1,1073741824==Ca)){for(var Jd=0;Jd<a.ra.length;Jd++)a.j(a.ra[Jd]);a.ra=[]}}var Bi=0,Nb="";for(na in wb)if(!H||H==na){var Ci=!!(a.na&wb[na]);if(null===oa||oa==Ci)Nb&&(Nb+=","),++Bi%10||(Nb+="\n\t"),"key"==na&&(na="keys"),
|
|
|
|
|
Nb+=na}void 0===H&&a.j("message commands:\n\tm [category] [on|off]\tturn categories on/off");a.j((null!==oa?oa?"messages on: ":"messages off: ":"message categories:\n\t")+(Nb||"none"));wh(a)}break;case "p":if("print"==g[0]){$h(a,b.substr(5));break}var Di="pr"==g[0]?1:0;if(a.R)a.j("step in progress");else{var xg=Y(a.b.u[7]);a.zb(xg);a.R?(a.cb(a.f,xg,!0),a.sb()||(a.B&&a.B.gb(),a.R=0)):ai(a,Di?"tr":"t")}break;case "r":if("reset"==b){a.B&&a.B.reset();break}Lh(a,g);break;case "s":a:switch(g[1]){case "base":if(g[2]){var Ob=
|
|
|
|
|
+g[2];if(8==Ob||10==Ob||16==Ob)a.Z=Ob;else{a.j("invalid base: "+Ob);break}}a.j("default base: "+a.Z);break;case "cs":var Pb;void 0!==g[3]&&(Pb=+g[3]);switch(g[2]){case "int":a.b.nb=Pb;break;case "start":a.b.Bb=Pb;break;case "stop":a.b.ob=Pb;break;default:a.j("unknown cs option");break a}void 0!==Pb&&Wc(a.b);a.j("checksums "+(a.b.v.kb?"enabled":"disabled"));break;case "sp":void 0!==g[2]&&($c(a.b,+g[2])||a.j("warning: using 1x multiplier, previous target not reached"));a.j("target speed: "+(a.b.eb.toFixed(2)+
|
|
|
|
|
"Mhz")+" ("+a.b.Ta+"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":$h(a,g[0],g[1]);break;case "u":Lh(a,g[1],g[2],8);break;case "v":if("var"==g[0]){Xh(a,b.substr(3))||(d=!1);break}if("ver"==
|
|
|
|
|
g[0]){a.j("PDPjs version 1.30.2 ("+a.b.mb+",RELEASE"+(vb?",TYPEDARRAYS":",LONGARRAYS")+")");a.j(window?window.navigator.userAgent:"");break}f=!0;break;case "?":if(g[1]){Zh(a,b.substr(1));break}var Kd="commands:",Ld;for(Ld in xh)Kd+="\n"+wa(Ld,9)+xh[Ld];ae(a)||(Kd+="\nnote: history disabled if no exec breakpoints");a.j(Kd);break;default:f=!0}f&&(a.j("unknown command: "+b),d=!1)}}catch(xg){a.j("debugger error: "+(xg.stack||xg.message)),d=!1}return d}
|
|
|
|
|
function Xc(a,b,c){b=mh(a,b,c);for(var d in b)if(!Qh(a,b[+d]))return!1;return!0}Wa(function(){for(var a=D(document,"pdp11","debugger"),b=0;b<a.length;b++){var c=a[b],d=A(c),d=new th(d);C(d,c)}});
|
|
|
|
|
function bi(a,b,c){r.call(this,"Computer",a,bi,67108864);this.v.ha=!1;ci(this,b);this.L=Uc(this,"autoPower",a);this.B=0;this.Y=a.busWidth||a.buswidth;this.f=di;this.J=null;this.G=this.R=!1;this.Z=Uc(this,"url")||"";(Math.random()+.1).toString(36);this.g=ei(this);if(this.b=pb("CPU",this.id)){this.i=pb("Debugger",this.id);this.w=new Cb({id:this.Ia+".bus",busWidth:this.Y},this.b,this.i);var d,e=nb(this.id);if((this.A=pb("Panel",this.id))&&this.A.Ka)for(b=0;b<e.length;b++)d=e[b],d.O=this.A.O,d.j=this.A.j,
|
|
|
|
|
d.Ka=this.A.Ka;this.j("PDPjs v1.30.2\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.wa&&d.wa(this,this.w,this.b,this.i);b=null;d=a.resume;void 0!==d&&(1<d.length?b=this.I=d:this.f=parseInt(d,10));var f;if(a=Uc(this,"state")||(f=!0,a.state))b=this.N=a,f||(this.G=!0,this.f=di),this.f&&(this.K=
|
|
|
|
|
new O(this,"1.30.2"),fi(this.K)?b=null:delete this.K);!b&&this.f&&(b=gi(this))&&(this.G=!0);if(b){var g=this;Da(b,null,!0,function(a,b,c){c?(g.I=null,g.G=!1,g.O("Unable to load machine state from server (error "+c+(b?": "+xa(b):"")+")")):(g.J=b,g.R=!0);G(g)})}else G(this);this.F.power||(this.L=!0);!c&&this.L&&hi(this,this.Cb)}else p("Unable to find CPU component")}u(bi);var di=0;
|
|
|
|
|
function ci(a,b){if(!b){var c;if("object"==typeof resources&&(c=resources.parms))try{b=eval("("+c+")")}catch(d){p(d.message+" ("+c+")")}}a.S=b}function Uc(a,b,c){var d=b.toLowerCase(),d=ab[b]||ab[d];void 0===d&&a.S&&(d=a.S[b]);void 0===d&&c&&(d=c[b]);void 0===d&&"object"==typeof resources&&resources[b]&&(d=b);return d}function hi(a,b,c){for(var d=nb(a.id),e=0;e<=d.length;e++){var f=e<d.length?d[e]:a;if(!sb(f)){sb(f,function(){hi(a,b,c)});return}}b.call(a,c)}
|
|
|
|
|
function ii(a,b){var c=new O(a,"1.30.2","validate");if(fi(c)&&ji(c)){var d=c.get("timestamp"),e=b?b.get("timestamp"):"unknown";d!=e&&(a.O("Machine state may be out-of-date\n("+d+" vs. "+e+")\nCheck your browser's local storage limits"),b||c.clear())}}k=bi.prototype;
|
|
|
|
|
k.Cb=function(a){void 0===a&&(a=this.f||(this.J?1:di));if(!this.B){this.B++;var b=!1,c=!1;this.P=!1;var d=this.K||new O(this,"1.30.2");if(-1==a)b=!0;else if(a>di){if(fi(d,this.J)){this.C=new O(this,"1.30.2","failsafe");fi(this.C)&&(ki(this,d),a=2,li(this.C));this.C.set("timestamp",Ba());mi(this.C);var e=this.f&&!this.G;if(1==a||Ga("Click OK to restore the previous PDPjs machine state, or CANCEL to reset the machine.")){if(c=ji(d)){var f=d.get("code"),g=d.get("data");f&&("ok"==f?fi(d,g):("error"==
|
|
|
|
|
f&&"no machine state"!=g?(this.O("Error: "+g),"unable to verify user"==g&&(Na("user",""),this.g=null)):this.j(f+": "+g),li(d),fi(d)?(c=ji(d),e=!0):c=!1))}e&&ii(this,c?d:null)}else 2==a&&d.clear()}else ii(this);delete this.J;delete this.K}e=nb(this.id);for(f=0;f<e.length;f++)g=e[f],g!==this&&g!=this.b&&(c=ni(this,g,d,b,c));b=[d,a,c];-1!=a?hi(this,this.kc,b):this.kc(b)}};
|
|
|
|
|
function ni(a,b,c,d,e){if(!b.v.ha){b.v.ha=!0;if(b.za){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.za(f,d)&&f&&(p("Unable to restore state for "+b.type),a.N&&!a.R?(c.clear(),a.f=di,window&&window.location.reload()):a.P=!0,b.za(null),e=!1)}if(!d&&b.mc)for(a=b.mc.split("|"),c=0;c<a.length;c++)b.status(a[c])}return e}
|
|
|
|
|
k.kc=function(a){var b=a[0],c=0>a[1];a=a[2];this.ba=!0;this.v.ha=!0;var d=this.F.power;d&&(d.textContent="Shutdown");this.b&&(ni(this,this.b,b,c,a),this.b.ib());this.P&&(ki(this,b),b.clear());!c&&this.C&&(this.C.clear(),delete this.C);this.B=0};
|
|
|
|
|
function ki(a,b){if(Ga("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.2"};d.url=a.Z;d.user=c;d.type="bug";d.data=b;Da("http://www.pcjs.org/api/v1/report",d,!0)}}
|
|
|
|
|
function ai(a,b,c){var d,e="none";if(a.B)return null;a.B--;var f=new O(a,"1.30.2"),g=new O(a,"1.30.2","validate"),h=Ba();g.set("timestamp",h);f.set("timestamp",h);f.set("version","1.30.2");f.set("url",window?window.location.href:null);f.set("browser",window?window.navigator.userAgent:"");a.b&&a.b.ya&&(c&&a.b.ia(),d=a.b.ya(b,c),"object"===typeof d&&f.set(a.b.id,d),c&&(a.b.v.ha=!1,!1===d&&(e=null)));for(var h=nb(a.id),m=0;m<h.length;m++){var n=h[m];n.v.ha&&(n.ya&&(d=n.ya(b,c),"object"===typeof d&&f.set(n.id,
|
|
|
|
|
d)),c&&(n.v.ha=!1,!1===d&&(e=null)))}e&&(c?(h=d=!1,b?(a.g&&oi(a,a.g,f.toString()),mi(g)&&mi(f)||(e=null,d=h=!0)):a.f&&(d=!0,h=3==a.f),d&&f.clear(h)):e=f.toString());c&&(a.v.ha=!1,b=a.F.power)&&(b.textContent="Power");a.B=0;return e}k.reset=function(){this.w&&this.w.reset&&(E(this,"Resetting "+this.w.type),this.w.reset());for(var a=nb(this.id),b=0;b<a.length;b++){var c=a[b];c!==this&&c!==this.w&&c.reset&&(E(this,"Resetting "+c.type),c.reset())}};
|
|
|
|
|
"Mhz")+" ("+a.b.Ta+"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":ai(a,g[0],g[1]);break;case "u":Mh(a,g[1],g[2],8);break;case "v":if("var"==g[0]){Yh(a,b.substr(3))||(d=!1);break}if("ver"==
|
|
|
|
|
g[0]){a.j("PDPjs version 1.30.2 ("+a.b.mb+",RELEASE"+(vb?",TYPEDARRAYS":",LONGARRAYS")+")");a.j(window?window.navigator.userAgent:"");break}f=!0;break;case "?":if(g[1]){$h(a,b.substr(1));break}var Kd="commands:",Ld;for(Ld in yh)Kd+="\n"+wa(Ld,9)+yh[Ld];ae(a)||(Kd+="\nnote: history disabled if no exec breakpoints");a.j(Kd);break;default:f=!0}f&&(a.j("unknown command: "+b),d=!1)}}catch(yg){a.j("debugger error: "+(yg.stack||yg.message)),d=!1}return d}
|
|
|
|
|
function Xc(a,b,c){b=nh(a,b,c);for(var d in b)if(!Rh(a,b[+d]))return!1;return!0}Wa(function(){for(var a=D(document,"pdp11","debugger"),b=0;b<a.length;b++){var c=a[b],d=A(c),d=new uh(d);C(d,c)}});
|
|
|
|
|
function ci(a,b,c){r.call(this,"Computer",a,ci,67108864);this.v.ha=!1;di(this,b);this.L=Uc(this,"autoPower",a);this.B=0;this.Y=a.busWidth||a.buswidth;this.f=ei;this.J=null;this.G=this.R=!1;this.Z=Uc(this,"url")||"";(Math.random()+.1).toString(36);this.g=fi(this);if(this.b=pb("CPU",this.id)){this.i=pb("Debugger",this.id);this.w=new Cb({id:this.Ia+".bus",busWidth:this.Y},this.b,this.i);var d,e=nb(this.id);if((this.A=pb("Panel",this.id))&&this.A.Ka)for(b=0;b<e.length;b++)d=e[b],d.O=this.A.O,d.j=this.A.j,
|
|
|
|
|
d.Ka=this.A.Ka;this.j("PDPjs v1.30.2\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.wa&&d.wa(this,this.w,this.b,this.i);b=null;d=a.resume;void 0!==d&&(1<d.length?b=this.I=d:this.f=parseInt(d,10));var f;if(a=Uc(this,"state")||(f=!0,a.state))b=this.N=a,f||(this.G=!0,this.f=ei),this.f&&(this.K=
|
|
|
|
|
new O(this,"1.30.2"),gi(this.K)?b=null:delete this.K);!b&&this.f&&(b=hi(this))&&(this.G=!0);if(b){var g=this;Da(b,null,!0,function(a,b,c){c?(g.I=null,g.G=!1,g.O("Unable to load machine state from server (error "+c+(b?": "+xa(b):"")+")")):(g.J=b,g.R=!0);G(g)})}else G(this);this.F.power||(this.L=!0);!c&&this.L&&ii(this,this.Cb)}else p("Unable to find CPU component")}u(ci);var ei=0;
|
|
|
|
|
function di(a,b){if(!b){var c;if("object"==typeof resources&&(c=resources.parms))try{b=eval("("+c+")")}catch(d){p(d.message+" ("+c+")")}}a.S=b}function Uc(a,b,c){var d=b.toLowerCase(),d=ab[b]||ab[d];void 0===d&&a.S&&(d=a.S[b]);void 0===d&&c&&(d=c[b]);void 0===d&&"object"==typeof resources&&resources[b]&&(d=b);return d}function ii(a,b,c){for(var d=nb(a.id),e=0;e<=d.length;e++){var f=e<d.length?d[e]:a;if(!sb(f)){sb(f,function(){ii(a,b,c)});return}}b.call(a,c)}
|
|
|
|
|
function ji(a,b){var c=new O(a,"1.30.2","validate");if(gi(c)&&ki(c)){var d=c.get("timestamp"),e=b?b.get("timestamp"):"unknown";d!=e&&(a.O("Machine state may be out-of-date\n("+d+" vs. "+e+")\nCheck your browser's local storage limits"),b||c.clear())}}k=ci.prototype;
|
|
|
|
|
k.Cb=function(a){void 0===a&&(a=this.f||(this.J?1:ei));if(!this.B){this.B++;var b=!1,c=!1;this.P=!1;var d=this.K||new O(this,"1.30.2");if(-1==a)b=!0;else if(a>ei){if(gi(d,this.J)){this.C=new O(this,"1.30.2","failsafe");gi(this.C)&&(li(this,d),a=2,mi(this.C));this.C.set("timestamp",Ba());ni(this.C);var e=this.f&&!this.G;if(1==a||Ga("Click OK to restore the previous PDPjs machine state, or CANCEL to reset the machine.")){if(c=ki(d)){var f=d.get("code"),g=d.get("data");f&&("ok"==f?gi(d,g):("error"==
|
|
|
|
|
f&&"no machine state"!=g?(this.O("Error: "+g),"unable to verify user"==g&&(Na("user",""),this.g=null)):this.j(f+": "+g),mi(d),gi(d)?(c=ki(d),e=!0):c=!1))}e&&ji(this,c?d:null)}else 2==a&&d.clear()}else ji(this);delete this.J;delete this.K}e=nb(this.id);for(f=0;f<e.length;f++)g=e[f],g!==this&&g!=this.b&&(c=oi(this,g,d,b,c));b=[d,a,c];-1!=a?ii(this,this.kc,b):this.kc(b)}};
|
|
|
|
|
function oi(a,b,c,d,e){if(!b.v.ha){b.v.ha=!0;if(b.za){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.za(f,d)&&f&&(p("Unable to restore state for "+b.type),a.N&&!a.R?(c.clear(),a.f=ei,window&&window.location.reload()):a.P=!0,b.za(null),e=!1)}if(!d&&b.mc)for(a=b.mc.split("|"),c=0;c<a.length;c++)b.status(a[c])}return e}
|
|
|
|
|
k.kc=function(a){var b=a[0],c=0>a[1];a=a[2];this.ba=!0;this.v.ha=!0;var d=this.F.power;d&&(d.textContent="Shutdown");this.b&&(oi(this,this.b,b,c,a),this.b.ib());this.P&&(li(this,b),b.clear());!c&&this.C&&(this.C.clear(),delete this.C);this.B=0};
|
|
|
|
|
function li(a,b){if(Ga("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.2"};d.url=a.Z;d.user=c;d.type="bug";d.data=b;Da("http://www.pcjs.org/api/v1/report",d,!0)}}
|
|
|
|
|
function bi(a,b,c){var d,e="none";if(a.B)return null;a.B--;var f=new O(a,"1.30.2"),g=new O(a,"1.30.2","validate"),h=Ba();g.set("timestamp",h);f.set("timestamp",h);f.set("version","1.30.2");f.set("url",window?window.location.href:null);f.set("browser",window?window.navigator.userAgent:"");a.b&&a.b.ya&&(c&&a.b.ia(),d=a.b.ya(b,c),"object"===typeof d&&f.set(a.b.id,d),c&&(a.b.v.ha=!1,!1===d&&(e=null)));for(var h=nb(a.id),m=0;m<h.length;m++){var n=h[m];n.v.ha&&(n.ya&&(d=n.ya(b,c),"object"===typeof d&&f.set(n.id,
|
|
|
|
|
d)),c&&(n.v.ha=!1,!1===d&&(e=null)))}e&&(c?(h=d=!1,b?(a.g&&pi(a,a.g,f.toString()),ni(g)&&ni(f)||(e=null,d=h=!0)):a.f&&(d=!0,h=3==a.f),d&&f.clear(h)):e=f.toString());c&&(a.v.ha=!1,b=a.F.power)&&(b.textContent="Power");a.B=0;return e}k.reset=function(){this.w&&this.w.reset&&(E(this,"Resetting "+this.w.type),this.w.reset());for(var a=nb(this.id),b=0;b<a.length;b++){var c=a[b];c!==this&&c!==this.w&&c.reset&&(E(this,"Resetting "+c.type),c.reset())}};
|
|
|
|
|
k.start=function(a,b){for(var c=nb(this.id),d=0;d<c.length;d++){var e=c[d];"CPU"!=e.type&&e!==this&&e.start&&e.start(a,b)}this.da(!0)};k.stop=function(a,b){for(var c=nb(this.id),d=0;d<c.length;d++){var e=c[d];"CPU"!=e.type&&e!==this&&e.stop&&e.stop(a,b)}this.da(!0)};
|
|
|
|
|
k.qa=function(a,b,c){var d=this;switch(b){case "power":return this.F[b]=c,c.onclick=function(){d.B||(d.v.ha?ai(d,!1,!0):hi(d,d.Cb))},!0;case "reset":return this.F[b]=c,c.onclick=function(){if(d.v.ha&&!d.B)if(d.f&&!d.I){var a=Ga("Click OK to save changes to this PDPjs machine.\n\nWARNING: If you CANCEL, all disk changes will be discarded.");ai(d,a,!0);!a&&d.N?window&&window.location.reload():(a||(d.lc=!0),d.Cb(di),d.lc=!1)}else d.reset(),d.b&&d.b.ib()},!0;case "save":if(ta(Fa(),"pcjs.org"))c.parentNode.removeChild(c);
|
|
|
|
|
else return this.F[b]=c,c.onclick=function(){var a=ei(d,!0);if(a){var b=!!(d.f&&!d.I||d.N),c=ai(d,b);b?oi(d,a,c):d.O("Resume disabled, machine state not saved")}},!0}return!1};
|
|
|
|
|
function ei(a,b){var c=a.g;c||((c=Ka("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=pi(a,c))||a.O("The user ID is invalid.")):b&&a.O("Browser local storage is not available"));return c}
|
|
|
|
|
function pi(a,b){a.g=null;b=Da(Fa()+"/api/v1/user?req=verify&user="+b);var c=b[1];if(!b[0]&&c)try{b=eval("("+c+")"),b.code&&"ok"==b.code&&(Na("user",b.data),a.g=b.data)}catch(d){p(d.message+" ("+c+")")}return a.g}function gi(a){var b=null;a.g&&(b=Fa()+"/api/v1/user?req=load&user="+a.g+"&state="+qi(a,"1.30.2"));return b}
|
|
|
|
|
function oi(a,b,c){if(c){var d={req:"store"};d.user=b;d.state=qi(a,"1.30.2");d.data=c;b=Da(Fa()+"/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.O("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.O(c),Na("user",""),a.g=null)}}
|
|
|
|
|
k.qa=function(a,b,c){var d=this;switch(b){case "power":return this.F[b]=c,c.onclick=function(){d.B||(d.v.ha?bi(d,!1,!0):ii(d,d.Cb))},!0;case "reset":return this.F[b]=c,c.onclick=function(){if(d.v.ha&&!d.B)if(d.f&&!d.I){var a=Ga("Click OK to save changes to this PDPjs machine.\n\nWARNING: If you CANCEL, all disk changes will be discarded.");bi(d,a,!0);!a&&d.N?window&&window.location.reload():(a||(d.lc=!0),d.Cb(ei),d.lc=!1)}else d.reset(),d.b&&d.b.ib()},!0;case "save":if(ta(Fa(),"pcjs.org"))c.parentNode.removeChild(c);
|
|
|
|
|
else return this.F[b]=c,c.onclick=function(){var a=fi(d,!0);if(a){var b=!!(d.f&&!d.I||d.N),c=bi(d,b);b?pi(d,a,c):d.O("Resume disabled, machine state not saved")}},!0}return!1};
|
|
|
|
|
function fi(a,b){var c=a.g;c||((c=Ka("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=qi(a,c))||a.O("The user ID is invalid.")):b&&a.O("Browser local storage is not available"));return c}
|
|
|
|
|
function qi(a,b){a.g=null;b=Da(Fa()+"/api/v1/user?req=verify&user="+b);var c=b[1];if(!b[0]&&c)try{b=eval("("+c+")"),b.code&&"ok"==b.code&&(Na("user",b.data),a.g=b.data)}catch(d){p(d.message+" ("+c+")")}return a.g}function hi(a){var b=null;a.g&&(b=Fa()+"/api/v1/user?req=load&user="+a.g+"&state="+ri(a,"1.30.2"));return b}
|
|
|
|
|
function pi(a,b,c){if(c){var d={req:"store"};d.user=b;d.state=ri(a,"1.30.2");d.data=c;b=Da(Fa()+"/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.O("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.O(c),Na("user",""),a.g=null)}}
|
|
|
|
|
function Jg(a){var b;a=nb(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.gb=function(a){if(this.Ka){var b=0,c=0;!a&&window&&(b=window.scrollX,c=window.scrollY);this.Ka.focus();!a&&window&&window.scrollTo(b,c)}};k.da=function(a){this.b&&this.b.da(a);this.A&&this.A.da(a)};
|
|
|
|
|
Wa(function(){for(var a=D(document,"pdp11-machine"),b=0;b<a.length;b++)for(var c=a[b],d=A(c),c=D(c,"pdp11","computer"),e=0;e<c.length;e++){var f=c[e],g=A(f),g=new bi(g,d,!0);C(g,f);g.L&&hi(g,g.Cb)}});Ra.show.push(function(){for(var a=D(document,"pdp11","computer"),b=0;b<a.length;b++){var c=A(a[b]);(c=pb("Computer",c.id))&&c.ba&&!c.v.ha&&c.Cb(-1)}});
|
|
|
|
|
Ra.exit.push(function(){for(var a=D(document,"pdp11","computer"),b=0;b<a.length;b++){var c=A(a[b]);(c=pb("Computer",c.id))&&c.v.ha&&ai(c,!(!c.f||c.I),!0)}});function O(a,b,c){this.id=a.id;this.key=qi(a,b,c);this.i=a.i;li(this,a.Oc)}function qi(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){li(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 li(a,b){a[a.id]={};b&&a.set("parms",b);a.b=!1}function mi(a){var b=!0;if(Ia()){var c=JSON.stringify(a[a.id]);Na(a.key,c)||(p("Unable to store "+c.length+" bytes in browser local storage"),b=!1)}return b}function ji(a){var b=!0;try{a[a.id]=JSON.parse(a[a.id])}catch(c){p(c.message||c),b=!1}return b}function fi(a,b){return b?(a[a.id]=b,a.b=!0):a.b?!0:Ia()&&(b=Ka(a.key))?(a[a.id]=b,a.b=!0):!1}var ri=0;
|
|
|
|
|
function Di(a,b,c,d,e,f){e("Loading "+a+"...");Da(a,null,!0,function(g,h,m){m?(h||(h="unable to load "+a+" ("+m+")"),f(h,null)):Ei(h,a,b,c,d,e,f)})}
|
|
|
|
|
function Ei(a,b,c,d,e,f,g){function h(a,f){if(f)g(f,null);else{c&&(mb(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?Fi(a,f,h):h(a,null):g("no data"+(b?" for file: "+b:""),null)}
|
|
|
|
|
function Fi(a,b,c){var d;if(d=/<([a-z]+)\s+ref="(.*?)"(.*?)\/>/g.exec(a)){var e=d[2];b("Loading "+e+"...");Da(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],n,q=/( [a-z]+=)(['"])(.*?)\2/g;n=q.exec(f);)m=0>m.indexOf(n[1])?m.replace(">",n[0]+">"):m.replace(new RegExp(n[1]+"(['\"])(.*?)\\1"),n[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);Fi(a,b,c)}})}else c(a,null)}
|
|
|
|
|
function Gi(a,b,c,d){function e(a){if(void 0===h){var b=g&&D(g,"machine-warning");h=b&&b[0]||g}h&&(h.innerHTML=va(a))}function f(a){e("Error: "+a);m&&(--ri||Ya(!0));m=!1}var g,h,m=!0;ri++;lb[a]={};try{if(g=document.getElementById(a)){var n;if("object"==typeof resources&&(n=resources.css)){var q=document.head||document.getElementsByTagName("head")[0],w=document.createElement("style");w.type="text/css";w.styleSheet?w.styleSheet.cssText=n:w.appendChild(document.createTextNode(n));q.appendChild(w)}c||
|
|
|
|
|
(c="/versions/pdpjs/1.30.2/components.xsl");n=function(d,h){h?Di(c,null,null,!1,e,function(d,m){m?(mb(a,c,d),e("Processing "+b+"..."),window.ActiveXObject||"ActiveXObject"in window?(m=h.transformNode(m))?(g.outerHTML=m,--ri||Ya(!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),--ri||Ya(!0)):f("invalid machine element: "+
|
|
|
|
|
a):f("transformToFragment failed")):f("unable to transform XML: unsupported browser")):f(d)}):f(d)};"<"!=b.charAt(0)?Di(b,a,d,!0,e,n):Ei(b,null,a,d,!1,e,n)}else f("missing machine element: "+a)}catch(v){f(v.message)}return m}window.embedPDP11=function(a,b,c,d){Ya(!1);return Gi(a,b,c,d)};window.enableEvents=Ya;window.sendEvent=Za;})();//# sourceMappingURL=/tmp/pdpjs/1.30.2/pdp11-dbg.map
|
|
|
|
|
Wa(function(){for(var a=D(document,"pdp11-machine"),b=0;b<a.length;b++)for(var c=a[b],d=A(c),c=D(c,"pdp11","computer"),e=0;e<c.length;e++){var f=c[e],g=A(f),g=new ci(g,d,!0);C(g,f);g.L&&ii(g,g.Cb)}});Ra.show.push(function(){for(var a=D(document,"pdp11","computer"),b=0;b<a.length;b++){var c=A(a[b]);(c=pb("Computer",c.id))&&c.ba&&!c.v.ha&&c.Cb(-1)}});
|
|
|
|
|
Ra.exit.push(function(){for(var a=D(document,"pdp11","computer"),b=0;b<a.length;b++){var c=A(a[b]);(c=pb("Computer",c.id))&&c.v.ha&&bi(c,!(!c.f||c.I),!0)}});function O(a,b,c){this.id=a.id;this.key=ri(a,b,c);this.i=a.i;mi(this,a.Oc)}function ri(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){mi(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 mi(a,b){a[a.id]={};b&&a.set("parms",b);a.b=!1}function ni(a){var b=!0;if(Ia()){var c=JSON.stringify(a[a.id]);Na(a.key,c)||(p("Unable to store "+c.length+" bytes in browser local storage"),b=!1)}return b}function ki(a){var b=!0;try{a[a.id]=JSON.parse(a[a.id])}catch(c){p(c.message||c),b=!1}return b}function gi(a,b){return b?(a[a.id]=b,a.b=!0):a.b?!0:Ia()&&(b=Ka(a.key))?(a[a.id]=b,a.b=!0):!1}var si=0;
|
|
|
|
|
function Ei(a,b,c,d,e,f){e("Loading "+a+"...");Da(a,null,!0,function(g,h,m){m?(h||(h="unable to load "+a+" ("+m+")"),f(h,null)):Fi(h,a,b,c,d,e,f)})}
|
|
|
|
|
function Fi(a,b,c,d,e,f,g){function h(a,f){if(f)g(f,null);else{c&&(mb(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?Gi(a,f,h):h(a,null):g("no data"+(b?" for file: "+b:""),null)}
|
|
|
|
|
function Gi(a,b,c){var d;if(d=/<([a-z]+)\s+ref="(.*?)"(.*?)\/>/g.exec(a)){var e=d[2];b("Loading "+e+"...");Da(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],n,q=/( [a-z]+=)(['"])(.*?)\2/g;n=q.exec(f);)m=0>m.indexOf(n[1])?m.replace(">",n[0]+">"):m.replace(new RegExp(n[1]+"(['\"])(.*?)\\1"),n[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);Gi(a,b,c)}})}else c(a,null)}
|
|
|
|
|
function Hi(a,b,c,d){function e(a){if(void 0===h){var b=g&&D(g,"machine-warning");h=b&&b[0]||g}h&&(h.innerHTML=va(a))}function f(a){e("Error: "+a);m&&(--si||Ya(!0));m=!1}var g,h,m=!0;si++;lb[a]={};try{if(g=document.getElementById(a)){var n;if("object"==typeof resources&&(n=resources.css)){var q=document.head||document.getElementsByTagName("head")[0],w=document.createElement("style");w.type="text/css";w.styleSheet?w.styleSheet.cssText=n:w.appendChild(document.createTextNode(n));q.appendChild(w)}c||
|
|
|
|
|
(c="/versions/pdpjs/1.30.2/components.xsl");n=function(d,h){h?Ei(c,null,null,!1,e,function(d,m){m?(mb(a,c,d),e("Processing "+b+"..."),window.ActiveXObject||"ActiveXObject"in window?(m=h.transformNode(m))?(g.outerHTML=m,--si||Ya(!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),--si||Ya(!0)):f("invalid machine element: "+
|
|
|
|
|
a):f("transformToFragment failed")):f("unable to transform XML: unsupported browser")):f(d)}):f(d)};"<"!=b.charAt(0)?Ei(b,a,d,!0,e,n):Fi(b,null,a,d,!1,e,n)}else f("missing machine element: "+a)}catch(v){f(v.message)}return m}window.embedPDP11=function(a,b,c,d){Ya(!1);return Hi(a,b,c,d)};window.enableEvents=Ya;window.sendEvent=Za;})();//# sourceMappingURL=/tmp/pdpjs/1.30.2/pdp11-dbg.map
|
|
|
|
|
|
Jeff