diff options
| author |  Moon Flower <moonflower@elhenney.local>
| 2026-10-12 08:46:23 +0330 |
|---|---|---|
| committer | Moon Flower <moonflower@elhenney.local>
| 2026-10-12 08:46:23 +0330 |
| commit | ecc350ca5c2eb50be8309c5f14f8bf0d87db9a02 (patch) | |
| tree | 70e0af76a1b13affff7c6cc8aac7b3e6ef960478 /docs/history/07-zygote/code/gen.s | |
a
Diffstat (limited to 'docs/history/07-zygote/code/gen.s')
| -rw-r--r-- | docs/history/07-zygote/code/gen.s | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/docs/history/07-zygote/code/gen.s b/docs/history/07-zygote/code/gen.s new file mode 100644 index 0000000..8ec6aa2 --- /dev/null +++ b/docs/history/07-zygote/code/gen.s @@ -0,0 +1,9 @@ +:;genome_header,_fixed_addresses_starting_at_48000 +:;48000_boot__48002_a.run__48004.._&a.src_&a.dst_&a.org_&a.lab_&a.n_&a.ops +z.boot j a.run j #a.src #a.dst #a.org #a.lab #a.n #a.ops +:;boot:_read_source_until_eof_or_backtick,_assemble_it_at_0,_become_it +:z.boot 20000 a.q ! +:z.rd ? z.ch z z.go j +:z.ch , 0 $ 96 - z.end z a.q @ ! a.q @ 1 + a.q ! z.rd j +:z.end _ +:z.go 0 a.q @ ! 20000 a.src ! 0 a.dst ! 0 a.org ! 45000 a.lab ! a.run c 0 j |