One instruction set computer

[gianthare]

Не помню, чтобы я раньше это видел: Компьютер с одной единственной инструкцией" (теоретическая модель, естественно).
Есть несколько возможных вариантов, один из них "вычесть и прыгнуть, если меньше-равно нуля"

subleq a, b, c   ; Mem[b] = Mem[b] - Mem[a]
                 ; if (Mem[b] ≤ 0) goto c

если адрес для прыжка не указан, то по умолчанию это адрес следующей инструкции, т.е. след. инструкция выполнится независимо от результата

Дальше с ее помощью делается все остальное:

JMP c    == subleq Z, Z, c

ADD a, b == subleq a, Z
            subleq Z, b
            subleq Z, Z

MOV a, b == subleq b, b
            subleq a, Z
            subleq Z, b
            subleq Z, Z

etc.
Восхитительно, по-моему