1
0
mirror of https://github.com/sehugg/8bitworkshop.git synced 2024-07-03 05:29:37 +00:00
8bitworkshop/gen/platform/williams.js

476 lines
19 KiB
JavaScript

"use strict";
Object.defineProperty(exports, "__esModule", { value: true });
const baseplatform_1 = require("../common/baseplatform");
const emu_1 = require("../common/emu");
const util_1 = require("../common/util");
const audio_1 = require("../common/audio");
const williams_1 = require("../machine/williams");
// https://www.arcade-museum.com/manuals-videogames/D/Defender.pdf
var WILLIAMS_PRESETS = [
{ id: 'gfxtest.c', name: 'Graphics Test' },
{ id: 'sprites.c', name: 'Sprite Test' },
{ id: 'game1.c', name: 'Raster Paranoia Game' },
{ id: 'bitmap_rle.c', name: 'RLE Bitmap' },
];
var WilliamsPlatform = function (mainElement, proto, options) {
var self = this;
this.__proto__ = new (proto ? proto : baseplatform_1.Base6809Platform)();
options = options || {};
var isDefender = options === null || options === void 0 ? void 0 : options.isDefender;
var SCREEN_HEIGHT = 304;
var SCREEN_WIDTH = 256;
var cpu, ram, rom, nvram;
var portsel = 0;
var banksel = 0;
var watchdog_counter;
var watchdog_enabled = false;
var pia6821 = new emu_1.RAM(8).mem;
var blitregs = new emu_1.RAM(8).mem;
var video, timer, pixels, displayPCs;
var screenNeedsRefresh = false;
var membus;
var video_counter;
var audio, worker, workerchannel;
var xtal = 12000000;
var cpuFrequency = xtal / 3 / 4;
var cpuCyclesPerFrame = cpuFrequency / 60; // TODO
var cpuScale = 1;
var INITIAL_WATCHDOG = 8;
var PIXEL_ON = 0xffeeeeee;
var PIXEL_OFF = 0xff000000;
var DEFENDER_KEYCODE_MAP = (0, emu_1.makeKeycodeMap)([
[emu_1.Keys.A, 4, 0x1],
[emu_1.Keys.RIGHT, 4, 0x2],
[emu_1.Keys.B, 4, 0x4],
[emu_1.Keys.VK_X, 4, 0x8],
[emu_1.Keys.P2_START, 4, 0x10],
[emu_1.Keys.START, 4, 0x20],
[emu_1.Keys.LEFT, 4, 0x40],
[emu_1.Keys.DOWN, 4, 0x80],
[emu_1.Keys.UP, 6, 0x1],
[emu_1.Keys.SELECT, 0, 0x4],
[emu_1.Keys.VK_7, 0, 0x1],
[emu_1.Keys.VK_8, 0, 0x2],
[emu_1.Keys.VK_9, 0, 0x8],
]);
var ROBOTRON_KEYCODE_MAP = (0, emu_1.makeKeycodeMap)([
[emu_1.Keys.P2_UP, 0, 0x1],
[emu_1.Keys.P2_DOWN, 0, 0x2],
[emu_1.Keys.P2_LEFT, 0, 0x4],
[emu_1.Keys.P2_RIGHT, 0, 0x8],
[emu_1.Keys.START, 0, 0x10],
[emu_1.Keys.P2_START, 0, 0x20],
[emu_1.Keys.UP, 0, 0x40],
[emu_1.Keys.DOWN, 0, 0x80],
[emu_1.Keys.LEFT, 2, 0x1],
[emu_1.Keys.RIGHT, 2, 0x2],
[emu_1.Keys.VK_7, 4, 0x1],
[emu_1.Keys.VK_8, 4, 0x2],
[emu_1.Keys.VK_6, 4, 0x4],
[emu_1.Keys.VK_9, 4, 0x8],
[emu_1.Keys.SELECT, 4, 0x10],
]);
var KEYCODE_MAP = isDefender ? DEFENDER_KEYCODE_MAP : ROBOTRON_KEYCODE_MAP;
// TODO: sound board handshake
var palette = [];
for (var ii = 0; ii < 16; ii++)
palette[ii] = 0xff000000;
this.getPresets = function () {
return WILLIAMS_PRESETS;
};
// Defender
var ioread_defender = (0, emu_1.newAddressDecoder)([
[0x400, 0x5ff, 0x1ff, function (a) { return nvram.mem[a]; }],
[0x800, 0x800, 0, function (a) { return video_counter; }],
[0xc00, 0xc07, 0x7, function (a) { return pia6821[a]; }],
[0x0, 0xfff, 0, function (a) { }],
]);
var iowrite_defender = (0, emu_1.newAddressDecoder)([
[0x0, 0xf, 0xf, setPalette],
[0x3fc, 0x3ff, 0, function (a, v) { if (v == 0x38)
watchdog_counter = INITIAL_WATCHDOG; watchdog_enabled = true; }],
[0x400, 0x5ff, 0x1ff, function (a, v) { nvram.mem[a] = v; }],
[0xc02, 0xc02, 0x1, function (a, v) { if (worker)
worker.postMessage({ command: v & 0x3f }); }],
[0xc00, 0xc07, 0x7, function (a, v) { pia6821[a] = v; }],
[0x0, 0xfff, 0, function (a, v) { console.log('iowrite', (0, util_1.hex)(a), (0, util_1.hex)(v)); }],
]);
var memread_defender = (0, emu_1.newAddressDecoder)([
[0x0000, 0xbfff, 0xffff, function (a) { return ram.mem[a]; }],
[0xc000, 0xcfff, 0x0fff, function (a) {
switch (banksel) {
case 0: return ioread_defender(a);
case 1: return rom[a + 0x3000];
case 2: return rom[a + 0x4000];
case 3: return rom[a + 0x5000];
case 7: return rom[a + 0x6000];
default: return 0; // TODO: error light
}
}],
[0xd000, 0xffff, 0xffff, function (a) { return rom ? rom[a - 0xd000] : 0; }],
]);
var memwrite_defender = (0, emu_1.newAddressDecoder)([
[0x0000, 0x97ff, 0, write_display_byte],
[0x9800, 0xbfff, 0, function (a, v) { ram.mem[a] = v; }],
[0xc000, 0xcfff, 0x0fff, iowrite_defender],
[0xd000, 0xdfff, 0, function (a, v) { banksel = v & 0x7; }],
[0, 0xffff, 0, function (a, v) { console.log((0, util_1.hex)(a), (0, util_1.hex)(v)); }],
]);
// Robotron, Joust, Bubbles, Stargate
var ioread_robotron = (0, emu_1.newAddressDecoder)([
[0x804, 0x807, 0x3, function (a) { return pia6821[a]; }],
[0x80c, 0x80f, 0x3, function (a) { return pia6821[a + 4]; }],
[0xb00, 0xbff, 0, function (a) { return video_counter; }],
[0xc00, 0xfff, 0x3ff, function (a) { return nvram.mem[a]; }],
[0x0, 0xfff, 0, function (a) { }],
]);
var iowrite_robotron = (0, emu_1.newAddressDecoder)([
[0x0, 0xf, 0xf, setPalette],
[0x80c, 0x80c, 0xf, function (a, v) { if (worker)
worker.postMessage({ command: v }); }],
//[0x804, 0x807, 0x3, function(a,v) { console.log('iowrite',a); }], // TODO: sound
//[0x80c, 0x80f, 0x3, function(a,v) { console.log('iowrite',a+4); }], // TODO: sound
[0x900, 0x9ff, 0, function (a, v) { banksel = v & 0x1; }],
[0xa00, 0xa07, 0x7, setBlitter],
[0xbff, 0xbff, 0, function (a, v) { if (v == 0x39) {
watchdog_counter = INITIAL_WATCHDOG;
watchdog_enabled = true;
} }],
[0xc00, 0xfff, 0x3ff, function (a, v) { nvram.mem[a] = v; }],
//[0x0, 0xfff, 0, function(a,v) { console.log('iowrite',hex(a),hex(v)); }],
]);
var memread_robotron = (0, emu_1.newAddressDecoder)([
[0x0000, 0x8fff, 0xffff, function (a) { return banksel ? rom[a] : ram.mem[a]; }],
[0x9000, 0xbfff, 0xffff, function (a) { return ram.mem[a]; }],
[0xc000, 0xcfff, 0x0fff, ioread_robotron],
[0xd000, 0xffff, 0xffff, function (a) { return rom ? rom[a - 0x4000] : 0; }],
]);
var memwrite_robotron = (0, emu_1.newAddressDecoder)([
[0x0000, 0x97ff, 0, write_display_byte],
[0x9800, 0xbfff, 0, function (a, v) { ram.mem[a] = v; }],
[0xc000, 0xcfff, 0x0fff, iowrite_robotron],
//[0x0000, 0xffff, 0, function(a,v) { console.log(hex(a), hex(v)); }],
]);
var memread_williams = isDefender ? memread_defender : memread_robotron;
var memwrite_williams = isDefender ? memwrite_defender : memwrite_robotron;
// d1d6 ldu $11 / beq $d1ed
function setPalette(a, v) {
// RRRGGGBB
var color = 0xff000000 | ((v & 7) << 5) | (((v >> 3) & 7) << 13) | (((v >> 6) << 22));
if (color != palette[a]) {
palette[a] = color;
screenNeedsRefresh = true;
}
}
function write_display_byte(a, v) {
ram.mem[a] = v;
drawDisplayByte(a, v);
if (displayPCs)
displayPCs[a] = cpu.getPC(); // save program counter
}
function drawDisplayByte(a, v) {
var ofs = ((a & 0xff00) << 1) | ((a & 0xff) ^ 0xff);
pixels[ofs] = palette[v >> 4];
pixels[ofs + 256] = palette[v & 0xf];
}
function setBlitter(a, v) {
if (a) {
blitregs[a] = v;
}
else {
var cycles = doBlit(v);
this.waitCycles -= cycles * cpuScale; // wait CPU cycles
}
}
function doBlit(flags) {
//console.log(hex(flags), blitregs);
flags &= 0xff;
var offs = SCREEN_HEIGHT - blitregs[7];
var sstart = (blitregs[2] << 8) + blitregs[3];
var dstart = (blitregs[4] << 8) + blitregs[5];
var w = blitregs[6] ^ 4; // blitter bug fix
var h = blitregs[7] ^ 4;
if (w == 0)
w++;
if (h == 0)
h++;
if (h == 255)
h++;
var sxinc = (flags & 0x1) ? 256 : 1;
var syinc = (flags & 0x1) ? 1 : w;
var dxinc = (flags & 0x2) ? 256 : 1;
var dyinc = (flags & 0x2) ? 1 : w;
var pixdata = 0;
for (var y = 0; y < h; y++) {
var source = sstart & 0xffff;
var dest = dstart & 0xffff;
for (var x = 0; x < w; x++) {
var data = memread_williams(source);
if (flags & 0x20) {
pixdata = (pixdata << 8) | data;
blit_pixel(dest, (pixdata >> 4) & 0xff, flags);
}
else {
blit_pixel(dest, data, flags);
}
source += sxinc;
source &= 0xffff;
dest += dxinc;
dest &= 0xffff;
}
if (flags & 0x2)
dstart = (dstart & 0xff00) | ((dstart + dyinc) & 0xff);
else
dstart += dyinc;
if (flags & 0x1)
sstart = (sstart & 0xff00) | ((sstart + syinc) & 0xff);
else
sstart += syinc;
}
return w * h * (2 + ((flags & 0x4) >> 2)); // # of memory accesses
}
function blit_pixel(dstaddr, srcdata, flags) {
var curpix = dstaddr < 0xc000 ? ram.mem[dstaddr] : memread_williams(dstaddr);
var solid = blitregs[1];
var keepmask = 0xff; //what part of original dst byte should be kept, based on NO_EVEN and NO_ODD flags
//even pixel (D7-D4)
if ((flags & 0x8) && !(srcdata & 0xf0)) { //FG only and src even pixel=0
if (flags & 0x80)
keepmask &= 0x0f; // no even
}
else {
if (!(flags & 0x80))
keepmask &= 0x0f; // not no even
}
//odd pixel (D3-D0)
if ((flags & 0x8) && !(srcdata & 0x0f)) { //FG only and src odd pixel=0
if (flags & 0x40)
keepmask &= 0xf0; // no odd
}
else {
if (!(flags & 0x40))
keepmask &= 0xf0; // not no odd
}
curpix &= keepmask;
if (flags & 0x10) // solid bit
curpix |= (solid & ~keepmask);
else
curpix |= (srcdata & ~keepmask);
if (dstaddr < 0x9800) // can cause recursion otherwise
memwrite_williams(dstaddr, curpix);
}
// TODO
/*
var trace = false;
var _traceinsns = {};
function _trace() {
var pc = cpu.getPC();
if (!_traceinsns[pc]) {
_traceinsns[pc] = 1;
console.log(hex(pc), cpu.getTstates());
}
}
*/
this.start = function () {
ram = new emu_1.RAM(0xc000);
nvram = new emu_1.RAM(0x400);
rom = new Uint8Array(0xc000);
// TODO: save in browser storage?
//displayPCs = new Uint16Array(new ArrayBuffer(0x9800*2));
membus = {
read: memread_williams,
write: memwrite_williams,
};
this.readAddress = membus.read;
var iobus = {
read: function (a) { return 0; },
write: function (a, v) { console.log((0, util_1.hex)(a), (0, util_1.hex)(v)); }
};
cpu = self.newCPU(membus, iobus);
audio = new audio_1.MasterAudio();
worker = new Worker("./src/common/audio/z80worker.js");
workerchannel = new audio_1.WorkerSoundChannel(worker);
audio.master.addChannel(workerchannel);
let rotate = (options === null || options === void 0 ? void 0 : options.rotate) == null ? -90 : parseFloat(options.rotate);
video = new emu_1.RasterVideo(mainElement, SCREEN_WIDTH, SCREEN_HEIGHT, { rotate });
video.create();
$(video.canvas).click(function (e) {
var x = Math.floor(e.offsetX * video.canvas.width / $(video.canvas).width());
var y = Math.floor(e.offsetY * video.canvas.height / $(video.canvas).height());
var addr = (x >> 3) + (y * 32) + 0x400;
if (displayPCs)
console.log(x, y, (0, util_1.hex)(addr, 4), "PC", (0, util_1.hex)(displayPCs[addr], 4));
});
var idata = video.getFrameData();
(0, emu_1.setKeyboardFromMap)(video, pia6821, KEYCODE_MAP);
pixels = video.getFrameData();
timer = new emu_1.AnimationTimer(60, this.nextFrame.bind(this));
};
this.getRasterScanline = function () { return video_counter; };
this.advance = function (novideo) {
var cpuCyclesPerSection = Math.round(cpuCyclesPerFrame / 65);
for (var sl = 0; sl < 256; sl += 4) {
video_counter = sl;
// interrupts happen every 1/4 of the screen
if (sl == 0 || sl == 0x3c || sl == 0xbc || sl == 0xfc) {
if (membus.read != memread_defender || pia6821[7] == 0x3c) { // TODO?
if (cpu.interrupt)
cpu.interrupt();
if (cpu.requestInterrupt)
cpu.requestInterrupt();
}
}
this.runCPU(cpu, cpuCyclesPerSection);
if (sl < 256)
video.updateFrame(0, 0, 256 - 4 - sl, 0, 4, 304);
}
// last 6 lines
this.runCPU(cpu, cpuCyclesPerSection * 2);
if (screenNeedsRefresh && !novideo) {
for (var i = 0; i < 0x9800; i++)
drawDisplayByte(i, ram.mem[i]);
screenNeedsRefresh = false;
}
if (watchdog_enabled && watchdog_counter-- <= 0) {
console.log("WATCHDOG FIRED, PC =", cpu.getPC().toString(16)); // TODO: alert on video
// TODO: this.breakpointHit(cpu.T());
this.reset();
}
};
this.loadSoundROM = function (data) {
console.log("loading sound ROM " + data.length + " bytes");
var soundrom = (0, emu_1.padBytes)(data, 0x4000);
worker.postMessage({ rom: soundrom });
};
this.loadROM = function (title, data) {
if (data.length > 2) {
if (isDefender) {
self.loadSoundROM(data.slice(0x6800));
rom = rom.slice(0, 0x6800);
}
else if (data.length > 0xc000) {
self.loadSoundROM(data.slice(0xc000));
rom = rom.slice(0, 0xc000);
}
else if (data.length > 0x9000 && data[0x9000]) {
self.loadSoundROM(data.slice(0x9000));
}
rom = (0, emu_1.padBytes)(data, 0xc000);
}
self.reset();
};
this.loadState = function (state) {
cpu.loadState(state.c);
ram.mem.set(state.b);
nvram.mem.set(state.nvram);
pia6821.set(state.pia);
blitregs.set(state.blt);
watchdog_counter = state.wdc;
banksel = state.bs;
portsel = state.ps;
};
this.saveState = function () {
return {
c: self.getCPUState(),
b: ram.mem.slice(0),
nvram: nvram.mem.slice(0),
pia: pia6821.slice(0),
blt: blitregs.slice(0),
wdc: watchdog_counter,
bs: banksel,
ps: portsel,
};
};
this.loadControlsState = function (state) {
pia6821.set(state.pia);
};
this.saveControlsState = function () {
return {
pia: pia6821.slice(0),
};
};
this.getCPUState = function () {
return cpu.saveState();
};
this.isRunning = function () {
return timer && timer.isRunning();
};
this.pause = function () {
timer.stop();
audio.stop();
};
this.resume = function () {
timer.start();
audio.start();
};
this.reset = function () {
cpu.reset();
watchdog_counter = INITIAL_WATCHDOG;
watchdog_enabled = false;
banksel = 1;
};
this.scaleCPUFrequency = function (scale) {
cpuScale = scale;
cpuFrequency *= scale;
cpuCyclesPerFrame *= scale;
};
this.getMemoryMap = function () {
return { main: [
{ name: 'Video RAM', start: 0x0000, size: 0xc000, type: 'ram' },
{ name: 'I/O Registers', start: 0xc000, size: 0x1000, type: 'io' },
] };
};
};
var Williams6809Platform = function (mainElement, options) {
this.__proto__ = new WilliamsPlatform(mainElement, null, options);
};
var WilliamsZ80Platform = function (mainElement, options) {
this.__proto__ = new WilliamsPlatform(mainElement, baseplatform_1.BaseZ80Platform, options);
// Z80 @ 4 MHz
// also scale bitblt clocks
this.scaleCPUFrequency(4);
this.ramStateToLongString = function (state) {
var blt = state.blt;
var sstart = (blt[2] << 8) + blt[3];
var dstart = (blt[4] << 8) + blt[5];
var w = blt[6] ^ 4; // blitter bug fix
var h = blt[7] ^ 4;
return "\nBLIT"
+ " " + (0, util_1.hex)(sstart, 4) + " " + (0, util_1.hex)(dstart, 4)
+ " w:" + (0, util_1.hex)(w) + " h:" + (0, util_1.hex)(h)
+ " f:" + (0, util_1.hex)(blt[0]) + " s:" + (0, util_1.hex)(blt[1]);
};
};
var WilliamsDefenderPlatform = function (mainElement, options) {
this.__proto__ = new WilliamsPlatform(mainElement, null, { isDefender: true });
this.getMemoryMap = function () {
return { main: [
{ name: 'NVRAM', start: 0x400, size: 0x200, type: 'ram' },
{ name: 'Video RAM', start: 0x0000, size: 0xc000, type: 'ram' },
{ name: 'I/O Registers', start: 0xc000, size: 0x1000, type: 'io' },
{ name: 'ROM', start: 0xd000, size: 0x3000, type: 'rom' },
] };
};
};
class NewWilliamsPlatform extends baseplatform_1.Base6809MachinePlatform {
newMachine() { return new williams_1.WilliamsMachine(false); }
getPresets() { return WILLIAMS_PRESETS; }
getDefaultExtension() { return ".c"; }
;
readAddress(a) { return this.machine.readConst(a); }
getMemoryMap() {
return { main: [
{ name: 'Video RAM', start: 0x0000, size: 0xc000, type: 'ram' },
{ name: 'I/O Registers', start: 0xc000, size: 0xc00, type: 'io' },
{ name: 'NVRAM', start: 0xcc00, size: 0x400, type: 'ram' },
{ name: 'ROM', start: 0xd000, size: 0x3000, type: 'rom' },
] };
}
;
}
emu_1.PLATFORMS['williams'] = NewWilliamsPlatform;
emu_1.PLATFORMS['williams.old'] = Williams6809Platform;
emu_1.PLATFORMS['williams-defender'] = WilliamsDefenderPlatform;
emu_1.PLATFORMS['williams-z80'] = WilliamsZ80Platform;
// http://seanriddle.com/willhard.html
//# sourceMappingURL=williams.js.map