diff options
Diffstat (limited to 'docs/history/07-zygote/code/examples/asmain.s')
| -rw-r--r-- | docs/history/07-zygote/code/examples/asmain.s | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/docs/history/07-zygote/code/examples/asmain.s b/docs/history/07-zygote/code/examples/asmain.s new file mode 100644 index 0000000..96d9658 --- /dev/null +++ b/docs/history/07-zygote/code/examples/asmain.s @@ -0,0 +1,9 @@ +:;standalone:_source_on_Q,_binary_on_G +4000 a.q ! +:m.rd ? m.ch z 0 a.q @ ! m.go j +:m.ch , a.q @ ! a.q @ 1 + a.q ! m.rd j +:m.go 4000 a.src ! 40000 a.dst ! 0 a.org ! 50000 a.lab ! a.run c 0 a.j ! +:m.out a.j @ a.n @ < m.end z + 40000 a.j @ + @ 0 $ . 0 $ 8 > . 0 $ 16 > . 24 > . + a.j @ 1 + a.j ! m.out j +:m.end q |