badline 0.17.0 → 0.18.0

data/doc/snapshot-format.md

@@ -23,11 +23,11 @@ key only some of them have names them.
 
 ## BL-MACHINE
 
-Written by the C64, VIC-20, C128, Plus/4, PET, CBM-II.
+Written by the C64, VIC-20, C128, Plus/4, PET, CBM-II, KIM-1.
 
 | Key | Type | Default |
 | --- | --- | --- |
-| `family` | text: c64 vic20 c128 plus4 pet cbm2 | "c64" |
+| `family` | text: c64 vic20 c128 plus4 pet cbm2 kim1 | "c64" |
 | `region` | text: pal ntsc ntscold drean | C64: "pal" |
 | `vic_model` | text: mos6569 mos8565 mos8566 mos8564 | C64: "mos6569" |
 | `cia_model` | text: mos6526 mos6526a | C64: "mos6526" |
@@ -45,19 +45,20 @@ Written by the C64, VIC-20, C128, Plus/4, PET, CBM-II.
 | `freeze_writes` | int | C64: 0 |
 | `dma` | bool | C64: false |
 | `host.pending_keys` | ints | [] |
+| `host.init_keys` | ints | C64: []; VIC-20: []; C128: []; Plus/4: []; PET: []; CBM-II: [] |
 | `host.init_pending` | int | 0 |
 | `written_by` | text | "" |
-| `ram` | text: unexpanded 3k 8k 16k 24k 32k all | VIC-20: "unexpanded" |
+| `ram` | text: unexpanded 3k 8k 16k 24k 32k all | VIC-20: "unexpanded"; KIM-1: "1k" |
+| `model` | text: pal ntsc | VIC-20: "pal"; C128: "c128"; Plus/4: "plus4"; PET: "8032"; CBM-II: "610" |
 | `bus.data` | byte | VIC-20: 253; C128: 255 |
 | `bus.video_data` | byte | VIC-20: 0 |
-| `model` | text: c128 c128ntsc c128dcr c128dcrntsc | C128: "c128"; Plus/4: "plus4"; PET: "8032"; CBM-II: "610" |
 | `mode` | text: c64 c128 | C128: "c64" |
 | `bus.address` | word | C128: 65533 |
 | `clock_bits` | int | C128: 0 |
 | `z80_ahead` | int | C128: 0 |
 | `chips_ahead` | int | C128: 0 |
 | `cpu_reset_pending` | bool | C128: true |
-| `host.typing` | bool | C128: false |
+| `host.typing` | bool | C128: false; KIM-1: false |
 | `host.holding_commodore` | bool | C128: false |
 | `host.typist.code` | int, optional | C128: absent |
 | `host.typist.wait` | int | C128: 0 |
@@ -71,22 +72,29 @@ Written by the C64, VIC-20, C128, Plus/4, PET, CBM-II.
 | `rom.basic` | text | PET: "pet/basic4.rom" or "pet/basic1.rom" |
 | `rom.editor` | text | PET: "pet/editor4-80-b-50hz.rom" or "pet/editor1.rom" or "pet/editor4-80-b-50hz-8296.rom" |
 | `rom.kernal` | text | PET: "pet/kernal4.rom" or "pet/kernal1.rom" |
-| `rom.characters` | text | PET: "pet/characters2.rom" or "pet/characters1.rom" |
+| `rom.characters` | text | PET: "pet/characters2.rom" or "pet/characters1.rom" or "pet/characters-superpet.rom" |
 | `jumpers` | text | PET: "" |
 | `vertical_drive` | bool | PET: true |
+| `host.ieee_drive_model` | text: 2031 8050 8250 1001 4040 3040 2040 9060 9090 | PET: "2031"; CBM-II: "2031" |
+| `cpu_switch` | text: 6502 6809 prog | PET: "6502" |
+| `ram_switch` | text: rw read prog | PET: "rw" |
 | `mains_hz` | int | CBM-II: 50 |
 | `dram_refresh` | bool | CBM-II: true |
 | `mains_countdown` | int | CBM-II: varies |
 | `mains_high` | bool | CBM-II: true |
 | `refresh` | int | CBM-II: 0 |
