1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-30 20:48:06 +11:00
collapseos/blk/015
2020-04-14 10:04:09 -04:00

17 lines
394 B
Plaintext

(cont.)
> : F! SWAP 1 + SWAP C! ;
> 8 H@ DUMP
:54 0000 0000 0000 0000 ........
> 9 H@ A!
> 8 H@ DUMP
:54 0900 0000 0000 0000 ........
> ' F! A!* !
> 9 H@ 1 + A!
> 8 H@ DUMP
:54 090a 0000 0000 0000 ........
> H@ H@ 2 + 2 AMOVE
> 8 H@ DUMP
:54 090a 0a0b 0000 0000 ........
>
(cont.)