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

Added dBASE II and dBASE III disks to the project

Browse source
This commit is contained in:
Jeff Parsons 2017-08-09 23:11:18 -07:00 • committed by Jeff Parsons
commit 8214446363
43 changed files with 835 additions and 56 deletions
Download patch file Download diff file Expand all files Collapse all files

4
docs/pcx86/examples/pcx86-dbg.js
View file

@ -454,8 +454,8 @@ function Hn(a,b,c,d,e){r(a,768)&&t(a,c,d,e,"DMA"+b+".MASTER_CLEAR",null,!0);a=a.
function Ln(a,b,c,d,e){r(a,768)&&t(a,c,d,e,"DMA.SPARE"+b+".PAGE",null,!0);a.X[b]=d}function Mn(a,b,c,d,e){bn(a.F[b>>2].pc[b&3],c,d,e)}function Dn(a,b,c){b=a.F[b>>2].pc[b&3];b.kg&&b.dh&&b.zg?(c&&(b.done=c),b.se||Nn(a,b,!0)):c&&c(!0)}
function Nn(a,b,c){c&&(b.count=b.rb[1]<<8|b.rb[0],b.type=b.mode&On,b.pj=b.lg=!1);for(var d=!1;0<=b.count&&(c=b.eg<<16|b.vb[1]<<8|b.vb[0],b.type==Pn?(d=!0,function(c){b.dh.call(b.kg,b.zg,-1,function(e,g){0>e&&(b.pj||(b.pj=!0),e=255);b.se||a.na.ub(c,e);(d=g)&&setTimeout(function(){Qn(b)||Nn(a,b)},0)})}(c)):b.type==Rn?(c=a.na.ya(c),0>b.dh.call(b.kg,b.zg,c)&&(b.lg=!0)):b.type!=Sn&&(b.lg=!0)),!d&&!Qn(b););}
function Qn(a){if(!a.lg&&0<=--a.count&&(a.mode&Tn?(a.vb[0]--,0>a.vb[0]&&(a.vb[0]=255,a.vb[1]--,0>a.vb[1]&&(a.vb[1]=255))):(a.vb[0]++,255<a.vb[0]&&(a.vb[0]=0,a.vb[1]++,255<a.vb[1]&&(a.vb[1]=0))),!a.se))return!1;var b=a.controller;b.Pb=b.Pb&~(16<<a.wj)|1<<a.wj;a.mode&Un||(a.se=!0,a.kg=a.zg=null);a.done&&(a.done(!a.lg),a.done=null);return!0}function Vn(a,b,c){var d=0,e=a.jc[b];if(null!=e.lf)switch(e.lf&Wn){case Xn:d=e.ec;break;case Yn:d=e.Fc}r(a,34048)&&t(a,e.port,null,c,"PIC"+b,d,!0);return d}
function Zn(a,b,c,d){var e=a.jc[b];r(a,34048)&&t(a,e.port,c,d,"PIC"+b,null,!0);if(c&$n)e.Md=0,e.Nc[e.Md++]=c,e.ud=0,e.ke=7,e.ec=e.Fc=0,e.lf=ao|Xn;else if(c&ao)c&(bo|co)&&r(a,1073741824)&&Nb(a,"PIC"+b+"("+na(e.port)+"): unsupported OCW3 command "+na(c),!0,!0),e.lf=c;else if(d=c&eo,d&fo){var f,g=0;if((d&go)==go)f=c&ho,g=1<<f;else for(f=e.ke+1;;){f&=7;var h=1<<f;if(e.Fc&h){g=h;break}if(f++==e.ke)break}e.Fc&g&&(e.Fc&=~g,io(a));d&jo&&r(a,1073741824)&&Nb(a,"PIC"+b+"("+na(e.port)+"): unsupported OCW2 rotate command "+
na(c),!0,!0)}else d==ko?e.ke=c&ho:r(a,1073741824)&&Nb(a,"PIC"+b+"("+na(e.port)+"): unsupported OCW2 automatic EOI command "+na(c),!0,!0)}function lo(a,b,c){var d=a.jc[b],e=d.ud;r(a,34048)&&t(a,d.port+1,null,c,"PIC"+b,e,!0);return e}function mo(a,b,c,d){var e=a.jc[b];r(a,34048)&&t(a,e.port+1,c,d,"PIC"+b,null,!0);e.Md<e.Nc.length?(e.Nc[e.Md++]=c,2==e.Md&&e.Nc[0]&no&&e.Md++,3!=e.Md||e.Nc[0]&oo||e.Md++):(e.ud=c,d=a.H,d.M|=4,io(a,b||253!=c?0:6))}
function Zn(a,b,c,d){var e=a.jc[b];r(a,34048)&&t(a,e.port,c,d,"PIC"+b,null,!0);if(c&$n)e.Md=0,e.Nc[e.Md++]=c,e.ud=0,e.ke=7,e.ec=e.Fc=0,e.lf=ao|Xn;else if(c&ao)c&(bo|co)&&r(a,1073741824)&&Nb(a,"PIC"+b+"("+na(e.port)+"): unsupported OCW3 "+na(c),!0,!0),e.lf=c;else if(d=c&eo,d&fo){var f,g=0;if((d&go)==go)f=c&ho,g=1<<f;else for(f=e.ke+1;;){f&=7;var h=1<<f;if(e.Fc&h){g=h;break}if(f++==e.ke)break}e.Fc&g&&(e.Fc&=~g,io(a));d&jo&&r(a,1073741824)&&Nb(a,"PIC"+b+"("+na(e.port)+"): unsupported OCW2 rotate "+na(c),
!0,!0)}else d==ko?e.ke=c&ho:r(a,1073741824)&&Nb(a,"PIC"+b+"("+na(e.port)+"): unsupported OCW2 automatic EOI "+na(c),!0,!0)}function lo(a,b,c){var d=a.jc[b],e=d.ud;r(a,34048)&&t(a,d.port+1,null,c,"PIC"+b,e,!0);return e}function mo(a,b,c,d){var e=a.jc[b];r(a,34048)&&t(a,e.port+1,c,d,"PIC"+b,null,!0);e.Md<e.Nc.length?(e.Nc[e.Md++]=c,2==e.Md&&e.Nc[0]&no&&e.Md++,3!=e.Md||e.Nc[0]&oo||e.Md++):(e.ud=c,d=a.H,d.M|=4,io(a,b||253!=c?0:6))}
function ih(a,b,c){var d=a.jc[b>>3];b=1<<(b&7);d.ec&b||(d.ec|=b,d.We=c||0,io(a))}function Ug(a,b){var c=a.jc[b>>3];b=1<<(b&7);c.ec&b&&(c.ec&=~b,io(a))}function io(a,b){var c,d=-1;1<a.fa&&(c=a.jc[1],d=~(c.Fc|c.ud)&c.ec);c=a.jc[0];0<=d&&(c.ec=d?c.ec|1<<po:c.ec&~(1<<po));d=~(c.Fc|c.ud)&c.ec;a=a.H;a.X&&(a.ab=d?a.ab|1:a.ab&-2);d&&b&&(c.We=b)}
function Kg(a,b){void 0===b&&(b=0);var c=-1,d=a.jc[b];if(d.We)c=-2,d.We--;else for(var e=d.ec&((d.Fc|d.ud)^255),f=d.ke+1;;){var f=f&7,g=1<<f;if(d.Fc&g)break;if(e&g){b||f!=po?c=d.Nc[1]+f:c=Kg(a,1);0<=c&&(d.Fc|=g,d.ec&=~g);break}if(f++==d.ke)break}return c}function qo(a,b,c,d,e){var f;f=b?3:0;var g=a.qa[f+c];g.Qe?(f=g.Pb,g.Qe=!1):(g.xd==g.Zc&&ro(a,f+c),g.Me?(f=g.ne[g.xd++],g.xd==g.Zc&&(g.Me=!1)):(yl(a,f+c),f=g.rb[g.xd++]));r(a,2304)&&t(a,d,null,e,"PIT"+b+".TIMER"+c,f,!0);return f}
function so(a,b,c,d,e,f){r(a,2304)&&t(a,d,e,f,"PIT"+b+".TIMER"+c,null,!0);f=b?3:0;d=a.qa[f+c];d.xd==d.Zc&&ro(a,f+c);d.qc[d.xd++]=e;d.xd==d.Zc&&(d.qe&&d.mode!=to&&d.mode!=uo||(d.Me=!1,d.rb[0]=d.Pc[0]=d.qc[0],d.rb[1]=d.Pc[1]=d.qc[1],d.kd=Cd(a.H,a.N),d.qe=!0,d.hd=d.mode!=to,b==vo&&c==wo&&(Ug(a,xo),e=yo(a,wo)*a.Ca|0,d.mode==Nd&&(e>>=1),Fd(a.H,e))),b==vo&&c==zo&&Ym(a))}function Ao(a,b,c,d){t(a,c,null,d,"PIT"+b+".CTRL",null,2048);return b?a.va:a.ra}