+| `sst` | bool | KIM-1: false |
+| `irq_wired` | bool | KIM-1: false |
+| `host.key_down` | bool | KIM-1: false |
+| `host.next_key_at` | int | KIM-1: 0 |
 
 ## BL-RAM
 
-Written by the C64, VIC-20, C128, Plus/4, PET, CBM-II.
+Written by the C64, VIC-20, C128, Plus/4, PET, KIM-1, CBM-II.
 
 | Key | Type | Default |
 | --- | --- | --- |
-| `ram` | bytes | C64: 65536 values; VIC-20: 49152 values; C128: 131072 values; Plus/4: 65536 × 0 or 16384 × 0; PET: 32768 × 0 or 8192 × 0 |
+| `ram` | bytes | C64: 65536 values; VIC-20: 49152 values; C128: 131072 values; Plus/4: 65536 × 0 or 16384 × 0; PET: 32768 × 0 or 8192 × 0; KIM-1: 1024 × 0 or 57344 × 0 |
 | `bus.low_bank` | int & 0x3 | Plus/4: 0 |
 | `bus.high_bank` | int & 0x3 | Plus/4: 0 |
 | `bus.rom_selected` | bool | Plus/4: true |
@@ -99,7 +107,7 @@ Written by the C64, VIC-20, C128, Plus/4, PET, CBM-II.
 | `segment<N>` | bytes | CBM-II: 65536 × 0 |
 | `execution_segment` | int & 0xf | CBM-II: 15 |
 | `indirect_segment` | int & 0xf | CBM-II: 15 |
-| `data` | byte | CBM-II: 249 |
+| `data` | byte | CBM-II: 249; KIM-1: 28 |
 | `cartridge.addresses` | ints | CBM-II: [] |
 | `cartridge.8192` | bytes | CBM-II: [] |
 
@@ -114,14 +122,14 @@ Written by the C64, VIC-20, CBM-II, C128.
 
 ## BL-CPU
 
-Written by the C64, C128, Plus/4, VIC-20, PET, CBM-II.
+Written by the C64, C128, Plus/4, VIC-20, PET, CBM-II, KIM-1.
 
 | Key | Type | Default |
 | --- | --- | --- |
 | `port.ddr` | byte | C64: 0; C128: 0; Plus/4: 0 |
 | `port.data` | byte | C64: 0; C128: 0; Plus/4: 0 |
 | `port.floating` | byte | C64: 0; C128: 0 |
-| `pc` | word | C64: 64738; VIC-20: 64802; C128: 65341; Plus/4: 65526; PET: 64790 or 64824; CBM-II: 63895 or 63902 |
+| `pc` | word | C64: 64738; VIC-20: 64802; C128: 65341; Plus/4: 65526; PET: 64790 or 64824; CBM-II: 63895 or 63902; KIM-1: 7202 |
 | `sp` | byte | 255 |
 | `a` | byte | 0 |
 | `x` | byte | 0 |
@@ -572,7 +580,7 @@ Written by the C64, PET, CBM-II.
 
 | Key | Type | Default |
 | --- | --- | --- |
-| `storage.kind` | text: directory d64 d71 d81 t64 d80 d82 | "directory" |
+| `storage.kind` | text: directory d64 d71 d81 t64 d80 d82 d67 | "directory" |
 | `storage.path` | text | "" |
 | `storage.bytes` | bytes | [] |
 | `storage.read_only` | bool | false |
@@ -601,6 +609,11 @@ Written by the C64, PET, CBM-II.
 | `ieee.talk_channel` | int, optional | PET: absent; CBM-II: absent |
 | `ieee.frame` | int | PET: 240; CBM-II: 240 |
 | `ieee.buffer` | bytes | PET: []; CBM-II: [] |
+| `waterloo.listening` | bool | PET: false |
+| `waterloo.talking` | bool | PET: false |
+| `waterloo.channel` | int | PET: 0 |
+| `waterloo.frame` | byte | PET: 0 |
+| `waterloo.buffer` | ints | PET: [] |
 
 ## BL-D8
 
@@ -608,7 +621,7 @@ Written by the C64, C128, Plus/4, PET.
 
 | Key | Type | Default |
 | --- | --- | --- |
