8bitworkshop/gen/atari7800-QWAA5553.js.map

{
  "version": 3,
  "sources": ["../src/machine/atari7800.ts", "../src/platform/atari7800.ts"],
  "sourcesContent": ["\nimport { MOS6502, MOS6502State } from \"../common/cpu/MOS6502\";\nimport { BasicMachine, RasterFrameBased, Bus, ProbeAll } from \"../common/devices\";\nimport { KeyFlags, newAddressDecoder, padBytes, Keys, makeKeycodeMap, newKeyboardHandler, EmuHalt, dumpRAM, gtia_ntsc_to_rgb } from \"../common/emu\";\nimport { TssChannelAdapter, MasterAudio, POKEYDeviceChannel } from \"../common/audio\";\nimport { hex, rgb2bgr } from \"../common/util\";\n\n// https://atarihq.com/danb/a7800.shtml\n// https://atarihq.com/danb/files/maria_r1.txt\n// https://atarihq.com/danb/files/7800vid.txt\n// https://sites.google.com/site/atari7800wiki/\n\ninterface Atari7800StateBase {\n  ram : Uint8Array;\n  regs6532 : Uint8Array;\n}\n\ninterface Atari7800ControlsState {\n  inputs : Uint8Array;\n}\n\ninterface Atari7800State extends Atari7800StateBase, Atari7800ControlsState {\n  c : MOS6502State;\n  tia : {\n    regs : Uint8Array,\n  };\n  maria : {\n    regs : Uint8Array,\n    offset,dll,dlstart : number;\n    dli,h16,h8 : boolean;\n  };\n  pia : {\n    timer: number;\n    interval: number;\n  }\n}\n\nconst SWCHA = 0;\nconst SWCHB = 2;\nconst INPT0 = 8;\n\nconst Atari7800_KEYCODE_MAP = makeKeycodeMap([\n  [Keys.A,        INPT0+0, 0x80],\n  [Keys.B,        INPT0+1, 0x80],\n  [Keys.GP_A,     INPT0+0, 0x80],\n  [Keys.GP_B,     INPT0+1, 0x80],\n  [Keys.SELECT,   SWCHB, -0x02],\n  [Keys.START,    SWCHB, -0x01],\n  [Keys.UP,       SWCHA, -0x10],\n  [Keys.DOWN,     SWCHA, -0x20],\n  [Keys.LEFT,     SWCHA, -0x40],\n  [Keys.RIGHT,    SWCHA, -0x80],\n  \n  [Keys.P2_A,     INPT0+2, 0x80],\n  [Keys.P2_B,     INPT0+3, 0x80],\n  //[Keys.P2_SELECT, 1, 2],\n  //[Keys.P2_START,  1, 3],\n  [Keys.P2_UP,     SWCHA, -0x01],\n  [Keys.P2_DOWN,   SWCHA, -0x02],\n  [Keys.P2_LEFT,   SWCHA, -0x04],\n  [Keys.P2_RIGHT,  SWCHA, -0x08],\n]);\n\n// http://www.ataripreservation.org/websites/freddy.offenga/megazine/ISSUE5-PALNTSC.html\n// http://7800.8bitdev.org/index.php/7800_Software_Guide#APPENDIX_4:_FRAME_TIMING\n// https://forums.atariage.com/topic/224025-7800-hardware-facts/\nconst CLK = 3579545;\nconst linesPerFrame = 263;\nconst numVisibleLines = 258-16;\nconst colorClocksPerLine = 451; // 451? 452? 456?\nconst colorClocksPreDMA = 28;\nconst colorClocksShutdownOther = 16;\nconst colorClocksShutdownLast = 24;\nconst audioOversample = 2;\nconst audioSampleRate = linesPerFrame*60*audioOversample;\n\n// TIA chip\n\nclass TIA {\n  regs = new Uint8Array(0x20);\n  \n  reset() {\n    this.regs.fill(0);\n  }\n  read(a : number) : number {\n    return this.regs[a] | 0;\n  }\n  write(a : number, v : number) {\n    this.regs[a] = v;\n  }\n  saveState() {\n    return {\n      regs: this.regs.slice(0)\n    };\n  }\n  loadState(s) {\n    for (let i=0; i<32; i++)\n      this.write(i, s.regs[i]);\n  }\n  static stateToLongString(state) : string {\n    let s = \"\";\n    s += dumpRAM(state.regs, 0, 32);\n    return s;\n  }\n}\n\n// MARIA chip\n\nclass MARIA {\n  bus : Bus;\n  cycles : number = 0;\n  regs = new Uint8Array(0x20);\n  offset : number = -1;\n  dll : number = 0;\n  dlstart : number = 0;\n  dli : boolean = false;\n  h16 : boolean = false;\n  h8 : boolean = false;\n  writemode : number = 0;\n  indirect : boolean = false;\n  pixels = new Uint8Array(320);\n  WSYNC : number = 0;\n\n  reset() {\n    this.regs.fill(0);\n    // TODO?\n  }\n  read(a : number) : number {\n    return this.regs[a] | 0;\n  }\n  write(a : number, v : number) {\n    this.regs[a] = v;\n    if (a == 0x04) this.WSYNC++;\n    //console.log(hex(a), '=', hex(v));\n  }\n  saveState() {\n    return {\n      regs: this.regs.slice(0),\n      offset: this.offset,\n      dll: this.dll,\n      dlstart: this.dlstart,\n      dli: this.dli,\n      h16: this.h16,\n      h8: this.h8,\n      indirect: this.indirect,\n      writemode: this.writemode,\n    };\n  }\n  loadState(s) {\n    for (let i=0; i<32; i++)\n      this.write(i, s.regs[i]|0);\n    this.offset = s.offset|0;\n    this.dll = s.dll|0;\n    this.dlstart = s.dlstart|0;\n    this.dli = !!s.dli;\n    this.h16 = !!s.h16;\n    this.h8 = !!s.h8;\n   
  "mappings": "yMAqCA,GAAM,GAAQ,EACR,EAAQ,EACR,EAAQ,EAER,EAAwB,EAAe,CAC3C,CAAC,EAAK,EAAU,EAAM,EAAG,KACzB,CAAC,EAAK,EAAU,EAAM,EAAG,KACzB,CAAC,EAAK,KAAU,EAAM,EAAG,KACzB,CAAC,EAAK,KAAU,EAAM,EAAG,KACzB,CAAC,EAAK,OAAU,EAAO,IACvB,CAAC,EAAK,MAAU,EAAO,IACvB,CAAC,EAAK,GAAU,EAAO,KACvB,CAAC,EAAK,KAAU,EAAO,KACvB,CAAC,EAAK,KAAU,EAAO,KACvB,CAAC,EAAK,MAAU,EAAO,MAEvB,CAAC,EAAK,KAAU,EAAM,EAAG,KACzB,CAAC,EAAK,KAAU,EAAM,EAAG,KAGzB,CAAC,EAAK,MAAW,EAAO,IACxB,CAAC,EAAK,QAAW,EAAO,IACxB,CAAC,EAAK,QAAW,EAAO,IACxB,CAAC,EAAK,SAAW,EAAO,MAO1B,GAAM,GAAgB,IAChB,EAAkB,IAAI,GACtB,EAAqB,IACrB,GAAoB,GACpB,GAA2B,GAC3B,GAA0B,GAC1B,EAAkB,EAClB,EAAkB,EAAc,GAAG,EAIzC,OAAU,CAAV,aA9EA,CA+EE,UAAO,GAAI,YAAW,IAEtB,OAAQ,CACN,KAAK,KAAK,KAAK,GAEjB,KAAK,EAAqB,CACxB,MAAO,MAAK,KAAK,GAAK,EAExB,MAAM,EAAY,EAAY,CAC5B,KAAK,KAAK,GAAK,EAEjB,WAAY,CACV,MAAO,CACL,KAAM,KAAK,KAAK,MAAM,IAG1B,UAAU,EAAG,CACX,OAAS,GAAE,EAAG,EAAE,GAAI,IAClB,KAAK,MAAM,EAAG,EAAE,KAAK,UAElB,mBAAkB,EAAgB,CACvC,GAAI,GAAI,GACR,UAAK,EAAQ,EAAM,KAAM,EAAG,IACrB,IAMX,OAAY,CAAZ,aA5GA,CA8GE,YAAkB,EAClB,UAAO,GAAI,YAAW,IACtB,YAAkB,GAClB,SAAe,EACf,aAAmB,EACnB,SAAgB,GAChB,SAAgB,GAChB,QAAe,GACf,eAAqB,EACrB,cAAqB,GACrB,YAAS,GAAI,YAAW,KACxB,WAAiB,EAEjB,OAAQ,CACN,KAAK,KAAK,KAAK,GAGjB,KAAK,EAAqB,CACxB,MAAO,MAAK,KAAK,GAAK,EAExB,MAAM,EAAY,EAAY,CAC5B,KAAK,KAAK,GAAK,EACX,GAAK,GAAM,KAAK,QAGtB,WAAY,CACV,MAAO,CACL,KAAM,KAAK,KAAK,MAAM,GACtB,OAAQ,KAAK,OACb,IAAK,KAAK,IACV,QAAS,KAAK,QACd,IAAK,KAAK,IACV,IAAK,KAAK,IACV,GAAI,KAAK,GACT,SAAU,KAAK,SACf,UAAW,KAAK,WAGpB,UAAU,EAAG,CACX,OAAS,GAAE,EAAG,EAAE,GAAI,IAClB,KAAK,MAAM,EAAG,EAAE,KAAK,GAAG,GAC1B,KAAK,OAAS,EAAE,OAAO,EACvB,KAAK,IAAM,EAAE,IAAI,EACjB,KAAK,QAAU,EAAE,QAAQ,EACzB,KAAK,IAAM,CAAC,CAAC,EAAE,IACf,KAAK,IAAM,CAAC,CAAC,EAAE,IACf,KAAK,GAAK,CAAC,CAAC,EAAE,GACd,KAAK,SAAW,CAAC,CAAC,EAAE,SACpB,KAAK,UAAY,EAAE,UAAU,EAE/B,cAAe,CACb,MAAQ,MAAK,KAAK,IAAQ,KAAS,GAErC,aAAc,CACZ,MAAQ,MAAK,KAAK,KAAS,GAAK,KAAK,KAAK,IAE5C,oBAAqB,CACnB,MAAQ,MAAK,KAAK,KAAS,GAAK,KAAK,OAEvC,UAAU,EAAa,CACrB,AAAI,EACF,MAAK,KAAK,IAAS,IACnB,KAAK,OAAS,GACd,KAAK,IAAM,KAAK,cAChB,KAAK,IAAM,KAAK,KAAQ,MAAK,IAAI,KAAK,KAAK,KAAO,MAAS,GAE3D,KAAK,KAAK,IAAS,CAAC,IAGxB,aAAa,EAAK,CAEhB,GAAI,KAAK,KAAO,MAAU,OAC1B,GAAI,GAAI,EAAI,KAAK,KAAK,KACtB,KAAK,OAAU,EAAI,GACnB,KAAK,IAAO,GAAI,KAAS,EACzB,KAAK,GAAO,GAAI,KAAS,EACzB,KAAK,QAAW,GAAI,KAAK,KAAK,IAAI,IAAI,GAAK,EAAI,KAAK,KAAK,IAAI,GAE7D,KAAK,IAAO,KAAK,IAAM,EAAK,MAC5B,KAAK,IAAO,GAAI,KAAK,KAAK,KAAO,MAAS,EAE5C,QAAQ,EAAsB,CAC5B,MAAI,MAAK,SAAiB,GACtB,KAAI,OACF,MAAK,KAAQ,EAAI,MACjB,KAAK,IAAQ,EAAI,OAIzB,QAAQ,EAAqB,CAC3B,MAAI,MAAK,QAAQ,GACR,EAEP,MAAK,QAAU,EACR,KAAK,IAAI,KAAK,IAGzB,MAAM,EAAW,CACf,KAAK,IAAM,EACX,KAAK,OAAS,EACd,GAAM,GAAM,KAAK,OAEjB,GADA,EAAI,KAAK,KAAK,KAAK,IACf,KAAK,eAAgB,CAEvB,KAAK,QAAU,KAAK,QAAU,EAAI,GAA0B,GAExD,KAAK,OAAS,GAChB,KAAK,aAAa,GAGpB,GAAI,GAAO,KAAK,QAAU,MACtB,EAAQ,KAAK,QAAU,IAC3B,EAAG,CAED,GAAI,GAAK,EAAI,KAAK,EAAS,GAAM,EAAK,MAClC,EAAK,EAAI,KAAK,EAAS,GAAM,EAAK,MAGtC,GAFI,GAAM,GAEN,GAAQ,MAAU,MACtB,GAAI,GAAK,EAAI,KAAK,EAAS,GAAM,EAAK,MAClC,EAAK,EAAI,KAAK,EAAS,GAAM,EAAK,MAClC,EAAW,GAEf,GAAK,GAAK,KAAO,EAAG,CAClB,GAAI,GAAM,GAAM,EACZ,EAAQ,GAAM,GAAK,IACnB,EAAO,EAAI,KAAK,EAAS,GAAM,EAAK,MACxC,EAAY,GAAK,KAAS,EAC1B,GAAS,EACT,KAAK,QAAU,GACf,KAAK,UAAY,EAAK,QACjB,CAEL,GAAI,GAAO,EACP,EAAM,GAAM,EACZ,EAAQ,GAAM,GAAK,IACvB,GAAS,EACT,KAAK,QAAU,EAEjB,KAAK,SAAW,EAChB,GAAM,GAAS,EAAQ,IAAM,GAAS,EAAE,KAAK,QAAW,MAAS,GACjE,GAAQ,EACR,GAAM,GAAU,KAAK,KAAK,IAEpB,EAAU,GAAU,GAAQ,MAAK,UAAY,EAAI,GAEjD,EAAY,GAAU,IAAQ,EAE9B,EAAM,GAAa,GAAU,KAAS,EAC5C,AAAI,GAAO,IAAS,GAEpB,OAAS,GAAE,EAAG,EAAE,EAAO,IAAK,CAC1B,GAAI,GAAO,KAAK,QAAS,EAAO,EAAQ,IAAG,GAAO,EAAO,GACzD,GAAI,EAAU,CACZ,GAAI,GAAW,MAAK,KAAK,IAAQ,KAAK,QAAW,GAAK,EACtD,AAAI,GAAQ,EAAE,GACZ,KACA,KAAK,QAAU,GAEjB,EAAO,KAAK,QAAQ,GAGtB,OAAQ,OACD,GACH,OAAS,GAAE,EAAG,EAAE,EAAG,IAAK,CACtB,GAAI,GAAO,GAAQ,EAAK,EACxB,AAAI,IAAO,IACT,GAAI,GAAQ,EAAI,EAAK,GAAK,KAAK,KAAM,IAAK,GAAK,IAEjD,IAAS,EACT,EAAQ,EAAO,EAAK,IAEtB,UACG,GACH,OAAS,GAAE,EAAG,EAAE,EAAG,IAAK,CACtB,GAAI,GAAO,GAAO,MAAS,EAC3B,AAAI,IAAO,IACT,GAAI,GAAQ,KAAK,KAAM,IAAK,GAAK,IAEnC,IAAS,EACT,EAAQ,EAAO,EAAK,IAEtB,UACG,GACH,OAAS,GAAE,EAAG,EAAE,EAAG,IAAK,CACtB,GAAI,GAAQ,IAAQ,EAAK,GAAW,GAAO,IAC3C,AAAK,GAAM,GAAM,IACf,GAAI,GAAQ,EAAI,EAAK,GAAK,
  "names": []
}