Node 700
Peer...
Source code
700 peer
reach 00 pn 1202F code right !b !b 0 !b !b !b ;
ram@ 06 4 for @p !b unext ; @p push @p .
63 , 0 , a! . . . begin @+ !p unext ;
ram 0E p 4005 reach ram@ 63 for @b ! unext ;
stk@ 14 3 for @p !b unext ; a! @p push .
9 , a . . . begin !p unext ;
stk 1B A04 reach stk@ 5 for @b ! unext
@b @b @b @b ! ! ! ! ; 24
init down a! right b! -d-- ; 29
8 l 0 u 0 ether
reach 00 pn 1202F code right !b !b 0 !b !b !b ;
ram@ 06 4 for @p !b unext ; @p push @p .
63 , 0 , a! . . . begin @+ !p unext ;
ram 0E p 4005 reach ram@ 63 for @b ! unext ;
stk@ 14 3 for @p !b unext ; a! @p push .
9 , a . . . begin !p unext ;
stk 1B A04 reach stk@ 5 for @b ! unext
@b @b @b @b ! ! ! ! ; 24
init down a! right b! -d-- ; 29
8 l 0 u 0 ether
Definitions
- reach
- .
- ram@
- .
- ram
- .
- stk@
- .
- stk
- .
- init
- Set registers A and B, and jump to DOWN.