-| `model` | text: 1541 1551 1571 1581 | C64: "1541" or "1581"; C128: "1541" or "1571"; Plus/4: "1541" or "1551"; PET: "2031" or "8050" or "8250" |
+| `model` | text: 1541 1551 1571 1581 | C64: "1541" or "1581"; C128: "1541" or "1571"; Plus/4: "1541" or "1551"; PET: varies |
 | `phase` | int | 0 |
 | `cycles` | int | 0 |
 | `so_pending` | bool | false |
@@ -617,8 +630,11 @@ Written by the C64, C128, Plus/4, PET.
 | `irq_timer` | int | Plus/4: 16660 |
 | `latched_byte` | byte | Plus/4: 0 |
 | `ieee.host` | int | PET: 0 |
-| `ip_data` | byte | PET: 242 |
+| `ip_data` | byte | PET: 242 or 211 |
 | `fdc_data` | byte | PET: 252 |
+| `sasi_data` | byte | PET: 248 |
+| `sasi.ack_high` | bool | PET: true |
+| `sasi.reset_high` | bool | PET: false |
 
 ## BL-D8-RAM
 
@@ -765,7 +781,7 @@ Written by the C64, C128, Plus/4, PET.
 | `track<N>.zone` | int, optional | absent |
 | `written` | ints | [] |
 | `changed` | ints | C64: [] |
-| `image.format` | text: d80 d82 | PET: "d80" |
+| `image.format` | text: d80 d82 | PET: "d80" or "d64" |
 | `track<N>` | ints | PET: [] |
 
 ## BL-D8-MECH
@@ -807,6 +823,7 @@ Written by the C64, C128, Plus/4, PET.
 | `so_pending` | bool | PET: false |
 | `ca1_low` | bool | PET: false |
 | `data_in` | byte | PET: 255 |
+| `half_tracks` | ints | PET: [0, 0] |
 
 ## BL-D8-CIA
 
@@ -969,6 +986,8 @@ Written by the VIC-20.
 | `registers` | bytes | 16 × 0 |
 | `raster` | int | 0 |
 | `column` | int | 0 |
+| `frame_lines` | int | 312 |
+| `long_field` | bool | true |
 | `window_open` | bool | false |
 | `window_done` | bool | false |
 | `row_start` | int | 0 |
@@ -1226,7 +1245,7 @@ Written by the Plus/4.
 
 ## BL-ACIA
 
-Written by the Plus/4, CBM-II.
+Written by the Plus/4, PET, CBM-II.
 
 | Key | Type | Default |
 | --- | --- | --- |
@@ -1533,7 +1552,7 @@ Written by the PET.
 
 | Key | Type | Default |
 | --- | --- | --- |
-| `pc` | word | 62135 |
+| `pc` | word | 62135 or 54059 or 61972 |
 | `sp` | byte | 255 |
 | `a` | byte | 0 |
 | `x` | byte | 0 |
@@ -1559,7 +1578,7 @@ Written by the PET.
 
 | Key | Type | Default |
 | --- | --- | --- |
-| `pc` | word | 64516 |
+| `pc` | word | 64516 or 64521 |
 | `sp` | byte | 255 |
 | `a` | byte | 0 |
 | `x` | byte | 0 |
@@ -1646,6 +1665,125 @@ Written by the PET.
 | `timer.irq_enabled` | bool | false |
 | `timer.fired` | bool | false |
 
