From ecc350ca5c2eb50be8309c5f14f8bf0d87db9a02 Mon Sep 17 00:00:00 2001 From: Moon Flower Date: Mon, 12 Oct 2026 08:46:23 +0330 Subject: a --- docs/history/07-zygote/code/gen.s | 9 +++++++++ 1 file changed, 9 insertions(+) create mode 100644 docs/history/07-zygote/code/gen.s (limited to 'docs/history/07-zygote/code/gen.s') 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 -- cgit v1.2.3