74hc595

source [find interface/altera-usb-blaster.cfg]

adapter_khz 400
transport select jtag
jtag newtap atf1504 tap -irlen 3 -expected-id 0x0150403f

init
svf -progress foo.svf
sleep 200
shutdown

74hc595

# Configure these directories for your machine
PRJBUREAU_PATH    = ../../prjbureau
WINCUPL_WINE_PATH = c:\\Wincupl

FILENAME = foo
DEVICE = ATF1504AS
FITTERDEV = P1504CT44

# Compiled JED file
JED = $(FILENAME).jed

74hc595

tested on macOS Catalina 10.15.5

This is a version of Philip Pemberton's "Remote-controlling the HP 16500B", available from the Wayback Machine: https://web.archive.org/web/20170809181654/https://www.philpem.me.uk/elec/testgear/hp16500b/rc/

Follow Philip's steps to obtain the font files lg165.bdf and sm165.bdf from your logic analyzer. I was able to do this over FTP, but not through the Finder. I installed the command-line ftp utility with brew install tnftp.

After you have the fonts converted to .pcf.gz files, this is where the paths diverge. (pun intended)

74hc595

; bootup sequence from a Williams WPC pinball machine ROM
; (Getaway version L-2)
; Last 32K of ROM image in 0x8000-0xFFFF
; Banked ROM in 0x4000-0x7FFF
; RAM is 0x0000-0x1FFF
; Special ASIC registers are 0x3Fxx (e.g. 3FF2 controls LED D20)
; Reset vector is 0x8C9A

dasm09: M6809/H6309/OS9 disassembler V0.1 � 2000 Arto Salmi
; org $8C9A

74hc595

#!/usr/bin/env python

import unicodedata

chars = []

for c in xrange(0,0x10FFFF):
    try:
        name = unicodedata.name(unichr(c))
        chars.append((c,name))

74hc595

U+0022BB XOR
U+0022BD NOR
U+002312 ARC
U+002609 SUN
U+00264C LEO
U+0022A8 TRUE
U+0022BC NAND
U+0023DB FUSE
U+002625 ANKH
U+002699 GEAR

74hc595

; Blinks an LED connected to GP2 at roughly 15 Hz.

  INCLUDE "p10f200.inc"

  __CONFIG _WDTE_OFF & _CP_OFF & _MCLRE_OFF

  ORG    0x0000
  MOVLW  ~((1<<T0CS)|(1<<PSA))  ;enable GPIO2 and 1:256 Timer0 prescaler
  OPTION
  MOVLW  ~(1<<TRISIO2)  ;set GP2 as an output

74hc595

#include <caf/all.hpp>
using std::chrono::seconds;
using namespace caf;

void my_blocking_actor_fn(blocking_actor *self)
{
  self->receive(
    [](int val) -> int { return val*2; } /* never called */
  );
}

74hc595

#define IM_A_LITTLE_POLYGLOT /*
gcc $0 && ./a.out; exit
*/

/*
 1. Save as foo.c
 2. chmod +x foo.c
 3. Run with ./foo.c
 */

74hc595

// Playground - noun: a place where people can play

import Cocoa

protocol UnitBase {
    class var unitLabel:String { get }
}

// T: the unit
// U: its inverse