+## BL-D8-SASICPU
+
+Written by the PET.
+
+| Key | Type | Default |
+| --- | --- | --- |
+| `pc` | word | 63489 |
+| `sp` | byte | 255 |
+| `a` | byte | 0 |
+| `x` | byte | 0 |
+| `y` | byte | 0 |
+| `p` | byte | 32 |
+| `nmi` | bool | false |
+| `so_high` | bool | true |
+| `irq.sample` | bool | false |
+| `irq.pending` | bool | false |
+| `irq.boundary` | bool | false |
+| `nmi.sample` | bool | false |
+| `nmi.pending` | bool | false |
+| `nmi.boundary` | bool | false |
+| `skip_poll` | bool | false |
+| `cycles` | int | 0 |
+| `instructions` | int | 0 |
+| `stalled` | int, optional | absent |
+| `pos.seq` | text: boundary op interrupt jam | "boundary" |
+
+## BL-D8-SASIRAM
+
+Written by the PET.
+
+| Key | Type | Default |
+| --- | --- | --- |
+| `ram` | bytes | 128 × 0 |
+
+## BL-D8-SASI
+
+Written by the PET.
+
+| Key | Type | Default |
+| --- | --- | --- |
+| `phase` | int | 0 |
+| `request` | bool | false |
+| `delay` | int | 0 |
+| `command` | ints | [] |
+| `buffer` | ints | [] |
+| `index` | int | 0 |
+| `writing` | bool | false |
+| `sense` | ints | [0, 0, 0, 0] |
+| `last_sense` | ints | [0, 0, 0, 0] |
+| `fast` | bool | false |
+| `cycle` | int | 0 |
+| `cylinder` | int | 0 |
+| `heads` | int | 4 |
+| `sectors` | int | 32 |
+| `block_buffer` | ints | 256 × 0 |
+| `path` | text | "" |
+| `read_only` | bool | false |
+| `disk_heads` | int | 4 |
+
+## BL-SUPERPET
+
+Written by the PET.
+
+| Key | Type | Default |
+| --- | --- | --- |
+| `bank_latch` | byte | 0 |
+| `system_latch` | byte | 0 |
+| `socket` | int | 0 |
+| `ram` | bytes | 65536 × 0 |
+| `dongle.registers` | ints | [0, 0, 0, 0, 0, 0, 0, 0] |
+| `dongle.latch` | byte | 255 |
+| `dongle.shift_in` | int, optional | absent |
+
+## BL-M6809
+
+Written by the PET.
+
+| Key | Type | Default |
+| --- | --- | --- |
+| `a` | byte | 0 |
+| `b` | byte | 0 |
+| `x` | word | 0 |
+| `y` | word | 0 |
+| `u` | word | 0 |
+| `s` | word | 0 |
+| `pc` | word | 0 |
+| `dp` | byte | 0 |
+| `cc` | byte | 80 |
+| `cycles` | int | 0 |
+| `irq` | bool | false |
+| `firq` | bool | false |
+| `nmi` | bool | false |
+| `halt` | bool | false |
+| `irq.latched` | bool | false |
+| `irq.seen` | bool | false |
+| `firq.latched` | bool | false |
+| `firq.seen` | bool | false |
+| `nmi.edge` | bool | false |
+| `nmi.latched` | bool | false |
+| `nmi.seen` | bool | false |
+| `nmi.armed` | bool | false |
+| `halt.latched` | bool | false |
+| `halt.seen` | bool | false |
+| `ea` | word | 0 |
+| `value` | word | 0 |
+| `post` | byte | 0 |
+| `opcode` | byte | 0 |
+| `operation` | text: none enter_nmi enter_firq enter_irq neg xnc com lsr ror asr asl rol dec xdec inc tst jmp clr nop sync jsr x18 daa orcc andcc sex exg tfr leax leay leas leau abx mul xres swi nega xnca coma lsra rora asra asla rola deca xdeca inca tsta xclra clra negb xncb comb lsrb rorb asrb aslb rolb decb xdecb incb tstb xclrb clrb suba cmpa sbca subd anda bita lda xsta eora adca ora adda cmpx ldx xstx sta stx subb cmpb sbcb addd andb bitb ldb xstb eorb adcb orb addb ldd ldu xstu stb std stu xswi2 swi2 cmpd xsta2 cmpy ldy xsty sty xaddd xstb2 lds xsts sts xfirq swi3 cmpu cmps xstx2 xaddu xstu2 | "none" |
+| `page` | int | 1 |
+| `group` | int | 0 |
+| `previous_group` | int | 0 |
+| `alu_word` | int | 0 |
+| `vector` | word | 65534 |
+| `interrupt_mask` | byte | 0 |
+| `stack_u` | bool | false |
+| `pos.plan` | text | "fetch" |
+| `pos.tail` | text | "none" |
+| `pos.index` | int | 0 |
+
 ## BL-CIA
 
 Written by the CBM-II.
@@ -1747,3 +1885,100 @@ Written by the CBM-II.
 | `ca` | bool | false |
 | `cb` | bool | false |
 | `lines` | int & 0x1f | 31 |
