82 lines
No EOL
2 KiB
JavaScript
82 lines
No EOL
2 KiB
JavaScript
/**************************************************************************
|
|
* SAE - Scripted Amiga Emulator
|
|
*
|
|
* https://github.com/naTmeg/ScriptedAmigaEmulator
|
|
*
|
|
* ©2012 Rupert Hausberger
|
|
* Commercial use is prohibited.
|
|
*
|
|
**************************************************************************/
|
|
|
|
function Serial()
|
|
{
|
|
var buf = new Uint8Array(1024);
|
|
var pos = 0, dtr = false;
|
|
var serper = 0, serdat = 0x2000;
|
|
|
|
this.reset = function () {
|
|
this.flushBuffer();
|
|
|
|
pos = 0;
|
|
dtr = false;
|
|
serper = 0;
|
|
serdat = 0x2000;
|
|
};
|
|
|
|
this.flushBuffer = function () {
|
|
if (pos > 0) {
|
|
var str = '';
|
|
for (var i = 0; i < pos; i++) {
|
|
/*if (buf[i] == 13)
|
|
str += '<br/>';
|
|
else if (buf[i] == 9)
|
|
str += ' ';
|
|
else*/
|
|
str += String.fromCharCode(buf[i]);
|
|
}
|
|
pos = 0;
|
|
BUG.col = 3;
|
|
BUG.info(str);
|
|
BUG.col = 1;
|
|
}
|
|
};
|
|
|
|
this.readStatus = function () {
|
|
//ciabpra |= 0x20; //Push up Carrier Detect line
|
|
//ciabpra |= 0x08; //DSR ON
|
|
return 0;
|
|
};
|
|
|
|
this.writeStatus = function (old, nw) {
|
|
if ((old & 0x80) == 0x80 && (nw & 0x80) == 0x00) dtr = true;
|
|
if ((old & 0x80) == 0x00 && (nw & 0x80) == 0x80) dtr = false;
|
|
//if ((old & 0x40) != (nw & 0x40)) BUG.info('RTS %s.', (nw & 0x40) == 0x40 ? 'set' : 'clr');
|
|
//if ((old & 0x10) != (nw & 0x10)) BUG.info('CTS %s.', (nw & 0x10) == 0x10 ? 'set' : 'clr');
|
|
return nw;
|
|
};
|
|
|
|
this.SERPER = function (v) {
|
|
if (serper != v)
|
|
serper = v;
|
|
};
|
|
|
|
this.SERDAT = function (v) {
|
|
//BUG.info('SERDAT $%04x', v);
|
|
|
|
if (AMIGA.config.serial.enabled) {
|
|
buf[pos++] = v & 0xff;
|
|
if (pos == 1024)
|
|
this.flushBuffer();
|
|
}
|
|
serdat |= 0x2000;
|
|
/* Set TBE in the SERDATR ... */
|
|
AMIGA.intreq |= 1;
|
|
/* ... and in INTREQ register */
|
|
};
|
|
|
|
this.SERDATR = function()
|
|
{
|
|
//BUG.info('SERDATR $%04x', serdat);
|
|
return serdat;
|
|
}
|
|
} |