+
+## BL-U2
+
+Written by the KIM-1.
+
+| Key | Type | Default |
+| --- | --- | --- |
+| `ram` | bytes | 64 × 0 |
+| `ora` | byte | 0 |
+| `orb` | byte | 0 |
+| `ddra` | byte | 0 |
+| `ddrb` | byte | 0 |
+| `timer.counter` | byte | 0 |
+| `timer.interval` | int & 0x3 | 0 |
+| `timer.prescale` | int | 1 |
+| `timer.expired` | bool | true |
+| `timer.flag` | bool | false |
+| `timer.irq_enabled` | bool | false |
+| `timer.fired` | bool | false |
+
+## BL-U3
+
+Written by the KIM-1.
+
+| Key | Type | Default |
+| --- | --- | --- |
+| `ram` | bytes | 64 × 0 |
+| `ora` | byte | 0 |
+| `orb` | byte | 0 |
+| `ddra` | byte | 0 |
+| `ddrb` | byte | 0 |
+| `timer.counter` | byte | 0 |
+| `timer.interval` | int & 0x3 | 0 |
+| `timer.prescale` | int | 1 |
+| `timer.expired` | bool | true |
+| `timer.flag` | bool | false |
+| `timer.irq_enabled` | bool | false |
+| `timer.fired` | bool | false |
+
+## BL-PANEL
+
+Written by the KIM-1.
+
+| Key | Type | Default |
+| --- | --- | --- |
+| `tty` | bool | false |
+| `held` | int | -1 |
+| `digit` | int | -1 |
+| `segments` | int & 0x7f | 0 |
+| `since` | int | 0 |
+| `lit` | ints | 42 × 0 |
+| `shown` | ints | [0, 0, 0, 0, 0, 0] |
+| `shown_at` | ints | [-20001, -20001, -20001, -20001, -20001, -20001] |
+
+## BL-DECK
+
+Written by the KIM-1.
+
+| Key | Type | Default |
+| --- | --- | --- |
+| `tape.gaps` | ints | [] |
+| `tape.path` | text | "" |
+| `playing` | bool | false |
+| `recording` | bool | false |
+| `position` | int | 0 |
+| `next_edge` | int | 0 |
+| `high` | bool | true |
+| `output_high` | bool | true |
+
+## BL-TTY
+
+Written by the KIM-1.
+
+| Key | Type | Default |
+| --- | --- | --- |
+| `baud` | int | 9600 |
+| `queue` | ints | [] |
+| `output` | bytes | [] |
+| `line_high` | bool | true |
+| `send.byte` | int | 0 |
+| `send.bits` | int | 11 |
+| `send.start` | int | 0 |
+| `quiet_until` | int | 0 |
+| `receive.busy` | bool | false |
+| `receive.byte` | int | 0 |
+| `receive.bits` | int | 0 |
+| `receive.edge` | int | 0 |
+| `receive.sample_at` | int | 0 |
+| `printer_high` | bool | true |
+
+## BL-SOUND
+
+Written by the KIM-1.
+
+| Key | Type | Default |
+| --- | --- | --- |
+| `speaker` | bool | false |

data/doc/snapshots.md

@@ -17,7 +17,7 @@ autosave that fails warns once and stops autosaving.
 
 The pause menu's Snapshots page quicksaves, saves under a name in the
 `saves` folder and loads a named save. The name starts as the game's,
-from its cartridge, disk or tape, or BASIC, with the next free number,
+from its cartridge, disk or tape, or BASIC, or KIM-1 on a KIM-1, with the next free number,
 and saving over a name already taken asks first. Below those, the
 newest quicksaves and autosaves, with the time each was saved, load
 with a press.
@@ -149,9 +149,14 @@ port lines the 8296's RAM follows, both PIAs, the VIA, the CPU, the
 CRTC on the boards that have one, the picture with where the video is
 in its frame, the tapes in both datasettes with their places on them,
 and the disk or directory device 8 serves through the IEEE-488 traps.
-It restores into a machine of the same model with the same RAM, the
-same editor frame rate, the same ROMs, which come with the model, and
-an 8296's same jumpers. Its file names its machine `PET`, as xpet's do,
+A SuperPET's also holds its board's latches and 64K of bank RAM, the
+6702, the ACIA, the 6809 and the traps on the Waterloo ROM's IEEE-488
+routines, in 6502 mode and in 6809 mode alike, and saves once the CPU
+that has the bus is between instructions. It restores into a machine of
+the same model with the same RAM, the same editor frame rate, the same
+ROMs, which come with the model, an 8296's same jumpers and a SuperPET's
+CPU and RAM switches at the same positions. Its file names its machine
+`PET`, as xpet's do,
 and holds only badline's modules, so xpet doesn't open it unless it is
 saved with `--vice` (see [xpet](#xpet)).
 
@@ -160,28 +165,35 @@ saved with `--vice` (see [xpet](#xpet)).
 A PET snapshot saved with `--vice`, or `computer.export_snapshot(path)`,
 also holds xpet's modules for the CPU, the RAM with the screen RAM, or
 an 8296's 32K from `$8000`, an 8096's or 8296's board and its control
-register, the CRTC, both PIAs and the VIA, a true 2031's CPU, RAM, VIAs
-and head, or a true 8050's or 8250's interface processor with its RAM
-and 6532s and the heads' tracks, and the ones xpet 3.10 needs to open
+register, a SuperPET's board, its bank and its `$EFFE` bit, the CRTC
+with the character set VIA CA2 picks, both PIAs and the VIA, a
+SuperPET's 6809 and ACIA, a true 2031's CPU, RAM, VIAs and head, or the
+interface processor of a true 8050, 8250, SFD-1001, 4040, 3040, 2040,
+D9060 or D9090, with its RAM and 6532s and the heads' tracks, and the
+ones xpet 3.10 needs to open
 the file, with nothing open on the file system drive and nothing on the
 user port. The CRTC module carries the discrete boards' video too, in
 xpet's terms. The file says it is in VICE's snapshot format 1.0, the
 only one xpet reads.
 
 xpet 3.10 opens those snapshots as long as its model and editor match:
-`-model 2001`, `3032`, `3032B`, `4032`, `8032`, `8096` or `8296`, and
-for a badline editor other than xpet's own, `-editor` naming badline's
-ROM. xpet's 8296 runs the 8032's editor, 901474-04 dated 0283, so an
+`-model 2001`, `3032`, `3032B`, `4032`, `8032`, `8096`, `8296` or
+`SuperPET`, and for a badline editor other than xpet's own, `-editor`
+naming badline's ROM. xpet runs a SuperPET's 6809 when the snapshot
+says it has the bus, whatever its own CPU switch, and has no system
+latch, write protect or 6702 to take from it. xpet's 8296 runs the 8032's editor, 901474-04 dated 0283, so an
 8296 saved for it has to run that editor (`--editor 4-80-b-50hz-0283`),
 and xpet takes the 8296's jumpers from its own settings. It keeps its
 own datasettes and leaves out badline's tapes and disks. A true drive
-needs `-drive8type 2031`, `8050` or `8250` with `-drive8truedrive` and
-the disk attached as `-8`. Its snapshot is settled with the 2031's CPU
+needs `-drive8type 2031`, `8050`, `8250`, `1001`, `4040`, `3040`,
+`2040`, or `9000` for either hard disk, with `-drive8truedrive` and the
+disk attached as `-8`. Its snapshot is settled with the 2031's CPU
 between instructions too, and one saved while the 2031 talks on the bus
 can stall there in xpet, as xpet's own snapshots saved while it searches
-for a file do. xpet runs an 8050's floppy controller at a high level, so
-a snapshot for it is settled until badline's controller sits in its idle
-loop with both processors between instructions, and xpet's controller
+for a file do. xpet runs an 8050's floppy controller, and a hard disk's
+SASI host, at a high level, so a snapshot for it is settled until
+badline's controller, or host, sits in its idle loop with both
+processors between instructions, and xpet's controller
 starts from idle there, taking up any job the interface processor has
 left it. A unit that doesn't reach its idle loop within about 262,000
 cycles, such as one still starting up, is left out of xpet's modules,
@@ -195,24 +207,33 @@ at its instruction boundary, the RAM, the screen RAM, an 8096's or
 8296's board, the CRTC's registers and beam, both PIAs' registers and
 flags, the VIA's registers, timers and shift register, a true 2031's
 CPU, RAM, VIAs and head, which go on the bus with the disk badline's
-2031 had in it, and a true 8050's or 8250's interface processor, its RAM
-and both 6532s, which go on the bus with the disks badline's unit of the
-same model had in it. Its floppy controller comes back as a unit
+2031 had in it, and the interface processor of a true 8050, 8250,
+SFD-1001, 4040, 3040, 2040, D9060 or D9090, its RAM and both 6532s,
+which go on the bus with the disks badline's unit of the same model had
+in it. xpet's type 9000 stands for both hard disks, and the hard disk
+badline's had in it, of either, makes it a D9090 for an image of six
+heads and otherwise a D9060. Its floppy controller comes back as a unit
 switched on has it, in its idle loop with the heads on track 1: its next
 job steps them out to the track, and a job xpet's controller had under
-way starts again from there. A program
+way starts again from there. A hard disk's SASI host comes back in its
+job loop the same way. A program
 badline runs on from xpet's snapshot finds the vertical sync on the
 cycle xpet does, so the two run on alike, cycle for cycle. The picture
 starts again with the next frame. xpet doesn't save its ROMs, which
 keyboard it has or an 8296's jumpers, so the board, the RAM and the
 CRTC's frame build the machine: a 2001, a 3032 for any other discrete
 board, a 4032, an 8032, an 8096 or an 8296 with none of its jumpers
-fitted, at 50 or 60 Hz, and an 8032, 8096 or 8296 whose CRTC lines are
-64 cycles long runs xpet's own 50 Hz editor, 901474-04 dated 0283. A
-SuperPET's snapshot fails. It reports the modules it leaves out, such
+fitted, or a SuperPET, at 50 or 60 Hz, and an 8032, 8096 or 8296 whose
+CRTC lines are 64 cycles long runs xpet's own 50 Hz editor, 901474-04
+dated 0283. A SuperPET comes with its bank RAM, its bank, its `$EFFE`
+bit and its ACIA, its CPU switch at the CPU that had the bus, and while
+that is the 6809, the 6809's registers. Its RAM switch is at R/W, the
+only position xpet has, its system latch is clear and its 6702 is as the
+RES line leaves it, since xpet saves none of them, and in 6809 mode its
+frame rate is the one the Waterloo ROM's CRTC table sets. It reports the modules it leaves out, such
 as the drives past device 8, the datasettes and the keyboard, and
 carries on without them, and a snapshot without a true drive takes
-badline's, a 2031, an 8050 or an 8250, off the bus and says so.
+badline's off the bus and says so.
 Restored into a running PET, an xpet snapshot fails for a PET built
 another way, such as a 3032B, and otherwise switches the machine off
 and on, keeping its tapes and the disk device 8 serves.
@@ -329,6 +350,19 @@ xcbm2's snapshots. Restored into a running P500, an
 xcbm5x0 snapshot fails for a P500 built another way, and otherwise
 switches the machine off and on, keeping the disk device 8 serves.
 
+## The KIM-1
+
+A KIM-1 saves and restores as the others do. A snapshot of one holds
+its RAM, the expansion's too, the CPU, both 6530s with their 64 bytes,
+ports and timers, the timer's interrupt flag among them, the panel with
+the TTY/KB jumper, the key held down and how long each LED segment has
+been lit, the teletype with the character on its way in or out, what
+it has queued and all it has printed, the SST switch, U3's wiring to
+IRQ and the speaker, and the keys `type_keys` has still to press. It
+restores into a KIM-1 with the same RAM. Its file names its machine
+`KIM1`, since VICE has no KIM-1, so no VICE emulator opens it, and
+`--vice` fails for it.
+
 ## VICE
 
 Snapshots use VICE's `.vsf` format, and badline's own modules are named

data/exe/badline-ruby

@@ -34,6 +34,11 @@ def load_sdl
   require "badline/frontend"
 end
 
+if options.kim1_terminal?
+  require "badline/audio/console"
+  exit Badline::KIM1::HostTerminal.start(options, Badline::Audio::Console.new(input: $stdin, output: $stdout))
+end
+
 if options.headless?
   require "badline/audio/console"
   console = if options.player_window?

data/lib/badline/audio/terminal.rb

@@ -4,8 +4,9 @@ module Badline
   module Audio
     # The terminal face of `--headless`: the tune's header, a status line
     # redrawn in place, and single keypresses read without waiting for
-    # Return. Ctrl-C still interrupts. A subclass puts the terminal in raw
-    # mode with #raw! and #restore and waits for keys with #readable?:
+    # Return, or for the KIM-1, the text typed and printed (#typing).
+    # Ctrl-C still interrupts. A subclass puts the terminal in raw mode
+    # with #raw! and #restore and waits for keys with #readable?:
     # Console with io/console for badline-ruby, and Native::Console with
     # stty and poll(2) for the native badline.
     class Terminal
@@ -50,6 +51,37 @@ module Badline
         end
       end
 
+      # Raw input for the length of the block, the cursor showing, for a
+      # session that types and prints text, as the KIM-1's teletype does.
+      def typing
+        mode = raw! if @input.tty?
+        yield
+      ensure
+        restore(mode) if mode
+        @output.print "\r\n"
+      end
+
+      # Waits up to `seconds` for keys and returns what they typed, as raw
+      # mode reads it, or an empty string.
+      def read_text(seconds)
+        if @closed
+          sleep(seconds)
+          return ""
+        end
+        return "" unless readable?(seconds)
+
+        text = @input.read_nonblock(64, exception: false)
+        return "" if text == :wait_readable
+
+        @closed = true if text.nil?
+        text.nil? ? "" : text
+      end
+
+      def print_text(text)
+        @output.print(text)
+        @output.flush
+      end
+
       def header(lines)
         lines.each { |line| @output.print "#{line}\r\n" }
         @output.print "←/→ subtune  n/p tune  ,/. seek  space pause  s shuffle  l loop  a all subtunes  q quit\r\n"

data/lib/badline/c128/keyed_state.rb

@@ -39,6 +39,7 @@ module Badline
         pending = @pending_keys
         out.ints("host.pending_keys", pending) if pending
         out.bool("host.typing", !pending.nil?)
+        save_init_keys(out)
         out.int("host.init_pending", @cycles <= init_threshold ? @init_handlers.length : 0)
         out.bool("host.holding_commodore", @holding_commodore)
         @typist.save_fields(out, "host.typist.")
@@ -55,6 +56,7 @@ module Badline
         @cpu_reset_pending = input.bool("cpu_reset_pending", @cpu_reset_pending)
         pending = input.ints("host.pending_keys", [])
         @pending_keys = input.bool("host.typing", !pending.empty?) ? pending.dup : nil
+        load_init_keys(input)
         @init_handlers_lost = [input.int("host.init_pending", 0) - @init_handlers.length, 0].max
         load_holding_fields(input)
         @typist.load_fields(input, "host.typist.")

data/lib/badline/c128.rb

@@ -139,6 +139,7 @@ module Badline
       @restore_pulse = false
       @init_handlers = []
       @pending_keys = nil
+      @init_keys = nil
       @typist = Input::MatrixTypist.new(@bus.keyboard)
       @capture_output = nil
       init_drives

data/lib/badline/c64/keyed_state.rb

@@ -39,6 +39,7 @@ module Badline
         out.bool("dma", @dma)
         pending = @pending_keys
         out.ints("host.pending_keys", pending) if pending
+        save_init_keys(out)
         out.int("host.init_pending", booting? ? @init_handlers.length : 0)
       end
 
@@ -52,6 +53,7 @@ module Badline
         @dma = input.bool("dma", @dma)
         pending = input.ints("host.pending_keys", [])
         @pending_keys = pending.empty? ? nil : pending.dup
+        load_init_keys(input)
         @init_handlers_lost = [input.int("host.init_pending", 0) - @init_handlers.length, 0].max
       end
 

data/lib/badline/c64.rb

@@ -80,6 +80,7 @@ module Badline
       @freeze_writes = 0
       @init_handlers = []
       @pending_keys = nil
+      @init_keys = nil
       @dos = nil
       @serial_trap = nil
       @save_trap = nil